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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: PSAORDP

Package: Drug Accountability

Routine: PSAORDP


Information

PSAORDP ;BIR/JMB-Print Orders ;9/19/97

Source Information

Source file <PSAORDP.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 4 DD^%DT  NOW^%DTC  ^DIC  ^DIR  
Kernel 3 ^%ZIS  ^%ZISC  ^%ZTLOAD  
Drug Accountability 2 ^PSAORDP1  START^PSAUP4  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSA PRINT ORDERS  

Entry Points

Name Comments DBIA/ICR reference
STATUS ;Select status
PRTSTA ;Sets up printing & prints Unprocessed invoices
STATHELP ;Extended help for Enter Status
INVBOTH ;Select invoice from XTMP & 58.811
PROCESS ;Prints Processed invoices
PRTINV ;Loops thru orders & invoices to print invoices
INV ;Select invoice from 58.811
ORDHELP ;Extended help to Select Order
START
EXIT
INVOICE ;Prompts for order and invoice
PRTORD ;Loops thru invoices to print all for one order
INVXTMP ;Select invoice from XTMP
ORDIHELP ;Extended help to Select Invoice's Order
ORDER ;Select order
SELHELP ;Extended help to Print by Order#, Invoice#, or Invoice Status
DQ

External References

Name Field # of Occurrence
DD^%DT PRTINV+8, PRTORD+5, PRTSTA+4
NOW^%DTC PRTINV+8, PRTORD+5, PRTSTA+4
^%ZIS START+4
^%ZISC EXIT
^%ZTLOAD START+8
^DIC INV+2
^DIR START, INVOICE+2, INVXTMP+2, INVBOTH+2, ORDER+2, STATUS+2
^PSAORDP1 PRTINV+4, PRTORD+7, PROCESS+7
START^PSAUP4 PRTINV+9, PRTORD+6, PRTSTA+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You do not hold the key to enter the option."
  • Line Location: PSAORDP+6
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+0
Function Call: WRITE
  • Prompt: !
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !,PSASLN
  • Line Location: INVOICE+2
Function Call: WRITE
  • Prompt: !,"Invoice# "_PSAINVBH
  • Line Location: INVOICE+15
Function Call: WRITE
  • Prompt: !,"Invoice# "_PSAINVH
  • Line Location: INVOICE+18
Function Call: WRITE
  • Prompt: !,PSAORDB_" is an invalid order number."
  • Line Location: INVOICE+21
Function Call: WRITE
  • Prompt: !
  • Line Location: ORDER+2
Function Call: WRITE
  • Prompt: !,Y_" is an invalid order number."
  • Line Location: ORDER+9
Function Call: WRITE
  • Prompt: !
  • Line Location: STATUS+1
Function Call: WRITE
  • Prompt: !!,"There are no invoices with the status of Processed."
  • Line Location: STATUS+4
Function Call: WRITE
  • Prompt: !!,"There are no invoices with the status of Unprocessed."
  • Line Location: STATUS+7
Function Call: WRITE
  • Prompt: !?5,"Enter the order number assigned to the order to be print."
  • Line Location: ORDHELP+1
Function Call: WRITE
  • Prompt: !?5,"Enter the invoice's order number to be print. The invoice number ",!?5,"prompt will follow."
  • Line Location: ORDIHELP+1
Function Call: WRITE
  • Prompt: !?5,"To print all invoices for a specific order, select Order Number.",!?5,"To print a specific invoice, select Invoice Number. To print all"
  • Line Location: SELHELP+1
Function Call: WRITE
  • Prompt: !?5,"invoices with an unprocessed or processed status, select Invoice",!?5,"Status."
  • Line Location: SELHELP+2
Function Call: WRITE
  • Prompt: !?5,"Enter U to print all uploaded invoices that have not been processed.",!?5,"Enter P to print all processed invoices that have not been verified."
  • Line Location: STATHELP+1
Routine Call
  • DIC
  • Line Location:
    • INV+2
Routine Call
  • DIR
  • Line Location:
    • START
    • INVOICE+2
    • INVXTMP+2
    • INVBOTH+2
    • ORDER+2
    • STATUS+2
Routine Call
  • %ZIS
  • Line Location:
    • START+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSD(58.811 - [#58.811] INVOICE+7, INVOICE+8, INVBOTH+6, ORDER+6, PRTORD+7, STATUS+4, PROCESS+5, PROCESS+6, PROCESS+7
^XTMP("PSAPV" INVOICE+11, INVOICE+12, ORDER+7, PRTORD+3, PRTORD+4, PRTORD+6, STATUS+6, PRTSTA+2, PRTSTA+3
^XUSEC("PSA ORDERS" PSAORDP+6

Label References

Name Line Occurrences
EXIT START+2, START+3, START+4, START+5, DQ+1, DQ+2, PRTORD+8, PROCESS+8
INV INVOICE+16
INVBOTH INVOICE+20
INVOICE START+2
INVXTMP INVOICE+19
ORDER START+2
PROCESS PRTSTA+1
PRTINV DQ+2
PRTORD DQ+1
PRTSTA DQ+3
STATUS START+2, STATUS+4, STATUS+5

Naked Globals

Name Field # of Occurrence
^("IN" INVOICE+12, STATUS+6

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+1!, PRTINV+8, PRTORD+5, PRTSTA+4
%ZIS START+4*, EXIT+1!
DA EXIT+1!
DA(1 INV+2*
DIC EXIT+1!, INV+2*!
DIC("A" INV+2*
DIC(0 INV+2*
DIR START!, INVOICE+2!, INVXTMP+2!, INVBOTH+2!, ORDER+2!, STATUS+2!
DIR("?" INVOICE+2*, ORDER+2*
DIR("??" START*, INVOICE+2*, ORDER+2*, STATUS+1*
DIR("A" START*, INVOICE+2*, INVXTMP+2*, INVBOTH+2*, ORDER+2*, STATUS+1*
DIR("B" START*
DIR(0 START*, INVOICE+2*, INVXTMP+2*, INVBOTH+2*, ORDER+2*, STATUS+1*
>> DIRUT START+1, STATUS+2
DTOUT EXIT+1!, INVOICE+3, INV+3, INVXTMP+3, INVBOTH+3, ORDER+3
DUOUT EXIT+1!, INVOICE+3, INV+3, INVXTMP+3, INVBOTH+3, ORDER+3
DUZ PSAORDP+6
IO("Q" START+5, EXIT!
IOF EXIT
IOM PRTINV+6*, PRTSTA+4*
IOST EXIT
>> POP START+4
PSA EXIT+1!
PSA( INVOICE+12*, INVBOTH+8, PRTINV+7
PSAAECST EXIT+1!
PSABY EXIT+1!
PSACIEN EXIT+1!
PSACNT EXIT+1!, INVOICE+1*, INVOICE+8*, INVOICE+14, INVOICE+15, INVOICE+16, INVOICE+17, INVOICE+20, INV+1*, INV+5*
, INV+6, STATUS+5, STATUS+6*, STATUS+7
PSACTRL EXIT+1!, INVOICE+10*, INVOICE+11*, INVOICE+12, INVOICE+18*, INVBOTH+8*, PRTINV+6*, PRTINV+7*, ORDER+7*, PRTORD+3*
, PRTORD+4, PRTORD+6, STATUS+6*, PRTSTA+2*, PRTSTA+3
PSACTRLH EXIT+1!, INVOICE+12*, INVOICE+18, INVXTMP+6
PSADATA EXIT+1!
PSADEC EXIT+1!
PSADJDRG EXIT+1!, PRTINV+8*, PRTORD+5*, PRTSTA+4*
PSADJSUP EXIT+1!
PSADLN EXIT+1!, PRTINV+8*, PRTORD+5*, PRTSTA+4*
PSADONE EXIT+1!, INVOICE+1*, INVOICE+10*, INVOICE+11, INV+1*, INV+2, INV+4*, INVXTMP+1*, INVXTMP+2, INVXTMP+4*
, INVBOTH+1*, INVBOTH+2, INVBOTH+5*, ORDER+1*, ORDER+2, ORDER+5*, ORDER+7*, ORDER+8*
PSADRG EXIT+1!
PSADS EXIT+1!
PSAECOST EXIT+2!
PSAEND EXIT+2!
PSAFIN EXIT+2!, INVOICE+1*, INVOICE+2, INVOICE+4*
PSAFIRST EXIT+2!, INVXTMP+1*
PSAFPG EXIT+2!, PRTINV+8*, PRTORD+5*, PRTSTA+4*
PSAICOST EXIT+2!
PSAIECST EXIT+2!
PSAIN EXIT+2!
PSAINV EXIT+2!, INVOICE+8*, INVXTMP+5*, INVBOTH+6*, INVBOTH+7, PRTINV+3*, PRTINV+6*, PRTINV+7*, PRTORD+6*, PRTORD+7*
, PROCESS+6*, PROCESS+7
PSAINVB EXIT+2!, INVOICE+7*, INVOICE+8*, INVOICE+12*, INVBOTH+6*, INVBOTH+8, INVBOTH+9, PRTORD+7*, PROCESS+7*
PSAINVBH EXIT+2!, INVOICE+8*, INVOICE+15
PSAINVH EXIT+2!, INVOICE+8*, INVOICE+12*, INVOICE+15, INVOICE+18
PSALINE EXIT+2!
PSANDC EXIT+2!
PSAORD EXIT+2!, INVOICE+1!, INVOICE+7*, INVOICE+8, INVOICE+15, INV+2, INV+5, INV+6, INVBOTH+6, INVBOTH+7
, PRTINV+2*, PRTINV+3, PRTINV+4, ORDER+1!, PRTORD+2*, PRTORD+3, PRTORD+7, PROCESS+5*, PROCESS+6, PROCESS+7
PSAORD( INVOICE+15*, INVOICE+18*, INVOICE+21, INV+5*, INV+6*, INVXTMP+6*, INVXTMP+7*, INVBOTH+7*, INVBOTH+8*, PRTINV+1
, PRTINV+2, PRTINV+3, ORDER+6*, ORDER+7*, ORDER+9, PRTORD+1, PRTORD+2
PSAORD("" START+3
PSAORDB EXIT+2!, INVOICE+3*, INVOICE+4, INVOICE+5, INVOICE+7, INVOICE+12, INVOICE+15, INVOICE+18, INVOICE+21, INV+5
, INV+6, INVXTMP+6, INVXTMP+7, INVBOTH+7, INVBOTH+8, PRTINV+1*, PRTINV+2, PRTINV+3, PRTINV+7, PRTORD+1*
, PRTORD+2, PRTORD+4, PROCESS+7*
PSAOUT START+1*, START+2, DQ*, EXIT+2!, INVOICE+2, INVOICE+3*, INVOICE+10, INVOICE+13, INV+2, INV+3*
, INVXTMP+2, INVXTMP+3*, INVBOTH+2, PRTINV+1, PRTINV+2, PRTINV+3, ORDER+2, ORDER+3*, PRTORD+1, PRTORD+2
, PRTORD+3, PRTORD+7, STATUS+2*, PRTSTA+2, PROCESS+5, PROCESS+6
PSAPAGE EXIT+2!, PRTINV+8*, PRTORD+5*, PRTSTA+4*
PSAPC EXIT+2!, PRTINV+3*
PSAPRT START+1*, START+2, START+3, DQ+1, DQ+2, DQ+3, EXIT+2!
PSARUN EXIT+2!, PRTINV+8*, PRTORD+5*, PRTSTA+4*
PSAS EXIT+3!
PSASAVE START+7*, EXIT+3!
PSASLN EXIT+3!, INVOICE+1*, INVOICE+2, PRTINV+8*, PRTORD+5*, PRTSTA+4*
PSASS EXIT+3!
PSAST EXIT+3!
PSASTA EXIT+3!, STATUS+3*, STATUS+4, STATUS+5, PRTSTA+1
PSASUB EXIT+3!
PSATOT EXIT+3!
PSAXCNT EXIT+3!, INVOICE+1*, INVOICE+12*, INVOICE+14, INVOICE+17, INVOICE+18, INVOICE+19, INVOICE+20, INVXTMP+1*, INVXTMP+6*
, INVXTMP+7, INVBOTH+3*
X EXIT+3!, ORDER+4, ORDER+5, ORDER+9
>> Y START+1, INVOICE+3, INV+4, INV+5, INV+6, INVXTMP+4, INVXTMP+5, INVXTMP+6, INVXTMP+7, INVBOTH+4
, INVBOTH+5, INVBOTH+6, PRTINV+8*, ORDER+6, ORDER+7, ORDER+9, PRTORD+5*, STATUS+3, PRTSTA+4*
ZTDESC START+6*, EXIT+3!
>> ZTQUEUED EXIT
>> ZTREQ EXIT*
ZTRTN START+6*, EXIT+3!
ZTSAVE EXIT+3!
ZTSAVE( START+7*
ZTSAVE("PSAORD(" START+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All