8 lines
251 B
Text
8 lines
251 B
Text
|
C *--> FROM CMS(UFLDCX)
|
||
|
|
C DATASET ATTRIBUTE INFORMATION COMMON BLOCK
|
||
|
|
COMMON /UFLDCX/ IFLDCX,NFILE,FILEX(99),LRECLX(99),LBLKX(99),
|
||
|
|
* DUNITX
|
||
|
|
CHARACTER*4 DUNITX
|
||
|
|
CHARACTER*8 FILEX
|
||
|
|
C
|