Routine: RMPR29LD

Information

RMPR29LD ;HIN/RVD-CANCEL LAB ISSUE FROM STOCK;5/27/1998

Name	Line Occurrences
Function Call: WRITE	Prompt: $C(7),!!,?5,"Someone is already editing this entry" Line Location: ASK+7
Function Call: WRITE	Prompt: !,?37,"SHIPPING CHARGE: ",?70,$J(SCH,10,2) Line Location: MU+1
Function Call: WRITE	Prompt: !,RMPR("L") Line Location: EXT+1
Function Call: WRITE	Prompt: !,$C(7),"Marked 2529-3 As Deleted..." Line Location: EXT+5
Function Call: WRITE	Prompt: !,"Error encountered while posting to GIP.",!,"CANCEL ABORTED!!!" Line Location: GIP+2
Function Call: WRITE	Prompt: !,"Item: ",RMITEMS Line Location: GIP+4
Function Call: WRITE	Prompt: !,"Quantity: ",RMQTY," Returned to GIP!!!" Line Location: GIP+5
Function Call: WRITE	Prompt: !,"UNABLE TO LOCATE INVENTORY LOCATION",!,"Adjust Item balance manually!!" Line Location: LOC+1
Function Call: WRITE	Prompt: !!,"Item: ",RMITEMS Line Location: LOC+3
Function Call: WRITE	Prompt: !,"Quantity: ",RMQTY," Returned to Prosthetics Inventory!!!" Line Location: LOC+4
Function Call: WRITE	Prompt: !,"Patient 2319 has been deleted" Line Location: DEL+12
Function Call: WRITE	Prompt: !,"UNABLE TO LOCATE INVENTORY LOCATION",!,"Adjust Item balance manually!!" Line Location: STAT+2
Function Call: WRITE	Prompt: !,"UNABLE TO LOCATE INVENTORY LOCATION",!,"Adjust Item balance manually!!" Line Location: STAT+4
Function Call: WRITE	Prompt: !,"****Current Balance @ Location ",$P(^RMPR(661.3,RMLOC,0),U,1)," is now: ",RMTOBA Line Location: STAT+15