DGENCDA1 ;ALB/CJM,RMM Zoltan,JAN,PHH,BRM,CKN,DJS - Catastrophic Disabilty API - File Data;Sep 16, 2002 ; 9/22/05 5:25pm
Source file <DGENCDA1.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 3 | CHK^DIE ^DIK $$EXTERNAL^DILFD |
Registration | 2 | ($$LIMBCODE,$$LIMBOK,$$RANGEMET,$$TYPE,$$VALID)^DGENA5 $$UPPER^DGUTL |
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Registration | 5 | DGENCD DGENCDA2 DGENUPL4 DGENUPL9 DGRPCE |
Income Verification Match | 1 | IVMZ7CCD |
Name | Comments | DBIA/ICR reference |
---|---|---|
LOCK(DFN) | ;
|
|
UNLOCK(DFN) | ;
|
|
CHECK(DGCDIS,ERROR) | ;
|
|
ISCD(DGCDIS) | ; Returns 1/0, is the patient CD?
; DGCDIS("DESCR",N)=CD REASON for Descriptor. ; DGCDIS("DIAG",N)=CD REASON for Diagnosis. ; DGCDIS("COND",N)=CD REASON for Condition. ; DGCDIS("SCORE",N)=SCORE (for condition.) ; DGCDIS("PERM",N)=Permanent Indicator (for condition). ; DGCDIS("PROC",N)=CD REASON for procedure. ; DGCDIS("EXT",N)=Affected Extremity (for procedure.) |
|
ERRDISP(FILE) | ; Display error.
|
|
DELETE(DFN) | ;
|
Name | Field # of Occurrence |
---|---|
$$LIMBCODE^DGENA5 | ISCD+26 |
$$LIMBOK^DGENA5 | CHECK+64 |
$$RANGEMET^DGENA5 | ISCD+33 |
$$TYPE^DGENA5 | CHECK+52, CHECK+57, CHECK+62, CHECK+69, ISCD+13, ISCD+16, ISCD+19, ISCD+32 |
$$VALID^DGENA5 | CHECK+70 |
$$UPPER^DGUTL | CHECK+24 |
CHK^DIE | CHECK+32, CHECK+42 |
^DIK | DELETE+17, DELETE+27, DELETE+33 |
$$EXTERNAL^DILFD | CHECK+30, CHECK+36, CHECK+40 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | CHK^DIE, EXTERNAL^DILFD |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGEN(27.17 - [#27.17] | ISCD+24 |
^DPT - [#2] | LOCK+7, UNLOCK+6, DELETE+9, DELETE+20, DELETE+22 |
Name | Line Occurrences |
---|---|
$$LOCK | DELETE+11 |
UNLOCK | DELETE+35 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
CD | ISCD+8~*, ISCD+14*, ISCD+17*, ISCD+30*, ISCD+34*, ISCD+35*, ISCD+36 |
DA | DELETE+6~, DELETE+13~, DELETE+15*, DELETE+16, DELETE+23~, DELETE+24*, DELETE+29~, DELETE+31* |
DA(1 | DELETE+14*, DELETE+25*, DELETE+30* |
DFN | LOCK~, LOCK+7, UNLOCK~, UNLOCK+6, DELETE~, DELETE+9, DELETE+11, DELETE+14, DELETE+16, DELETE+20 , DELETE+22, DELETE+25, DELETE+26, DELETE+30, DELETE+32, DELETE+35 |
>> DGCDERR("DIERR" | ERRDISP+5 |
DGCDIS | CHECK~, ISCD~ |
DGCDIS( | CHECK+19 |
DGCDIS("BY" | CHECK+22, CHECK+23, CHECK+24 |
DGCDIS("COND" | CHECK+67, CHECK+68, CHECK+69, CHECK+70, CHECK+74, ISCD+31, ISCD+32, ISCD+33 |
DGCDIS("DATE" | CHECK+27, CHECK+28, CHECK+29, CHECK+30, CHECK+44 |
DGCDIS("DESCR" | CHECK+50, CHECK+51, CHECK+52, CHECK+74, ISCD+12, ISCD+13 |
DGCDIS("DIAG" | CHECK+55, CHECK+56, CHECK+57, CHECK+74, ISCD+15, ISCD+16 |
DGCDIS("EXT" | CHECK+63, CHECK+64, ISCD+21, ISCD+22 |
DGCDIS("FACDET" | CHECK+36 |
DGCDIS("METDET" | CHECK+46, CHECK+47 |
DGCDIS("PERM" | CHECK+71, ISCD+33 |
DGCDIS("PROC" | CHECK+60, CHECK+61, CHECK+62, CHECK+64, CHECK+74, ISCD+18, ISCD+19, ISCD+24, ISCD+26 |
DGCDIS("REVDTE" | CHECK+38, CHECK+39, CHECK+40, CHECK+44 |
DGCDIS("SCORE" | CHECK+70, ISCD+33 |
DGCDIS("VCD" | CHECK+11, CHECK+12, CHECK+17, CHECK+22, CHECK+27, CHECK+36, CHECK+38, CHECK+46, CHECK+74 |
DIK | DELETE+6~, DELETE+13~, DELETE+16*, DELETE+23~, DELETE+26*, DELETE+29~, DELETE+32* |
EIEN | CHECK+9~, CHECK+63*, CHECK+64 |
ERROR | CHECK~, CHECK+10*, CHECK+20*, CHECK+22*, CHECK+23*, CHECK+24*, CHECK+27*, CHECK+34*, CHECK+36*, CHECK+38* , CHECK+39, CHECK+41*, CHECK+43*, CHECK+44*, CHECK+46*, CHECK+47*, CHECK+52*, CHECK+57*, CHECK+62*, CHECK+64* , CHECK+69*, CHECK+70*, CHECK+71*, CHECK+74* |
EXCLUDE | ISCD+9~ |
EXCLUDE( | ISCD+28, ISCD+29* |
EXIT | CHECK+9~, CHECK+48*, CHECK+50, CHECK+52*, CHECK+53, CHECK+55, CHECK+57*, CHECK+58, CHECK+60, CHECK+62* , CHECK+64*, CHECK+65, CHECK+67, CHECK+69*, CHECK+70*, CHECK+72 |
EXT | ISCD+9~, ISCD+22*, ISCD+23, ISCD+24, ISCD+27 |
EXTERNAL | CHECK+9~, CHECK+26*, CHECK+30*, CHECK+31, CHECK+32, CHECK+40*, CHECK+41, CHECK+42 |
FILE | ERRDISP~, ERRDISP+4 |
FLD | CHECK+9~, CHECK+18*, CHECK+19 |
ISCD | CHECK+9~ |
ITEM | CHECK+9~, CHECK+48*, CHECK+50*, CHECK+51, CHECK+52, CHECK+55*, CHECK+56, CHECK+57, CHECK+60*, CHECK+61 , CHECK+62, CHECK+63, CHECK+64, CHECK+67*, CHECK+68, CHECK+69, CHECK+70, CHECK+71 |
LCODE | ISCD+9~, ISCD+20*, ISCD+21*, ISCD+22 |
LIEN | ISCD+9~, ISCD+24*, ISCD+25, ISCD+26 |
LIMB | ISCD+9~, ISCD+26*, ISCD+27, ISCD+28, ISCD+29 |
LINE | ERRDISP+1~, ERRDISP+2*, ERRDISP+5* |
OK | CHECK+9~, CHECK+26*, CHECK+29*, CHECK+31*, CHECK+33*, CHECK+34 |
POP | CHECK+9~, CHECK+16*, CHECK+17, CHECK+18, CHECK+19*, CHECK+20 |
RESULT | CHECK+9~, CHECK+32, CHECK+33, CHECK+42, CHECK+43 |
SIEN | DELETE+19~, DELETE+21*, DELETE+22*, DELETE+24 |
SUB | ISCD+9~, ISCD+10*, ISCD+12*, ISCD+13, ISCD+15*, ISCD+16, ISCD+18*, ISCD+19, ISCD+21, ISCD+22 , ISCD+24, ISCD+26, ISCD+28, ISCD+29, ISCD+31*, ISCD+32, ISCD+33 |
SUBFILE | DELETE+19~, DELETE+20*, DELETE+22, DELETE+26 |
SUCCESS | DELETE+6~, DELETE+7*, DELETE+10*, DELETE+11*, DELETE+36 |
VALID | CHECK+9~, CHECK+14*, CHECK+75*, CHECK+76 |