Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: PSGWPRE1

Package: Auto Replenishment Ward Stock

Routine: PSGWPRE1


Information

PSGWPRE1 ;BHAM ISC/CML-Pre-init for AR/WS V2.3 ; 16 Jun 93 / 1:18 PM

Source Information

Source file <PSGWPRE1.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA Fileman 2 NOW^%DTC  ^DIK  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Auto Replenishment Ward Stock 1 PSGWINIT  

Entry Points

Name Comments DBIA/ICR reference
MSG
START ;
QUIT

External References

Name Field # of Occurrence
NOW^%DTC START+1
^DIK START+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"DUZ MUST BE SET TO A VALID USER NUMBER AND",!,"DUZ(0) MUST BE SET TO THE ""@"" SIGN",!!
  • Line Location: PSGWPRE1+2
Function Call: WRITE
  • Prompt: !!,"Beginning pre-init...",!!,"Initialization process started ",Y,".",!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !!,"Deleting RETURN REASON subfield in Pharmacy AOU Stock file (#58.1)...",!,"(This field will be restored by inits as a multiple field)"
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !!,"Pre-initialization is now complete!",!
  • Line Location: QUIT+0
Function Call: WRITE
  • Prompt: *7,*7,*7,!!,LN,!,"** You cannot install version 2.3 over a current version earlier than 2.04. **",!,"** Contact your local ISC for a copy of AR/WS V2.04 (tape and release notes)**"
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !,"** and install it first.",?76,"**",!,"**",?76,"**",!,"********************* INSTALLATION OF AR/WS V2.3 ABORTED *********************"
  • Line Location: MSG+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD("DD" START+1
^PS(59.7 - [#59.7] PSGWPRE1+5
^PSI(58.1 - [#58.1] PSGWPRE1+4
^VA(200 - [#200] PSGWPRE1+2

Label References

Name Line Occurrences
MSG PSGWPRE1+5
START PSGWPRE1+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% START+1, QUIT+2!
%H QUIT+2!
%I QUIT+2!
DA START+4*, QUIT+2!
DA(1 START+4*
DIC QUIT+2!
DIFQ PSGWPRE1+2!, PSGWPRE1+5!
DIK START+4*, QUIT+2!
DUZ PSGWPRE1+2
DUZ(0 PSGWPRE1+2
>> INITDT START+1*
LN QUIT+2!, MSG*, MSG+1
>> START START+1*
X START+1, QUIT+2!
>> XQABT1 PSGWPRE1+3*
>> XQABT2 QUIT+1*
>> XQABT3 QUIT+1*
Y START+1*, QUIT+2!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All