Routine: PSADJI

Information

PSADJI ;BIR/LTL-Balance Initialization ;7/23/97

Source file <PSADJI.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"There are no drugs in ",$G(PSALOCN) 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: !!,PSADRUGN," may have to be adjusted.",!!,"There's already ",$P($G(^PSD(58.8,+PSALOC,1,+PSADRUG,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