4 6 2 Working Lists

LANSA Open System Utilities

previous page next page

4.6.2 Working Lists

A function that receives a working list would be called with a parameter list similar to this:

Working list received:

PSLSKL

 

Working list elements:

SKILCODE

A(4)

SKILDESC

A(20)

COMMENT

A(40)

 

 

In RPG/400

      CALL   FUNNAME

      PARM              DC@IDS

      PARM              DC@EDS

      PARM              PR@IDS

      PARM              PSLSKL

      PARM              PSLNUM

      PARM              PSLPOS

In Control Language

CALL PGM(FUNNAME) +

PARM(&DC@IDS &DC@EDS &PR@IDS &PSLSKL +

&PSLNUM &PSLPOS)

where:

FUNNAME

Is the function object name
DC@IDS

System information A(1024)
DC@EDS

Extra System information A(2500)
PR@IDS

Process Information A(5000)
PSLSKL

Passed working list (Note 1)
n * A(64) Note 2
PSLNUM

Number of entries in list (Note 1)
P(7,0)
PSLPOS

Position in list (Note 1)
P(7,0)

 

 

Note 1: The 'Passed working list' parameters are repeated for each passed working list.

Note 2: The PSLSKL parameter is defined as the aggregate length of all fields in the working list. The size of the PSLSKL parameter of this field will be 64 bytes. In RPG terms this field is a multiple occurrence data structure where each of the fields are sub-fields of PSLSKL.

The 'n' occurrences is the number of entries in the working list that have been passed.

previous page start next page