Routine: DIFGA

Information

DIFGA ;SFISC/XAK-FILEGRAM TEMPLATES ;3/5/93 1:22 PM

Source file <DIFGA.m>

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$C(7),"THE DESTINATION FILE DATA DICTIONARY SHOULD BE MODIFIED PRIOR TO ANY MOVEMENT",!,"OF EXTRACT DATA!" Line Location: ERR+0
Function Call: WRITE	Prompt: !?DL+DL-2 Line Location: RD+2
Function Call: WRITE	Prompt: $S(DJ:" THEN",1:"FIRST")_$S($D(DIAX):" EXTRACT ",1:" SEND ")_DU_": " Line Location: RD+2
Function Call: WRITE	Prompt: $P(DC(DC),U) Line Location: RD+4
Function Call: WRITE	Prompt: "// " Line Location: RD+6
Function Call: READ	Variable: X Timeout: DTIME Line Location: 1+0
Function Call: WRITE	Prompt: " Do you mean ALL the fields in the file" Line Location: PR+4
Function Call: WRITE	Prompt: !?10,X Line Location: PR+4
Function Call: WRITE	Prompt: !,$C(7),"SORRY, THIS FUNCTIONALITY IS NOT SUPPORTED AT THIS TIME." Line Location: ST+1
Function Call: WRITE	Prompt: !,$C(7),"SORRY, CANNOT EXTRACT THIS TYPE OF COMPUTED FIELD AT THIS TIME." Line Location: ST+5
Function Call: WRITE	Prompt: $C(7)," ??" Line Location: QQ+0
Function Call: WRITE	Prompt: ! Line Location: DIAX+5