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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: PSGWCL

Package: Auto Replenishment Ward Stock

Routine: PSGWCL


Information

PSGWCL ;BHAM ISC/PTD,CML-Clear AMIS Exceptions ; 29 Dec 93 / 2:29 PM

Source Information

Source file <PSGWCL.m>

Entry Points

Name Comments DBIA/ICR reference
BDT
EDT
CONT
DTLP
STLP
DRGLP
ASK ;ASK FOR MISSING DRUG DATA
CHK ;VERIFY THAT USER HAS ENTERED ALL NECESSARY DATA
MSG
END
UPAMIS ;UPDATE THE AMIS SUBFILE AND REMOVE INCOMPLETE FLAG & X-REF
UPDATE
AMIS
KILL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"This option will show AR/WS drugs for which information is missing.",!,"The information MUST be supplied before the AMIS report can be printed.",!!
  • Line Location: PSGWCL+2
Function Call: WRITE
  • Prompt: !!,"No AMIS exceptions for selected dates."
  • Line Location: EDT+1
Function Call: WRITE
  • Prompt: !!,"Do you wish to edit incomplete data now"
  • Line Location: CONT+0
Function Call: WRITE
  • Prompt: !?5,"Enter ""YES"" or ""NO"""
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: !!,"The name for drug ",PSGWDN," is missing from the drug file.",!,"Notify your package coordinator!"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !!,"==> Information incomplete for: ",DRGNAM,!
  • Line Location: ASK+3
Function Call: WRITE
  • Prompt: *7,!!,"DATA IS STILL MISSING! YOU WILL NOT BE ABLE",!,"TO PRINT AMIS UNTIL INFORMATION IS COMPLETE!!"
  • Line Location: MSG+0
Function Call: WRITE
  • Prompt: !!,"DATA COMPLETE!!"
  • Line Location: MSG+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call