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

Package: IFCAP

Routine: PRCPAGRI


Information

PRCPAGRI ;WISC/RFJ-autogen print items not on order ;01 Dec 92

Source Information

Source file <PRCPAGRI.m>

Entry Points

Name Comments DBIA/ICR reference
ITEMSNOT ; print items not on order
; for ^tmp($j,"prcpag","not",vendorname,vendorda,groupname,
; xxx,itemda) where xxx equals whse:nsn; prim or seco:descr
H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!?12,"GROUP CATEGORY: ",$S(GNM=" ":"<< NOT SPECIFIED >>",1:GNM)
  • Line Location: ITEMSNOT+10
Function Call: WRITE
  • Prompt: $E(%,1,20),?31,$$NSN^PRCPUX1(ITEMDA)
  • Condition for execution: PRCP("DPTYPE")="W"
  • Line Location: ITEMSNOT+14
Function Call: WRITE
  • Prompt: ?50,$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),9),$J($P(D,"^",12),9),$J($P(D,"^",15),6),$J($P(D,"^",16),6)
  • Line Location: ITEMSNOT+14
Function Call: WRITE
  • Prompt: !,$J("ONHAND",8),$J("+DUEIN",8),$J("-DUEOUT",8),$J("=AVAIL",8),$J("STAND",7),$J("OPTN",8),$J("LEVEL",8),$J("CONV",7),$J("ORDER",8),$J("UNIT$",10)
  • Line Location: ITEMSNOT+15
Function Call: WRITE
  • Prompt: !,$J(+$P(D,"^"),8),$J(+$P(D,"^",2),8),$J(+$P(D,"^",3),8),$J(+$P(D,"^",4),8),$J(+$P(D,"^",5),7),$S($P(D,"^",7)="STA":"*",1:" "),$J(+$P(D,"^",6),7),$S($P(D,"^",7)="OPT":"*",1:" ")
  • Line Location: ITEMSNOT+16
Function Call: WRITE
  • Prompt: $J(+$P(D,"^",8),7),$S($P(D,"^",9)="*":"*",1:" "),$J(+$P(D,"^",10),6),$J(+$P(D,"^",11),8),$J(+$P(D,"^",14),10,3)
  • Line Location: ITEMSNOT+17
Function Call: WRITE
  • Prompt: !!?12,"GROUP CATEGORY: ",$S(GNM=" ":"<< NOT SPECIFIED >>",1:GNM)
  • Line Location: ITEMSNOT+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"AUTO-GENERATION: ITEMS NOT ON SUGGESTED ORDERS",?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?5,"FOR INVENTORY POINT: ",PRCP("IN")
  • Line Location: H+2
Function Call: WRITE
  • Prompt: !?5,"MANDATORY OR REQUESTED SOURCE: ",VNM
  • Line Location: H+3
Function Call: WRITE
  • Prompt: !?50,$J($S(PRCP("DPTYPE")="S":"SECONDARY",PRCP("DPTYPE")="P":"PRIMARY",1:"WHSE"),9),$J($S(PRCP("DPTYPE")="S":"PRIMARY",1:"VENDOR"),9),$J("ISSUE",6),$J("ISSUE",6)
  • Line Location: H+4
Function Call: WRITE
  • Prompt: !,"MI#",?7,"DESCRIPTION"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?31,"NSN"
  • Condition for execution: PRCP("DPTYPE")="W"
  • Line Location: H+5
Function Call: WRITE
  • Prompt: ?50,$J("UNIT/ISS",9),$J("UNIT/ISS",9),$J("MINIM",6),$J("MULT",6)
  • Line Location: H+5
Function Call: WRITE
  • Prompt: !,%
  • Line Location: H+6
Info |  Source |  Entry Points |  Interaction Calls