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

Package: Patient Care Component Reports

Routine: APCL3024


Information

APCL3024 ; IHS/CMI/LAB - environment check ;

Source Information

Source file <APCL3024.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
VA Fileman 4 (,IX)^DIC  FILE^DICN  ^DIE  (,IX1)^DIK  
Kernel 3 ($$CJ,$$UP)^XLFSTR  $$ADD^XPDMENU  ($$VERSION,MES)^XPDUTL  
IHS VA Utilities 1 ^XBFMK  
Patient Care Component Reports 1 ^APCL23  

Entry Points

Name Comments DBIA/ICR reference
PRE ;
IMES ;
CLINICS ;
DRUG1 ;
CLTAX ;
POST1 ;
SORRY(X) ;
INSTALLD(APCLSTAL) ;EP - Determine if patch APCLSTAL was installed, where
; APCLSTAL is the name of the INSTALL. E.g "AG*6.0*11".
POST ;
MEDTAX ;
OPTIONS ;
ZISH ;create entry in ZISH SEND PARAMETERS file

External References

Name Field # of Occurrence
^APCL23 POST1+2
^DIC DRUG1+4, CLTAX+5, INSTALLD+9, INSTALLD+12
IX^DIC INSTALLD+6
FILE^DICN ZISH+5
^DIE ZISH+8
^DIK ZISH+4, CLTAX+4
IX1^DIK MEDTAX+10, DRUG1+7, DRUG1+24, CLTAX+11
^XBFMK ZISH+1, CLTAX+8
$$CJ^XLFSTR IMES+1, SORRY+4
$$UP^XLFSTR MEDTAX+7
$$ADD^XPDMENU OPTIONS+1, POST1+4, POST1+6
$$VERSION^XPDUTL APCL3024+8, APCL3024+9
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"version 2.0 of BJPC is required"
  • Line Location: APCL3024+8
Function Call: WRITE
  • Prompt: !,"version 9.0 of BGP is required"
  • Line Location: APCL3024+9
Function Call: WRITE
  • Prompt: "Attempt to add APCL EDIT SURV ILI STOP DATE option failed.."
  • Line Location: OPTIONS+2
Function Call: WRITE
  • Prompt: !!,"ILI CONTROL FILE ENTRY MISSING. NOTIFY PROGRAMMER."
  • Line Location: OPTIONS+4
Function Call: WRITE
  • Prompt: "Attempt to add SURVEILLANCE ILI report option failed.."
  • Line Location: POST1+5
Function Call: WRITE
  • Prompt: "Attempt to add aggregate report option failed."
  • Line Location: POST1+7
Function Call: WRITE
  • Prompt: !,"Creating ",APCLX," Taxonomy..."
  • Line Location: DRUG1+1
Function Call: WRITE
  • Prompt: !!,"ERROR IN CREATING ",APCLX," TAX"
  • Line Location: DRUG1+5
Function Call: WRITE
  • Prompt: !!,"error creating ZISH SEND PARAMETERS entry"
  • Line Location: ZISH+6
Function Call: WRITE
  • Prompt: !!,"error updating ZISH SEND PARAMETERS entry"
  • Line Location: ZISH+9
Function Call: WRITE
  • Prompt: !,"Creating Surveillance ILI Clinics taxonomy..."
  • Line Location: CLTAX+3
Function Call: WRITE
  • Prompt: !!,"ERROR IN CREATING SURVEILLANCE ILI CLINICS TAX"
  • Line Location: CLTAX+6
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Routine Call
  • DIE
  • Line Location:
    • ZISH+8
Routine Call
  • DIC
  • Line Location:
    • DRUG1+4
    • CLTAX+5
    • INSTALLD+9
    • INSTALLD+12
Routine Call
  • DIC
  • Line Location:
    • INSTALLD+6

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(9.4 - [#9.4] Classic Fileman Calls
^ATXAX - [#9002226] Classic Fileman Calls
^%ZIB(9888888.93 - [#9888888.93] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIB(9888888.93 - [#9888888.93] ZISH+2, ZISH+3
^ATXAX - [#9002226] MEDTAX+5, MEDTAX+8, MEDTAX+9*, DRUG1+6*, DRUG1+9, DRUG1+11*, DRUG1+13, DRUG1+14, DRUG1+15*, DRUG1+17
, DRUG1+19*, DRUG1+21, DRUG1+22, DRUG1+23*, CLTAX+7*, CLTAX+9*
^ATXAX("B" MEDTAX+3, DRUG1+2, DRUG1+12, DRUG1+20, CLTAX+2, CLTAX+4
^DIC(40.7 - [#40.7] CLTAX+8
^PSDRUG - [#50] MEDTAX+7, DRUG1+13, DRUG1+21

Label References

Name Line Occurrences
$$INSTALLD APCL3024+10
CLTAX POST1+1
DRUG1 MEDTAX+2
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
MEDTAX POST1+8
SORRY APCL3024+8, APCL3024+9, APCL3024+10
ZISH POST1+3

Naked Globals

Name Field # of Occurrence
^(0 DRUG1+6*, CLTAX+7*, CLTAX+9*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> A MEDTAX+5*, DRUG1+9*, DRUG1+17*
>> APCLC MEDTAX+6*, MEDTAX+9*, DRUG1+10*, DRUG1+15*, DRUG1+18*, DRUG1+23*
>> APCLDA CLTAX+4*
>> APCLNDCT MEDTAX+2*, DRUG1+16, DRUG1+20
APCLSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
>> APCLTAX MEDTAX+2*, DRUG1+8, DRUG1+12
>> APCLTEXT CLTAX+8*
>> APCLTX MEDTAX+3*, MEDTAX+4, MEDTAX+5, MEDTAX+8, MEDTAX+9, MEDTAX+10, DRUG1+2*, DRUG1+3, DRUG1+6*, DRUG1+7
, DRUG1+9, DRUG1+11, DRUG1+14, DRUG1+15, DRUG1+17, DRUG1+19, DRUG1+22, DRUG1+23, DRUG1+24, CLTAX+7*
, CLTAX+9, CLTAX+11
>> APCLX MEDTAX+2*, DRUG1+1, DRUG1+2, DRUG1+4, DRUG1+5, DRUG1+6, CLTAX+8*, CLTAX+9
APCLY ZISH+3*, ZISH+4, INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> ATXFLG MEDTAX+1*, CLTAX+1*
>> B MEDTAX+5*, MEDTAX+6, DRUG1+9*, DRUG1+10, DRUG1+11, DRUG1+17*, DRUG1+18, DRUG1+19
>> C MEDTAX+7*, DRUG1+13*, DRUG1+21*
>> D INSTALLD+5*
D0 ZISH+1!
DA MEDTAX+10*, DRUG1+4!, DRUG1+7*, DRUG1+24*, ZISH+4*!, ZISH+7*, CLTAX+4*!, CLTAX+5!, CLTAX+11*
DD ZISH+1!
DIADD DRUG1+4*!, ZISH+1!, CLTAX+5*!, CLTAX+8!
DIC DRUG1+4*!, ZISH+1!, ZISH+5*, CLTAX+5*!, INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*
DIC(0 DRUG1+4*, ZISH+5*, CLTAX+5*, INSTALLD+5*
>> DIE ZISH+7*
DIFQ SORRY+1!
DIK MEDTAX+10*, DRUG1+7*, DRUG1+24*, ZISH+4*!, CLTAX+4*!, CLTAX+11*
DLAYGO DRUG1+4*!, ZISH+1!, CLTAX+5*!, CLTAX+8!
DO ZISH+1!
>> DR ZISH+7*
DT DRUG1+6, CLTAX+7
DUZ CLTAX+7
I DRUG1+4!, CLTAX+5!
IOM IMES+1, SORRY+4
>> J MEDTAX+7*, MEDTAX+8, MEDTAX+9, DRUG1+13*, DRUG1+14, DRUG1+15, DRUG1+21*, DRUG1+22, DRUG1+23
U MEDTAX+7, MEDTAX+9, DRUG1+6, DRUG1+11, DRUG1+13, DRUG1+15, DRUG1+19, DRUG1+21, DRUG1+23, CLTAX+7
, CLTAX+9
X APCL3024+7*, OPTIONS+1*, OPTIONS+2, POST1+4*, POST1+5, POST1+6*, POST1+7, DRUG1+4*, ZISH+5*, CLTAX+5*
, CLTAX+8*, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3
>> XPDDIQ( APCL3024+7*
>> XPDDIQ("XPZ1" APCL3024+6*
>> XPDDIQ("XPZ2" APCL3024+6*
>> XPDENV APCL3024+6
>> XPDQUIT SORRY+2*, SORRY+3*
Y DRUG1+3, DRUG1+5, DRUG1+6, ZISH+6, ZISH+7, ZISH+9, CLTAX+6, CLTAX+7, CLTAX+8*, CLTAX+9
, INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1
>> Z DRUG1+12*, DRUG1+13, DRUG1+20*, DRUG1+21

Marked Items

Name Field # of Occurrence
$T(@APCLTEXT+APCLX CLTAX+8
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 |  Marked Items |  All