Routine: MAGDRA1

Information

MAGDRA1 ;WOIFO/LB,JSL,SAF -Routine for DICOM fix ; 09/15/2004 13:34

Source file <MAGDRA1.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !?1,ENTRIES,?5,PSET,?6,CASE_$$IMG^MAGDRA2(RARPT),?12,$E(PROC,1,28) Line Location: PRT+4
Function Call: WRITE	Prompt: ?41,DATE,?52,$E(ESTAT,1,12),?67,$E(LOC,1,12) Line Location: PRT+5
Function Call: WRITE	Prompt: @IOF,"Patient: ",MAGNME,?50,$$PIDLABEL^MAGSPID(),": ",MAGPID Line Location: HEAD+1
Function Call: WRITE	Prompt: !!,?3,"Case #",?12,"Procedure",?41,"Exam Date",?52,"Status of" Line Location: HEAD+2
Function Call: WRITE	Prompt: "Exam",?69,"Imaging Loc" Line Location: HEAD+3
Function Call: WRITE	Prompt: !?3,"--------",?12,"-------------",?41,"---------" Line Location: HEAD+4
Function Call: WRITE	Prompt: ?52,"--------------",?67,"-----------" Line Location: HEAD+5
Function Call: WRITE	Prompt: !,"There is a database problem with the entry selected.",! Line Location: CHECK+7
Function Call: WRITE	Prompt: !,"There are no procedures for the entry selected.",! Line Location: CHECK+11