• Introduction
  • What is HAL?
  • Get Started
  • Language Reference
    • Declarations, assignments and statements
    • Keywords and operations
• Tutorials
  • Change a window
    • Find the window
    • Modify the window
  • Create a report
• HAL Primitives
• HAL Procedures/Functions
• HAL Discussions

Description:

Returns last parameter from string range, where parameters are separated by colon.

Parameters:
str	String Range
stringlength	Length of returned string

external procedure CustomerOut(record CUVc);

global
procedure CustListRn(record RcVc RepSpec)
begin
  record CUVc CUr;
  Boolean TrHs;
  string 20 frcu,tocu;

  frcu = FirstInRange(RepSpec.f1,10);
  tocu = LastInRange(RepSpec.f1,10);
  
  CUr.Code = frcu;
  TrHs = true;
  while (LoopMain(CUr,1,TrHs)) begin
    if (CUr.Code>tocu) then begin
      TrHs = false;
    end; 
    if (TrHs==true) then begin
      CustomerOut(CUr);
    end;
  end;
  return;
end;    

Related topics: