Routine: XBBPI

Package	Total	Call Graph
VA Fileman	3	(,DD)^%DT ^DIC YN^DICN
IHS VA Utilities	1	^XBKVAR

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This routine will build a pre-init routine for the specified package." Line Location: START+2
Function Call: WRITE	Prompt: !,"The pre-init routine will call XBKD to delete the FileMan dictionaries" Line Location: START+3
Function Call: WRITE	Prompt: !,"being created by the package. Data globals and templates will be saved.",!! Line Location: START+4
Function Call: WRITE	Prompt: !!,"Bye",! Line Location: BUILD+5
Function Call: WRITE	Prompt: "." Line Location: BUILD+7
Function Call: WRITE	Prompt: "." Line Location: BUILD+10
Function Call: WRITE	Prompt: !,XBBPFLE," does not exist in ^DIC!" Line Location: BUILD+12
Function Call: WRITE	Prompt: !!,"All files in package must exist. Fix and rerun.",!! Line Location: BUILD+13
Function Call: WRITE	Prompt: "." Line Location: BUILD+14
Function Call: WRITE	Prompt: "." Line Location: BUILD+17
Function Call: WRITE	Prompt: !!,XBBPPGM," already exists. Want to recreate it (Y/N) Y//" Line Location: CR2+1
Function Call: WRITE	Prompt: !!,"Routine ",XBBPPGM," has been filed.",!! Line Location: EOJ+1
Function Call: WRITE	Prompt: !!,"Package ",XBBPPRFX," has a pre-initialization routine entry but it is ",$P(^("INI"),U),"!" Line Location: EOJ+4
Function Call: WRITE	Prompt: !,"Package ",XBBPPRFX," has no pre-initialization routine entry!",! Line Location: EOJ2+1
Routine Call	DIC Line Location: PACKAGE+2

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^%ZOSF("SAVE"	BUILD+27
^DD("DD"	BUILD+20
^DD("OS" - [#.7]	CHECKRTN+2, CHECKRTN+3
^DIC - [#1]	BUILD+12
^DIC(9.4 - [#9.4]	BUILD+1, BUILD+3, BUILD+9, EOJ+2, EOJ+3, EOJ+4
^UTILITY("XBBPI EXEC"	BUILD+6!, EOJ3+1!
^UTILITY("XBBPI"	BUILD+6!, BUILD+9*, BUILD+12, BUILD+16, BUILD+25, EOJ3+1!
^UTILITY("XBBPPGM"	BUILD+6!, BUILD+21, BUILD+22, BUILD+23, BUILD+25, EOJ3+1!

Name	Field # of Occurrence
%	START+6!, EOJ3+2!
%DT	BUILD+18*, EOJ3+2!
>> %Y	CR2+3
DIC	PACKAGE+1*, PACKAGE+3!
DIC(0	PACKAGE+1*
DIE	BUILD+26*, EOJ3+2!
DT	BUILD+1
U	BUILD+1, BUILD+3, EOJ+3, EOJ+4
>> X	BUILD+18, BUILD+26, CHECKRTN+3*
XBBPDFN	BUILD+1*, BUILD+3, BUILD+9, EOJ+2, EOJ+3, EOJ+4, EOJ3+3!
XBBPFLE	BUILD+8, BUILD+9, BUILD+11, BUILD+12, BUILD+15, BUILD+16, BUILD+24, BUILD+25, EOJ3+3!
XBBPFLG	BUILD+5, BUILD+11, BUILD+12, BUILD+13, CHECKRTN+1, CR2+3, EOJ3+3!
XBBPI	BUILD+23, BUILD+25, EOJ3+3!
XBBPL	BUILD+9, BUILD+12, BUILD+16*, EOJ3+3!
XBBPLOOP	START+5*, START+6!
XBBPP	EOJ3+3!
XBBPPGM	BUILD+3*, BUILD+21, BUILD+26, CHECKRTN+3, CR2+1, EOJ+1, EOJ+4, EOJ3+3!
XBBPPRFX	BUILD+1*, BUILD+3, EOJ+4, EOJ2+1, EOJ3+3!
XBBPVER	BUILD+3*, BUILD+22, EOJ3+3!
XBBPX	BUILD+8*, EOJ3+3!
XBBPY	BUILD+25*, EOJ3+3!
XCN	BUILD+26*, EOJ3+2!
>> Y	START+5, BUILD+1*, BUILD+3, BUILD+21

Name	Field # of Occurrence
$T(DTA+XBBPI	BUILD+23