Prompt: !!,"Enter <RET> to continue printing the remaining pages of this assessment, or",!,"'^' to exit this option."
Line Location: PAGE+1
Function Call: WRITE
Prompt: @IOF
Line Location: PAGE+2
Function Call: WRITE
Prompt: @IOF
Line Location: HDR+3
Function Call: WRITE
Prompt: !,$$TR^SRTPUTL($P(SR("RA"),"^",2))_" TRANSPLANT ASSESSMENT "_$S($P(SR("RA"),"^",5)="V":"VA",1:"NON-VA")_$S($P(SR(0),"^",3):" SURGERY CASE #"_$P(SR(0),"^",3),1:" TRANSPLANT"),?70,"PAGE "_SRPG