e2ecdcfe33
Former-commit-id:a02aeb236c[formerly9f19e3f712] [formerlya02aeb236c[formerly9f19e3f712] [formerly06a8b51d6d[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]]] Former-commit-id:06a8b51d6dFormer-commit-id:8e80217e59[formerly3360eb6c5f] Former-commit-id:377dcd10b9
9 lines
311 B
Text
9 lines
311 B
Text
C *--> FROM DACOMMON.USRATR
|
|
C
|
|
C ASAP USER NAMES AND ATTRIBUTES COMMON BLOCK
|
|
COMMON /USRATR/ MAXRFC,NRFCS,IUSRPT,ITU,IPU,I0PR,
|
|
* XUSRID,XUSRDS
|
|
CHARACTER*8 XUSRID(15)
|
|
CHARACTER*30 XUSRDS(15)
|
|
DIMENSION IUSRPT(15),I0PR(15),ITU(15),IPU(15)
|
|
C
|