Routine: BGP6POS

Package	Total	Call Graph
IHS GPRA Information System	4	^BGP62 ^BGP63 (DRUGS,LAB)^BGP6POS1 PRE^BGP6POS2
Kernel	2	$$CJ^XLFSTR ($$VERSION,MES)^XPDUTL
VA Fileman	2	(,IX)^DIC (,IX1)^DIK
M Transfer	1	GUIEP^BMXPO

Package

Total

Call Graph

IHS GPRA Information System

^BGP62 ^BGP63 (DRUGS,LAB)^BGP6POS1 PRE^BGP6POS2

Kernel

$$CJ^XLFSTR ($$VERSION,MES)^XPDUTL

VA Fileman

(,IX)^DIC (,IX1)^DIK

M Transfer

GUIEP^BMXPO

Entry Points

Name	Comments	DBIA/ICR reference
PRE	;EP
IMES	;
CLEAN(APP)	;-- clean out the RPC multiple first
NDC	;
S16	;WIPE OUT ALL 16.0 FILES SO START CLEAN WITH 16.0 FILES
SORRY(X)	;
ADA	;
POST	;EP - called from kids build
BMXPO	;-- update the RPC file
INSTALLD(BGPSTAL)	;EP - Determine if patch BGPSTAL was installed, where ; BGPSTAL is the name of the INSTALL. E.g "AG6.011".

External References

Name	Field # of Occurrence
^BGP62	POST+1
^BGP63	POST+2
DRUGS^BGP6POS1	POST+3
LAB^BGP6POS1	POST+4
PRE^BGP6POS2	PRE+2
GUIEP^BMXPO	BMXPO+5, BMXPO+6
^DIC	INSTALLD+9, INSTALLD+12, ADA+5, ADA+9, ADA+18, ADA+22
IX^DIC	INSTALLD+6
^DIK	S16+2, S16+4, S16+6, CLEAN+6, ADA+3, ADA+16
IX1^DIK	ADA+13, ADA+26
$$CJ^XLFSTR	BGP6POS+9, BGP6POS+10, IMES+1, SORRY+4
$$VERSION^XPDUTL	BGP6POS+10
MES^XPDUTL	BGP6POS+9, BGP6POS+10, IMES+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM) Line Location: SORRY+4
Function Call: WRITE	Prompt: !,"Creating/Updating DENTAL ANESTHESIA ADA Codes Taxonomy..." Line Location: ADA+4
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING DENTAL ANESTHISIZ ADA CODES TAX" Line Location: ADA+6
Function Call: WRITE	Prompt: !,"Creating/Updating SSC ADA Codes Taxonomy..." Line Location: ADA+17
Function Call: WRITE	Prompt: !!,"ERROR IN CREATING SSC ADA CODES TAX" Line Location: ADA+19
Routine Call	DIC Line Location: INSTALLD+9 INSTALLD+12 ADA+5 ADA+9 ADA+18 ADA+22
Routine Call	DIC Line Location: INSTALLD+6

FileNo	Call Tags
^DIC(9.4 - [#9.4]	Classic Fileman Calls
^ATXAX - [#9002226]	Classic Fileman Calls
^BGPGPDCM - [#90556.03]	Classic Fileman Calls
^BGPGPDPM - [#90556.04]	Classic Fileman Calls
^BGPGPDBM - [#90556.05]	Classic Fileman Calls
^AUTTADA - [#9999999.31]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	NDC+1, NDC+2, NDC+3, NDC+4, NDC+5, ADA+7, ADA+11, ADA+20, ADA+24*
^ATXAX("B"	ADA+2, ADA+15
^BGPGPDBM - [#90556.05]	S16+5
^BGPGPDCM - [#90556.03]	S16+1
^BGPGPDPM - [#90556.04]	S16+3
^DIC(19 - [#19]	BMXPO+2, CLEAN+4, CLEAN+7!

Name	Line Occurrences
$$INSTALLD	BGP6POS+9
BMXPO	POST+5
CLEAN	BMXPO+4
IMES	INSTALLD+7, INSTALLD+10, INSTALLD+14
S16	POST+6
SORRY	BGP6POS+9, BGP6POS+10

Name	Field # of Occurrence
^(0	ADA+7, ADA+11, ADA+20, ADA+24

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
APP	CLEAN~, CLEAN+1, CLEAN+4, CLEAN+7
>> ATXFLG	ADA+1*
BGPDA	CLEAN+3~, CLEAN+4, CLEAN+5, ADA+2, ADA+3, ADA+15*, ADA+16
BGPRPC	BMXPO+1~, BMXPO+2*, BMXPO+3, BMXPO+4, BMXPO+5, BMXPO+6
BGPSTAL	INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> BGPTX	ADA+7, ADA+11, ADA+13, ADA+20, ADA+24, ADA+26
>> BGPX	S16+1, S16+2, S16+3, S16+4, S16+5, S16+6, NDC+1, NDC+2, NDC+3, NDC+4 , NDC+5, ADA+8, ADA+10, ADA+11, ADA+21, ADA+23, ADA+24
BGPY	INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> D	INSTALLD+5*
D0	ADA+9!, ADA+22!
D1	ADA+9!, ADA+22!
DA	S16+2, S16+4, S16+6, CLEAN+5, ADA+3, ADA+5!, ADA+9!, ADA+13, ADA+16, ADA+18! , ADA+22!, ADA+26
DA(1	CLEAN+1*, CLEAN+2
DI	ADA+9!, ADA+22!
DIADD	ADA+5!, ADA+9!, ADA+18!, ADA+22!
DIC	INSTALLD+3~, INSTALLD+5, INSTALLD+8, INSTALLD+11, ADA+5!, ADA+9!, ADA+18!, ADA+22*!
DIC(0	INSTALLD+5, ADA+5, ADA+9, ADA+18, ADA+22*
DIFQ	SORRY+1!
>> DIK	S16+2, S16+4, S16+6, CLEAN+2, ADA+3, ADA+13, ADA+16, ADA+26
DLAYGO	ADA+5!, ADA+9!, ADA+18!, ADA+22!
DQ	ADA+9!, ADA+22!
DR	ADA+9!, ADA+22!
DT	ADA+7, ADA+20
DUZ	ADA+7, ADA+20
I	ADA+5!, ADA+18!
IOM	IMES+1, SORRY+4
>> RETVAL	BMXPO+5, BMXPO+6
U	NDC+2, NDC+3, NDC+4, NDC+5, ADA+7, ADA+9, ADA+11, ADA+20, ADA+22, ADA+24
X	BGP6POS+8, INSTALLD+3~, INSTALLD+4, INSTALLD+8, INSTALLD+11, SORRY~, SORRY+2, SORRY+3, ADA+5, ADA+9 , ADA+18, ADA+22
>> XPDDIQ(	BGP6POS+8*
>> XPDDIQ("XPZ1"	BGP6POS+7*
>> XPDDIQ("XPZ2"	BGP6POS+7*
>> XPDENV	BGP6POS+7
>> XPDQUIT	SORRY+2, SORRY+3
Y	INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1, ADA+6, ADA+7, ADA+9 , ADA+11, ADA+19, ADA+20, ADA+22, ADA+24

Customize PDF page

Package: IHS GPRA Information System

Routine: BGP6POS

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: