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

Package: IFCAP

Routine: PRCPRDO1


Information

PRCPRDO1 ;WISC/RFJ-distribution duein and dueout reports ; 7/9/99 3:39pm

Source Information

Source file <PRCPRDO1.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;;Oct 20, 2000
DQ ; queue comes here
H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$E($$DESCR^PRCPUX1(PRCP("I"),ITEMDA),1,25),?27,"#",ITEMDA,?35,$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),9),$J(+$P(ITEMDATA,"^",7),15),$J(QTY,21)
  • Line Location: DQ+21
Function Call: WRITE
  • Prompt: !?5,$P(D,"^"),?12,Y,?24,$S($P(D,"^",8)="R":"REGU",$P(D,"^",8)="C":"CALL",$P(D,"^",8)="E":"EMER",1:"----"),?29,$S($P(D,"^",6)="R":"RELE",$P(D,"^",6)="B":"BACK",1:"----")
  • Line Location: DQ+24
Function Call: WRITE
  • Prompt: ?36,$E($P($$INVNAME^PRCPUX1(INVPT),"-",2),1,16)
  • Line Location: DQ+26
Function Call: WRITE
  • Prompt: ?69,$J(+$P(DATA,"^",4),11)
  • Line Location: DQ+27
Function Call: WRITE
  • Prompt: ?53,$J($P(DATA,"^",6),9),$J($P(DATA,"^",7),7),$J(+$P(DATA,"^",3),11)
  • Line Location: DQ+28
Function Call: WRITE
  • Prompt: !?5,"** CURRENT QUANTITY DUE-",TYPE,$S($G(UPDATE):" IS NOW EQUAL TO",1:" DOES NOT MATCH")," CALCULATED QUANTITY DUE-",TYPE," **"
  • Line Location: DQ+31
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"DUE-",TYPE," ITEM REPORT FOR ",PRCP("IN"),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,"ITEM DESCRIPTION",?27,"#MI",?35,$J("UNIT/IS",9),$J("QTY ON-HAND",15),$J("QTY DUE-"_TYPE,21)
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !?5,"ORD#",?12,"DATE ORD",?24,"TYPE",?29,"STAT",?36,$S(TYPE="IN":"FROM",1:"TO")," INVPT"
  • Line Location: H+3
Function Call: WRITE
  • Prompt: ?69,"QTY DUE-OUT"
  • Line Location: H+4
Function Call: WRITE
  • Prompt: ?55,"UNIT/REC",?67,"CF",?70,"QTY DUE-IN"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,%
  • Line Location: H+6
Info |  Source |  Entry Points |  Interaction Calls