Routine: PRCPRCFP

Information

PRCPRCFP ;WISC/RFJ/DST-conversion factor report (primary, secondary) ;09 Jun 93

Name	Comments	DBIA/ICR reference
PRIMARY	; conversion factor report for primary and secondary
DQ	; queue starts here
Q
H

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"*** NO GROUP CATEGORIES SELECTED !" Line Location: PRIMARY+7
Function Call: WRITE	Prompt: ! Line Location: PRIMARY+14
Function Call: WRITE	Prompt: !!,"<> please wait <>" Line Location: PRIMARY+17
Function Call: WRITE	Prompt: !!?5,"GROUP: ",$S(GROUP=" ":"<<NONE>>",1:GROUP) Line Location: DQ+21
Function Call: WRITE	Prompt: !,DESCR,?32,$S(ODI="Y":"D",1:""),?46,ITEMDA,?53,$J(+$P(ITEMDATA,"^",7),8),$J($$UNIT^PRCPUX1(PRCP("I"),ITEMDA,"/"),10) Line Location: DQ+30
Function Call: WRITE	Prompt: !?29,VENNM,?51,$J(%,8),?61,$J($$UNITVAL^PRCPUX1($P(VENDATA,"^",3),$P(VENDATA,"^",2),"/"),10),$J($P(VENDATA,"^",4),9) Line Location: DQ+34
Function Call: WRITE	Prompt: !?10,"<<< TASKMANAGER JOB TERMINATED BY USER >>>" Line Location: DQ+35
Function Call: WRITE	Prompt: @IOF Line Location: H+0
Function Call: WRITE	Prompt: $C(13),"CONVERSION FACTOR REPORT FOR: ",$E(PRCP("IN"),1,20),?(80-$L(%)),% Line Location: H+1
Function Call: WRITE	Prompt: !,$S(ODIS=2:"ON-DEMAND ITEMS ONLY",ODIS=3:"ALL ITEMS (STANDARD AND ON-DEMAND)",1:"STANDARD ITEMS ONLY") Line Location: H+2
Function Call: WRITE	Prompt: !,"DESCRIPTION",?32,"OD",?46,"IM",$J("QTY OH",13),$J("UNIT/IS",10) Line Location: H+4
Function Call: WRITE	Prompt: !?29,"PROCUREMENT SOURCE",?55,"IV#",?61,$J("UNIT/RE",10),$J("CF",9),!,% Line Location: H+5