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

Package: Drug Accountability

Routine: PSAVER2


Information

PSAVER2 ;BIR/JMB-Verify Invoices - CONT'D ;10/7/97

Source Information

Source file <PSAVER2.m>

Entry Points

Name Comments DBIA/ICR reference
ASKDRUG
ADDDATA ;Adds the missing NDC and/or UPC
RECORD ;Adds adjusted data to DA ORDERS file
NEW
ADJ
INDEX
DUOU ;Gets Dispense Units Per Order Unit
OU ;Get order unit
PHARM ;Pharmacy Location/Master Vault -- DR is set prior to the call.
QTY ;Adjust the quantity received
RECD ;Date Received
REORDER ;Enter reorder level for drug if the field is blank.
STOCK ;Enter stock level for drug if the field is blank.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"If the item will never be in the DRUG, press the Return key then",!,"answer YES to the ""Is this a supply item?"" prompt. To bypass this",!,"line item, enter ""^"" then press the Return key.",!
  • Line Location: ASKDRUG+0
Function Call: WRITE
  • Prompt: !,"Item appears to be marked for supply, no need to enter Dispense Units Per Order Unit."
  • Line Location: DUOU+3
Function Call: WRITE
  • Prompt: !!,"The dispense units per order unit must be entered",!,"to change the status of the invoice to Verified."
  • Line Location: DUOU+11
Function Call: WRITE
  • Prompt: !
  • Line Location: DUOU+15

FileMan Files Accessed Via FileMan Db Call

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