Routine: DGYMTRT

Information

DGYMTRT ;ALB/CAW/LD - Add new treating specialties ; 9/8/94

Source file <DGYMTRT.m>

Name	Comments	DBIA/ICR reference
EN	;
ADD	; Add new treating specialty to Specialty file (#42.4).
TRTS	; Specialties

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,">>>Starting update of Specialty (#42.4) and Facility Treating Specialty (#45.7)",!?3,"files...",! Line Location: ADD+2
Function Call: WRITE	Prompt: ! Line Location: ADD+18
Function Call: WRITE	Prompt: ! Line Location: ADD+20
Function Call: WRITE	Prompt: !!,"...Service ",$P(DGXX,U,8)," was not found in the SERVICE/SECTION",!?3,"file (#49). File #45.7 not updated.",! Line Location: ADD+24