Routine: PRCPRSTK

Information

PRCPRSTK ;WISC/RFJ/VAC-where is an item stocked ; 2/19/07 12:51pm

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: ITEM+1
Function Call: WRITE	Prompt: !!,"<> please wait <>" Line Location: ITEM+4
Function Call: WRITE	Prompt: !,$E(TYPE,1,4),?12,I,?48,ODITEM,?50,$J($P(DATA,"^"),10),?66,$P(DATA,"^",2) Line Location: DQ+8
Function Call: WRITE	Prompt: !! Line Location: DQ+12
Function Call: WRITE	Prompt: @IOF Line Location: H+0
Function Call: WRITE	Prompt: $C(13),"DISPLAY WHERE AN ITEM IS STOCKED",?(80-$L(%)),%,!?4,"PRINTED BY INVENTORY POINT: ",PRCP("IN") Line Location: H+1
Function Call: WRITE	Prompt: !?4,"NSN: ",NSN,?30,$E(DESC,1,30),?62,"[#",ITEMDA,"]" Line Location: H+2
Function Call: WRITE	Prompt: !,?48,"O" Line Location: H+3
Function Call: WRITE	Prompt: ?55,"QTY",?72,"UNIT PER" Line Location: H+4
Function Call: WRITE	Prompt: !,"TYPE",?12,"SITE-DISTRIBUTION POINT" Line Location: H+5
Function Call: WRITE	Prompt: ?48,"D" Line Location: H+6
Function Call: WRITE	Prompt: ?53,"ON-HAND",?73,"ISSUE" Line Location: H+7
Function Call: WRITE	Prompt: !,% Line Location: H+8