• 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:

Adds a new row to the end of a string list (created with StringList primitive) of a specified window.

Parameters:
WindowId	The Id number of the window which holds the string list that we are updating
StrLength	Length of the inserted string.
NewListItem	The list item that will be inserted into the string list.
InsertFirst	If TRUE, then the NewListItem will be inserted to the beginning of the list.

global
procedure IVCashVc_ContactSClass(Integer wn,Integer mwn)
begin
  record IVCashVc IVCashr;
  Array string 60 acontact;
  Integer i,acnt;

  GetWindowRecord(mwn,IVCashr);
  ContactSClassOnOpen(wn,IVCashr.CustCode,acontact,acnt);

  for (i=0;i<acnt;i=i+1) begin
    SetListString(wn,60,acontact[i],false);
  end;

  return;
end;

Related topics: