Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BGP8POS

Package: IHS GPRA Information System

Routine: BGP8POS


Information

BGP8POS ; IHS/CMI/LAB - NO DESCRIPTION PROVIDED 08 Dec 2010 3:10 PM 04 Aug 2018 2:27 PM 20 Dec 2016 11:46 AM ;

Source Information

Source file <BGP8POS.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
IHS GPRA Information System 5 ^BGP84  ^BGP85  ^BGP86  (DRUGS,LAB)^BGP8POS1  PRE^BGP8POS2  
VA Fileman 3 (,IX)^DIC  ^DIE  (,IX1)^DIK  
Kernel 2 $$CJ^XLFSTR  ($$VERSION,MES)^XPDUTL  
IHS VA Utilities 1 $$VAL^XBDIQ1  
M Transfer 1 GUIEP^BMXPO  

Entry Points

Name Comments DBIA/ICR reference
PRE ;EP
IMES ;
RXNORM1 ;
INSTALLD(BGPSTAL) ;EP - Determine if patch BGPSTAL was installed, where
; BGPSTAL is the name of the INSTALL. E.g "AG*6.0*11".
CLEAN(APP) ;-- clean out the RPC multiple first
OOO ;
S17 ;WIPE OUT ALL 18.0 FILES SO START CLEAN WITH 18.0 FILES
RXNORM ;
SORRY(X) ;
T ;OOO OPTIONS
ADA ;
POST ;EP - called from kids build
BMXPO ;-- update the RPC file
NDC ;
RNINTUSS ;

External References

Name Field # of Occurrence
^BGP84 POST+1
^BGP85 POST+2
^BGP86 POST+3
DRUGS^BGP8POS1 POST+6
LAB^BGP8POS1 POST+7
PRE^BGP8POS2 PRE+2
GUIEP^BMXPO BMXPO+5, BMXPO+6
^DIC INSTALLD+9, INSTALLD+12, ADA+5, ADA+9, RXNORM1+5
IX^DIC INSTALLD+6
^DIE RNINTUSS+2, OOO+5
^DIK S17+2, S17+4, S17+6, CLEAN+6, ADA+3
IX1^DIK ADA+13, RXNORM1+8, RXNORM1+17
$$VAL^XBDIQ1 RXNORM1+14
$$CJ^XLFSTR BGP8POS+9, BGP8POS+10, IMES+1, SORRY+4
$$VERSION^XPDUTL BGP8POS+10
MES^XPDUTL BGP8POS+9, BGP8POS+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 BGP IPC BMI ADA Codes Taxonomy..."
  • Line Location: ADA+4
Function Call: WRITE
  • Prompt: !!,"ERROR IN CREATING BGP IPC BMI ADA CODES TAX"
  • Line Location: ADA+6
Function Call: WRITE
  • Prompt: !,BGPRXN
  • Line Location: RXNORM1+1
Function Call: WRITE
  • Prompt: !,"Creating ",BGPX," Taxonomy..."
  • Line Location: RXNORM1+2
Function Call: WRITE
  • Prompt: !!,"ERROR IN CREATING ",BGPX," TAX"
  • Line Location: RXNORM1+6
Routine Call
  • DIE
  • Line Location:
    • RNINTUSS+2
    • OOO+5
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+9
    • INSTALLD+12
    • ADA+5
    • ADA+9
    • RXNORM1+5
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(19 - [#19] Classic Fileman Calls
^DIC(9.4 - [#9.4] Classic Fileman Calls
^ATXAX - [#9002226] Classic Fileman Calls
^BGPGPDCR - [#90560.03] Classic Fileman Calls
^BGPGPDPR - [#90560.04] Classic Fileman Calls
^BGPGPDBR - [#90560.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*, RXNORM1+7*, RXNORM1+10, RXNORM1+12*
, RXNORM1+15, RXNORM1+16*
^ATXAX("B" RNINTUSS+1, ADA+2, RXNORM1+3
^BGPGPDBR - [#90560.05] S17+5
^BGPGPDCR - [#90560.03] S17+1
^BGPGPDPR - [#90560.04] S17+3
^BGPSNOMR - [#90560.21] RXNORM1+14
^BGPSNOMR("B" RXNORM1+13
^DIC(19 - [#19] OOO+1, OOO+2, BMXPO+2, CLEAN+4, CLEAN+7!
^PSDRUG - [#50] RXNORM1+14

Label References

Name Line Occurrences
$$INSTALLD BGP8POS+9
ADA POST+10
BMXPO POST+9
CLEAN BMXPO+4
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
OOO T+1
RNINTUSS POST+5
RXNORM POST+8
RXNORM1 RXNORM+2, RXNORM+3, RXNORM+4
S17 POST+11
SORRY BGP8POS+9, BGP8POS+10

Naked Globals

Name Field # of Occurrence
^(0 ADA+7*, ADA+11*, RXNORM1+7*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A RXNORM1+10*
APP CLEAN~, CLEAN+1, CLEAN+4, CLEAN+7
ATXFLG RNINTUSS+2*, RNINTUSS+3!, ADA+1*, RXNORM+1*
>> B RXNORM1+10*, RXNORM1+11, RXNORM1+12
>> BGPC RXNORM1+11*, RXNORM1+16*
BGPDA CLEAN+3~, CLEAN+4*, CLEAN+5, ADA+2*, ADA+3
>> BGPN OOO+1*, OOO+2
BGPRPC BMXPO+1~, BMXPO+2*, BMXPO+3, BMXPO+4, BMXPO+5, BMXPO+6
>> BGPRXN RXNORM+2*, RXNORM+3*, RXNORM+4*, RXNORM1+1, RXNORM1+9, RXNORM1+13
BGPSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> BGPTX ADA+7*, ADA+11, ADA+13, RXNORM1+3*, RXNORM1+4, RXNORM1+7*, RXNORM1+8, RXNORM1+10, RXNORM1+12, RXNORM1+15
, RXNORM1+16, RXNORM1+17
>> BGPX S17+1*, S17+2, S17+3*, S17+4, S17+5*, S17+6, NDC+1*, NDC+2, NDC+3, NDC+4
, NDC+5, ADA+8*, ADA+10*, ADA+11, RXNORM+2*, RXNORM+3*, RXNORM+4*, RXNORM1+2, RXNORM1+3, RXNORM1+5
, RXNORM1+6, RXNORM1+7
BGPY INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> C RXNORM1+14*
>> D INSTALLD+5*
D0 ADA+9!
D1 ADA+9!
DA RNINTUSS+1*, RNINTUSS+2, RNINTUSS+3!, OOO+2*, OOO+5!, S17+2*, S17+4*, S17+6*, CLEAN+5*, ADA+3*
, ADA+5!, ADA+9!, ADA+13*, RXNORM1+5!, RXNORM1+8*, RXNORM1+17*
DA(1 CLEAN+1*, CLEAN+2
DI ADA+9!
DIADD ADA+5*!, ADA+9!, RXNORM1+5*!
DIC INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*, ADA+5*!, ADA+9*!, RXNORM1+5*!
DIC(0 INSTALLD+5*, ADA+5*, ADA+9*, RXNORM1+5*
DIE RNINTUSS+2*, RNINTUSS+3!, OOO+3*, OOO+5!
DIFQ SORRY+1!
>> DIK S17+2*, S17+4*, S17+6*, CLEAN+2*, ADA+3*, ADA+13*, RXNORM1+8*, RXNORM1+17*
DLAYGO ADA+5*!, ADA+9!, RXNORM1+5*!
DQ ADA+9!
DR RNINTUSS+2*, RNINTUSS+3!, OOO+4*, OOO+5!, ADA+9!
DT ADA+7, RXNORM1+7
DUZ ADA+7
I ADA+5!, RXNORM1+5!
IOM IMES+1, SORRY+4
>> J RXNORM1+14*, RXNORM1+15, RXNORM1+16
>> RETVAL BMXPO+5, BMXPO+6
U NDC+2, NDC+3, NDC+4, NDC+5, ADA+7, ADA+9, ADA+11, RXNORM1+7, RXNORM1+12, RXNORM1+16
X BGP8POS+8*, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3, ADA+5*, ADA+9*
, RXNORM1+5*
>> XPDDIQ( BGP8POS+8*
>> XPDDIQ("XPZ1" BGP8POS+7*
>> XPDDIQ("XPZ2" BGP8POS+7*
>> XPDENV BGP8POS+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, RXNORM1+4, RXNORM1+6, RXNORM1+7
>> Z RXNORM1+13*, RXNORM1+14
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All