Routine: XBDHDSP

Package	Total	Call Graph
IHS VA Utilities	1	^XBDHD1
VA Fileman	1	^DIR

Package

Total

Call Graph

^DIR

Package	Total	Caller Graph
IHS VA Utilities	1	XBDHD

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
EREP	;
AUTO	;
REP	;
SP	;
MANUAL	;
INIT	;
EXIT	;
NEW	;
CQ	;
NOTES	; ; PUTS SPACES BETWEEN FIELDS ON THE HEADER LINE ; INPUT = XBDHCHLW,XBDHTHLW,XBDHCHN ; OUTPUT = 8TH PIECE OF ^TMP("XBDH",$J,"HEADER",XBDHCHN) ; IGNORES PURE MUMPS EXPRESSION AS DESIGNATED BY DECIMAL XBDHCHN
MAN	;

Name	Field # of Occurrence
^DIR	CQ+2, EXIT+2, SP+3, EREP+2
^XBDHD1	SP+11, AUTO+4, EREP+9

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"IT IS NOW TIME TO INSERT SPACES BETWEEN HEADER FIELDS",! Line Location: INIT+4
Function Call: WRITE	Prompt: !! Line Location: EXIT+4
Function Call: WRITE	Prompt: !!,"PUT SPACES AFTER HEADER """,$C(64+XBDHCHN1),"""" Line Location: MAN+2
Function Call: WRITE	Prompt: !,"TOTAL NUMBER OF UNUSED COLUMNS LEFT: ",XBDHNSL Line Location: MAN+3
Function Call: WRITE	Prompt: !,"TOTAL NUMBER OF HEADERS LEFT: ",XBDHTH+1-XBDHCHN1,! Line Location: MAN+4
Function Call: WRITE	Prompt: 7,7,13,$J("",IOM),13 Line Location: SP+8
Function Call: WRITE	Prompt: 7,7,13,$J("",IOM),13 Line Location: SP+9
Function Call: WRITE	Prompt: ! Line Location: REP+1
Function Call: WRITE	Prompt: 7,7,13,$J("",IOM),13 Line Location: EREP+5
Function Call: WRITE	Prompt: 7,7,13,$J("",IOM),13 Line Location: EREP+6
Routine Call	DIR Line Location: CQ+2 EXIT+2 SP+3 EREP+2

Name	Line Occurrences (* Changed, ! Killed)
^TMP("XBDH"	INIT+2, INIT+3, MANUAL+2, MAN+1, SP+9, SP+10, AUTO+2, EREP+8

Name	Field # of Occurrence
DIR	CQ+3!, EXIT+3!, SP+4!, EREP+3!
DIR("?"	CQ+1*
DIR("A"	CQ+1, EXIT+1, SP+1, EREP+1
DIR("B"	CQ+1, EXIT+1, SP+2, EREP+1
DIR(0	CQ+1, EXIT+1, SP+1, EREP+1
IOM	SP+8, SP+9, EREP+5, EREP+6
U	EXIT+5
>> V	INIT+2, INIT+3, SP+9, SP+10, AUTO+2, EREP+8
>> XBDHCHLW	INIT+1, AUTO+1, REP+2
>> XBDHCHN	INIT+1
XBDHCHN1	NEW+1~, MANUAL+1, MANUAL+2, MAN+1, MAN+2, MAN+4, SP+1, SP+6, SP+7, SP+9 , SP+10, AUTO+1, AUTO+2, REP+2, EREP+8
XBDHI	NEW+1~, AUTO+2, EREP+8
>> XBDHL	MANUAL+2*
>> XBDHNSL	INIT+1, MAN+3, SP+9, SP+10, AUTO+1, AUTO+3, REP+2, EREP+8
>> XBDHQUIT	EXIT+5*
XBDHREP	NEW+1~, REP+2*, EREP+1, EREP+6
XBDHTH	NEW+1~, INIT+1*, INIT+3, MANUAL+2, MAN+4, SP+6, SP+7, AUTO+1, AUTO+2, REP+2 , EREP+8
>> XBDHTHLW	INIT+1, AUTO+1, REP+2
>> XBDHX	CQ+4, CQ+5, CQ+6, SP+2, SP+5, SP+6, SP+7, SP+8, SP+9, SP+10 , AUTO+2, EREP+4, EREP+5, EREP+6, EREP+7*, EREP+8
>> XBDHY	MAN+1, SP+10, AUTO+1*, AUTO+2
>> XBDHZ	MAN+1, AUTO+1, AUTO+2
>> Y	CQ+4, EXIT+4, EXIT+5, SP+5, EREP+4

Information