5 lines
172 B
Text
5 lines
172 B
Text
|
C *--> FROM URCOMMON.URPPDT
|
||
|
|
C REORDER PROGRAM PARAMETRIC DATA BASE PARAMETER TYPE DIRECTORY
|
||
|
|
COMMON /URPPDT/ JPDTDR(8,50)
|
||
|
|
C
|