9bb8decbcf
Former-commit-id:133dc97f67[formerlya02aeb236c] [formerly9f19e3f712] [formerly06a8b51d6d[formerly9f19e3f712[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]] Former-commit-id:06a8b51d6dFormer-commit-id:377dcd10b9[formerly3360eb6c5f] Former-commit-id:8e80217e59
23 lines
1 KiB
Text
23 lines
1 KiB
Text
C *--> FROM CMS(UINCLX)
|
|
C INCLUDES FROM DATASET COMMON BLOCK
|
|
COMMON /UINCLX/ MINCL,MPINCL,ICINCL,NINCL,
|
|
* PATHINCL(99),NRINCL(99),DIRINCL
|
|
CHARACTER*132 PATHINCL
|
|
CHARACTER*120 DIRINCL
|
|
C
|
|
C DESCRIPTION OF VARIABLES:
|
|
C VARIABLE TYPE I/O DIM CONTENTS
|
|
C -------- ---- --- --- --------
|
|
C MINCL I*4 I 1 MAXIMUM LEVELS OF NESTED INCLUDES
|
|
C ALLOWED
|
|
C MPINCL I*4 I 1 MAXIMUM LEVELS OF NESTED INCLUDES
|
|
C TO BE PROCESSED
|
|
C ICINCL I*4 I 1 INDICATOR IF INCLUDED RECORDS TO
|
|
C CHECKED FOR COMMENTS
|
|
C 0=NO
|
|
C 1=YES
|
|
C NINCL I*4 O 1 CURRENT LEVELS OF NESTED INCLUDES
|
|
C PATHINCL A132 O 99 PATH NAME
|
|
C NRINCL I*4 O 99 NUMBER OF RECORDS INCLUDED
|
|
C DIRINCL A132 O 1 DIRECTORY NAME
|
|
C
|