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

Package: IFCAP

Routine: PRCHDPO


Information

PRCHDPO ;WOIFO/CR - DELINQUENT DELIVERY LISTING PA OPTION ; 2/20/01 12:55 PM

Source Information

Source file <PRCHDPO.m>

Entry Points

Name Comments DBIA/ICR reference
A1 ;
TYPE
DATE
FRMDT ; Make the current date for the header easier to read.
FRMDT1 ; Compress the delivery date display.
STAT ; Gather all the statistics
PRINT ; Let's print the outstanding orders and dollar amounts.
HOLD
HEADER ;
CLEAN

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: TYPE+0
Function Call: WRITE
  • Prompt: !!,"SELECTED: ",$E(SELECT,1,($L(SELECT)-1))," / ",SELECTW,!
  • Line Location: TYPE+12
Function Call: WRITE
  • Prompt: " ",Y(0)
  • Line Location: DATE+1
Function Call: WRITE
  • Prompt: " ",Y(0)
  • Line Location: DATE+4
Function Call: WRITE
  • Prompt: !,$C(7),"Less than 'FROM' value.",!
  • Line Location: DATE+5
Function Call: WRITE
  • Prompt: !!!!,?10,"*** NO RECORDS TO PRINT ***"
  • Line Location: PRINT+5
Function Call: READ
  • Variable: XXZ
  • Timeout: DTIME
  • Line Location: PRINT+21
Function Call: WRITE
  • Prompt: !,?60,"----------"
  • Line Location: PRINT+26
Function Call: WRITE
  • Prompt: !,"TOTAL",?55,$J(GTOT,15,2)
  • Line Location: PRINT+27
Function Call: READ
  • Variable: XXZ
  • Timeout: DTIME
  • Line Location: HOLD+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEADER+1
Function Call: WRITE
  • Prompt: !,"DELINQUENT PURCHASE ORDERS",?42,DATE,?68,"PAGE ",P,!
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: "** FOR SUPPLY EMPLOYEE: ",SELECTW,!
  • Line Location: HEADER+3
Function Call: WRITE
  • Prompt: !,"PO NUMBER",?15,"SUPPLY STATUS",?63,"COST",!
  • Line Location: HEADER+4
Function Call: WRITE
  • Prompt: ?3,"DELIVERY",?17,"PHONE",?60,"OUTSTANDING",!
  • Line Location: HEADER+5
Function Call: WRITE
  • Prompt: ?3,"DATE",?17,"NUMBER",?45,"(QTY*UNIT COST FOR ITEMS NOT REC'D)",!
  • Line Location: HEADER+6
Function Call: WRITE
  • Prompt: "--------"
  • Line Location: HEADER+7
Function Call: WRITE
  • Prompt: !!,?15,"PA/PPM/AUTHORIZED BUYER: ",$P(Q,">"),!
  • Line Location: HEADER+8
Info |  Source |  Entry Points |  Interaction Calls