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 |  Caller 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: ICD1882A

Package: DRG Grouper

Routine: ICD1882A


Information

ICD1882A ;ALB/JDG - POST INSTALL ROUTINE;8/1/2015

Source Information

Source file <ICD1882A.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 DD^%DT  (,UPDATE)^DIE  ^DIK  
Kernel 2 $$NOW^XLFDT  BMES^XPDUTL  
DRG Grouper 1 (CLEANUP,DELFILES,MAJOROR,UP82,UP8211,UP8211B,UP8213,UP82ADD)^ICD1882B  
Lexicon Utility 1 $$IMPDATE^LEXU  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
DRG Grouper 2 ICD1882B  ICD1882P  

Entry Points

Name Comments DBIA/ICR reference
PRE ;delete data
POST ;
UPDATING ;
UP80 ;
UP801 ;
UPID10 ;Now Populate #80 #80.1 Multiple 73
UP802 ;
UP805 ;
UP806 ;#80.6 - ^ICDHAC (HAC)
8073(ICDFILE,ICDDX,ICDIDEN) ;
; Input ICDFILE = 80 or 80.1
; ICDDX = DX or PCS Code Ex: A00.0 or 0TCS0ZZ
; ICDIDEN = Identifier Ex: "A" or 44 or 245
ERR ;
DTTIME() ;

External References

Name Field # of Occurrence
DD^%DT DTTIME+1
^DIE UP80+52, UP801+31, UP801+39
UPDATE^DIE UP80+16, UP80+20, UP80+25, UP80+34, UP80+37, UP80+39, UP80+42, UP80+48, UP80+49, UP80+53
, UP801+18, UP801+22, UP801+27, UP801+32, UP801+40, UPID10+8, UP802+5, UP802+6, UP802+9, UP805+6
, UP805+9, UP805+11, UP806+8, UP806+12, 8073+13
^DIK UPDATING+2, UPDATING+3, UP80+5, UP80+6, UP80+7, UP80+8, UP80+14, UP801+5, UP801+6, UP801+9
, UP801+10
CLEANUP^ICD1882B POST+13
DELFILES^ICD1882B PRE+2
MAJOROR^ICD1882B UPDATING+17
UP82^ICD1882B UPDATING+6
UP8211^ICD1882B UPDATING+14
UP8211B^ICD1882B UPDATING+15
UP8213^ICD1882B UPDATING+16
UP82ADD^ICD1882B UPDATING+7
$$IMPDATE^LEXU UPDATING+5
$$NOW^XLFDT DTTIME+1
BMES^XPDUTL POST+9, POST+10, POST+11, POST+14, UPDATING+5, UP80+2, UP80+11, UP80+12, UP80+19, UP80+21
, UP801+2, UP801+13, UP801+14, UPID10+2, UP802+2, UP802+4, UP805+2, UP806+1, ERR+1, ERR+2
, ERR+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"HAC: Code ",ICDCODE," not found in File #80"
  • Line Location: UP806+3
Routine Call
  • DIE
  • Line Location:
    • UP80+52
    • UP801+31
    • UP801+39
Routine Call
  • DIE
  • Line Location:
    • UP80+16
    • UP80+20
    • UP80+25
    • UP80+34
    • UP80+37
    • UP80+39
    • UP80+42
    • UP80+48
    • UP80+49
    • UP80+53
    • UP801+18
    • UP801+22
    • UP801+27
    • UP801+32
    • UP801+40
    • UPID10+8
    • UP802+5
    • UP802+6
    • UP802+9
    • UP805+6
    • UP805+9
    • UP805+11
    • UP806+8
    • UP806+12
    • 8073+13

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD9 - [#80] Classic Fileman Calls
^ICD0 - [#80.1] Classic Fileman Calls
^ICDID - [#82] Classic Fileman Calls
^ICDIP - [#82.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ICD - [#80.2] UP802+5, UP802+6
^ICD("B" UP80+19, UP802+3
^ICD0 - [#80.1] UP801+5, UP801+6, UP801+9, UP801+10, UP801+14, UP801+16, UP801+19, UP801+20, UP801+23, UP801+25
, UP801+28, UP801+32, UP801+34
^ICD0("BA" UP801+4, UP801+8, UP801+12
^ICD9 - [#80] UP80+5, UP80+6, UP80+7, UP80+8, UP80+12, UP80+14, UP80+15, UP80+17, UP80+18, UP80+26
, UP80+36, UP80+38, UP80+41, UP80+43, UP80+51
^ICD9("BA" UP80+4, UP80+10, UP806+3
^ICDHAC("B" UP806+6, UP806+9
^ICDHAC("C" UP806+10
^ICDID - [#82] UPDATING+2
^ICDIP - [#82.1] UPDATING+3
^ICDLD82("80.5" UP805+4
^ICDLD82("APPE" UP801+8, UP801+35, 8073+10
^ICDLD82("APPF" UP801+36, UP801+38
^ICDLD82("APPG" UP80+44, UP80+47
^ICDLD82("APPH" UP80+44, UP80+47
^ICDLD82("APPI" UP806+2, UP806+4, UP806+5
^ICDLD82("APPJ" UP80+34
^ICDLD82("GEM-10-9" UP80+22
^ICDLD82("GEM-10-9-PCS" UP801+30
^ICDLD82("ID10" UPID10+3, UPID10+4, UPID10+12, UPID10+13, UPID10+14
^ICDLD82("MDC12" UP80+29
^ICDLD82("MDC13" UP80+28
^ICDLD82("MDC24" UP80+30
^ICDLD82("MDC24P" UP801+33
^ICDLD82("MDC25" UP80+31
^ICDLD82(80 UP80+4, UP80+10
^ICDLD82(80.1 UP801+4, UP801+12
^ICDLD82(80.2 UP802+3
^ICDLD82(80.5 UP805+5
^ICDRS - [#80.5] UP805+8, UP805+9
^ICDRS("B" UP805+5, UP805+6, UP805+7
^ICM - [#80.3] UP80+21
^TMP("ICDDRGLD" UP801+15*
^TMP("ICDLD82" UPDATING+4!, UPDATING+18!, UP80+13*

Label References

Name Line Occurrences
$$DTTIME UP80+2, UP801+2, UPID10+2, UP802+2, UP806+1
8073 UP80+55, UP801+41, UPID10+17
ERR UP80+16, UP80+20, UP80+25, UP80+34, UP80+37, UP80+39, UP80+42, UP80+48, UP80+49, UP80+53
, UP801+18, UP801+22, UP801+27, UP801+32, UP801+40, UPID10+8, UP802+5, UP802+6, UP802+9, UP805+6
, UP805+9, UP805+11, UP806+8, UP806+12, 8073+13
UP80 UPDATING+8
UP801 UPDATING+9
UP802 UPDATING+11
UP805 UPDATING+12
UP806 UPDATING+13
UPDATING POST+12
UPID10 UPDATING+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA UPDATING+2*, UPDATING+3*, UP80+5!*, UP80+6!*, UP80+7!*, UP80+8!*, UP80+14!*, UP80+52*, UP801+5!*, UP801+6!*
, UP801+9!*, UP801+10!*, UP801+31*, UP801+39*
DA(1 UP80+5*, UP80+6*, UP80+7*, UP80+8*, UP80+14*, UP801+5*, UP801+6*, UP801+9*, UP801+10*
>> DIE UP80+52*, UP801+31*, UP801+39*
DIK POST+7~, UPDATING+2*, UPDATING+3*, UP80+5*, UP80+6*, UP80+7*, UP80+8*, UP80+14*, UP801+5*, UP801+6*
, UP801+9*, UP801+10*
>> DR UP80+52*, UP801+31*, UP801+39*
ICD103 POST+3~, UP80+41*, UP80+43*, UP80+48, UP80+49
ICD14 POST+3~
ICD40 POST+3~
ICD40IEN POST+3~
ICD73 POST+7~, UP80+5*, UP80+14*, UP801+5*, UP801+10*
ICD73IEN POST+3~, 8073+12*
ICD82 POST+3~
ICD821 POST+3~
ICD82T POST+3~
ICDA POST+3~, POST+7~, UPID10+12*, UPID10+13, UPID10+14
ICDAIDA POST+2~
ICDB POST+3~, UPID10+13*, UPID10+14
ICDBAD POST+6~
ICDBLIEN POST+3~
ICDBLK POST+3~
ICDC POST+3~, UPID10+14*, UPID10+16
ICDCC POST+1~, POST+7~, UP80+47*, UP80+48, UP802+3*, UP802+6
ICDCCIEN POST+2~
ICDCCMCC POST+2~
ICDCODE POST+1~, UPID10+8*, UP806+3*
ICDCSYS POST+1~
ICDCT POST+3~
ICDDA POST+3~, UP805+5*, UP805+6*, UP805+7
ICDDAIEN POST+6~, UP80+15*, UP80+17*, UP80+18, UP80+20, UP80+36*, UP80+38*, UP80+39, UP801+16*, UP801+19*
, UP801+20, UP801+22, UP801+23, UP801+25, UP801+27, UP801+28
ICDDAP POST+2~
ICDDESC POST+2~, UPID10+3*, UPID10+4, UPID10+6, UPID10+8, UPID10+9, UPID10+12, UPID10+13, UPID10+14, UP806+5*
, UP806+7
ICDDRG POST+6~, POST+7~, UP80+18*, UP80+19, UP80+20, UP80+21, UP801+25*, UP801+27, UP801+28, UP802+3*
, UP802+8, UP805+5*, UP805+10
ICDDRGN POST+6~, UP802+3*, UP802+4
ICDDRGS POST+3~, UP80+18*
ICDDTTX POST+1~
ICDDX POST+6~, UP80+4*, UP80+10*, UP80+11, UP80+12, UP80+13, UP80+19, UP80+21, UP80+22, UP80+28
, UP80+29, UP80+30, UP80+31, UP80+34, UP80+44, UP80+47, UP80+55, UP801+4*, UP801+12*, UP801+13
, UP801+14, UP801+15, UP801+30, UP801+33, UP801+35, UP801+36, UP801+38, UP801+41, UPID10+16*, UPID10+17
, UP806+2*, UP806+3, UP806+4, UP806+5, 8073~, 8073+5, 8073+9, 8073+10
ICDDX9 POST+1~, POST+6~, UP80+22*, UP801+30*
ICDDXCC POST+3~
ICDDXIEN POST+4~, UP806+3*, UP806+10, UP806+11
ICDEFF POST+1~, UPDATING+5*, UP80+15, UP80+16, UP80+17, UP80+36, UP80+37, UP80+38, UP80+41, UP80+42
, UP80+43, UP801+16, UP801+18, UP801+19, UP802+5, UP802+6, UP805+5, UP805+6
ICDERR POST+6~, UP80+16!, UP80+20!, UP80+25!, UP80+34!, UP80+37!, UP80+39!, UP80+42!, UP80+48!, UP80+49!
, UP80+53!, UP801+18!, UP801+22!, UP801+27!, UP801+32!, UP801+40!, UPID10+8!, UP802+5!, UP802+6!, UP802+9!
, UP805+6!, UP805+9!, UP805+11!, UP806+7!, UP806+8, UP806+11!, UP806+12, 8073+13!
ICDERR("DIERR" ERR+1, ERR+2, ERR+3
ICDEXCL POST+4~
ICDEXIEN POST+4~
ICDF POST+1~, UP80+25*, UP80+26, UP80+27, UP80+30, UP80+31, 8073+4~, 8073+5*, 8073+9, 8073+12
ICDF2 POST+4~, 8073+6*
ICDFDA POST+6~, UP80+16!, UP80+20!, UP80+25!, UP80+34!, UP80+37!, UP80+39!, UP80+42!, UP80+48!, UP80+49!
, UP80+53!, UP801+18!, UP801+22!, UP801+27!, UP801+32!, UP801+40!, UPID10+8!, UP802+5!, UP802+6!, UP802+9!
, UP805+6!, UP805+9!, UP805+10!, UP806+7!, UP806+11!, 8073+13!
ICDFDA( UP80+42*, UP80+48*, UP80+49*, UP801+32*, UP801+40*, UPID10+8*, UP806+7*, UP806+11*, 8073+13*
ICDFDA("80.071" UP80+16*
ICDFDA("80.072" UP80+37*, UP80+39*
ICDFDA("80.171" UP801+18*
ICDFDA("80.1711" UP801+22*
ICDFDA("80.17111" UP801+27*
ICDFDA("80.271" UP802+5*, UP802+6*, UP802+9*
ICDFDA("80.5" UP805+6*
ICDFDA("80.51" UP805+9*
ICDFDA("80.511" UP805+10*
ICDFDA("80.711" UP80+20*
ICDFDA(80 UP80+32*, UP80+34*, UP80+53*
ICDFI POST+4~, 8073+8*, 8073+11
ICDFILE POST+2~, POST+4~, UPID10+4*, UPID10+8, 8073~, 8073+5, 8073+6, 8073+7, 8073+8
ICDFILE1 POST+4~
ICDFILE2 POST+2~, POST+4~, UPID10+4*, UPID10+6, UPID10+8, UPID10+9, UPID10+10
ICDFILE3 POST+4~, UPID10+5*, UPID10+17
ICDFILE4 POST+4~
ICDFLAG POST+4~
ICDFN POST+2~
ICDFR POST+4~, UP80+18*, UP801+25*
ICDFT POST+4~, 8073+7*, 8073+13
ICDHAC POST+7~, UP806+4*, UP806+5, UP806+6, UP806+7, UP806+9
ICDHIST POST+1~
ICDI POST+2~, POST+6~, 8073+4~
ICDID UPID10+10*, UPID10+11, UPID10+17, 8073+4~
ICDIDEN POST+6~, UP80+51*, UP80+53, UP80+55, UP801+34*, UP801+35*, UP801+36*, UP801+37*, UP801+38*, UP801+40
, UP801+41, 8073~, 8073+11
ICDIDIEN 8073+4~, 8073+11*, 8073+12, 8073+13
ICDIEN POST+1~, POST+6~, UP80+4*, UP80+5, UP80+6, UP80+7, UP80+8, UP80+10*, UP80+11, UP80+12
, UP80+13, UP80+14, UP80+15, UP80+16, UP80+17, UP80+18, UP80+20, UP80+32, UP80+34, UP80+36
, UP80+37, UP80+38, UP80+39, UP80+41, UP80+42, UP80+43, UP80+48, UP80+49, UP80+52, UP80+53
, UP801+4*, UP801+5, UP801+6, UP801+8*, UP801+9, UP801+10, UP801+12*, UP801+13, UP801+14, UP801+15
, UP801+16, UP801+18, UP801+19, UP801+20, UP801+22, UP801+23, UP801+25, UP801+27, UP801+28, UP801+31
, UP801+32, UP801+39, UP801+40, UPID10+6*, UPID10+9*, UPID10+10, UP802+3*, UP802+4, UP802+5, UP802+6
, UP802+9, UP805+7*, UP805+8, UP805+9, UP805+10, UP806+6*, UP806+9*, UP806+11, 8073+4~, 8073+5*
, 8073+9*, 8073+12, 8073+13
ICDIEN2 POST+4~, UP802+5*, UP802+6*, UP802+9
ICDIEN9 POST+6~, UP80+22*, UP80+23, UP80+26, UP80+51, UP801+30*, UP801+32, UP801+34
ICDIX POST+2~
ICDLET POST+5~, UP80+55*, UP801+41*
ICDMAC POST+4~
ICDMDC POST+6~, UP80+21*, UP80+39, UP801+20*, UP801+22, UP801+23, UP805+4*, UP805+5, UP805+8, UP805+9
ICDMDC24 POST+6~, UP801+32*, UP801+33*
ICDMDC25 POST+6~
ICDMDCF POST+1~, UP80+25*, UP80+32
ICDMDDRG POST+5~
ICDMDIEN POST+5~
ICDMIEN POST+2~, UP801+20*, UP801+23*, UP801+24, UP801+25, UP801+27, UP805+8*, UP805+9*, UP805+10
ICDMULT POST+2~
ICDN POST+6~, UPDATING+2*, UPDATING+3*, UP80+3*, UP80+4*, UP80+9*, UP80+10*, UP801+3*, UP801+4*, UP801+11*
, UP801+12*
>> ICDN11 UP801+7*, UP801+8*
ICDNODE POST+7~, UP80+6*, UP80+7*, UP80+8*, UP801+6*
>> ICDNODE1 UP801+9*
ICDONEI POST+5~
ICDORCD POST+5~
ICDORD POST+7~, UP805+4*, UP805+5*, UP805+10
ICDOWN POST+5~, UP80+44*, UP80+49
ICDPCS POST+5~
ICDPDX POST+3~
ICDPRE POST+1~
ICDPRIEN POST+5~
ICDPRIM POST+5~, UP806+5*, UP806+11
ICDR POST+1~
ICDREC POST+5~, UP801+4*, UP801+12*, UP801+20, UP801+25
ICDRGIEN POST+2~, UP801+25*, UP801+28*
ICDST POST+1~
ICDSTA POST+2~
ICDSTOP POST+2~, UP805+3*, UP805+5, UP805+6*, UP805+9*, UP805+11*
ICDSUM POST+7~, UPDATING+4!
ICDSUM( UP801+13*, UP801+14*, UP801+15*
ICDSUM(80 UP80+11*, UP80+12*, UP80+13*
ICDTO POST+5~, UP80+18*, UP801+25*
ICDTY POST+5~, UPID10+4*, UPID10+5, UPID10+12, UPID10+13, UPID10+14, UPID10+15, UPID10+16
ICDVAR POST+1~, UP80+26*, UP80+28*, UP80+29*, UP80+30*, UP80+31*, UP80+32
ICDWIDTH POST+5~
ICDWITH POST+5~
ICDX POST+1~, POST+6~, UP80+4*, UP80+10*, UP80+18, UP80+21, UP802+8*, UP802+9, UP806+5*, 8073+4~
ICDXIEN POST+5~
ICDY POST+1~, UP801+25*, UP802+8*
ICDYES POST+5~
>> IDENT UP80+52*, UP801+31*, UP801+39*
U POST+8*, UPDATING+5, UP80+3*, UP80+4, UP80+9*, UP80+10, UP80+18, UP80+21, UP80+26, UP80+31
, UP80+51, UP801+3*, UP801+4, UP801+12, UP801+20, UP801+25, UP801+32, UP801+34, UPID10+10, UP806+5
>> XPDA POST+14
>> XPDABORT POST+9*, POST+10*
>> XPDQUES("POS1" POST+9
>> XPDQUES("POS3" POST+10
>> XPDQUIT POST+9*, POST+10*
>> XPDQUIT("ICD*18.0*82" POST+9*, POST+10*
>> Y DTTIME+1*, DTTIME+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All