Former-commit-id:a02aeb236c
[formerly9f19e3f712
] [formerly06a8b51d6d
[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]] Former-commit-id:06a8b51d6d
Former-commit-id:3360eb6c5f
7 lines
278 B
Text
7 lines
278 B
Text
C *--> FROM PRDCOMMON.PUNITS
|
|
C PROCESSED DATA BASE FILE UNITS COMMON BLOCK
|
|
COMMON /PUNITS/ KMAPTS,KGENTS,KFMPTS,KFUTTS,KFCTTS,KINDEX,KRFCPR,
|
|
* MXPRDF,NMPRDF
|
|
DIMENSION KPRDTU(5)
|
|
EQUIVALENCE (KPRDTU(1),KMAPTS)
|
|
C
|