Prompt: !,"Autologous ",$S(LRW="T":"Transfusions",1:"")," (Units received from ",LRSTR," to ",LRLST,")",!,"Component",?11,$S(LRW="T":"Treating Specialty",1:"Disposition"),?45,"Unit ID",?60,"Days in inventory",!,LR("%")
Line Location: H+1
Function Call: WRITE
Prompt: !,LRP," ",SSN
Line Location: H1+0
Function Call: WRITE
Prompt: !,LRP," ",HRCN
Line Location: H1+1
Function Call: WRITE
Prompt: !!,"Enter 'T' for a list of autologous transfusions or",!,"enter 'A' for a list of all dispositions except transfusions",!,"for autologous units."