Routine: BTIUPOS

Information

BTIUPOS ; IHS/ITSC/LJF - IHS post initialization actions ;

Source Information

Source file <BTIUPOS.m>

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
VA Fileman	5	^DIC FILE^DICN ^DIE (,ENALL)^DIK $$GET1^DIQ
IHS Mods To Text Integration Utilities	1	OBJCHK^BTIUPOS3
Kernel	1	BMES^XPDUTL

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Text Integration Utility	1	TIUPOST

Entry Points

Name	Comments	DBIA/ICR reference
OBJ	; add new objects in TIU Template file to class containers ; either add to Patient Data Objects or Patient Inpt Objects
PTR(X)	; returns IEN in TIU Template file for name in X
NEWOBJ	;;
NEWINPT	;;
VSTLINK	;EP -- add TIU to Visit Tracking file so TIU can create visits in EHR
PCCLNK	;EP -- add TIU to PCC Visit Merge Utility
CLEAN	;EP; clean up item lists in TIU files ; TIU Document Definition file ; remove those items listed under a class or document class that ; were not included in the distribution
DDMFIX	;EP; update upload error filing code for progress notes and consults ; KIDS install won't update this if document definition already there ; change was released in VA patch 131 seq 127

External References

Name	Field # of Occurrence
OBJCHK^BTIUPOS3	CLEAN+56
^DIC	VSTLINK+8, OBJ+12, OBJ+32, PTR+2
FILE^DICN	PCCLNK+7
^DIE	CLEAN+44, CLEAN+48, CLEAN+52, DDMFIX+5, DDMFIX+9, OBJ+40, OBJ+44
^DIK	CLEAN+13, CLEAN+30
ENALL^DIK	CLEAN+18
$$GET1^DIQ	CLEAN+43, CLEAN+47, CLEAN+51, DDMFIX+8, OBJ+21
BMES^XPDUTL	CLEAN+5, CLEAN+16, CLEAN+22, CLEAN+35, DDMFIX+3, PCCLNK+1, VSTLINK+1, OBJ+3

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DIC(150.9 - [#150.9]	Classic Fileman Calls
^TIU(8925 - [#8925]	Classic Fileman Calls
^TIU(8925.1 - [#8925.1]	Classic Fileman Calls, GET1^DIQ
8927.03	GET1^DIQ
^APCDLINK - [#9001002]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCDLINK("B"	PCCLNK+2
^DD(150.9	VSTLINK+6
^DD(8925.1	CLEAN+37*
^DD(8927	OBJ+10, OBJ+30
^DIC(150.9 - [#150.9]	VSTLINK+4
^DIC(9.4 - [#9.4]	VSTLINK+3
^TIU(8925 - [#8925]	CLEAN+17!
^TIU(8925.1 - [#8925.1]	CLEAN+7, CLEAN+8, CLEAN+9, CLEAN+10, CLEAN+42, CLEAN+46, CLEAN+50, DDMFIX+7, OBJ+43, OBJ+47 , OBJ+48, OBJ+50, OBJ+51
^TIU(8927 - [#8927]	CLEAN+24, CLEAN+25, CLEAN+26, CLEAN+27, OBJ+8, OBJ+11, OBJ+20, OBJ+25

Label References

Name	Line Occurrences
$$PTR	OBJ+6, OBJ+7, OBJ+18, OBJ+28
OBJ	CLEAN+33

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
BTIUN	OBJ+15~, OBJ+16*, OBJ+18, OBJ+26
BTIUP	OBJ+17~, OBJ+28*
BTIUQ	OBJ+17~, OBJ+25, OBJ+31, OBJ+33
BTIUX	OBJ+17~
BTIUX(	OBJ+22, OBJ+27, OBJ+33, OBJ+36, OBJ+38
CONS	DDMFIX+4~, DDMFIX+7*, DDMFIX+8, DDMFIX+9
DA	CLEAN+6~, CLEAN+12, CLEAN+23~, CLEAN+29, CLEAN+40~, CLEAN+42, CLEAN+43, CLEAN+46, CLEAN+47, CLEAN+50* , CLEAN+51, DDMFIX+4~, DDMFIX+5, DDMFIX+9, OBJ+17~, OBJ+38, OBJ+43, OBJ+44, OBJ+47, OBJ+48 , OBJ+50, OBJ+51
DA(1	CLEAN+12, CLEAN+29, VSTLINK+5, OBJ+9, OBJ+29, OBJ+38
DD	PCCLNK+3~, VSTLINK+2~
DIC	PCCLNK+3~, PCCLNK+4, VSTLINK+2~, VSTLINK+5, OBJ+5~, OBJ+9, OBJ+17~, OBJ+29, PTR+1~, PTR+2*
DIC("DR"	PCCLNK+5, PCCLNK+6, VSTLINK+7, OBJ+10, OBJ+31*
DIC("P"	VSTLINK+6, OBJ+10, OBJ+30*
DIC(0	PCCLNK+4, VSTLINK+5, OBJ+9, OBJ+29, PTR+2*
DIE	CLEAN+40~, CLEAN+41, DDMFIX+4~, DDMFIX+5, DDMFIX+9, OBJ+17~, OBJ+38, OBJ+44*
DIK	CLEAN+6~, CLEAN+12, CLEAN+18, CLEAN+23~, CLEAN+29*
DIK(1	CLEAN+18*
DLAYGO	PCCLNK+3~, PCCLNK+4, VSTLINK+2~, VSTLINK+5
DO	PCCLNK+3~, VSTLINK+2~
DOC	CLEAN+6~, CLEAN+7*, CLEAN+8, CLEAN+9, CLEAN+12
DR	CLEAN+40~, CLEAN+44, CLEAN+48, CLEAN+52, DDMFIX+4~, DDMFIX+5, DDMFIX+9, OBJ+17~, OBJ+39, OBJ+44*
IEN	CLEAN+6~, CLEAN+8, CLEAN+9, CLEAN+12, CLEAN+23~, CLEAN+24, CLEAN+25, CLEAN+26, CLEAN+29, OBJ+17~ , OBJ+20*, OBJ+21, OBJ+22
IEN2	CLEAN+23~, CLEAN+25*, CLEAN+26, CLEAN+29
LINE	OBJ+17~, OBJ+26*
NAME	OBJ+17~, OBJ+21, OBJ+22, OBJ+27, OBJ+28, OBJ+31, OBJ+33, OBJ+36*, OBJ+38
NUM	OBJ+17~, OBJ+27*
OBJ	CLEAN+40~
PDO	OBJ+17~, OBJ+18*, OBJ+20, OBJ+21, OBJ+25, OBJ+29, OBJ+38
PIO	OBJ+5~, OBJ+6*, OBJ+8, OBJ+10
PKG	VSTLINK+2~, VSTLINK+3*, VSTLINK+4
SEQ	OBJ+17~, OBJ+36, OBJ+37, OBJ+39
ST	OBJ+5~, OBJ+7*, OBJ+8, OBJ+9, OBJ+11
U	CLEAN+9, CLEAN+26, VSTLINK+6, OBJ+10, OBJ+18, OBJ+26, OBJ+30
X	CLEAN+6~, CLEAN+9, CLEAN+10, CLEAN+23~, CLEAN+26, CLEAN+27, CLEAN+40~, PCCLNK+3~, PCCLNK+7, VSTLINK+2~ , VSTLINK+7, OBJ+5~, OBJ+11, OBJ+17~, OBJ+31, PTR~
Y	CLEAN+40~, PCCLNK+3~, OBJ+5~, OBJ+17~, OBJ+33, PTR+1~, PTR+3

Customize PDF page

Package: IHS Mods To Text Integration Utilities

Routine: BTIUPOS

Call Graph Total: 7

Caller Graph Total: 1