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

Package: Registration

Routine: DGICDGT


Information

DGICDGT ;BIR/SJA - ALB/AAS - ADT ICD DIAGNOSIS SEARCH ;02-Feb-2012

Source Information

Source file <DGICDGT.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 3 EN^DDIOL  YN^DICN  DQ^DICQ  
Registration 2 GETAPI^DGICDGT  (EFFDAT1,EFFDATE)^DGPTIC10  
DRG Grouper 1 $$SYS^ICDEX  
Kernel 1 $$FMTE^XLFDT  

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

Package Total Caller Graph
Registration 29 401  501  601  CPT RECORD DATE/TIME  DGICDGT  DGPTX41  DGPTX51  DGPTX7  
DGPTX73  DGX41  DGX42  DGX44  DGX51  DGX54  DGX55  DGX57  
DGX5F1  DGX5FD1  DGX5FD3  DGX5FD6  DGX5FD8  DGX61  DGX63  DGX64  
DGX7  DGX73  DGX74  DGX75  ^DGPT  

Entry Points

Name Comments DBIA/ICR reference
GETAPI(APP,TYPE,PTF,CHK,DGNODE) ;ICD-9/ICD-10 selection - called by input transform
; - INPUT: X := the initial user input to be searched on (REQUIRED)
; APP := application name "DG PTF" ;drp removed file ref in file 130.4;.01 (REQUIRED)
; TYPE := type of call "DIAG or "PROC" ;drp removed file ref in file 130.4;.04 (REQUIRED)
; PTF := top level entry in file 130 (DA) used to get date to compute correct version (OPTIONAL but needs DA)
; CHK := additional screening logic
; Note: applications using this as an example will need to modify the code that uses this.
; DGNODE := node variable needed to account for increased DX code storage across different
; PTF global nodes, default=0 (OPTIONAL)
; - OUTPUT: X := the internal value to be stored in the field.
; Y := the internal value to be stored in the field
GO ; -- Jump for DRG calculation
MSG(TEXT) ;
TR(X) ;
D1 ; -- Diagnosis ? Help
D2 ; -- Diagnosis ?? Help
D3 ; -- Diagnosis ??? Help
P1 ;
P2 ;
P3 ;
T12
D19 ;
D29 ;
P19 ;

External References

Name Field # of Occurrence
EN^DDIOL GO+10, MSG+1, D1+3, D1+4, D2+1, D2+2, D2+3, D2+4, D2+5, D2+6
D2+7, D2+8, D3+30, P1+3, P1+4, P1+5, P2+1, P2+2, P2+3, P2+4
P2+5, P2+6, P2+7, P3+1, P3+2, P3+3, P3+4, P3+5, D19+2, D19+3
D19+4, D19+5, D19+6, D19+7, D19+8, D19+9, D29+1, D29+2, D29+3, D29+4
D29+5, D29+6, D29+7, D29+8, D29+9, D29+10, D29+11, D29+12, D29+13, D29+14
P19+2, P19+3
GETAPI^DGICDGT P3+9, P3+10, P3+11, P3+12, P3+14, P3+15, P3+16, P3+17, P3+19, P3+20
P3+21, T12
EFFDAT1^DGPTIC10 GETAPI+32
EFFDATE^DGPTIC10 GETAPI+35
YN^DICN P19+3
DQ^DICQ P19+7
$$SYS^ICDEX GO+1
$$FMTE^XLFDT GO+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"1"
  • Line Location: P3+9
Function Call: WRITE
  • Prompt: !,"2"
  • Line Location: P3+10
Function Call: WRITE
  • Prompt: !,"3"
  • Line Location: P3+11
Function Call: WRITE
  • Prompt: !,"4"
  • Line Location: P3+12
Function Call: WRITE
  • Prompt: !,"5"
  • Line Location: P3+14
Function Call: WRITE
  • Prompt: !,"6"
  • Line Location: P3+15
Function Call: WRITE
  • Prompt: !,"7"
  • Line Location: P3+16
Function Call: WRITE
  • Prompt: !,"8"
  • Line Location: P3+17
Function Call: WRITE
  • Prompt: !,"9 - SHOULD WORK"
  • Line Location: P3+19
Function Call: WRITE
  • Prompt: !,"10 - SHOULD WORK"
  • Line Location: P3+20
Function Call: WRITE
  • Prompt: !,"11 'COCAINE' - SHOULD WORK"
  • Line Location: P3+21
Function Call: WRITE
  • Prompt: !,"12 'FRACTURE'- TOO LONG"
  • Line Location: T12+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ICD0 - [#80.1] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPT - [#45] GETAPI+33

Label References

Name Line Occurrences
@( GO+5, GO+6, GO+29
D2 D1+2
D29 D19+1
D3 D1+1
GO GETAPI+32
MSG GETAPI+16, GETAPI+18, GETAPI+19, GETAPI+20, GETAPI+33, GO+2, GO+21, GO+23
P2 P1+2
P3 P1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % P19+3*
APP GETAPI~, GETAPI+18, GO+21
CHK GETAPI~, GETAPI+32*, GO+29
CODE GETAPI+12~, GO+20*, GO+21, GO+23, GO+24
>> D P19+6*
>> D0 GETAPI+31
>> DA GETAPI+31
>> DA(1 GETAPI+31
>> DA(2 GETAPI+31
>> DGDRGDT GETAPI+32
DGDT GETAPI+12~
DGER GETAPI+12~, GO+29*
DGNODE GETAPI~, GETAPI+14*
DGPTDA GETAPI+12~, GETAPI+31*, GETAPI+32, GETAPI+33, GETAPI+35
DGPTDAT GETAPI+12~
DGTYPE GETAPI+35~*
DGX GETAPI+12~
DGYN P19+1~*, P19+3*, P19+7
DIC GETAPI+12~, P19+6*
DIC("0" P19+6*
DIC("S" P19+4*
DIC("W" P19+5*
DIE GETAPI+12~
>> DO P19+6*
>> DO(2 P19+6*
DTOUT GETAPI+12~
DUOUT GETAPI+12~
>> DZ P19+6*
EFFDATE GETAPI+12~, GETAPI+32*, GO+1, GO+2
ENTRY GETAPI+12~
>> FORMAT GO+9*, GO+10
HLP D3+1~, D3+30
HLP(1 D3+2*, D3+3*
HLP(10 D3+16*, D3+17*
HLP(12 D3+18*, D3+19*
HLP(13 D3+20*, D3+21*
HLP(15 D3+22*, D3+23*
HLP(16 D3+24*, D3+25*
HLP(18 D3+26*, D3+27*
HLP(19 D3+28*, D3+29*
HLP(2 D3+4*, D3+5*
HLP(3 D3+6*, D3+7*
HLP(4 D3+8*, D3+9*
HLP(5 D3+10*, D3+11*
HLP(6 D3+12*, D3+13*
HLP(8 D3+14*, D3+15*
IMPDATE GETAPI+12~
KEY GETAPI+12~
LEXI GETAPI+12~
PTF GETAPI~, GETAPI+31
TAG GO+4~*, GO+5*, GO+6*, GO+7*, GO+8*, GO+10
TEXT MSG~, MSG+1
TYPE GETAPI~, GETAPI+19, GO+1, GO+2, GO+21, GO+23
U GETAPI+35
VERSION GETAPI+12~, GO+1*, GO+2, GO+5, GO+6, GO+7, GO+8, GO+12, GO+20, GO+21
X GETAPI+16*, GETAPI+17!, GETAPI+18!, GETAPI+19!, GETAPI+20!, GETAPI+33!, GO+2!, GO+3!, GO+5, GO+6
GO+9, GO+12*, GO+21!, GO+23!, GO+29!, GO+31*, GO+32!, TR~, TR+1*, TR+2
D1+1, D1+2, P1+1, P1+2, P3+9*, P3+10*, P3+11*, P3+12*, P3+13*, P3+15*
P3+16*, P3+17*, P3+19*, P3+20*, P3+21*, T12*, D19+1, P19+3
>> X1 GETAPI+35
Y GO+3!, GO+29!, GO+31, GO+32!
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