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
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>

Entry Points

Name Comments DBIA/ICR reference
START ;
QUIT
MSG

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
Info |  Source |  Entry Points |  Interaction Calls