Routine: ZOSFMSQ

Information

ZOSFMSQ ;SFISC/AC - SETS UP ^%ZOSF FOR VAX M/SQL ;8/1/94 11:19

Source file <ZOSFMSQ.m>

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: $S($G(DTIME):DTIME,1:9999) Line Location: MGR+0
Function Call: WRITE	Prompt: !,"NAME OF MANAGER'S UCI,DIRECTORY SET: "_^%ZOSF("MGR")_"// " Line Location: MGR+0
Function Call: READ	Variable: X Timeout: $S($G(DTIME):DTIME,1:9999) Line Location: PROD+0
Function Call: WRITE	Prompt: !,"PRODUCTION (SIGN-ON) UCI,DIRECTORY SET: "_^%ZOSF("PROD")_"// " Line Location: PROD+0
Function Call: READ	Variable: X Timeout: $S($G(DTIME):DTIME,1:9999) Line Location: VOL+0
Function Call: WRITE	Prompt: "MUST BE 1-10 characters." Line Location: VOL+0
Function Call: WRITE	Prompt: !!,"ALL SET UP",!! Line Location: OS+1