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