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

Package: Outpatient Pharmacy

Routine: PSOSUP


Information

PSOSUP ;BHAM ISC/SAB-ENTER PHARMACISTS ; 07/13/92 16:43

Source Information

Source file <PSOSUP.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
EX
PHASK

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PSOSUP+3
Function Call: WRITE
  • Prompt: !,$C(7),"You Must Hold the 'PSORPH' key in order to be able to use this option!",!
  • Line Location: PSOSUP+4
Function Call: READ
  • Formatting: !!
  • Prompt: "Select PHARMACIST: "
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !,$P(^VA(200,PSN,0),"^")_" DOES NOT hold the 'PSORPH' Security Key",!
  • Line Location: ASK+5
Function Call: WRITE
  • Prompt: !,$P(^VA(200,PSN,0),"^")_" now holds the 'PSORPH' Security Key",!
  • Line Location: ASK+6
Function Call: WRITE
  • Prompt: !,"The pharmacist is an entry in the NEW PERSON file and holds the PSORPH",!,"key in the SECURITY KEY file.",!,"To delete a pharmacist, enter the name at the Select Pharmacist prompt and"
  • Line Location: PHASK+0
Function Call: WRITE
  • Prompt: !,"when the key PSORPH is shown as a default enter @ press return.",!,"The current list of PSORPH holders are:"
  • Line Location: PHASK+1
Function Call: WRITE
  • Prompt: !?5,$P($G(^VA(200,J,0)),"^")
  • Line Location: PHASK+3
Info |  Source |  Entry Points |  Interaction Calls