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

Package: IFCAP

Routine: PRCHRPT1


Information

PRCHRPT1 ;ID/RSD,SF-ISC/TKW-PRINT OPTIONS ; [1/13/99 1:27pm]

Source Information

Source file <PRCHRPT1.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**15,70,106,132**;Oct 20, 2000;Build 3
EN ;DISPLAY ITEM HISTORY
EN0
EN1 ;PRINT ITEM CATALOG
EN10
Q
FX
ITEM
ITEM0
NONE
SKPTXS
CKLCT
ITEM1
ASK
RNG ; ALLOW ENTRY OF BEGINNING AND ENDING RANGE
PDT ; ROUTINE ALLOWING ENTRY OF A DATE FOR PRINTING, ETC. (DEFAULTS TO NOW)
SDEV ; SELECT DEVICE FOR QUEUED PRINTING
HDR ;
RDTXS ; Prompt for # back TX's to list for an FCP(default=10,max=9999)
RDTXS1
QUESTION ;
WARN ;

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: EN0+0
Function Call: WRITE
  • Prompt: !,"History for this item does not yet exist. Press <RETURN>"
  • Line Location: EN0+0
Function Call: WRITE
  • Prompt: !!,"FCP: "_PRCHFCP_" has no history for this item."
  • Line Location: ITEM0+16
Function Call: WRITE
  • Prompt: !,"A history for this item does not yet exist."
  • Line Location: NONE+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: NONE+1
Function Call: WRITE
  • Prompt: !,"Press RETURN to continue."
  • Line Location: NONE+1
Function Call: WRITE
  • Prompt: Y
  • Line Location: ITEM1+0
Function Call: WRITE
  • Prompt: ?15,$P(^PRC(442,W(6),0),U,1)
  • Line Location: ITEM1+1
Function Call: WRITE
  • Prompt: W
  • Line Location: ITEM1+2
Function Call: WRITE
  • Prompt: ?26,$J($P(^(2),U,8),10)
  • Line Location: ITEM1+2
Function Call: WRITE
  • Prompt: !,"Vendor: ",W(8)
  • Line Location: ITEM1+5
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Press RETURN to continue, '^' to Quit"
  • Line Location: ASK+0
Function Call: READ
  • Variable: FR
  • Timeout: DTIME
  • Line Location: RNG+1
Function Call: WRITE
  • Prompt: !!!,"START WITH "_M_": FIRST//"
  • Line Location: RNG+1
Function Call: WRITE
  • Prompt: $C(7),!,"INVALID DATE"
  • Condition for execution: Y=-1
  • Line Location: RNG+2
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: RNG+2
Function Call: READ
  • Variable: TO
  • Timeout: DTIME
  • Line Location: RNG+3
Function Call: WRITE
  • Prompt: !!,"GO TO "_M_": LAST//"
  • Line Location: RNG+3
Function Call: WRITE
  • Prompt: $C(7),!,"INVALID DATE"
  • Condition for execution: Y=-1
  • Line Location: RNG+4
Function Call: WRITE
  • Prompt: " ",Y
  • Line Location: RNG+4
Function Call: WRITE
  • Prompt: $C(7),!,"INVALID RANGE"
  • Line Location: RNG+5
Function Call: WRITE
  • Prompt: $C(7),!,"INVALID RANGE"
  • Line Location: RNG+6
Function Call: WRITE
  • Prompt: !!,"Enter date (and time, if not NOW) to "_M
  • Line Location: PDT+1
Function Call: WRITE
  • Prompt: $C(7),!,"You must enter the time as well as the date to print the report"
  • Line Location: PDT+3
Function Call: WRITE
  • Prompt: !
  • Line Location: SDEV+1
Function Call: WRITE
  • Prompt: @IOF,!!,"Item Number: ",D0,?25,"Description: ",W,!?8,"FCP: ",PRCHFCP,!!,?26,"Quantity",!,?26,"Previously",?38,"Unit of",?71,"Quantity"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"Date Ordered",?15,"PO Number",?26,"Received",?38,"Purchase",?48,"Unit Cost",?59,"Total Cost",?71,"Ordered",!
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: "_"
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: !
  • Line Location: RDTXS+1
Function Call: WRITE
  • Prompt: !
  • Line Location: RDTXS1+11
Function Call: WRITE
  • Prompt: !!,"Enter 1-9999 or 'S' to sort by PO Date, FCP, etc."
  • Line Location: QUESTION+1
Function Call: WRITE
  • Prompt: @IOF,!?10,"List Transaction History for Specified Item",!!
  • Line Location: WARN+1
Function Call: WRITE
  • Prompt: !,"You may obtain either a listing of a specified number of back transactions",!,"for the item or all transactions (by FCP) within a specified date range."
  • Line Location: WARN+2
Function Call: WRITE
  • Prompt: !!,"Please be aware that the latter involves complex sorting and may",!,"take awhile to complete. Therefore, it is suggested that it be queued to",!,"a printer to immediately free your workstation.",!
  • Line Location: WARN+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^PRC(441 - [#441] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call