Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: ZOSFGTM

Package: Kernel

Routine: ZOSFGTM


Information

ZOSFGTM ;ISF/staff - ZOSF Table for GT.M for VMS ;10/18/06 14:28

Source Information

Source file <ZOSFGTM.m>

Entry Points

Name Comments DBIA/ICR reference
OS
MGR
PROD ;
VOL
Z ;

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: MGR+0
Function Call: WRITE
  • Prompt: !,"NAME OF MANAGER'S UCI,VOLUME SET: "_^%ZOSF("MGR")_"// "
  • Line Location: MGR+0
Function Call: WRITE
  • Prompt: !,"The value of PRODUCTION will be used in the GETENV api."
  • Line Location: PROD+1
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: PROD+2
Function Call: WRITE
  • Prompt: !,"PRODUCTION (SIGN-ON) UCI,VOLUME SET: "_^%ZOSF("PROD")_"// "
  • Line Location: PROD+2
Function Call: WRITE
  • Prompt: !,"The VOLUME name must match the one in PRODUCTION."
  • Line Location: VOL+0
Function Call: WRITE
  • Prompt: !,"NAME OF VOLUME SET: "_^%ZOSF("VOL")_"//"
  • Line Location: VOL+1
Function Call: WRITE
  • Prompt: "MUST BE 3 Upper case."
  • Line Location: VOL+2
Function Call: WRITE
  • Prompt: !,"Must match PRODUCTION"
  • Line Location: VOL+3
Function Call: WRITE
  • Prompt: !,"^%ZOSF setup"
  • Line Location: VOL+5
Function Call: WRITE
  • Prompt: !!,"From VMS use: mupip stop /id=pid",!
  • Line Location: Z+64

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF( ZOSFGTM+7, ZOSFGTM+10*
^%ZOSF("MASTER" ZOSFGTM+5!
^%ZOSF("MGR" MGR*
^%ZOSF("OS" OS*
^%ZOSF("PROD" PROD+2*, PROD+4, VOL+3
^%ZOSF("SIGNOFF" ZOSFGTM+5!
^%ZOSF("VOL" ZOSFGTM+6*, PROD+4*, VOL+1, VOL+4*

Label References

Name Line Occurrences
MGR MGR
PROD PROD+2
VOL VOL+2

Naked Globals

Name Field # of Occurrence
^("UCICHECK" MGRPROD+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %Y ZOSFGTM+4*
DTIME ZOSFGTM+4*, MGRPROD+2, VOL+1
>> I ZOSFGTM+7*, ZOSFGTM+8*
>> X ZOSFGTM+9*, ZOSFGTM+10, MGR*, PROD+2*, VOL+1*, VOL+2, VOL+3, VOL+4
>> Y MGRPROD+2
>> Z ZOSFGTM+8*, ZOSFGTM+10
ZO ZOSFGTM+7!
ZO( ZOSFGTM+7*, ZOSFGTM+10

Marked Items

Name Field # of Occurrence
$T(Z+1+I ZOSFGTM+9
$T(Z+I ZOSFGTM+8
Info |  Source |  Entry Points |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All