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
Print Page as PDF
Routine: PSAUP1

Package: Drug Accountability

Routine: PSAUP1


Information

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

Source Information

Source file <PSAUP1.m>

Entry Points

Name Comments DBIA/ICR reference
XTMP ;This modules copies the prime vendor data in ^TMP("PSAPV SET",$J) 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

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"CHECKING DUPLICATE"
  • Line Location: DUPLICAT+1
Function Call: WRITE
  • Prompt: "."
  • Line Location: DAV+7
Function Call: WRITE
  • Prompt: " uploaded and",!," is awaiting processing. It cannot be uploaded more than once."
  • Line Location: CHKDUP+3
Function Call: WRITE
  • Prompt: " processed and",!," is being prepared for verification. It cannot be uploaded more than once."
  • Line Location: CHKDUP+4
Function Call: WRITE
  • Prompt: !,"** Order# "_PSAORD_" Invoice# "_PSAINV
  • Line Location: CHKDUP+15
Function Call: WRITE
  • Prompt: " has been processed"_$S(+PSADT:" on "_PSADT,1:"")_" and",!," is awaiting verification. It cannot be uploaded more than once."
  • Line Location: CHKDUP+17
Function Call: WRITE
  • Prompt: !," has been verified"_$S(+PSADT:" on "_PSADT,1:"")_"and",!," is updating the pharmacy location. It cannot be uploaded more than once."
  • Line Location: CHKDUP+18
Function Call: WRITE
  • Prompt: " has been completed.",!," It cannot be uploaded more than once."
  • Line Location: CHKDUP+19
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
Info |  Source |  Entry Points |  Interaction Calls