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

Package: IFCAP

Routine: PRCPRTR1


Information

PRCPRTR1 ;WISC/RFJ-transaction register report (print) ;07 Sep 91

Source Information

Source file <PRCPRTR1.m>

Entry Points

Name Comments DBIA/ICR reference
PRINT ;print report from tmp global
P1
P2
9
Q
H
ABBREV ;;display abbreviations

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$S(NSN=" ":"** NO NSN **",1:NSN)
  • Line Location: P2+6
Function Call: WRITE
  • Prompt: ?19,$P(DATA,"^")
  • Line Location: P2+7
Function Call: WRITE
  • Prompt: ?49,"[#",ITEMDA,"]"
  • Line Location: P2+8
Function Call: WRITE
  • Prompt: ?59,"U/I: ",$P(DATA,"^",2)
  • Line Location: P2+9
Function Call: WRITE
  • Prompt: !
  • Line Location: P2+10
Function Call: WRITE
  • Prompt: ?9,"QTY NON-ISS: ",+$P(DATA,"^",5)
  • Condition for execution: PRCP("DPTYPE")="W"
  • Line Location: P2+10
Function Call: WRITE
  • Prompt: ?28,"DUE-IN: ",+$P(DATA,"^",3)
  • Line Location: P2+11
Function Call: WRITE
  • Prompt: ?44,"DUE-OUT: ",+$P(DATA,"^",4)
  • Line Location: P2+12
Function Call: WRITE
  • Prompt: !?23,"ISSUABLE + NONISSUABLE OPEN BALANCE:",$J($P(DATA,"^",6),9),$J($P(DATA,"^",7),12,2)
  • Line Location: P2+13
Function Call: WRITE
  • Prompt: !,$P(D,"^"),?9,$E(DATE,6,7),?13,$P(D,"^",2),?33,$J($P(D,"^",3),8),$J(SALEUNIT,10),$J($P(D,"^",5),10),$J($P(D,"^",6),7),$J($P(D,"^",4),12)
  • Line Location: P2+21
Function Call: WRITE
  • Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>"
  • Line Location: P2+26
Function Call: WRITE
  • Prompt: !?43,"CLOSING BALANCE:",$J($P(DATA,"^",8),9),$J($P(DATA,"^",9),12,2)
  • Line Location: P2+27
Function Call: WRITE
  • Prompt: !?28,"*** CURRENT INVENTORY BALANCES:",$J($P(%,"^"),9),$J($P(%,"^",2),12,2)
  • Line Location: P2+29
Function Call: WRITE
  • Prompt: !
  • Line Location: 9+2
Function Call: WRITE
  • Prompt: !,$P($T(ABBREV+%),";",3)
  • Line Location: 9+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !,X,!,X
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,"TRANSACTION REGISTER FOR ",$E(PRCP("IN"),1,15),?(80-$L(%)),%
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !," FOR THE MONTH OF ",MONTH
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?47,"ONLY ITEMS OUT OF BALANCE PRINTED"
  • Line Location: H+6
Function Call: WRITE
  • Prompt: !,"NSN",?19,"DESCRIPTION",?49,"[#MI]"
  • Line Location: H+7
Function Call: WRITE
  • Prompt: !,"TRANSID",?9,"DT",?13,"TRANS./P.O."
  • Line Location: H+9
Function Call: WRITE
  • Prompt: ?38,"U/I",?43,"SELLUNIT",?55,"SELL $",?65,"QTY",?75,"INV $",!,%
  • Line Location: H+11
Info |  Source |  Entry Points |  Interaction Calls