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

Package: Drug Accountability

Routine: PSABRKU4


Information

PSABRKU4 ;BIR/JMB-Upload and Process Prime Vendor Invoice Data - CONT'D ;7/23/97

Source Information

Source file <PSABRKU4.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Drug Accountability 1 SETMSG^PSABRKU8  
VA FileMan 1 C^%DTC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Drug Accountability 1 PSABRKU1  

Entry Points

Name Comments DBIA/ICR reference
XTMP ;This modules copies the prime vendor data in ^TMP($J,"PSAPV SET") to
DUPLICAT ;
DAV
CHKDUP ;Checks for duplicate orders & invoices and duplicates in XTMP.
KILLDUP
PRT2 ;Extended help to second "Print invoices?"
YNPRINT ;Extended help to "Print invoices?"
YNPROCES ;Extended help to "Do you want to process the invoices now?"
YNUPLOAD ;Extended help to "Are you ready to upload the prime vendor invoice data?"
DATES ;PSA*3*12 Check for Y2K compliance of dates

External References

Name Field # of Occurrence
C^%DTC XTMP+3
SETMSG^PSABRKU8 CHKDUP+3, CHKDUP+4, CHKDUP+17, CHKDUP+18, CHKDUP+19

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Enter YES to print all invoices that are not processed and",!?5,"the invoices that were processed while you were in this option.",!!?5,"Enter NO to exit the option."
  • Line Location: PRT2+1
Function Call: WRITE
  • Prompt: !?5,"Enter YES to print the uploaded invoices. You",!?5,"can check the invoices prior to processing them.",!!?5,"Enter NO to not print the invoices."
  • Line Location: YNPRINT+1
Function Call: WRITE
  • Prompt: !?5,"Enter YES to begin processing the uploaded invoices.",!!?5,"Enter NO if you do not want to process the invoices now. You can process"
  • Line Location: YNPROCES+1
Function Call: WRITE
  • Prompt: !?5,"them later by selecting the ""Process Uploaded Prime Vendor Invoice Data"" option."
  • Line Location: YNPROCES+2
Function Call: WRITE
  • Prompt: !?5,"Enter YES to start uploading the invoices.",!?5,"Enter NO or ""^"" to exit the option."
  • Line Location: YNUPLOAD+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^PSD(58.811 - [#58.811] CHKDUP+7, CHKDUP+10, CHKDUP+11, CHKDUP+12, CHKDUP+13, CHKDUP+14
^TMP($J DUPLICAT+3, DAV+1, DAV+4, DAV+6, DAV+7!, DAV+9, DAV+11, DAV+13*, DAV+14, DAV+15
, DAV+16!, CHKDUP+5!, KILLDUP+1!
^XTMP("PSAPV" XTMP+3, XTMP+4*, XTMP+7, XTMP+8, XTMP+9, XTMP+11!, DAV+1, DAV+2, DAV+9*, DAV+14*
, DAV+15*, DAV+17!, DAV+18, KILLDUP+1!, DATES+2*, DATES+5*, DATES+6*, DATES+7*

Label References

Name Line Occurrences
CHKDUP DAV+8
DATES DAV+10

Naked Globals

Name Field # of Occurrence
^("IN" DAV+1, DAV+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DATA DAV+1*
>> DATECHK DATES+1*, DATES+2*, DATES+3
>> DILOCKTM XTMP+3
DT XTMP+3, XTMP+4, DATES+4, DATES+5, DATES+6, DATES+7
DT1 DATES+5*, DATES+8!
LWRDT DATES+4*, DATES+5, DATES+8!
PSACHKR DAV+1*, DAV+2!
>> PSACTRL XTMP+7*, XTMP+8, XTMP+9, XTMP+11, DUPLICAT+2*, DUPLICAT+3*, DAV+1, DAV+4, DAV+6, DAV+7
, DAV+9, DAV+11, DAV+14, DAV+15, DAV+16, CHKDUP+5, KILLDUP+1
>> PSADT CHKDUP+14*, CHKDUP+16*, CHKDUP+17, CHKDUP+18
>> PSADUP DUPLICAT+2*, DAV+4*, DAV+8, CHKDUP+1*, KILLDUP*
>> PSADUP( XTMP+12*, CHKDUP+1
>> PSAGUI2( DAV+12*
>> PSAGUI3( DAV+12*
>> PSAGUI4 DAV+15*
>> PSAIN XTMP+9*, XTMP+11, XTMP+12, DAV+6*, DAV+7, CHKDUP+1, CHKDUP+2, CHKDUP+7, CHKDUP+10, CHKDUP+13*
>> PSAINV DAV+11*, DAV+12, DAV+13, CHKDUP+10*, CHKDUP+11, CHKDUP+15
>> PSAINVDT DAV+11*
>> PSAINVN CHKDUP+11*, CHKDUP+12, CHKDUP+13, CHKDUP+14
>> PSALINE DAV+15*, CHKDUP+14*
>> PSAORD DAV+11*, DAV+12, DAV+13, CHKDUP+10*, CHKDUP+15
>> PSAORDDT DAV+11*
>> PSAORDN CHKDUP+10*, CHKDUP+11, CHKDUP+12, CHKDUP+13, CHKDUP+14
>> PSAPC CHKDUP+13*, CHKDUP+14
>> PSASEG DAV+4*, DAV+5, DAV+6, DAV+9, DAV+14, DAV+15
>> PSASET DUPLICAT+3*, DAV+1, DAV+2*, DAV+9, DAV+14, DAV+15, DAV+17, KILLDUP+1, DATES+2, DATES+5
, DATES+6, DATES+7
>> PSASTA CHKDUP+1*, CHKDUP+3, CHKDUP+4, CHKDUP+13*, CHKDUP+17, CHKDUP+18, CHKDUP+19
UPPRDT DATES+4*, DATES+5, DATES+8!
X XTMP+4, DATES+2*, DATES+6*, DATES+7*, DATES+8!
>> X1 XTMP+3*
>> X12 CHKDUP+2*, CHKDUP+3*, CHKDUP+4*, CHKDUP+15*, CHKDUP+17*, CHKDUP+18*, CHKDUP+19*
>> X2 XTMP+3*
XX DATES+2*, DATES+6*, DATES+7*, DATES+8!
XXX DATES+2*, DATES+6*, DATES+8!
Y DATES+5*, DATES+8!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All