Former-commit-id:a02aeb236c
[formerly9f19e3f712
] [formerly06a8b51d6d
[formerly 64fa9254b946eae7e61bbc3f513b7c3696c4f54f]] Former-commit-id:06a8b51d6d
Former-commit-id:3360eb6c5f
6 lines
257 B
Text
6 lines
257 B
Text
C *--> FROM CMS(UPAGEX)
|
|
C PAGE AND TITLE INFORMATION COMMON BLOCK
|
|
COMMON /UPAGEX/ PUSRID,IPSPAG(99),IPSLIN(99),
|
|
* NPSPAG(99),NPSMLN(99),NPSNLN(99),NPSNLT(99),IPSNWP(99)
|
|
CHARACTER*8 PUSRID
|
|
C
|