Routine: ZTEDIT2

Information

ZTEDIT2 ;SF/RWF - VA EDITOR ;09/03/2008

Source Information

Source file <ZTEDIT2.m>

Entry Points

Name	Comments	DBIA/ICR reference
ACTION
A66
A661
A67
A671
A83
A82
A86
A99
JOIN
JO2
SEARCH
S55
GTAG
GT2
GT3
TAG
TAG2
SELECT
SELALL
SEL3
LN1
LOCAL
TERM
TERM1
TERM2
TERM3
MODE
END	;

Interaction Calls

Name	Line Occurrences
Function Call: READ	Formatting: ! Prompt: "Action: " Variable: %X Timeout: %9 Line Location: ACTION+0
Function Call: WRITE	Prompt: !,"Line '+",%,"' is longer than 245" Line Location: A66+0
Function Call: WRITE	Prompt: ?20,"Routine is ",%Y," Bytes in size." Line Location: A661+0
Function Call: WRITE	Prompt: !,?20,"Checksum is ",%Y Line Location: A67+0
Function Call: WRITE	Prompt: !,"%Z editor version ",^%Z("VR") Line Location: A86+0
Function Call: WRITE	Prompt: "oin line: " Line Location: JOIN+0
Function Call: WRITE	Prompt: ZR Condition for execution: %X'=%TG " ",%TG S %NX=1,%X=$L(%LS)+$L(%L)>245 W:%X " ... too long" I '%X Line Location: JO2+0
Function Call: WRITE	Prompt: !,%LS_%L Line Location: JO2+0
Function Call: READ	Prompt: "earch for: " Variable: %R Timeout: %9 Line Location: SEARCH+0
Function Call: READ	Variable: %X Timeout: %9 Line Location: GTAG+0
Function Call: WRITE	Prompt: " from line: " Line Location: SELECT+0
Function Call: WRITE	Prompt: " to line: " Line Location: SELECT+0
Function Call: READ	Prompt: " from line: BEG=> " Variable: %T Timeout: %9 Line Location: SELALL+0
Function Call: READ	Prompt: " to line: END=> " Variable: %T Timeout: %9 Line Location: SELALL+0
Function Call: WRITE	Prompt: !,"Terminal Type not found." Line Location: TERM1+0
Function Call: READ	Variable: %X Timeout: 999 Line Location: TERM2+0
Function Call: WRITE	Prompt: !!! Line Location: TERM3+0
Function Call: WRITE	Prompt: " mode change" Line Location: MODE+0
Function Call: WRITE	Prompt: !,$S(XY="":"replace-with",1:"line editor"),! Line Location: MODE+0

Customize PDF page

Package: Toolkit

Routine: ZTEDIT2

Information

Source Information

Entry Points

Interaction Calls