Prompt: !!?15,"****** P A T I E N T I N F O R M A T I O N ******",!!
Line Location: GETPAT+4
Function Call: WRITE
Prompt: !,"If this encounter involved a particular patient, please enter the patient's",!,"chart # or name now. If this is not a single patient encounter,",!,"but a group encounter, simply HIT the RETURN key to continue.",!
Line Location: GETPAT+5
Function Call: WRITE
Prompt: !,"Please enter the patient information now.",!
Line Location: GETPAT+6
Function Call: WRITE
Prompt: "You have entered records for: "
Line Location: GETPAT+22
Function Call: WRITE
Prompt: !!
Line Location: GETPAT+22
Function Call: WRITE
Prompt: !?5,$P($G(^BCHR(X,11)),U)
Line Location: GETPAT+23
Function Call: WRITE
Prompt: !!,"No patient entered!! - Required",!
Line Location: GETPAT+25
Function Call: WRITE
Prompt: !,"No patient entered!! - Required."
Line Location: GETPAT+26
Function Call: WRITE
Prompt: !!,"Try again.",!
Line Location: GETPAT+29
Function Call: WRITE
Prompt: !,"That patient cannot be found in the Registration database."
Line Location: NOREG+2
Function Call: WRITE
Prompt: !
Line Location: NOREG+3
Function Call: WRITE
Prompt: !,"Exiting..."
Line Location: NOREG+4
Function Call: WRITE
Prompt: !!,"Please select a patient from the Non-Registered Patient Database",!,"or enter a new Non-Registered Patient.",!