Routine: PSDADJI

Information

PSDADJI ;B'ham ISC/LTL - Balance Initializer ; 3 June 92

Source file <PSDADJI.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are no drugs in ",PSDLOCN Line Location: CHKD+0
Function Call: WRITE	Prompt: !!,"Give me a second to alphabetize.",! Line Location: CHKD+1
Function Call: WRITE	Prompt: @IOF Line Location: CHKD+5
Function Call: WRITE	Prompt: !!,PSDRUGN," may have to be adjusted.",!!,"There's already ",$P($G(^PSD(58.8,+PSDLOC,1,+PSDRUG,0)),U,4)," on hand." Line Location: CHKD+7
Function Call: WRITE	Prompt: @IOF Line Location: CHKD+8

FileNo	Call Tags
^PSD(58.8 - [#58.8]	Classic Fileman Calls
^PSD(58.81 - [#58.81]	Classic Fileman Calls