DGPT701 ;ALB/MTC,HIOFO/FT - Process 701 Transaction ;11/5/14 1:27pm
Source file <DGPT701.m>
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 | 1 | DGPT101 |
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
SET | ;
|
|
DTE | ;
|
|
CHECK | ;
|
|
TSPEC | ; CHECK TREATING SPECIALTY CODE
|
|
DISPTY | ;type of disposition
|
|
OPCAR | ;outpatient care status
|
|
VA | ;under va auspices
|
|
VAOP | ;check for inconsistencies between outpatient care and va auspices
|
|
CDR | ;physical location cdr code
|
|
POD | ;place of disposition
|
|
RECF | ;receiving facility number & suffix
|
|
ASIH | ;extended care days - absent sick in hospital
|
|
LEAVE | ;check leave days+pass days with total length of stay
|
|
SC | ;percentage of service connected
|
|
CP | ;compensation & pension status
|
|
DIAG | ;check diagnostic code
|
|
DXLSPOA | ;check dxls poa value ;new field & check with 884 ft 11/3/14
|
|
OVER | ; Pass FY92 edits for earlier data
|
|
LEG | ; LEGIONNAIRE'S DISEASE
|
|
SUI | ; Suicide indicator
|
|
DRUG | ;drug/substance abuse
|
|
AXES | ; Psych axises
|
|
ONED | ;check if one diagnostic code only
|
|
RACE | ;race
|
|
TSC | ;treated for service condition
|
|
AO | ;agent orange condition
|
|
IR | ;ionizing radiation condition
|
|
SWA | ;sw asia condition
|
|
MST | ;military sexual trauma
|
|
HNC | ;head & neck care
|
|
ETHNIC | ;ethnicity
|
|
RACE16 | ;race 1-6
|
|
CV | ;combat vet
|
|
SHAD | ;shad
|
|
EXIT | ;
|
|
ERR | ;
|
Name | Field # of Occurrence |
---|---|
^%DT | DTE+2 |
DD^%DT | DTE+3 |
^%DTC | DTE+4, DTE+5 |
$$ACTIVE^DGACT | TSPEC+12 |
$$FMDT^DGPT101 | DTE+1 |
PARSE^DGPT701P | SET+3 |
^DGPT70DX | DIAG+1 |
WRTERR^DGPTAE | ERR+1 |
AO^DGPTAE02 | AO+1 |
AXIV^DGPTAE02 | AXES+6 |
AXV1^DGPTAE02 | AXES+7 |
AXV2^DGPTAE02 | AXES+8 |
CANDP^DGPTAE02 | CP+1 |
CHECK^DGPTAE02 | TSPEC+4 |
CV^DGPTAE02 | CV+1 |
DISPTY^DGPTAE02 | DISPTY+2 |
DXLSPOA^DGPTAE02 | DXLSPOA+1 |
ETHNIC^DGPTAE02 | ETHNIC+1 |
HNC^DGPTAE02 | HNC+1 |
IR^DGPTAE02 | IR+1 |
LEAVE^DGPTAE02 | LEAVE+1 |
MST^DGPTAE02 | MST+1 |
OP^DGPTAE02 | OPCAR+2 |
POD^DGPTAE02 | POD+2 |
RACE^DGPTAE02 | RACE+1 |
RACE16^DGPTAE02 | RACE16+4 |
SHAD^DGPTAE02 | SHAD+1 |
SWA^DGPTAE02 | SWA+1 |
TSC^DGPTAE02 | TSC+1 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DIC(42.4 - [#42.4] | TSPEC+9, AXES+5 |
^TMP("AEDIT" | SET+1, ONED+1, ONED+2 |
Name | Line Occurrences |
---|---|
ASIH | RECF+1 |
CP | SC+1, SC+2 |
DISPTY | TSPEC+2, TSPEC+4 |
ERR | DTE+2, DTE+4, DTE+5, TSPEC+2, TSPEC+4, TSPEC+12, DISPTY+1, DISPTY+2, OPCAR+1, OPCAR+2 , VA+1, VAOP+2, VAOP+3, CDR+1, POD+1, POD+2, RECF+3, ASIH+1, LEAVE+1, SC+2 , CP+1, DIAG+1, DXLSPOA+1, AXES+3, AXES+4, AXES+6, AXES+7, AXES+8, ONED+1, ONED+2 , RACE+1, TSC+1, AO+1, IR+1, SWA+1, MST+1, HNC+1, ETHNIC+1, RACE16+4, CV+1 , SHAD+1 |
EXIT | DTE+2, DTE+4, DTE+5, TSPEC+2, TSPEC+4, TSPEC+12, DISPTY+1, DISPTY+2, OPCAR+1, OPCAR+2 , VA+1, VAOP+1, CDR+1, POD+1, POD+2, RECF+3, ASIH+1, LEAVE+1, SC+2, CP+1 , DIAG+1, DXLSPOA+1, AXES+6, AXES+7, AXES+8, ONED+1, ONED+2, RACE+1, TSC+1, AO+1 , IR+1, SWA+1, MST+1, HNC+1, ETHNIC+1, RACE16+4, CV+1, SHAD+1 |
ONED | OVER+1, AXES+2, AXES+5 |
OPCAR | DISPTY+1 |
RECF | POD+1 |
VA | OPCAR+1 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %DT | DTE+2* |
DGLOOP | RACE16+2*, RACE16+5! |
>> DGPT70X4 | AXES+3, AXES+5* |
>> DGPT7X51 | AXES+5* |
>> DGPT7X52 | AXES+5* |
>> DGPTAL7 | SET+1, ERR+1 |
>> DGPTDAS | ASIH+1 |
>> DGPTDDS | DTE+1*, DTE+4, DTE+5, TSPEC+12, OVER+1 |
>> DGPTDDTD | DTE+1 |
>> DGPTDDXO | ONED+1, ONED+2 |
>> DGPTDLR | CDR+1 |
>> DGPTDOP | OPCAR+1, OPCAR+2, VAOP+1 |
>> DGPTDPD | POD+1 |
>> DGPTDRF | RECF+1, RECF+2*, RECF+3 |
>> DGPTDSC | SC+2, SC+3* |
>> DGPTDSP | TSPEC+2, TSPEC+3, TSPEC+6*, TSPEC+9 |
DGPTDSP1 | TSPEC+1~, TSPEC+9*, TSPEC+12, AXES+5 |
>> DGPTDTD | DTE+3* |
>> DGPTDTS | DTE+5 |
>> DGPTDTY | DISPTY+1 |
>> DGPTDVA | VA+1, VAOP+1, RECF+1 |
>> DGPTDXV2 | AXES+4 |
>> DGPTEDFL | DTE+2, DTE+4, DTE+5, TSPEC+2, TSPEC+4, TSPEC+12, DISPTY+1, DISPTY+2, OPCAR+1, OPCAR+2 , VA+1, VAOP+1, CDR+1, POD+1, POD+2, RECF+3, ASIH+1, LEAVE+1, SC+2, CP+1 , DIAG+1, DXLSPOA+1, AXES+6, AXES+7, AXES+8, ONED+1, ONED+2, RACE+1, TSC+1, AO+1 , IR+1, SWA+1, MST+1, HNC+1, ETHNIC+1, RACE16+4, CV+1, SHAD+1 |
>> DGPTELP | DTE+5* |
>> DGPTERC | DTE+2*, DTE+4*, DTE+5*, TSPEC+2*, TSPEC+3*, TSPEC+4*, TSPEC+12*, DISPTY+1*, DISPTY+2*, OPCAR+1* , OPCAR+2*, VA+1*, VAOP+2*, VAOP+3*, CDR+1*, POD+1*, POD+2*, RECF+3*, ASIH+1*, LEAVE+1* , SC+2*, CP+1*, DIAG+1*, DXLSPOA+1*, AXES+3*, AXES+4*, AXES+6*, AXES+7*, AXES+8*, ONED+1* , ONED+2*, RACE+1*, TSC+1*, AO+1*, IR+1*, SWA+1*, MST+1*, HNC+1*, ETHNIC+1*, RACE16+4* , CV+1*, SHAD+1*, ERR+1 |
>> DGPTFMT | SC+1, DXLSPOA+1, AXES+2, RACE+1, TSC+1, AO+1, IR+1, SWA+1, MST+1, HNC+1 , ETHNIC+1, RACE16+1, CV+1, SHAD+1 |
>> DGPTNOW | DTE+4 |
DGPTRACE16 | RACE16+2*, RACE16+3, RACE16+5! |
>> DGPTSER( | TSPEC+12* |
>> DGPTSP1 | TSPEC+3* |
>> DGPTSP2 | TSPEC+3* |
>> DGPTSTR | SET+1* |
>> ERROR | ERR+3* |
U | AXES+5 |
>> X | DTE+1*, DTE+4, DTE+5 |
>> X1 | DTE+4*, DTE+5* |
>> X2 | DTE+4*, DTE+5* |
>> Y | DTE+2, DTE+3 |