6 lines
285 B
Text
6 lines
285 B
Text
C *--> FROM SCOMMON.SUDTRX
|
|
C RRS DATA TYPES COMMON BLOCK
|
|
COMMON /SUDTRX/ IURFIL,MURTYP,NURTYP,RRSCD(30),ICLASS(30),
|
|
* NPROBS(30),UMISS(30),UNTIN(30),UNTOUT(30),DISTRB(30),
|
|
* LFIELD(30),NUMDEC(30),CHKMIN(30),CHKMAX(30)
|
|
C
|