Routine: ENPLSV

Package	Total	Call Graph
Engineering	3	CM^ENPLSV1 A^ENPLSV2 ($$LTZ,$$TZD)^ENPLUTL
MailMan	2	REMSBMSG^XMA1C ENT1^XMD

Entry Points

Name	Comments	DBIA/ICR reference
EN	;
INIT	; Initialization
GETC	; Get Communication Information
LOAD	; Load Message into ^TMP
SAVECC	; Save Communication Comments (if any) & load first "A" segment
SM	; Send Message
WRAPUP	;

Name	Line Occurrences (* Changed, ! Killed)
^ENG("PROJ" - [#6925]	EN+7
^TMP($J	EN+6, INIT+2!, LOAD+1, SAVECC+1, WRAPUP+2!
^XMB(3.9 - [#3.9]	SM+2*

Name	Field # of Occurrence
^(	EN+6, SAVECC+1

Name	Field # of Occurrence
DT	SM+2
ENABORT	EN+3, EN+4, EN+5, EN+6, EN+8, INIT+1, GETC+1, GETC+2, SAVECC+2*, SAVECC+3 , WRAPUP+1, WRAPUP+2!
ENBLANK	INIT+1*, WRAPUP+2!
ENCCODE	GETC+3*, GETC+6, GETC+7, GETC+8, WRAPUP+3!
ENCDATE	GETC+4*, WRAPUP+3!
ENCSITE	GETC+5*, WRAPUP+3!
ENCTIME	GETC+4*, WRAPUP+3!
ENCTYPE	GETC+3*, WRAPUP+3!
ENCTZD	GETC+5*, WRAPUP+3!
ENDA	EN+7, WRAPUP+3!
ENDT	WRAPUP+3!
ENI	EN+6, LOAD+1, SAVECC+1*, WRAPUP+3!
ENJ	WRAPUP+3!
ENL	SM+2, WRAPUP+3!
ENPACT	WRAPUP+4!
ENPCOM	WRAPUP+4!
ENPDA1	WRAPUP+4!
ENPDA2	WRAPUP+4!
ENPNBR	WRAPUP+4!
ENPREV	WRAPUP+4!
ENPSTA	WRAPUP+4!
ENPTI1	WRAPUP+4!
ENPTI2	WRAPUP+4!
ENPTTL	WRAPUP+4!
ENREC	EN+6, SAVECC+1, SAVECC+2, SAVECC+3, WRAPUP+5!
ENRSEG	EN+6, SAVECC+3, WRAPUP+5!
ENSCODE	GETC+6*, WRAPUP+5!
ENSFIELD	GETC+7*, WRAPUP+5!
ENSTEXT	GETC+8*, WRAPUP+5!
ENWP	WRAPUP+6!
ENWP3	WRAPUP+6!
ENWP4	WRAPUP+6!
ENXMSER	INIT+3*, WRAPUP+1, WRAPUP+5!
ENXMZ	INIT+3*, WRAPUP+1, WRAPUP+5!
U	EN+6, GETC+1, GETC+3, GETC+4, GETC+5, SAVECC+1, SAVECC+2, SAVECC+3
X	WRAPUP+6!
>> XMDUN	SM+1*
>> XMER	GETC+1, LOAD+1
>> XMREC	GETC+1, LOAD+1
>> XMRG	GETC+1, GETC+3, GETC+4, GETC+5, LOAD+1
>> XMSER	WRAPUP+1*
>> XMY("G.EN PRO	JECTS" , SM+3*
>> XMZ	SM+2, WRAPUP+1*
>> XQMSG	INIT+3
>> XQSOP	INIT+3
Y	WRAPUP+6!