DGPT101 ;ALB/MTC,HIOFO/FT - 101/701 Austin Edit Checks ;2/2/15 10:40am
Source file <DGPT101.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
EN | ;
|
|
101 | ;-- process 101+701 data
|
|
PARSE | ;Set up record string, Call routine to parse record
|
|
701 | ;PROCESS 701
|
|
SET | ; Start error piece, flags
|
|
SSN | ; Start edits
|
|
PSEU | ;check for pseudo ssn
|
|
DTE | ;admission date
|
|
LN | ;patient's last name
|
|
SRA | ;source of admission -- may need to add more edits later
|
|
SRP | ;source of payment
|
|
POW | ;prisoner of war
|
|
MAR | ;marital status
|
|
GEN | ;gender
|
|
DOB | ;date of birth
|
|
POS | ;period of service
|
|
EXP | ;agent orange and ionizing radiation
|
|
HOME | ;state, county and zip code
|
|
MT | ;means test
|
|
ERI | ;emergency response indicator
|
|
INCOM | ;income
|
|
MST | ;military sexual trauma
|
|
CV | ;combat veteran
|
|
CVDATE | ;combat veteran date
|
|
SHAD | ;shipboard hazard and defense
|
|
GOOD | ;
|
|
EXIT | ;
|
|
ERR | ;
|
|
FMDT(X) | ; change to fm date for y2k
|