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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSAREC

Package: Drug Accountability

Routine: PSAREC


Information

PSAREC ;BIR/LTL,JMB-Receiving Directly into Drug Accountability ;7/23/97

Source Information

Source file <PSAREC.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Drug Accountability 3 POST^PSAREC1  DEV^PSAREPV  ^PSAUTL3  
VA Fileman 3 ^DIC  ^DIE  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSA RECEIVING  

Entry Points

Name Comments DBIA/ICR reference
DISP
QTY
POSTHELP ;Extended help for 'Okay to post?'
SETUP
PRICE
DRUG
DUOU
QTYHELP ;
START
PART
EXIT
PRICEHLP ;Extended help for 'Price per order unit'
CORRECT ;Extended help for 'Would you like to correct it'
INV ;Extended help for 'Invoice number'
OU
GETDATA ;Gets receipts data
NDC
PO
NDCHELP ;Extended help for 'NDC'

External References

Name Field # of Occurrence
^DIC PO+1, START+1, DRUG+2, OU
^DIE SETUP+7, PO+2
^DIR SETUP+6, START+3, START+5, NDC+1, DUOU+1, PRICE, QTY, DISP+3
POST^PSAREC1 DISP+4
DEV^PSAREPV START+4
^PSAUTL3 SETUP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"There are no active pharmacy locations."
  • Line Location: SETUP+2
Function Call: WRITE
  • Prompt: !!,"The current PO# for this location doesn't seem current.",!
  • Line Location: SETUP+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PO+0
Function Call: WRITE
  • Prompt: !!,$G(PSALOCN),!
  • Line Location: DRUG+0
Function Call: WRITE
  • Prompt: ?50,"Converted quantity: ",PSAREC
  • Line Location: DISP+0
Function Call: WRITE
  • Prompt: !
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: !?5,"Enter YES to enter the current obligation number. It will be presented",!?5,"as the default the next time the obligation number prompt is displayed."
  • Line Location: CORRECT+1
Function Call: WRITE
  • Prompt: !!?5,"Enter NO to keep the current obligation number as the default."
  • Line Location: CORRECT+2
Function Call: WRITE
  • Prompt: !?5,"Enter the invoice number for the receipts."
  • Line Location: INV+1
Function Call: WRITE
  • Prompt: !?5,"Enter the National Drug Code (NDC) for the received drug.",!?5,"Enter the NDC with dashes or 12-digits without dashes."
  • Line Location: NDCHELP+1
Function Call: WRITE
  • Prompt: !?5,"Enter YES to update the balances in the pharmacy location and DRUG file",!?5,"and add a transaction."
  • Line Location: POSTHELP+1
Function Call: WRITE
  • Prompt: !?5,"Enter NO to abort receiving the drug."
  • Line Location: POSTHELP+2
Function Call: WRITE
  • Prompt: !?5,"Enter the cost for each order unit."
  • Line Location: PRICEHLP+1
Function Call: WRITE
  • Prompt: !?5,"The quantity entered will be multiplied by the dispense units",!?5,"per order unit to determine the number of dispense units received."
  • Line Location: QTYHELP+1
Routine Call
  • DIE
  • Line Location:
    • SETUP+7
    • PO+2
Routine Call
  • DIC
  • Line Location:
    • PO+1
    • START+1
    • DRUG+2
    • OU
Routine Call
  • DIR
  • Line Location:
    • SETUP+6
    • START+3
    • START+5
    • NDC+1
    • DUOU+1
    • PRICE
    • QTY
    • DISP+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] Classic Fileman Calls
^DIC(51.5 - [#51.5] Classic Fileman Calls
^PSD(58.8 - [#58.8] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PRC(440 QTY+2
^PRC(442 SETUP+4, SETUP+8, QTY+2
^PRCS(410 START
^PSD(58.8 - [#58.8] SETUP+3, SETUP+8, GETDATA+1
^PSD(58.81 - [#58.81] START+4
^PSDRUG - [#50] GETDATA+1, NDC+9, NDC+10, OU+3
^PSDRUG("C" NDC+7, NDC+8

Label References

Name Line Occurrences
EXIT SETUP, SETUP+2, SETUP+4, PO+1
GETDATA DRUG+3
OU NDC+2
PO PART
START PART

Naked Globals

Name Field # of Occurrence
^(0 NDC+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT!
DA SETUP+7*, PO+2*, EXIT!
DA(1 DRUG+1*
DIC PO*, PO+1!, START*, START+1!, DRUG+1*, DRUG+2!, OU*!
DIC("A" PO+1*, START*, OU*
DIC("B" SETUP+8*, START*, OU*
DIC("S" PO+1*, START*
DIC(0 PO*, START*, DRUG+1*, OU*
DIE SETUP+7*!, PO+2*!, EXIT!
DINUM EXIT!
DIR SETUP+6!, START+3!, START+5!, NDC+1!, DUOU+1!, PRICE!, QTY!, DISP+3!
DIR("?" SETUP+5*, START+2*, NDC*, DUOU+1*, PRICE*, QTY*, DISP+2*
DIR("??" SETUP+5*, START+2*, NDC*, DUOU+1*, PRICE*, QTY*, DISP+2*
DIR("A" SETUP+5*, START+2*, START+5*, NDC*, DUOU*, PRICE*, QTY*, DISP+2*
DIR("B" SETUP+5*, START+5*, DUOU*, PRICE*, DISP+2*
DIR(0 SETUP+5*, START+2*, START+5*, NDC*, DUOU*, PRICE*, QTY*, DISP+2*
DIRUT SETUP+4, SETUP+6, EXIT!, START+3, START+4, NDC+2, DUOU+2, PRICE+1, QTY+1, DISP+3
DR SETUP+7*, PO+2*, EXIT!, OU*
DT SETUP+4
DTOUT EXIT!
DUOUT EXIT!
PSA EXIT!
PSA(2 EXIT+2!, START+3*, START+4
PSA50SYN EXIT!, NDC+2*, NDC+8*, NDC+9, NDC+10, NDC+11*
PSACBAL EXIT!, GETDATA+1*
PSACHK SETUP+1*, SETUP+2, EXIT!
PSACNT SETUP*, EXIT!
PSACOMB EXIT!
PSACON PO+1*, EXIT!, START, START+1*
PSACOST EXIT!, QTY+2*
PSADASH EXIT!, NDC+2*, NDC+3*, NDC+4
PSADRG EXIT!, GETDATA+1*, NDC+7, NDC+8, NDC+9, NDC+10, OU+3
PSADRGN EXIT!, GETDATA+1*
PSADT EXIT!
PSADUOU EXIT!, NDC+2*, NDC+6*, NDC+10*, DUOU, DUOU+3*, PRICE+2, QTY+2
PSAIEN EXIT+1!
PSAIEN1 EXIT+1!
PSAISIT EXIT+1!
PSAISITN EXIT+1!
PSALEN EXIT+1!
PSALINE EXIT+1!
PSALOC SETUP+2, SETUP+3, SETUP+7, SETUP+8, PO+2, EXIT+1!, DRUG+1, GETDATA+1
PSALOC("" SETUP+1
PSALOCN EXIT+1!, DRUG
PSANDC EXIT+1!, NDC+2*, NDC+4*, NDC+5*, NDC+6*, NDC+7, NDC+8
PSANODE EXIT+1!
PSANPDU EXIT+1!
PSANPOU EXIT+1!
PSAODASH EXIT+1!
PSAONDC EXIT+1!
PSAOSIT EXIT+1!
PSAOSITN EXIT+1!
PSAOU EXIT+1!, NDC+2*, NDC+6*, NDC+10*, OU, OU+2*
PSAOUT SETUP*, PO*, EXIT+1!, DRUG+1, DRUG+2*, DRUG+3, OU+1*, DUOU+2*, PRICE+1*, QTY+1*
, DISP+3*
PSAPDU EXIT+2!, PRICE+2*
PSAPO SETUP+3*, SETUP+4, PO+1*, PO+2, EXIT+2!, QTY+2
PSAPOU EXIT+2!, NDC+2*, NDC+6*, NDC+10*, PRICE, PRICE+2*, QTY+2
PSAREC EXIT+2!, QTY+2*, DISP
PSAREC(1 QTY+2*
PSASEL EXIT+2!
PSAT EXIT+2!
PSATDRG EXIT+2!
PSAVEND EXIT+2!, QTY+2*
X EXIT+2!
Y SETUP+6, PO+1, EXIT+2!, START+1, START+3, START+4, DRUG+2, GETDATA+1, NDC+3, OU+1
, OU+2, DUOU+3, PRICE+2, QTY+2, DISP+4
Y(0 PO+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All