Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Source | Entry Points | Interaction Calls

Print Page as PDF

Routine: DIWE4

Package: VA FileMan

Routine: DIWE4

Information

DIWE4 ;SFISC/GFT-WP - PRINT, BREAK, JOIN, PROGRAMMER-EDIT ;02:07 PM 8 Dec 1999

Source Information

Source file <DIWE4.m>

Entry Points

Name	Comments	DBIA/ICR reference
PRINT
LINNUMS
RD
D0	;Entry point for screen editor.
HD
DWH
QUE
PRNT
X
K
Y	;
B	;BREAK
BA
1
OPT
J	;JOIN

Interaction Calls

Name	Line Occurrences
Function Call: READ	Variable: DW2 Timeout: DTIME Line Location: PRINT+0
Function Call: WRITE	Prompt: !,$$EZBLD^DIALOG(8162) Line Location: LINNUMS+0
Function Call: WRITE	Prompt: $$EZBLD^DIALOG(8161,$G(ZTSK)),! Line Location: QUE+4
Function Call: READ	Timeout: DTIME Line Location: Y+2
Function Call: READ	Formatting: ! Prompt: "Edit from line: 1// " Variable: DW1 Timeout: DTIME Line Location: Y+3
Function Call: READ	Variable: DW2 Timeout: DTIME Line Location: Y+3
Function Call: WRITE	Prompt: " thru: ",DWLC,"// " Line Location: Y+3
Function Call: WRITE	Prompt: !,$J(I,3)_">"_Y Line Location: Y+5
Function Call: READ	Variable: X Timeout: DTIME Line Location: BA+0
Function Call: WRITE	Prompt: !,$$EZBLD^DIALOG(8120) Line Location: BA+0
Function Call: WRITE	Prompt: $C(7),"??" Line Location: BA+0
Function Call: WRITE	Prompt: !,$J(DWL,3)_">",@(DIC_"DWL,0)"),!,$J(DWL+1,3)_">",@(DIC_"DWL+1,0)") Line Location: BA+3
Function Call: WRITE	Prompt: ! Line Location: OPT+0
Function Call: WRITE	Prompt: $C(7),"??" Line Location: J+1
Function Call: WRITE	Prompt: !,$$EZBLD^DIALOG(349,I) Line Location: J+2
Function Call: WRITE	Prompt: !,$J(X,3)_">"_^(0),! Line Location: J+3
Function Call: WRITE	Prompt: "." Line Location: J+3

Info | Source | Entry Points | Interaction Calls