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

Package: DRG Grouper

Routine: ICD1812


Information

ICD1812 ;SLC/KER - ICD Environment Check ; 04/18/2004

Source Information

Source file <ICD1812.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Kernel 3 HOME^%ZIS  $$DT^XLFDT  ($$PATCH,BMES,MES)^XPDUTL  

Entry Points

Name Comments DBIA/ICR reference
ENV ; Environment Check
ABRT ; Abort - All or nothing
OK ; Environment is Ok
PATCHES(X)
DATA(X) ; Check Required Data
VAR(X) ; Check Variables
CPD(X) ; Check Current Patched Data is installed
BM(X) ; Blank Line with Message
M(X) ; Message

External References

Name Field # of Occurrence
HOME^%ZIS VAR+2
$$DT^XLFDT VAR+2
$$PATCH^XPDUTL PATCHES+4
BMES^XPDUTL BM+1
MES^XPDUTL M+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !," ICD GROUPER Code Text Descriptors (CTD)",!
  • Line Location: ENV+2
Function Call: WRITE
  • Prompt: !," Checking for ",PATCH
  • Line Location: PATCHES+4
Function Call: WRITE
  • Prompt: " - installed"
  • Line Location: PATCHES+4
Function Call: WRITE
  • Prompt: !
  • Line Location: PATCHES+5
Function Call: WRITE
  • Prompt: !," Checking for ICD installed data"
  • Line Location: DATA+2
Function Call: WRITE
  • Prompt: " - Installed"
  • Condition for execution: +CPD>0
  • Line Location: DATA+2
Function Call: WRITE
  • Prompt: " - Ready for installation"
  • Line Location: DATA+4
Function Call: WRITE
  • Prompt: !
  • Line Location: DATA+12
Function Call: WRITE
  • Prompt: " - Data not required"
  • Line Location: DATA+13
Function Call: WRITE
  • Prompt: !," Checking required environment variables"
  • Line Location: VAR+1
Function Call: WRITE
  • Prompt: " - ok"
  • Line Location: VAR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: VAR+5
Routine Call
  • %ZIS
  • Line Location:
    • VAR+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICD("ADS" CPD+2
^ICD(1 CPD+4
^ICD0("ADS" CPD+2
^ICD0("AST" CPD+2
^ICD0(1 CPD+3
^ICD9("ADS" CPD+2
^ICD9("AST" CPD+2
^ICD9(1 CPD+3
^LEXM(80 DATA+1

Label References

Name Line Occurrences
$$CPD DATA+1
$$DATA ENV+3
$$PATCHES ENV+3
$$VAR ENV+3
ABRT ENV+3
BM OK+1, PATCHES+5, DATA+7, DATA+10, VAR+5
M OK+1, DATA+8, DATA+11
OK ENV+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABORT ENV+1~, ENV+2*, ENV+3*, PATCHES+1, PATCHES+3, PATCHES+5*, PATCHES+6, DATA+1, DATA+12*, DATA+14
, VAR+2, VAR+5*, VAR+6
BUILD ENV+1~, ENV+2*, ENV+3, OK+1, DATA+1~*, DATA+4, DATA+5, DATA+8, DATA+11, DATA+13
BUILDI DATA+1~*, DATA+4, DATA+5, DATA+6, DATA+9, DATA+11
CPD DATA+1~*, DATA+2, DATA+3
DT VAR+2*
DUZ VAR+3, VAR+4
DUZ(0 VAR+3, VAR+4
I ENV+1~, PATCHES+1~, PATCHES+3*
INS PATCHES+1~, PATCHES+4*, PATCHES+5, CPD+1~*, CPD+2*, CPD+3*, CPD+4*
PATCH ENV+1~, PATCHES+3*, PATCHES+4, PATCHES+5
PATCHES ENV+1~, PATCHES+1~, PATCHES+2*, PATCHES+3
U VAR+2*
X PATCHES~, DATA~, DATA+1, VAR~, CPD~, CPD+4*, CPD+5, BM~, BM+1, M~
, M+1
XPDABORT ENV+2*, ENV+4!, ABRT+1*
>> XPDENV OK+1, DATA+1
>> XPDQUIT ABRT+1*
>> XPDQUIT("CTD UTIL 1.0" , ABRT+3*
>> XPDQUIT("ICD*18.0*12" ABRT+2*
>> XPDQUIT("ICPT*6.0*19" ABRT+2*
>> XPDQUIT("LEX*2.0*30" ABRT+1*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All