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 |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: BGP80P1

Package: IHS GPRA Information System

Routine: BGP80P1


Information

BGP80P1 ; IHS/CMI/LAB - NO DESCRIPTION PROVIDED 28 Jan 2005 1:34 PM 25 Nov 2007 7:41 PM ;

Source Information

Source file <BGP80P1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 3 (,IX)^DIC  (,UPDATE)^DIE  ^DIK  
Kernel 2 $$CJ^XLFSTR  ($$VERSION,MES)^XPDUTL  
IHS GPRA Information System 1 ^BGP80TX  
IHS VA Utilities 1 EN^XBVK  

Entry Points

Name Comments DBIA/ICR reference
PRE ;EP
IMES ;
SETTAXL ;
PRVS ;
CLINICS ;
SETTAX ;
PREPROV ;;
SORRY(X) ;
LP ;EP - loop through file entries
SEC ;set security on selected dd's
POST ;EP - called from kids build
TXT ;file entries start here
INSTALLD(BGPSTAL) ;EP - Determine if patch BGPSTAL was installed, where
; BGPSTAL is the name of the INSTALL. E.g "AG*6.0*11".

External References

Name Field # of Occurrence
^BGP80TX POST+20
^DIC SETTAX+19, SETTAXL+19, INSTALLD+9, INSTALLD+12
IX^DIC INSTALLD+6
^DIE POST+14, POST+16
UPDATE^DIE POST+10
^DIK PRE+1, PRE+2, PRE+3
EN^XBVK POST+18, POST+24
$$CJ^XLFSTR IMES+1, SORRY+4
$$VERSION^XPDUTL BGP80P1+9
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Error install BMX ADO SCHEMA, CMI VIEW HOSPITAL LOCATION"
  • Line Location: POST+11
Function Call: WRITE
  • Prompt: !,"updating package multiple for ",BGPPP," entry ",$P(^ATXAX(BGPDA,0),U)," failed"
  • Line Location: SETTAX+20
Function Call: WRITE
  • Prompt: !,"updating package multiple for ",BGPPP," entry ",$P(^ATXAX(BGPDA,0),U)," failed"
  • Line Location: SETTAXL+20
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Routine Call
  • DIE
  • Line Location:
    • POST+10
Routine Call
  • DIE
  • Line Location:
    • POST+14
    • POST+16
Routine Call
  • DIC
  • Line Location:
    • SETTAX+19
    • SETTAXL+19
    • INSTALLD+9
    • INSTALLD+12
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
^BGPCTRL - [#90241.01] Classic Fileman Calls
^BGPINDE - [#90533.01] Classic Fileman Calls
^BGPELIE - [#90535.06] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] POST+22*, SETTAX+10*, SETTAX+11*, SETTAX+12*, SETTAX+17, SETTAX+20, SETTAXL+20
^ATXAX("B" SETTAX+7
^ATXLAB - [#9002228] POST+23*, SETTAXL+10*, SETTAXL+11*, SETTAXL+12*, SETTAXL+17
^ATXLAB("B" SETTAXL+7
^BGPCTRL - [#90241.01] PRE+1
^BGPELIE - [#90535.06] PRE+3
^BGPINDE - [#90533.01] PRE+2
^BGPTAXE - [#90533.08] SETTAX+5, SETTAX+6, SETTAX+9, SETTAXL+5, SETTAXL+6, SETTAXL+9
^BGPTAXE("B" SETTAX+2, SETTAX+3, SETTAXL+2, SETTAXL+3
^BMXADO("B" POST+1
^DD(9002226 SETTAX+1, SETTAX+18
^DD(9002228 SETTAXL+1, SETTAXL+18
^DIC(19 - [#19] POST+13, POST+15
^DIC(9.4 - [#9.4] SETTAX+15, SETTAXL+15
^TMP("ATX" POST+19!

Label References

Name Line Occurrences
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
SEC POST+27
SETTAX POST+25
SETTAXL POST+26
SORRY BGP80P1+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ATXFLG POST+17*, POST+21!
>> BGP( LP+4*
>> BGP(2 LP+6
>> BGP(3 LP+5*, LP+6
>> BGP(4 LP+7
>> BGPDA SETTAX+20, SETTAXL+20
>> BGPE SETTAX+9*, SETTAX+10, SETTAX+11, SETTAXL+9*, SETTAXL+10, SETTAXL+11
BGPERR POST+2~, POST+11
BGPFDA POST+2~
BGPFDA( POST+4*, POST+5*, POST+6*, POST+7*, POST+8*, POST+9*
BGPIENS POST+2~, POST+3*
>> BGPPI SETTAX+15*, SETTAX+16, SETTAX+17, SETTAX+18, SETTAXL+15*, SETTAXL+16, SETTAXL+17, SETTAXL+18
>> BGPPP SETTAX+20, SETTAXL+20
>> BGPREF LP+6*, LP+7
BGPSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> BGPTDA SETTAX+7*, SETTAX+8, SETTAX+10, SETTAX+11, SETTAX+12, SETTAX+17, SETTAX+18, SETTAXL+7*, SETTAXL+8, SETTAXL+10
, SETTAXL+11, SETTAXL+12, SETTAXL+17, SETTAXL+18
>> BGPTFI SETTAX+2*, SETTAX+3, SETTAX+7, SETTAXL+2*, SETTAXL+3, SETTAXL+7
>> BGPTFIEN SETTAX+3*, SETTAX+4, SETTAX+5, SETTAX+6, SETTAX+9, SETTAXL+3*, SETTAXL+4, SETTAXL+5, SETTAXL+6, SETTAXL+9
>> BGPTXT LP+1, LP+2*, LP+3, LP+4
>> BGPX PRE+1*, PRE+2*, PRE+3*
BGPY INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> D INSTALLD+5*
DA PRE+1*, PRE+2*, PRE+3*, POST+13*, POST+14!, POST+15*, POST+16!, SETTAX+14!, SETTAX+21!, SETTAXL+14!
, SETTAXL+21!
DA(1 SETTAX+18*, SETTAXL+18*
DIC SETTAX+14!, SETTAX+18*, SETTAX+21!, SETTAXL+14!, SETTAXL+18*, SETTAXL+21!, INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*
DIC("P" SETTAX+18*, SETTAXL+18*
DIC(0 SETTAX+18*, SETTAXL+18*, INSTALLD+5*
DIE POST+14*!, POST+16*!
DIFQ SORRY+1!
>> DIK PRE+1*, PRE+2*, PRE+3*
DR POST+14*, POST+16*, SETTAX+14!, SETTAXL+14!
>> I LP+1*
IOM IMES+1, SORRY+4
>> J LP+4*
U POST+22, POST+23, SETTAX+6, SETTAX+9, SETTAX+10, SETTAX+11, SETTAX+12, SETTAX+18, SETTAX+20, SETTAXL+6
, SETTAXL+9, SETTAXL+10, SETTAXL+11, SETTAXL+12, SETTAXL+18, SETTAXL+20
X BGP80P1+8*, POST+22*, POST+23*, SETTAX+18*, SETTAX+21!, SETTAXL+18*, SETTAXL+21!, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*
, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3
>> XPDDIQ( BGP80P1+8*
>> XPDDIQ("XPZ1" BGP80P1+7*
>> XPDDIQ("XPZ2" BGP80P1+7*
>> XPDENV BGP80P1+7
>> XPDQUIT SORRY+2*, SORRY+3*
Y SETTAX+20, SETTAX+21!, SETTAXL+20, SETTAXL+21!, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13
, IMES+1

Marked Items

Name Field # of Occurrence
$T(TXT+I LP+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All