Routine: PSGWCLP

Information

PSGWCLP ;BHAM ISC/CML-Clear AMIS Exceptions Print ; 17 Aug 93 / 9:04 AM

Source file <PSGWCLP.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Do you want to print a worksheet first" Line Location: ASK+1
Function Call: WRITE	Prompt: !?5,"Enter:",!?7,"""YES"" if you wish to print a worksheet of the drugs with incomplete data.",!?7,"""NO"" or ""^"" if you do not want to print a worksheet." Line Location: ASK+2
Function Call: WRITE	Prompt: !!,"The right margin for this worksheet is 80",!,"You may queue it to run at a later time.",!! Line Location: ASK+3
Function Call: WRITE	Prompt: !,"NO DEVICE SELECTED OR WORKSHEET PRINTED!!" Line Location: ASK+4
Function Call: WRITE	Prompt: @IOF Line Location: DONE+0
Function Call: WRITE	Prompt: !!,"=> ",DRGNM Line Location: PRT+1
Function Call: WRITE	Prompt: !!?23,$S(POU:$J(POU,8,2),1:"__________"),?39,$S(DISP:$J(DISP,7),1:"_______") Line Location: PRT+2
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+1
Function Call: WRITE	Prompt: !,"INCOMPLETE AMIS DATA WORKSHEET",?72,"PAGE ",PG,!,"FOR PERIOD ",HBDT," to ",HEDT,?61,HDT,!!,"=> DRUG",?23,"PRICE PER",?35,"DISPENSE UNITS",?51,"AR/WS AMIS",?63,"AR/WS AMIS" Line Location: HDR+1
Function Call: WRITE	Prompt: !?23,"ORDER UNIT",?35,"PER ORDER UNIT",?51,"CATEGORY",?63,"CONVERSION #",!,LN Line Location: HDR+2
Function Call: WRITE	Prompt: !?5," It appears that the missing data for this drug has been supplied.",!?5," Please verify the data when editing this drug." Line Location: CHKDATA+1