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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: AICD41

Package: IHS ICD CPT Lookup and Grouper

Routine: AICD41


Information

AICD41 ; IHS/OIT/FBD&NKD - AICD 4.0 PATCH 1 LOAD ENVIRONMENT CHECKS ;04/19/2016

Source Information

Source file <AICD41.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 3 HOME^%ZIS  $$CJ^XLFSTR  $$VERSION^XPDUTL  

Entry Points

Name Comments DBIA/ICR reference
PRE ; EP FR KIDS
LAST(PKG,VER) ; EP - returns last patch applied for a Package, PATCH^DATE
; Patch includes Seq # if Released
VCHK(AICDPRE,AICDVER,AICDPAT) ; Check patch level
DISP(AICDPRE,AICDVER,AICDPAT,AICDV,AICDP,AICDR) ; Display requirement checking results
SORRY(X) ; Environment check failure message
PCHK(PKG,VER,PAT) ; Check specific patch
GCHK(AICDGL,AICDMSG) ; Check for global
POST ; EP FR KIDS

External References

Name Field # of Occurrence
HOME^%ZIS AICD41+4
$$CJ^XLFSTR AICD41+16, AICD41+17, AICD41+29, SORRY+3, GCHK+5, PCHK+9, DISP+5
$$VERSION^XPDUTL VCHK+2, LAST+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"DUZ UNDEFINED OR 0."
  • Line Location: AICD41+11
Function Call: WRITE
  • Prompt: !,"DUZ(0) UNDEFINED OR NULL."
  • Line Location: AICD41+13
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Hello, "_$P(X,",",2)_" "_$P(X,","),IOM)
  • Line Location: AICD41+16
Function Call: WRITE
  • Prompt: !!,$$CJ^XLFSTR("Checking Environment for "_$P($T(+2),";",4)_" V "_$P($T(+2),";",3)_$S($L($P($T(+2),";",5))>4:" Patch "_$P($T(+2),";",5),1:"")_".",IOM),!
  • Line Location: AICD41+17
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR("FIX IT! Before Proceeding.",IOM),!!,*7,*7,*7
  • Line Location: AICD41+29
Function Call: WRITE
  • Prompt: *7,!,$$CJ^XLFSTR("Sorry....FIX IT!",IOM)
  • Line Location: SORRY+3
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(AICDS,IOM)
  • Line Location: GCHK+5
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(AICDS,IOM)
  • Line Location: PCHK+9
Function Call: WRITE
  • Prompt: !,$$CJ^XLFSTR(AICDS,IOM)
  • Line Location: DISP+5
Routine Call
  • %ZIS
  • Line Location:
    • AICD41+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] PCHK+5, PCHK+6, PCHK+7, LAST+4, LAST+5, LAST+7, LAST+8, LAST+9
^VA(200 - [#200] AICD41+15

Label References

Name Line Occurrences
$$LAST VCHK+5
$$VCHK AICD41+20, AICD41+21, AICD41+22
DISP VCHK+3, VCHK+4, VCHK+6, VCHK+7
SORRY AICD41+11, AICD41+13, AICD41+31

Naked Globals

Name Field # of Occurrence
^(0 LAST+8, LAST+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
AICDGL GCHK~, GCHK+1, GCHK+3, GCHK+4, GCHK+6
AICDMSG GCHK~, GCHK+3
AICDP VCHK+1~, VCHK+3, VCHK+4, VCHK+5*, VCHK+6, VCHK+7, DISP~, DISP+3
AICDPAT VCHK~, VCHK+3, VCHK+4, VCHK+6, VCHK+7, DISP~, DISP+2
AICDPRE VCHK~, VCHK+2, VCHK+3, VCHK+4, VCHK+5, VCHK+6, VCHK+7, DISP~, DISP+2, DISP+3
AICDR DISP~, DISP+4
AICDS GCHK+2~, GCHK+3*, GCHK+4*, GCHK+5, PCHK+1~, PCHK+3*, PCHK+8*, PCHK+9, DISP+1~, DISP+2*
, DISP+3*, DISP+4*, DISP+5
AICDV VCHK+1~, VCHK+2*, VCHK+3, VCHK+4, DISP~, DISP+3
AICDVER VCHK~, VCHK+3, VCHK+4, VCHK+5, VCHK+6, VCHK+7, DISP~, DISP+2
DIFQ SORRY+1!, VCHK+3!, VCHK+6!
DUZ AICD41+11, AICD41+15
DUZ(0 AICD41+13
IOM AICD41+4, AICD41+16, AICD41+17, AICD41+29, SORRY+3, GCHK+5, PCHK+9, DISP+5
LATEST LAST+2~, LAST+6*, LAST+8*, LAST+9, LAST+10
PAT PCHK~, PCHK+2*, PCHK+3, PCHK+7
PATCH LAST+2~, LAST+6*, LAST+8*, LAST+9*, LAST+10
PATIEN PCHK+1~, PCHK+7*, PCHK+8, PCHK+10
PKG PCHK~, PCHK+2*, PCHK+3, PCHK+5, LAST~, LAST+3, LAST+4
PKGIEN PCHK+1~, PCHK+5*, PCHK+6, PCHK+7, LAST+2~, LAST+4*, LAST+5, LAST+7, LAST+8, LAST+9
SUBIEN LAST+2~, LAST+6*, LAST+7*, LAST+8, LAST+9
U AICD41+15, LAST+8, LAST+9, LAST+10
VER PCHK~, PCHK+2*, PCHK+3, PCHK+6, LAST~, LAST+3*, LAST+5
VERIEN PCHK+1~, PCHK+6*, PCHK+7, LAST+2~, LAST+5*, LAST+7, LAST+8, LAST+9
X AICD41+9*, AICD41+15*, AICD41+16, SORRY~, SORRY+2
>> XPDDIQ( AICD41+9*
>> XPDDIQ("XPZ1" AICD41+8*
>> XPDDIQ("XPZ2" AICD41+8*
>> XPDENV AICD41+8
>> XPDQUIT AICD41+20*, AICD41+21*, AICD41+22*, AICD41+29, AICD41+31, SORRY+2*

Marked Items

Name Field # of Occurrence
$T( AICD41+17
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All