Prompt: !!,"This program sets the DFNs of a DINUM file appropriately."
Line Location: AUDINUM+4
Function Call: WRITE
Prompt: !
Line Location: AUDINUM+5
Function Call: WRITE
Prompt: !!,"Corrupted ^DIC!"
Line Location: AUDINUM+6
Function Call: WRITE
Prompt: !!,AUDIGBL,"0) does not exist."
Line Location: AUDINUM+9
Function Call: WRITE
Prompt: !!,"File ",DIC," has no entries."
Line Location: AUDINUM+10
Function Call: WRITE
Prompt: !!,"Corrupted ^DD!"
Line Location: AUDINUM+11
Function Call: WRITE
Prompt: !!,"File ",DIC," is not a DINUM file."
Line Location: AUDINUM+12
Function Call: WRITE
Prompt: !!,"Global ",$E(AUDIGBL,1,$L(AUDIGBL)-1)," now renumbered and stored in ^UTILITY(""AUDINUM"",",$J,!," High DFN=",AUDI3," Number of entries=",AUDI4
Line Location: AUDINUM+18
Function Call: WRITE
Prompt: !!,"Duplicate entries found. Stored in ^UTILITY(""AUDIDUP"",",$J,!," Eliminate duplicates and rerun this job!"
Line Location: AUDINUM+19
Function Call: WRITE
Prompt: !!,AUDIX," has been killed! Now being recreated."