ORY4270 ;SLC/RJS,CLA - OCX PACKAGE RULE TRANSPORT ROUTINE ; 11/28/18 3:38pm
Source file <ORY4270.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
S | ;
|
|
WARN(RTN,MSG,LINES) | ;
|
|
TEXT(RTN,LINE) | ;
|
|
HEADER | ;
|
|
GETFILE(FILE,RECNAME,ARRAY) | ;
|
|
LKUPARRY(DD,KEY,ARRAY) | ;
|
|
LOOKUP(FILE,KEY) | ;
|
|
GETREC(GL,PATH,D0,REM) | ;
|
|
SUB(X) | ||
DIQ(DIC,DA,OCXARY) | ;
|
|
PAUSE() | ||
NOW() |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Function Call: WRITE |
|