Routine: LRBLDL1

Information

LRBLDL1 ;AVAMC/REG - BLOOD DONOR LABELS ; 10/23/88 15:45 ;

Source file <LRBLDL1.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: $P(P,",",2)_" "_$P(P,",",1) Line Location: W+1
Function Call: WRITE	Prompt: ! Line Location: W+3
Function Call: WRITE	Prompt: !,$P(X,"^",B) Line Location: A+0
Function Call: WRITE	Prompt: !,$P(X,"^",4) Line Location: A+1
Function Call: WRITE	Prompt: ", ",$P(^DIC(5,$P(X,"^",5),0),"^",2) Condition for execution: $P(X,"^",5) Line Location: A+1
Function Call: WRITE	Prompt: " ",$P(X,"^",6) Line Location: A+1