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 |  All
Print Page as PDF
Routine: APCL3028

Package: Patient Care Component Reports

Routine: APCL3028


Information

APCL3028 ; IHS/CMI/LAB - environment check ;

Source Information

Source file <APCL3028.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 $$CJ^XLFSTR  $$ADD^XPDMENU  ($$VERSION,MES)^XPDUTL  
VA Fileman 2 (,IX)^DIC  ^DIE  
Patient Care Component Reports 1 ^APCLP28  

Entry Points

Name Comments DBIA/ICR reference
PRE ;
IMES ;
CLINICS ;
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 ;
OPTIONS ;

External References

Name Field # of Occurrence
^APCLP28 POST+10
^DIC INSTALLD+9, INSTALLD+12
IX^DIC INSTALLD+6
^DIE POST+3, POST+9
$$CJ^XLFSTR IMES+1, SORRY+4
$$ADD^XPDMENU POST+4, POST+6
$$VERSION^XPDUTL APCL3028+8, APCL3028+9
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"version 2.0 of BJPC is required"
  • Line Location: APCL3028+8
Function Call: WRITE
  • Prompt: !,"version 11.0 or higher of BGP is required"
  • Line Location: APCL3028+9
Function Call: WRITE
  • Prompt: !,"Attempt to add ILI EXPORT LIST option failed.."
  • Line Location: POST+5
Function Call: WRITE
  • Prompt: !,"Attempt to add LAB EXPORT LIST option failed.."
  • Line Location: POST+7
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Routine Call
  • DIE
  • Line Location:
    • POST+3
    • POST+9
Routine Call
  • DIC
  • Line Location:
    • 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
^APCLCNTL - [#9001003] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCLCNTL("B" POST+2
^APCLILIC(1 POST+11*
^DIC(19 - [#19] POST+8

Label References

Name Line Occurrences
$$INSTALLD APCL3028+10
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
SORRY APCL3028+8, APCL3028+9, APCL3028+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
APCLSTAL INSTALLD~, INSTALLD+4, INSTALLD+8, INSTALLD+11, IMES+1
APCLY INSTALLD+3~, INSTALLD+13*, INSTALLD+15
>> D INSTALLD+5*
DA POST+2*, POST+3!, POST+8*, POST+9!
DIC INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*
DIC(0 INSTALLD+5*
DIE POST+3*!, POST+9*!
DIFQ SORRY+1!
DR POST+3*!, POST+9*!
IOM IMES+1, SORRY+4
U POST+11
X APCL3028+7*, POST+4*, POST+5, POST+6*, POST+7, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~
, SORRY+2, SORRY+3
>> XPDDIQ( APCL3028+7*
>> XPDDIQ("XPZ1" APCL3028+6*
>> XPDDIQ("XPZ2" APCL3028+6*
>> XPDENV APCL3028+6
>> XPDQUIT SORRY+2*, SORRY+3*
Y INSTALLD+3~, INSTALLD+7, INSTALLD+8, INSTALLD+10, INSTALLD+11, INSTALLD+13, IMES+1
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 |  All