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

Package: Drug Accountability

Routine: PSAPROC7


Information

PSAPROC7 ;BIR/JMB-Process Uploaded Prime Vendor Invoice Data - CONT'D ;9/6/97

Source Information

Source file <PSAPROC7.m>

Entry Points

Name Comments DBIA/ICR reference
INVOICE ;PSA*3*21 (3JAN01) - FILE INVOICE IMMEDIATELY
LINE ;Files line items.
ADJDRUG ;Records adjusted drug received
OU ;Records adjusted order unit
PRICE ;Records adjusted price per order unit
QTY ;Records adjusted quantity received.
RECORD ;Adds adjusted data to DA ORDERS file
SCANDIF ; inspect invoice for noted differences in OU,DUOU,PPDU,NDC
MM ;
CHECK ;Check line item for differences to drug file *42
SET ;set differences into ^TMP
MESSAGE ;differences found, notify user and send message to g.PSA NDC UPDATES.

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,XMSUB,!
  • Line Location: MESSAGE+6
Function Call: WRITE
  • Prompt: !,"Noted differences between the invoice line items and the drug file have",!,"been found. A mail message is being sent to G.PSA NDC UPDATES."
  • Line Location: MESSAGE+7
Function Call: WRITE
  • Prompt: !!," Please check the message for accuracy.",!
  • Line Location: MESSAGE+8

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PSDRUG - [#50] GET1^DIQ
^PSD(58.811 - [#58.811] Classic Fileman Calls,  GET1^DIQ
58.8112 GET1^DIQ
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call