5 lines
218 B
Text
5 lines
218 B
Text
C *--> FROM DACOMMON.DADBGX
|
|
C ASAP DEBUG COMMON BLOCK
|
|
COMMON /DADBGX/ IODADB,IDATR,IDADB,
|
|
* MDBFLG,MDBUSR,NDBUSR,IDBFLG(15,7),DBGUSR(15)
|
|
CHARACTER*3 DBGUSR
|