Routine: BPXRM202

Information

BPXRM202 ; IHS/MSC/MGH - Version 2.0 Patch 2 post routine. ;19-Aug-2013 16:59;DU

Source Information

Call Graph

Call Graph Total: 5

Package	Total	Call Graph
VA Fileman	3	($$FIND1,FIND)^DIC (FILE,UPDATE)^DIE ^DIK
Clinical Reminders	1	POSTKIDS^PXRMEXU5
Kernel	1	BMES^XPDUTL

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP pre-init
TERMS	;Resequence the reminder finding types prompts to use the new prompts
DIALOG	;Update the dialog prompt
MSG2	;Print out the message
DELEI	;If the Exchange File entry already exists delete it.
IMM	;Find the prompts for the Immunizations
PATCH(X)	;return 1 if patch X was installed, X=aaaann.nnnnnn
PROMPTS	;
CNAK	;Make sure all "NAK" characters are converted back to "^" in
IMMGIV	; Replace prompts for Immunization given at encounter
ENV	;EP environment check
MSG	;Print out the message
POST	;Post-install
INACT	;Inactivate items
DELETE	;Delete the subnodes

External References

Name	Field # of Occurrence
$$FIND1^DIC	TERMS+3, IMM+3
FIND^DIC	DELEI+5
FILE^DIE	INACT+7
UPDATE^DIE	IMMGIV+8, IMMGIV+14, IMMGIV+20, IMMGIV+27, IMMGIV+33, IMMGIV+39, IMMGIV+45, IMMGIV+51, IMMGIV+57, DIALOG+7 , DIALOG+15
^DIK	DELETE+5, DELEI+13
POSTKIDS^PXRMEXU5	CNAK+6
BMES^XPDUTL	CNAK+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You must first install "_PATCH_"." Line Location: ENV+14
Function Call: WRITE	Prompt: !!,"The following error message was returned:",!! Line Location: TERMS+5
Function Call: WRITE	Prompt: MSG("DIERR",1,"TEXT",MSG),! Line Location: TERMS+6
Function Call: WRITE	Prompt: !!,"Unable to find the Immunization FINDING TYPE" Line Location: TERMS+7
Function Call: WRITE	Prompt: !!,"The following error message was returned:",!! Line Location: IMM+5
Function Call: WRITE	Prompt: MSG("DIERR",1,"TEXT",MSG),! Line Location: IMM+6
Function Call: WRITE	Prompt: !!,"The following error message was returned:",!! Line Location: MSG+1
Function Call: WRITE	Prompt: MSG("DIERR",1,"TEXT",MSG),! Line Location: MSG+2
Function Call: WRITE	Prompt: !!,"Unable to add a prompt to FINDING NUMBER "_TYP_" Prompt may have to be added manually." Line Location: MSG+3
Function Call: WRITE	Prompt: !!,"The following error message was returned:",!! Line Location: MSG2+1
Function Call: WRITE	Prompt: MSG("DIERR",1,"TEXT",MSG),! Line Location: MSG2+2
Function Call: WRITE	Prompt: !!,"Unable to add a GUI PROCESS to FINDING NUMBER "_IEN_" GUI process may have to be added manually." Line Location: MSG2+3
Routine Call	DIE Line Location: IMMGIV+8 IMMGIV+14 IMMGIV+20 IMMGIV+27 IMMGIV+33 IMMGIV+39 IMMGIV+45 IMMGIV+51 IMMGIV+57 DIALOG+7 DIALOG+15
Routine Call	DIC Line Location: DELEI+5
Routine Call	DIC Line Location: TERMS+3 IMM+3
Routine Call	DIE Line Location: INACT+7

FileNo	Call Tags
^PXRMD(801.45 - [#801.45]	FIND1^DIC
801.451	FIND1^DIC
^PXD(811.8 - [#811.8]	Classic Fileman Calls, FIND^DIC

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DIC(9.4 - [#9.4]	PATCH+4, PATCH+5, PATCH+7, PATCH+8
^PXD(811.8 - [#811.8]	CNAK+5
^PXD(811.9 - [#811.9]	INACT+3
^PXRMD(801.41 - [#801.41]	PROMPTS+1, PROMPTS+2, PROMPTS+3, PROMPTS+4, PROMPTS+5, PROMPTS+6, PROMPTS+7, PROMPTS+8, PROMPTS+9, DIALOG+3 , DIALOG+11
^PXRMD(801.42 - [#801.42]	DIALOG+4, DIALOG+12
^PXRMD(801.45 - [#801.45]	DELETE+2
^XPD(9.7 - [#9.7]	ENV+4, ENV+6, ENV+7

Label References

Name	Line Occurrences
$$PATCH	ENV+13
CNAK	POST+4
DELETE	IMMGIV+2
DIALOG	POST+2
IMM	TERMS+8
IMMGIV	IMM+8
INACT	POST+3
MSG	IMMGIV+9, IMMGIV+15, IMMGIV+21, IMMGIV+28, IMMGIV+34, IMMGIV+40, IMMGIV+46, IMMGIV+52, IMMGIV+58
MSG2	DIALOG+8, DIALOG+16
PROMPTS	TERMS+2
TERMS	POST+1

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
ARRAY	DELEI+1~
ARRAY(	DELEI+3, DELEI+4
DA	DELETE+1~, DELETE+3, DELEI+10~, DELEI+12
DA(1	DELETE+3*
DA(2	DELETE+3*
DIK	DELETE+1~, DELETE+4, DELEI+10~, DELEI+11
ERR	INACT+4~
FDA	IMMGIV+1~, DIALOG+1~, DIALOG+9!, DIALOG+17!, INACT+4~
FDA(	IMMGIV+5, IMMGIV+6, IMMGIV+7, IMMGIV+12, IMMGIV+13, IMMGIV+18, IMMGIV+19, IMMGIV+24, IMMGIV+25, IMMGIV+26 , IMMGIV+31, IMMGIV+32, IMMGIV+37, IMMGIV+38, IMMGIV+43, IMMGIV+44, IMMGIV+49, IMMGIV+50, IMMGIV+55, IMMGIV+56 , DIALOG+6, DIALOG+14, INACT+6*
GUI	DIALOG+1~, DIALOG+2, DIALOG+4, DIALOG+6, DIALOG+10, DIALOG+12, DIALOG+14
I	PATCH+3~, PATCH+4, PATCH+5, PATCH+7, PATCH+8, INACT+1~, INACT+2, INACT+3
IC	DELEI+1~, DELEI+2, DELEI+3, DELEI+4
IEN	DIALOG+1~, DIALOG+2, DIALOG+3, DIALOG+5, DIALOG+10, DIALOG+11, DIALOG+13, MSG2+3, INACT+1~, INACT+3* , INACT+5, CNAK+2~, CNAK+4, CNAK+5, CNAK+6
IENS	IMM+1~, IMM+2, IMM+3, IMMGIV+1~, IMMGIV+4, IMMGIV+5, IMMGIV+6, IMMGIV+7, IMMGIV+11, IMMGIV+12 , IMMGIV+13, IMMGIV+17, IMMGIV+18, IMMGIV+19, IMMGIV+23, IMMGIV+24, IMMGIV+25, IMMGIV+26, IMMGIV+30, IMMGIV+31 , IMMGIV+32, IMMGIV+36, IMMGIV+37, IMMGIV+38, IMMGIV+42, IMMGIV+43, IMMGIV+44, IMMGIV+48, IMMGIV+49, IMMGIV+50 , IMMGIV+54, IMMGIV+55, IMMGIV+56, DIALOG+1~, DIALOG+5, DIALOG+6, DIALOG+9!, DIALOG+13, DIALOG+14, DIALOG+17! , INACT+1~, INACT+5*, INACT+6
IN	ENV+1~, ENV+3*, ENV+4, ENV+6
IND	DELEI+1~, DELEI+9*, DELEI+12
INSTDA	ENV+1~, ENV+3, ENV+6, ENV+7
J	PATCH+3~, PATCH+5*, PATCH+7, PATCH+8
LIST	DELEI+1~, DELEI+6
LIST("DILIST"	DELEI+7, DELEI+12
LUVALUE	DELEI+1~, DELEI+5
LUVALUE(1	DELEI+4*
MSG	TERMS+1~, TERMS+4, TERMS+6, TERMS+8, IMM+3, IMM+4, IMM+6, IMM+8, IMMGIV+1~, IMMGIV+9 , IMMGIV+15, IMMGIV+21, IMMGIV+28, IMMGIV+34, IMMGIV+40, IMMGIV+46, IMMGIV+52, IMMGIV+58, MSG+2, MSG+4~ , DIALOG+1~, DIALOG+8, DIALOG+9!, DIALOG+16, DIALOG+17!, MSG2+2
MSG("DIERR"	TERMS+6, IMM+6, MSG+2, MSG2+2
NUM	PATCH+3~, PATCH+8, PATCH+9, DELEI+1~, DELEI+7, DELEI+8, DELEI+9
PARRAY	TERMS+1~
PARRAY("PXRM	ADMIN NOTES" , PROMPTS+9, IMMGIV+55, CONTRAINDICATED" , PROMPTS+6, IMMGIV+49, IMM ELIG" , PROMPTS+8, IMMGIV+31, IMM SITE" , PROMPTS+2, IMMGIV+12, IMM VIS DATE" , PROMPTS+4, IMMGIV+24, LOT NUMBER" , PROMPTS+1, IMMGIV+5, REACTION" , PROMPTS+7* , IMMGIV+43, SERIES" , PROMPTS+5, IMMGIV+37, VOLUME" , PROMPTS+3, IMMGIV+18
>> PATCH	ENV+12*, ENV+13, ENV+14
PMT	DELETE+1~, DELETE+2*, DELETE+3
STA	IMM+1~, IMM+3*, IMMGIV+4, IMMGIV+11, IMMGIV+17, IMMGIV+23, IMMGIV+30, IMMGIV+36, IMMGIV+42, IMMGIV+48 , IMMGIV+54, DELETE+2, DELETE+3, DELETE+4
STAT	ENV+1~, ENV+7*, ENV+8
TEXT	CNAK+2~
TYP	TERMS+1~, TERMS+3*, IMM+2, IMMGIV+4, IMMGIV+11, IMMGIV+17, IMMGIV+23, IMMGIV+30, IMMGIV+36, IMMGIV+42 , IMMGIV+48, IMMGIV+54, DELETE+2, DELETE+3, DELETE+4, MSG+3
U	ENV+7, DELEI+7
X	PATCH~, PATCH+2, PATCH+4, PATCH+5*, PATCH+7, PATCH+8, PATCH+9
>> XPDDIQ("XPZ1"	ENV+10*
>> XPDDIQ("XPZ2"	ENV+10*
>> XPDQUIT	ENV+5, ENV+9, ENV+14*

Customize PDF page

Package: IHS Mods To Patient Care Encounter

Routine: BPXRM202

Information

Source Information

Call Graph

Call Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: