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: APCL3022

Package: Patient Care Component Reports

Routine: APCL3022


Information

APCL3022 ; IHS/CMI/LAB - environment check ; [ 08/22/2009 7:33 AM ]

Source Information

Source file <APCL3022.m>

Call Graph

Call Graph Total: 5

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

Entry Points

Name Comments DBIA/ICR reference
PRE ;
IMES ;
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
^DIC INSTALLD+9, INSTALLD+12
IX^DIC INSTALLD+6
^DIE OPTIONS+7
$$CJ^XLFSTR IMES+1, SORRY+4
$$ADD^XPDMENU OPTIONS+1
$$VERSION^XPDUTL APCL3022+8
MES^XPDUTL IMES+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"version 2.0 of BJPC is required"
  • Line Location: APCL3022+8
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: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+4
Routine Call
  • DIE
  • Line Location:
    • OPTIONS+7
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(9.4 - [#9.4] Classic Fileman Calls
^APCLCNTL - [#9001003] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^APCLCNTL - [#9001003] OPTIONS+5
^APCLCNTL("B" OPTIONS+3

Label References

Name Line Occurrences
IMES INSTALLD+7, INSTALLD+10, INSTALLD+14
SORRY APCL3022+8

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 OPTIONS+3*, OPTIONS+4!, OPTIONS+5, OPTIONS+8!
DIC INSTALLD+3~, INSTALLD+5*, INSTALLD+8*, INSTALLD+11*
DIC(0 INSTALLD+5*
DIE OPTIONS+6*, OPTIONS+8!
DIFQ SORRY+1!
>> DR OPTIONS+6*
IOM IMES+1, SORRY+4
U OPTIONS+5
X APCL3022+7*, OPTIONS+1*, OPTIONS+2, INSTALLD+3~, INSTALLD+4*, INSTALLD+8*, INSTALLD+11*, SORRY~, SORRY+2, SORRY+3
>> XPDDIQ( APCL3022+7*
>> XPDDIQ("XPZ1" APCL3022+6*
>> XPDDIQ("XPZ2" APCL3022+6*
>> XPDENV APCL3022+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