Routine: ENJINJ

Information

ENJINJ ;(WASH ISC)/JA/TJK-Screen Entry of Data ;1/8/2001

Source file <ENJINJ.m>

Name	Comments	DBIA/ICR reference
EN	;
EN2
NXT
TK
R
EN3
T3
Q1
HL
H1
H2
LH
T4
U
T5
NX
P
Q
OUT
LST
LS
LS1
KILL
SAVE
REST
B
D
PRACTW	;Pre Action Code for Word Processing Field
PSACTW	;Post Action Code for Word Processing Field

Name	Line Occurrences
Function Call: WRITE	Prompt: DJDB Line Location: EN3+0
Function Call: WRITE	Prompt: *7 Line Location: EN3+2
Function Call: WRITE	Prompt: @DJHIN Line Location: H1+0
Function Call: WRITE	Prompt: DJDB,@DJLIN Line Location: H1+0
Function Call: WRITE	Prompt: @DJHIN Line Location: H2+0
Function Call: WRITE	Prompt: V(V) Line Location: H2+0
Function Call: WRITE	Prompt: @DJHIN Line Location: LH+0
Function Call: WRITE	Prompt: "DATA REQUIRED",@DJLIN,*7 Line Location: LH+0
Function Call: WRITE	Prompt: @DJLIN,DJDB Line Location: T4+1
Function Call: WRITE	Prompt: @DJLIN,DJDB Line Location: T4+2
Function Call: WRITE	Prompt: @DJHIN Line Location: U+0
Function Call: WRITE	Prompt: V(V) Line Location: U+0
Function Call: WRITE	Prompt: DJDB Condition for execution: $D(DJDB) Line Location: U+0
Function Call: WRITE	Prompt: *7,"Number is out of range or field is read only or computed." Line Location: T5+2
Function Call: WRITE	Prompt: *7 Line Location: LS1+4