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

Package: IFCAP

Routine: PRCPRINV


Information

PRCPRINV ;WISC/RFJ/DGL/VAC-inventory control parameters report ; 2/27/07 8:46am

Source Information

Source file <PRCPRINV.m>

Entry Points

Name Comments DBIA/ICR reference
V ;;5.1;IFCAP;**98**;Oct 20, 2000;Build 37
DQ ; queue starts here
Q
H

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"--Press RETURN to print parameters for ",PRCP("IN"),"--"
  • Line Location: V+6
Function Call: WRITE
  • Prompt: !!,"Print control parameters for ",$$INVNAME^PRCPUX1(PRCPINPT),!
  • Line Location: V+8
Function Call: WRITE
  • Prompt: !!,"<*> please wait <*>"
  • Line Location: V+12
Function Call: WRITE
  • Prompt: !!,"TYPE OF INVENTORY POINT",?30,": ",$S(PRCPTYPE="W":"SUPPLY WAREHOUSE",PRCPTYPE="P":"PRIMARY",PRCPTYPE="S":"SECONDARY",1:"<<NOT DEFINED>>")
  • Line Location: DQ+4
Function Call: WRITE
  • Prompt: !,"ABBREVIATED NAME",?30,": ",$P(DATA,"^",5)
  • Line Location: DQ+5
Function Call: WRITE
  • Prompt: !,"COST CENTER",?30,": ",$E($P($G(^PRCD(420.1,+$P(DATA,"^",7),0)),"^"),1,48)
  • Line Location: DQ+6
Function Call: WRITE
  • Prompt: !,"KEEP PERPETUAL INVENTORY",?30,": ",$S($P(DATA,"^",2)="Y":"YES",1:"NO")
  • Line Location: DQ+7
Function Call: WRITE
  • Prompt: !,"KEEP TRANSACTION/USAGE HISTORY",?30,": ",$S($P(DATA,"^",6)="Y":"YES",1:"NO")
  • Line Location: DQ+8
Function Call: WRITE
  • Prompt: !,"PRIMARY UPDATED BY WAREHOUSE",?30,": ",$S($P(DATA,"^",16)="N":"NO",1:"YES")
  • Line Location: DQ+11
Function Call: WRITE
  • Prompt: !,"SPECIAL INVENTORY POINT TYPE",?30,": ",$S($P(DATA,"^",20)="D":"DRUG ACCOUNTABILITY",$P(DATA,"^",20)="S":"SPD",1:"")
  • Line Location: DQ+12
Function Call: WRITE
  • Prompt: !,"SPD PICKING TICKET PRINTER: ",$P($G(^PRCP(445,PRCPINPT,"DEV")),"^")
  • Line Location: DQ+13
Function Call: WRITE
  • Prompt: !,"ISSUE BOOK SORT",?30,": ",$S($P(DATA,"^",10)="A":"ALPHA SORT",$P(DATA,"^",10)="N":"NSN SORT",1:"")
  • Line Location: DQ+14
Function Call: WRITE
  • Prompt: !,"REGULAR WHSE ISSUES SCHEDULE",?30,": ",$S($P(DATA,"^",4)="W":"WEEKLY",$P(DATA,"^",4)=2:"EVERY 2 WEEKS",$P(DATA,"^",4)="M":"MONTHLY",$P(DATA,"^",4)="O":"OTHER",1:"")
  • Line Location: DQ+15
Function Call: WRITE
  • Prompt: !,"DEPARTMENT NUMBER",?30,": ",$P(DATA,"^",8)
  • Line Location: DQ+16
Function Call: WRITE
  • Prompt: !,"MONTHS INACTIVE ITEM DELETION",?30,": ",$P(DATA,"^",13)
  • Line Location: DQ+17
Function Call: WRITE
  • Prompt: !,"TOTAL NUMBER OF ITEMS STORED",?30,": ",STDITEM+ODITEM
  • Line Location: DQ+31
Function Call: WRITE
  • Prompt: !!,"FUND CONTROL POINTS",?30,": "
  • Line Location: DQ+34
Function Call: WRITE
  • Prompt: $P($G(^PRC(420,STATION,1,FCP,0)),"^")
  • Line Location: DQ+36
Function Call: WRITE
  • Prompt: !?32
  • Line Location: DQ+38
Function Call: WRITE
  • Prompt: !!,"MIS COSTING SECTION",?30,": "
  • Line Location: DQ+42
Function Call: WRITE
  • Prompt: $E($P($G(^DIC(49,+$P(%,"^"),0)),"^"),1,30),?64,$J($P(%,"^",2),5)," %"
  • Line Location: DQ+45
Function Call: WRITE
  • Prompt: !?32
  • Line Location: DQ+47
Function Call: WRITE
  • Prompt: !!,"INVENTORY USERS",?30,": "
  • Line Location: DQ+50
Function Call: WRITE
  • Prompt: $E($$USER^PRCPUREP(USER),1,30)
  • Line Location: DQ+53
Function Call: WRITE
  • Prompt: ?64,MGRFLG
  • Line Location: DQ+56
Function Call: WRITE
  • Prompt: !?32
  • Line Location: DQ+58
Function Call: WRITE
  • Prompt: !!,"DISTRIBUTION POINTS",?30,": "
  • Line Location: DQ+62
Function Call: WRITE
  • Prompt: $$INVNAME^PRCPUX1(DISTR),?64,$S(%="W":"SUPPLY WAREHOUSE",%="P":"PRIMARY",%="S":"SECONDARY",1:"<<NOT DEFINED>>")
  • Line Location: DQ+65
Function Call: WRITE
  • Prompt: !?32
  • Line Location: DQ+67
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: H+0
Function Call: WRITE
  • Prompt: $C(13),"INVENTORY PARAMETERS FOR: ",$E(PRCPNAME,1,20),?(80-$L(%)),%
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !,%
  • Line Location: H+3
Info |  Source |  Entry Points |  Interaction Calls