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

Package: Drug Accountability

Routine: PSAPROC1


Information

PSAPROC1 ;BIR/JMB-Process Uploaded Prime Vendor Invoice Data - CONT'D ;7/23/97

Source Information

Source file <PSAPROC1.m>

Entry Points

Name Comments DBIA/ICR reference
CHK ;Check for invoices with a status of "OK" (uploaded & error free)
NOERROR ;Display list of invoices that can be processed by selecting
INVSEL
EDIT ;Edit error free invoices
PROC2
HEADER
PROCESS ;Get date recd & line item data
CS
NCS
HDR ;Header for editing line items with missing data
OK ;Sets okay array
SEL ;Extended help to 'Select invoices'

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!?21,"<<< PROCESS ENTIRE INVOICE SCREEN >>>"
  • Line Location: NOERROR+2
Function Call: WRITE
  • Prompt: !!?2,"No errors have been detected on the following invoices. If there are no",!?2,"corrections, you can change the invoices' status to ""Processed"" by"
  • Line Location: NOERROR+3
Function Call: WRITE
  • Prompt: !?2,"selecting them from the list. If you do have corrections, press the return",!?2,"key then a second list will be displayed. You will be able to choose the",!?2,"invoices from that list and enter corrections."
  • Line Location: NOERROR+4
Function Call: WRITE
  • Prompt: !!?2,"Choose the invoices from the list you want to process.",!,PSADLN
  • Line Location: NOERROR+5
Function Call: WRITE
  • Prompt: !,PSADLN
  • Line Location: NOERROR+11
Function Call: WRITE
  • Prompt: !
  • Line Location: NOERROR+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+0
Function Call: WRITE
  • Prompt: @IOF,!?21,"<<< PROCESS ENTIRE INVOICE SCREEN >>>",!!,PSADLN
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !!,"The invoice status has been changed to Processed!"
  • Line Location: NCS+2
Function Call: WRITE
  • Prompt: !!,"** The invoice has not been placed in a Processed status!"
  • Line Location: NCS+3
Function Call: WRITE
  • Prompt: @IOF,!?21,"<<< PROCESS ENTIRE INVOICE SCREEN >>>",!,"Order#: "_$P(PSAIN,"^",4)_" Invoice#: "_$P(PSAIN,"^",2)_" Invoice Date: "_$$FMTE^XLFDT(+PSAIN),!,PSADLN
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !?5,"Enter the number to the left of the invoice data that you want to process."
  • Line Location: SEL+1
Info |  Source |  Entry Points |  Interaction Calls