Routine: XBKD

Package	Total	Call Graph
IHS VA Utilities	6	EN1^XBDSET ^XBGXFR ^XBKD2 ^XBKD3 ^XBKVAR EN1^XBRESID

Package

Total

Call Graph

IHS VA Utilities

EN1^XBDSET ^XBGXFR ^XBKD2 ^XBKD3 ^XBKVAR EN1^XBRESID

Package	Total	Caller Graph
Contract Health Management Information System	11	ACHS3110 ACHS3111 ACHS3112 ACHS3113 ACHS3114 ACHS3115 ACHS3116 ACHS3118 ACHS31P7 ACHS31P8 ACHS31P9
IHS Patient Registration	2	AGPREI AGSSPREI
Patient Care Component	2	APCDPREI APCHPREI
Quality Assurance	2	AQALPREI AQAOPREI
Alcohol Chemical Dependency	1	ACDPREI
Case Management System	1	ACMPREI
ClassMan	1	KLASPREI
Diabetes Registry	1	BDMPREI
IHS Changes To ADT	1	BDGPRE
IHS Changes To Lab	1	BLRFCLEN
IHS Changes To Pharmacy	1	APSPPREI
IHS Dental System	1	ADEPREI
IHS Patient	1	AUPNPREI
IHS RPMS CHR System	1	BCHPREI
IHS Release Of Information	1	BRNPREI
IHS Support HL7 Interfaces	1	BHLPOST
IHS VA Support Files	1	AVAPREI
IHS VA Utilities	1	XBCDICD
PCC Medical Query	1	AMQQPIR
Patient Care Component Data Transmission	1	APCPPREI
Patient Care Component Reports	1	APCLPREI
Referred Care Information System	1	BMCPREI
Registration	1	DPTPREI
Taxonomy	1	ATXPREI
Third Party Billing	1	ABMDPREI
Utility Tables	1	AUTPREI

Package

Total

Caller Graph

Contract Health Management Information System

ACHS3110 ACHS3111 ACHS3112 ACHS3113 ACHS3114 ACHS3115 ACHS3116 ACHS3118
ACHS31P7 ACHS31P8 ACHS31P9

IHS Patient Registration

AGPREI AGSSPREI

Patient Care Component

APCDPREI APCHPREI

Quality Assurance

AQALPREI AQAOPREI

Alcohol Chemical Dependency

ACDPREI

Case Management System

ACMPREI

KLASPREI

BDMPREI

BDGPRE

BLRFCLEN

IHS Changes To Pharmacy

APSPPREI

IHS Dental System

ADEPREI

IHS Patient

AUPNPREI

IHS RPMS CHR System

BCHPREI

IHS Release Of Information

BRNPREI

IHS Support HL7 Interfaces

BHLPOST

IHS VA Support Files

AVAPREI

IHS VA Utilities

XBCDICD

PCC Medical Query

AMQQPIR

Patient Care Component Data Transmission

APCPPREI

Patient Care Component Reports

APCLPREI

Referred Care Information System

BMCPREI

DPTPREI

ATXPREI

ABMDPREI

AUTPREI

Name	Comments	DBIA/ICR reference
TMP	;
BEGIN	;
CHECKDD	; CHECK ^DD FOR DANGLING ENTRIES
LO	;
ASK2	;
CHKVAL	; CHECK G^T VALUES
LIST	; LIST FILE INFO
CONFIRM	; SHOW AND ASK
EN1	;PEP - Variables XBKDLO, XBKDHI, XBKDDEL, XBKDTMP must be set when entering here.
EN2	;PEP - Array ^UTILITY("XBDSET",$J) must exist when entering here.
HI	;
DEL	;
EOJ	;
ASK	;
MODIFY	;

Name	Field # of Occurrence
EN1^XBDSET	EN1+10
^XBGXFR	EOJ+2
^XBKD2	EN2+8
^XBKD3	EN2+13
^XBKVAR	BEGIN+1, EN1+2, EN2+3
EN1^XBRESID	EOJ+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"This program deletes FileMan dictionaries, and optionally their" Line Location: BEGIN+2
Function Call: WRITE	Prompt: !,"globals, TEMPLATES and AUTHORITIES, by a range of dictionary numbers.",!! Line Location: BEGIN+3
Function Call: WRITE	Prompt: !,"Enter last dictionary number to be deleted: ",XBKDLO,"//" Line Location: HI+1
Function Call: WRITE	Prompt: !!,"TEMPLATES and AUTHORITIES? [D]elete, [A]sk, [S]ave ",XBKDDEL,"//" Line Location: TMP+1
Function Call: WRITE	Prompt: !!,"XBKDLO and/or XBKDHI does not exist!" Line Location: EN1+1
Function Call: WRITE	Prompt: !!,"Invalid XBKDDEL --->",XBKDDEL,"<---" Line Location: EN1+5
Function Call: WRITE	Prompt: !!,"Invalid XBKDTMP --->",XBKDTMP,"<---" Line Location: EN1+8
Function Call: WRITE	Prompt: !!,"No dictionaries were selected." Line Location: EN1+13
Function Call: WRITE	Prompt: "." Line Location: CHECKDD+2
Function Call: WRITE	Prompt: !!,"^UTILITY(""XBDSET"",$J) is not defined!" Line Location: EN2+1
Function Call: WRITE	Prompt: !!,"* Don't mess with files less than 2!! ",7 Line Location: EN2+2
Function Call: WRITE	Prompt: !!,"One or more invalid GLOBAL^TEMPLATE disposition values encountered!" Line Location: EN2+6
Function Call: WRITE	Prompt: !!,"Resetting ^DIC(0) <WAIT>" Line Location: EN2+14
Function Call: WRITE	Prompt: !,"Invalid value ",XBKDFILE,"=",XBKDX Line Location: CHKVAL+5
Function Call: WRITE	Prompt: !!," NUMBER",?14,"NAME",?45,"G^T",?50,"DATA GLOBAL",! Line Location: CONFIRM+2
Function Call: WRITE	Prompt: !!,"The above list of dictionaries will be deleted in UCI ",XBKDUCI,". Data" Line Location: CONFIRM+5
Function Call: WRITE	Prompt: !,"globals, TEMPLATES and AUTHORITIES, will be kept, deleted, or asked depending" Line Location: CONFIRM+6
Function Call: WRITE	Prompt: !,"on flag. '?' in G position indicates invalid data global." Line Location: CONFIRM+7
Function Call: WRITE	Prompt: !!,"[S]ave, [D]elete, [A]sk. Globals to be deleted are also marked" Line Location: CONFIRM+8
Function Call: WRITE	Prompt: !," by '*' in position 1." Line Location: CONFIRM+9
Function Call: READ	Timeout: $G(DTIME,999) Line Location: CONFIRM+11
Function Call: WRITE	Prompt: ! Line Location: CONFIRM+15
Function Call: WRITE	Prompt: !,$S($P(XBKDX,U,1)="D":"*",1:" "),XBKDFILE,?14,$E($P(^DIC(XBKDFILE,0),U,1),1,30),?45,$E(XBKDX,1,3),?50,$S($P(XBKDX,U,3)="":"<NONE>",1:$P(XBKDX,U,3)) Line Location: LIST+1
Function Call: WRITE	Prompt: *7 Line Location: MODIFY+3
Function Call: WRITE	Prompt: ! Line Location: MODIFY+7
Function Call: WRITE	Prompt: !,"Do you want to delete the data global for ",XBKDFILE," ",$P(^DIC(XBKDFILE,0),U,1)," (Y/N) N//" Line Location: ASK+2
Function Call: WRITE	Prompt: !,"Do you want to delete the TEMPLATES and AUTHORITIES for ",XBKDFILE," ",$P(^DIC(XBKDFILE,0),U,1)," (Y/N) N//" Line Location: ASK2+2
Function Call: WRITE	Prompt: !,"Restoring saved ^DD nodes. <WAIT>" Line Location: EOJ+2
Function Call: WRITE	Prompt: !!,"DONE",!! Line Location: EOJ+7

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(	EN1+12, CHECKDD+1
^DIC - [#1]	EN2+16, LIST+1, ASK+2, ASK2+2
^DIC(0	EN2+17*
^UTILITY("XBDSET"	EN1+12, EN1+13, EN1+15, CHECKDD+3, EN2+1, EN2+2, EN2+5, CONFIRM+1, CONFIRM+4, CONFIRM+17 , MODIFY+3, MODIFY+5!, MODIFY+6, ASK+4, ASK+5, ASK2+4, ASK2+5, EOJ+3!
^UTILITY("XBKD"	EOJ+2, EOJ+3!

Label References

Name	Line Occurrences
ASK	CONFIRM+17, MODIFY+8
ASK2	ASK+1
CHECKDD	EN1+12
CHKVAL	EN2+5
CONFIRM	EN2+10, CONFIRM+13, CONFIRM+18
DEL	DEL+2
EN2	EN1+16
EOJ	LO+2, HI+4, EN1+1, EN1+5, EN1+8, EN1+13, EN2+1, EN2+2, EN2+6, EN2+11 , EN2+18
LIST	CONFIRM+4
MODIFY	CONFIRM+13, MODIFY+3
TMP	TMP+3

Name	Field # of Occurrence
^(	EN1+15, EN2+5, CONFIRM+4, CONFIRM+17, MODIFY+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	EOJ+4!
>> ADIFROM("IHS"	CONFIRM+10
DA	EOJ+4!
DIK	EOJ+4!
DTIME	LO+1, HI+2, DEL+1, TMP+2, CONFIRM+11, MODIFY+1, MODIFY+4, ASK+3, ASK2+3
FROM	EOJ+2*, EOJ+6!
TO	EOJ+2*, EOJ+6!
U	EN1+15, CHKVAL+4, LIST+1, MODIFY+6, ASK+1, ASK+2, ASK+4, ASK+5, ASK2+1, ASK2+2 , ASK2+4, ASK2+5
>> XBDSHI	EN1+9*
>> XBDSLO	EN1+9*
XBKDASK	EN2+12!, CONFIRM+3, CONFIRM+4, CONFIRM+14, EOJ+5!
XBKDC	EN2+15, EN2+16, EN2+17, EOJ+5!
XBKDDEL	DEL+1, DEL+2, DEL+3, TMP+1, TMP+4, EN1+3, EN1+4, EN1+5, EN1+15, EN2+7! , CHKVAL+4*, EOJ+5!
XBKDERR	EN2+7!, CHKVAL+1, CHKVAL+2, CHKVAL+4*, CHKVAL+5, EOJ+5!
XBKDFILE	EN1+11, EN1+12, EN1+14, EN1+15, CHECKDD+1, CHECKDD+3, EN2+4, EN2+5, EN2+15, EN2+16 , CHKVAL+5, CONFIRM+3, CONFIRM+4, CONFIRM+16, CONFIRM+17, LIST+1, MODIFY+1*, MODIFY+2, MODIFY+3, MODIFY+5 , MODIFY+6, ASK+2, ASK+4, ASK+5, ASK2+2, ASK2+4, ASK2+5, EOJ+5!
XBKDFLD	EOJ+5!
XBKDFLG	EN2+4, EN2+6, EN2+7!, EN2+9, EN2+11, EN2+12!, CHKVAL+5, CONFIRM+1, CONFIRM+12*, EOJ+5!
XBKDG	EOJ+5!
XBKDHI	HI+2, HI+3, HI+4, EN1+1, EN1+9, EN1+12, EN2+2!, EOJ+1, EOJ+5!
XBKDL	EN1+12, EN1+15, EN2+5, EN2+16, CONFIRM+4, CONFIRM+17, EOJ+5!
XBKDLAST	EN2+15, EN2+16, EN2+17, EOJ+5!
XBKDLO	LO+1*, LO+2, HI+1, HI+3, HI+4, EN1+1, EN1+9, EN1+11, EN2+2!, EOJ+1 , EOJ+5!
XBKDNDIC	EOJ+5!
XBKDTMP	TMP+2, TMP+3, TMP+4, EN1+6, EN1+7, EN1+8, EN1+15, EN2+7!, CHKVAL+4*, EOJ+5!
XBKDUCI	CONFIRM+5, EOJ+5!
XBKDX	EN2+5, EN2+7!, EN2+12!, CHKVAL+2, CHKVAL+4, CHKVAL+5, CONFIRM+4, CONFIRM+10, CONFIRM+11, CONFIRM+12 , CONFIRM+13, CONFIRM+17, LIST+1, MODIFY+6, ASK+1, ASK2+1, EOJ+5!
XBKDY	EN2+12!, MODIFY+4, MODIFY+5, ASK+3, ASK+4, ASK2+3*, ASK2+4, EOJ+5!
>> XBRHI	EOJ+1*
>> XBRLO	EOJ+1*
Y	EOJ+4!

Customize PDF page

Package: IHS VA Utilities

Routine: XBKD

Information

Source Information

Call Graph

Call Graph Total: 6

Caller Graph

Caller Graph Total: 39

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: