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

Package: IFCAP

Routine: PRCPAWR0


Information

PRCPAWR0 ;WISC/RFJ/BGJ-print register approval form ;9.9.97

Source Information

Source file <PRCPAWR0.m>

Entry Points

Name Comments DBIA/ICR reference
DQ ; queue starts here.
Q
H
PRINFORM(TRANID)
FP
SP

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"ONLY THE WAREHOUSE CAN USE THIS OPTION."
  • Line Location: PRCPAWR0+4
Function Call: WRITE
  • Prompt: !!,"To select ALL adjustments, press RETURN."
  • Line Location: PRCPAWR0+9
Function Call: WRITE
  • Prompt: !!
  • Line Location: PRCPAWR0+20
Function Call: WRITE
  • Prompt: !
  • Line Location: PRCPAWR0+22
Function Call: WRITE
  • Prompt: !!,NSN,?19,$E($$DESCR^PRCPUX1(PRCP("I"),$P(DATA,"^",5)),1,28),?49,"#",$P(DATA,"^",5),?60,"ACCT: ",ACCT,?73,$J($$INITIALS^PRCPUREP($P(DATA,"^",16)),6)
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: !,$P(DATA,"^",2),?13,$P(DATA,"^",19),?33,$J($P(DATA,"^",6),8),$J($P(DATA,"^",7),11),$J(VALUESAL,14,2),$J(VALUEINV,14,2)
  • Line Location: DQ+19
Function Call: WRITE
  • Prompt: !,$P(^(1),"^")
  • Line Location: DQ+20
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"ADJUSTMENT APPROVAL FORM FROM ",PRCP("IN"),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?5,"DISTRIBUTION TO: ",INVPT
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !?5,"ADJUSTMENT DATE: ",ADJDT,?50,"VOUCHER: ",VOUCHER
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !,"NSN",?19,"DESCRIPTION",?49,"[#MI]",?60,"ACCT CODE",?72,"INITIALS"
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !,"TRANSID",?13,"TRANS./P.O.",?38,"U/I",?43,$J("QUANTITY",9),$J("SELL VALUE",14),$J("INV VALUE",14),!,%
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !!,"Queueing Approval Form to Print on 'Fiscal (Receiving Reports)' Printer ..."
  • Line Location: PRINFORM+5
Function Call: WRITE
  • Prompt: !!,"MUST QUEUE OUTPUT",!
  • Line Location: FP+0
Function Call: WRITE
  • Prompt: !,"Queueing Approval Form to Print on 'Supply (PPM)' Printer ..."
  • Line Location: FP+5
Function Call: WRITE
  • Prompt: !!,"MUST QUEUE OUTPUT",!
  • Line Location: SP+0
Info |  Source |  Entry Points |  Interaction Calls