AGTXDOC ;IHS/ASDS/EFG - EXPORT RECORD DOCUMENTATION ;
;;7.1;PATIENT REGISTRATION;;AUG 25,2005
;
;NOTE:
;The piece numbers are -AFTER- SET'ing to the export global, b/c
;Unique Registration ID is -INSERTED- as piece 2 to all records.
;This means that, as of patch 14, you have to subtract 1 from the
;piece numbers, below, when you're actually reading the AGTX*
;routines.
;
;; DEMOGRAPHICS RECORD LAYOUT
;;--------------------------------------------------------------------
;;*** RG1 RECORD LAYOUT ***
;; Piece #
;; 01 "RG1"
;; 02 UNIQUE REGISTRATION ID
;; 03 ASUFAC OF HRN IN 04
;; 04 HRN OF ASUFAC IN 03
;; 05 LAST NAME
;; 06 FIRST NAME
;; 07 MIDDLE NAME
;; 08 CLASSIFICATION CODE
;; 09 DATE OF BIRTH
;; 10 SEX
;; 11 SOCIAL SECURITY NUMBER
;; 12 TRIBE CODE
;; 13 BLOOD QUANTUM
;; 14 FATHER LAST NAME
;; 15 FATHER FIRST NAME
;; 16 FATHER MIDDLE INITIAL
;; 17 COMMUNITY OF RESIDENCE
;; 18 MAILING ADDRESS STREET
;; 19 MAILING ADDRESS TOWN
;; 20 MAILING ADDRESS STATE
;; 21 MAILING ADDRESS ZIP
;;--------------------------------------------------------------------
;;*** RG2 RECORD LAYOUT ***
;; 01 "RG2"
;; 02 UNIQUE REGISTRATION ID
;; 03 MOTHER MAIDEN NAME LAST
;; 04 MOTHER MAIDEN NAME FIRST
;; 05 MOTHER MAIDEN NAME MIDDLE INITIAL
;; 06 DATE OF DEATH
;; 07 MEDICARE A ELIGIBLE
;; 08 MEDICARE A ENROLL NUMBER
;; 09 MEDICARE A SUFFIX
;; 10 MEDICARE A ELIGIBILITY
;; 11 MEDICARE B ELIGIBLE
;; 12 MEDICARE B ENROLL NUMBER
;; 13 MEDICARE B SUFFIX
;; 14 MEDICARE B ELIGIBILITY
;; 15 MEDICARE AB ELIGIBLE
;; 16 MEDICARE AB ENROLL NUMBER
;; 17 MEDICARE AB SUFFIX
;; 18 MEDICARE AB ELIGIBILITY
;; 19 MEDICAID ELIGIBLE
;; 20 MEDICAID NUMBER
;; 21 MEDICAID SUFFIX
;; 22 MEDICAID ELIGIBILITY DATE
;; 23 VETERAN
;; 24 BLUE CROSS ELIGIBLE
;; 25 OTHER ELIGIBLE
;; 26 CHS ELIGIBILITY
;; 27 PATIENT SIGNED
;; 28 ADD/MODIFY CODE
;; 29 OPT/MM RELEASE DATE
;; 30 ELIGIBILITY CODE
;; 31 DATE ESTABLISHED
;; 32 SSN VERIFICATION STATUS
;; 33 MEDICAID STATE OF ELIGIBILITY
;; 34 MEDICAID TYPE OF COVERAGE
;; 35 DATE OF LAST UPDATE
;;--------------------------------------------------------------------
;;*** RG3 RECORD LAYOUT ***
;; 01 "RG3"
;; 02 UNIQUE REGISTRATION ID
;; 03
;; 04
;; 05
;; 06
;; 07
;; 08
;; 09
;;--------------------------------------------------------------------
;;*** RG4 RECORD LAYOUT ***
;; 01 "RG4"
;; 02 UNIQUE REGISTRATION ID
;; 03 ASUFAC OF HRN IN 07
;; 04 FIRST LETTER OF LN
;; 05 FIRST LETTER OF FN
;; 06 SEX
;; 07 HRN OF ASUFAC IN 03
;; 08 OFFICIAL REGISTERING FACILITY (Y/N/blank) OF ASUFAC IN 09
;; 09 ASUFAC OF HRN IN 10
;; 10 HRN OF ASUFAC IN 09
;;--------------------------------------------------------------------
;;*** RG5 RECORD LAYOUT ***
;; 01 "RG5"
;; 02 UNIQUE REGISTRATION ID
;; 03 ELIGIBILITY ENROLLMENT NUMBER
;; 04 SUFFIX
;; 05 ELIG TYPE: 1=A, 2=B, 3=AB, 4=M
;; 06 DATE OF BIRTH
;; 07 ELIG BEGIN DATE
;; 08 MEDICARE LAST NAME
;; 09 MEDICARE FIRST NAME
;; 10 MEDICARE MIDDLE NAME
;; 11 MEDICAID LAST NAME
;; 12 MEDICAID FIRST NAME
;; 13 MEDICAID MIDDLE NAME
;; 14 MEDICARE DATE OF BIRTH
;; 15 MEDICAID DATE OF BIRTH
;; 16 MEDICARE A ELIG. END DATE
;; 17 MEDICARE B ELIG. END DATE
;; 18 MEDICARE AB ELIG. END DATE
;; 19 MEDICAID ELIG. END DATE
;; 20 ASUFAC FROM RPMS SITE FILE
;;--------------------------------------------------------------------
;;*** RG6 Communities
;; 01 "RG6"
;; 02 UNIQUE REGISTRATION ID
;; 03 DATE MOVED TO COMMUNITY
;; 04 COMMUNITY CODE Community/County/State
;; 05 ASUFAC FROM RPMS SITE FILE
;;--------------------------------------------------------------------
;;*** RG7 Aliases
;; 01 "RG7"
;; 02 UNIQUE REGISTRATION ID
;; 03 ALIAS LAST NAME
;; 04 ALIAS FIRST NAME
;; 05 ALIAS MIDDLE NAME
;; 06 ASUFAC FROM RPMS SITE FILE
;;--------------------------------------------------------------------
;;*** RG8 Insurance Eligibilities
;; 01 "RG8" MCR MCD RRE PVT
;; 02 UNIQUE REGISTRATION ID
;; 03 INSURANCE CATEGORY ("MCR"/"MCD"/"RRE"/"PVT")
;; 04 ELIGIBILITY BEGIN DATE .01 .01 .01 .06
;; 05 ELIGIBILITY END DATE .02 .02 .02 .07
;; 06 COVERAGE TYPE .03 .03 .03
;; 07 INSURER NAME .02 .02 .02 .01
;; 08 INSURER EIN obtain from INSURER file
;; 09 POLICY NUMBER .03 .03 .04
;; 10 NUMBER PREFIX/SUFFIX .04 .03
;; 11 LAST NAME
;; 12 FIRST NAME
;; 13 MIDDLE NAME
;; 14 DATE OF BIRTH 2102 2102 2102
;; 15 MCD GENDER .07
;; 16 MCD STATE .04
;; 17 PVT INS VERIFIED COVERAGE DATE .09
;; 18 PVT INS PERSON CODE .12
;; 19 POLICY HOLDER LAST NAME
;; 20 POLICY HOLDER FIRST NAME
;; 21 POLICY HOLDER MIDDLE NAME
;; 22 MEDICAID PLAN NAME .11
;; 23 MEDICAID CASE NUMBER .13
;; 24 MEDICAID RATE CODE .12
;; 25 MEDICAID DATE OF LAST UPDATE .08
;; 26 MEDICARE SECONDARY PAYER .05
;; 27 RELATIONSHIP TO INSURED .06 .05
;; 28 ASUFAC FROM RPMS SITE FILE
;; 29 MCR/MCD/RRE NAME 2101 2101 2101
;
AGTXDOC ;IHS/ASDS/EFG - EXPORT RECORD DOCUMENTATION ;
+1 ;;7.1;PATIENT REGISTRATION;;AUG 25,2005
+2 ;
+3 ;NOTE:
+4 ;The piece numbers are -AFTER- SET'ing to the export global, b/c
+5 ;Unique Registration ID is -INSERTED- as piece 2 to all records.
+6 ;This means that, as of patch 14, you have to subtract 1 from the
+7 ;piece numbers, below, when you're actually reading the AGTX*
+8 ;routines.
+9 ;
+10 ;; DEMOGRAPHICS RECORD LAYOUT
+11 ;;--------------------------------------------------------------------
+12 ;;*** RG1 RECORD LAYOUT ***
+13 ;; Piece #
+14 ;; 01 "RG1"
+15 ;; 02 UNIQUE REGISTRATION ID
+16 ;; 03 ASUFAC OF HRN IN 04
+17 ;; 04 HRN OF ASUFAC IN 03
+18 ;; 05 LAST NAME
+19 ;; 06 FIRST NAME
+20 ;; 07 MIDDLE NAME
+21 ;; 08 CLASSIFICATION CODE
+22 ;; 09 DATE OF BIRTH
+23 ;; 10 SEX
+24 ;; 11 SOCIAL SECURITY NUMBER
+25 ;; 12 TRIBE CODE
+26 ;; 13 BLOOD QUANTUM
+27 ;; 14 FATHER LAST NAME
+28 ;; 15 FATHER FIRST NAME
+29 ;; 16 FATHER MIDDLE INITIAL
+30 ;; 17 COMMUNITY OF RESIDENCE
+31 ;; 18 MAILING ADDRESS STREET
+32 ;; 19 MAILING ADDRESS TOWN
+33 ;; 20 MAILING ADDRESS STATE
+34 ;; 21 MAILING ADDRESS ZIP
+35 ;;--------------------------------------------------------------------
+36 ;;*** RG2 RECORD LAYOUT ***
+37 ;; 01 "RG2"
+38 ;; 02 UNIQUE REGISTRATION ID
+39 ;; 03 MOTHER MAIDEN NAME LAST
+40 ;; 04 MOTHER MAIDEN NAME FIRST
+41 ;; 05 MOTHER MAIDEN NAME MIDDLE INITIAL
+42 ;; 06 DATE OF DEATH
+43 ;; 07 MEDICARE A ELIGIBLE
+44 ;; 08 MEDICARE A ENROLL NUMBER
+45 ;; 09 MEDICARE A SUFFIX
+46 ;; 10 MEDICARE A ELIGIBILITY
+47 ;; 11 MEDICARE B ELIGIBLE
+48 ;; 12 MEDICARE B ENROLL NUMBER
+49 ;; 13 MEDICARE B SUFFIX
+50 ;; 14 MEDICARE B ELIGIBILITY
+51 ;; 15 MEDICARE AB ELIGIBLE
+52 ;; 16 MEDICARE AB ENROLL NUMBER
+53 ;; 17 MEDICARE AB SUFFIX
+54 ;; 18 MEDICARE AB ELIGIBILITY
+55 ;; 19 MEDICAID ELIGIBLE
+56 ;; 20 MEDICAID NUMBER
+57 ;; 21 MEDICAID SUFFIX
+58 ;; 22 MEDICAID ELIGIBILITY DATE
+59 ;; 23 VETERAN
+60 ;; 24 BLUE CROSS ELIGIBLE
+61 ;; 25 OTHER ELIGIBLE
+62 ;; 26 CHS ELIGIBILITY
+63 ;; 27 PATIENT SIGNED
+64 ;; 28 ADD/MODIFY CODE
+65 ;; 29 OPT/MM RELEASE DATE
+66 ;; 30 ELIGIBILITY CODE
+67 ;; 31 DATE ESTABLISHED
+68 ;; 32 SSN VERIFICATION STATUS
+69 ;; 33 MEDICAID STATE OF ELIGIBILITY
+70 ;; 34 MEDICAID TYPE OF COVERAGE
+71 ;; 35 DATE OF LAST UPDATE
+72 ;;--------------------------------------------------------------------
+73 ;;*** RG3 RECORD LAYOUT ***
+74 ;; 01 "RG3"
+75 ;; 02 UNIQUE REGISTRATION ID
+76 ;; 03
+77 ;; 04
+78 ;; 05
+79 ;; 06
+80 ;; 07
+81 ;; 08
+82 ;; 09
+83 ;;--------------------------------------------------------------------
+84 ;;*** RG4 RECORD LAYOUT ***
+85 ;; 01 "RG4"
+86 ;; 02 UNIQUE REGISTRATION ID
+87 ;; 03 ASUFAC OF HRN IN 07
+88 ;; 04 FIRST LETTER OF LN
+89 ;; 05 FIRST LETTER OF FN
+90 ;; 06 SEX
+91 ;; 07 HRN OF ASUFAC IN 03
+92 ;; 08 OFFICIAL REGISTERING FACILITY (Y/N/blank) OF ASUFAC IN 09
+93 ;; 09 ASUFAC OF HRN IN 10
+94 ;; 10 HRN OF ASUFAC IN 09
+95 ;;--------------------------------------------------------------------
+96 ;;*** RG5 RECORD LAYOUT ***
+97 ;; 01 "RG5"
+98 ;; 02 UNIQUE REGISTRATION ID
+99 ;; 03 ELIGIBILITY ENROLLMENT NUMBER
+100 ;; 04 SUFFIX
+101 ;; 05 ELIG TYPE: 1=A, 2=B, 3=AB, 4=M
+102 ;; 06 DATE OF BIRTH
+103 ;; 07 ELIG BEGIN DATE
+104 ;; 08 MEDICARE LAST NAME
+105 ;; 09 MEDICARE FIRST NAME
+106 ;; 10 MEDICARE MIDDLE NAME
+107 ;; 11 MEDICAID LAST NAME
+108 ;; 12 MEDICAID FIRST NAME
+109 ;; 13 MEDICAID MIDDLE NAME
+110 ;; 14 MEDICARE DATE OF BIRTH
+111 ;; 15 MEDICAID DATE OF BIRTH
+112 ;; 16 MEDICARE A ELIG. END DATE
+113 ;; 17 MEDICARE B ELIG. END DATE
+114 ;; 18 MEDICARE AB ELIG. END DATE
+115 ;; 19 MEDICAID ELIG. END DATE
+116 ;; 20 ASUFAC FROM RPMS SITE FILE
+117 ;;--------------------------------------------------------------------
+118 ;;*** RG6 Communities
+119 ;; 01 "RG6"
+120 ;; 02 UNIQUE REGISTRATION ID
+121 ;; 03 DATE MOVED TO COMMUNITY
+122 ;; 04 COMMUNITY CODE Community/County/State
+123 ;; 05 ASUFAC FROM RPMS SITE FILE
+124 ;;--------------------------------------------------------------------
+125 ;;*** RG7 Aliases
+126 ;; 01 "RG7"
+127 ;; 02 UNIQUE REGISTRATION ID
+128 ;; 03 ALIAS LAST NAME
+129 ;; 04 ALIAS FIRST NAME
+130 ;; 05 ALIAS MIDDLE NAME
+131 ;; 06 ASUFAC FROM RPMS SITE FILE
+132 ;;--------------------------------------------------------------------
+133 ;;*** RG8 Insurance Eligibilities
+134 ;; 01 "RG8" MCR MCD RRE PVT
+135 ;; 02 UNIQUE REGISTRATION ID
+136 ;; 03 INSURANCE CATEGORY ("MCR"/"MCD"/"RRE"/"PVT")
+137 ;; 04 ELIGIBILITY BEGIN DATE .01 .01 .01 .06
+138 ;; 05 ELIGIBILITY END DATE .02 .02 .02 .07
+139 ;; 06 COVERAGE TYPE .03 .03 .03
+140 ;; 07 INSURER NAME .02 .02 .02 .01
+141 ;; 08 INSURER EIN obtain from INSURER file
+142 ;; 09 POLICY NUMBER .03 .03 .04
+143 ;; 10 NUMBER PREFIX/SUFFIX .04 .03
+144 ;; 11 LAST NAME
+145 ;; 12 FIRST NAME
+146 ;; 13 MIDDLE NAME
+147 ;; 14 DATE OF BIRTH 2102 2102 2102
+148 ;; 15 MCD GENDER .07
+149 ;; 16 MCD STATE .04
+150 ;; 17 PVT INS VERIFIED COVERAGE DATE .09
+151 ;; 18 PVT INS PERSON CODE .12
+152 ;; 19 POLICY HOLDER LAST NAME
+153 ;; 20 POLICY HOLDER FIRST NAME
+154 ;; 21 POLICY HOLDER MIDDLE NAME
+155 ;; 22 MEDICAID PLAN NAME .11
+156 ;; 23 MEDICAID CASE NUMBER .13
+157 ;; 24 MEDICAID RATE CODE .12
+158 ;; 25 MEDICAID DATE OF LAST UPDATE .08
+159 ;; 26 MEDICARE SECONDARY PAYER .05
+160 ;; 27 RELATIONSHIP TO INSURED .06 .05
+161 ;; 28 ASUFAC FROM RPMS SITE FILE
+162 ;; 29 MCR/MCD/RRE NAME 2101 2101 2101
+163 ;