ORY3062 ;SLC/RJS,CLA - OCX PACKAGE RULE TRANSPORT ROUTINE (Delete after Install of OR*3*306) ;MAR 13,2012 at 13:09
Source file <ORY3062.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| S | ;
 ; Record Utilities  | 
|
| ADDREC(OCXCREF) | ;
 | 
|
| CREATE(OCXCREF,OCXDD,OCXDA,OCXLVL) | ;
 | 
|
| LOADWORD(RREF,OCXDD,OCXFLD,OCXSUB) | ;
 | 
|
| GETREF(OCXDD,OCXDA,OCXLVL) | ;
 | 
|
| WORD(DD,GREF,FLD,DA,RREF) | ;
 | 
|
| DATE(X) | ||
| DIE(OCXDD,OCXDIC,OCXFLD,OCXVAL,OCXDA,OCXLVL) | ;
 | 
|
| DIC(DIC,X,OCXADD) | ||
| PUSH(OCXDA) | ;
 | 
|
| POP(OCXDA) | ;
 | 
|
| APPEND(ARRAY,OCXSUB) | ;
 | 
|
| READ(OCXZ0,OCXZA,OCXZB,OCXZL) | ;
 | 
|
| PAUSE() | 
| 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: READ | 
  | 
| Function Call: WRITE | 
  | 
| Function Call: WRITE | 
  |