Routine: DIVRE

Information

DIVRE ;SFISC/MWE-REQ FLD(S) CHK ;06:27 PM 7 Dec 1999

Source file <DIVRE.m>

Name	Line Occurrences
Function Call: READ	Variable: X Timeout: DTIME Line Location: B+1
Function Call: READ	Variable: X Timeout: DTIME Line Location: L+2
Function Call: WRITE	Prompt: !!,"NO REQUIRED FIELD IS MISSING" Line Location: L+3
Function Call: WRITE	Prompt: !,+$P(X,U),?10,$E(Y,1,20),?35,$P(X,U,2),?50,$P(^DD($P(X,U,2),$P(X,U,3),0),U) Line Location: P+3
Function Call: WRITE	Prompt: ?85,$P(X,U,4) Line Location: P+5
Function Call: WRITE	Prompt: !?35,$P(X,U,4) Line Location: P+6
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(DIFF)&($Y) Line Location: PH+1
Function Call: WRITE	Prompt: "Required-Field-Check File: ",DIC_" "_$O(^DD(DIC,0,"NM","")),?(IOM-25) Line Location: PH+1
Function Call: WRITE	Prompt: ?(IOM-10),"PAGE ",DC Line Location: PH+1
Function Call: WRITE	Prompt: ?85,"Path" Line Location: PH+2
Function Call: WRITE	Prompt: ! Line Location: PH+3
Function Call: WRITE	Prompt: "-" Line Location: PH+3