Routine: BDGSYS6

Package	Total	Call Graph
Registration	4	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1 EN^VALM2
Kernel	2	$$REPEAT^XLFSTR DISP^XQORM1
VA Fileman	2	^DIE $$GET1^DIQ

Entry Points

Name	Comments	DBIA/ICR reference
RESET	; -- update partition for return to list manager
EN	; -- main entry point for BDG SYS BULLETIN
HELP	; -- help code
EDIT	;EP; called by Edit Entry protocol
SP(N)	; -- SUBRTN to pad N number of spaces
EXPND	; -- expand code
PAD(D,L)	;EP -- SUBRTN to pad length of data ; -- D=data L=length
INIT	; -- init variables and list array
EXIT	; -- exit code
SET(DATA,NUM,N,LINE)	; put display line into array
HDR	; -- header code

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !,"BULLETIN: ",$$GET1^DIQ(3.6,BDGN,.01),! Line Location: EDIT+12
Routine Call	VALM Line Location: EN+3
Routine Call	DIE Line Location: EDIT+13

Name	Line Occurrences (* Changed, ! Killed)
^TMP("BDGSYS6"	INIT+3!, INIT+19, SET+2, SET+3, EXIT+1!, EDIT+6, EDIT+7, EDIT+8, EDIT+9
^XMB(3.6 - [#3.6]	INIT+5, INIT+7, INIT+10, INIT+15

Name	Field # of Occurrence
>> BDGDIV	HDR+2
BDGN	EDIT+1~, EDIT+9*, EDIT+11, EDIT+12, EDIT+13
COUNT	INIT+1~, INIT+8*, INIT+9, INIT+12, INIT+17
D	PAD~, PAD+2
DA	EDIT+1~, EDIT+13*
DATA	SET~, SET+2
DIE	EDIT+1~, EDIT+13*
DLAYGO	EDIT+1~
DR	EDIT+1~, EDIT+13*
IEN	INIT+1~, INIT+6, INIT+7, INIT+9, INIT+10, INIT+11, INIT+12, INIT+15, INIT+16, INIT+17
IEN2	INIT+1~, INIT+10, INIT+11, INIT+15, INIT+16
L	PAD~, PAD+2
LINE	INIT+1~, INIT+9, INIT+11, INIT+12, INIT+16, INIT+17, SET~, SET+1, SET+2, SET+3
N	SET~, SET+3, SP~, SP+1
NAME	INIT+1~, INIT+4, INIT+5, INIT+7
NUM	SET~, SET+3
>> VALMBCK	RESET+1, RESET+2
VALMCNT	EN+1~, INIT+2*, INIT+12, INIT+17, INIT+20
>> VALMHDR(1	HDR+3*
>> VALMQUIT	RESET+1
>> VALMY	EDIT+4
>> VALMY(	EDIT+5
X	HDR+1~, HDR+2, HDR+3, HELP+1, EDIT+1~, EDIT+5*, EDIT+9
>> XQORNOD(0	EDIT+3
Y	EDIT+1~, EDIT+6*, EDIT+7, EDIT+8, EDIT+9
Z	EDIT+1~, EDIT+7*, EDIT+8, EDIT+9