DG311PIR ;ALB/JJG-Total Dependents Calculation Utility ; 07 AUG 2000
Source file <DG311PIR.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;entry point for post-install, setting up checkpoints
|
|
| MAIN | ;Main Driver
|
|
| LOOP | ; Locate and correct incorrect TOTAL DEPENDENTS field
|
|
| UPDATE | ;Update .18 field of ANNUAL MEANS TEST file
|
|
| BUILDLN | ; Build storage array with data
|
|
| ATRXREF | ; Add entry into the 'ATR' cross reference of the IVM PATIENT (#301.5)
; file so that demographic and income information will be transmitted ; to the IVM Center. |
| Name | Field # of Occurrence |
|---|---|
| DD^%DT | BUILDLN+12 |
| MAIN^DG311PTR | MAIN+7 |
| $$UPD^DGENDBS | UPDATE+10, UPDATE+29, ATRXREF+17 |
| AFTER^DGMTEVT | UPDATE+30 |
| EN^DGMTEVT | UPDATE+31 |
| PRIOR^DGMTEVT | UPDATE+28 |
| PAR^DGMTSCU | MAIN+5 |
| SET^DGMTSCU2 | UPDATE+12 |
| GETREL^DGMTU11 | LOOP+17 |
| $$NEWCP^XPDUTL | POST+2 |
| $$PARCP^XPDUTL | LOOP+4 |
| $$UPCP^XPDUTL | LOOP+21 |
| BMES^XPDUTL | MAIN+3, MAIN+8, MAIN+9 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.21 - [#408.21] | UPDATE+6 |
| ^DGMT(408.22 - [#408.22] | UPDATE+3, UPDATE+4 |
| ^DGMT(408.31 - [#408.31] | LOOP+6, LOOP+8, LOOP+9 |
| ^DGPR(408.12 - [#408.12] | UPDATE+8 |
| ^DPT - [#2] | BUILDLN+8 |
| ^IVM(301.5 - [#301.5] | ATRXREF+6, ATRXREF+7, ATRXREF+11* |
| ^XTMP("DG311PIR" | BUILDLN+15* |
| Name | Field # of Occurrence |
|---|---|
| ^( | BUILDLN+8 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | POST+1~, POST+2*, LOOP+21* |
| DATA | UPDATE+1~, UPDATE+10, UPDATE+13!, UPDATE+29, ATRXREF+15!, ATRXREF+17 |
| DATA( | UPDATE+9*, UPDATE+14*, UPDATE+22*, UPDATE+23*, UPDATE+24*, ATRXREF+16* |
| DFN | UPDATE+1~, UPDATE+2*, UPDATE+3, BUILDLN+8, BUILDLN+9 |
| DGDEC | LOOP+1~, LOOP+15* |
| >> DGDEP | LOOP+18, UPDATE+9 |
| DGDEPC | LOOP+1~, LOOP+18*, LOOP+19*, LOOP+20, UPDATE+14 |
| DGENDA | UPDATE+1~, UPDATE+9*, UPDATE+10, UPDATE+26*, UPDATE+27, UPDATE+29 |
| DGHARD | LOOP+2~, LOOP+16*, UPDATE+19, UPDATE+20 |
| DGIEN2 | LOOP+1~, LOOP+10*, LOOP+17, UPDATE+2, ATRXREF+6 |
| DGIEN31 | LOOP+1~, LOOP+7*, LOOP+8*, LOOP+9, LOOP+17, UPDATE+2, UPDATE+26 |
| DGINY | BUILDLN+5~, BUILDLN+13*, BUILDLN+15 |
| DGLY | MAIN+1~, MAIN+4* |
| DGMTACT | UPDATE+1~, UPDATE+27* |
| DGMTDT | LOOP+1~, LOOP+3*, LOOP+4*, LOOP+5*, LOOP+6*, LOOP+8, LOOP+17, LOOP+21, BUILDLN+11 |
| DGMTI | UPDATE+1~, UPDATE+2*, UPDATE+27* |
| DGMTINF | UPDATE+1~, UPDATE+27* |
| DGMTPAR | MAIN+1~ |
| >> DGMTS | UPDATE+22, UPDATE+24, UPDATE+25*, BUILDLN+15 |
| DGMTYPT | LOOP+1~, LOOP+12*, UPDATE+12, UPDATE+20 |
| DGNAME | BUILDLN+5~, BUILDLN+8*, BUILDLN+9*, BUILDLN+15 |
| DGNOD31 | LOOP+1~, LOOP+9*, LOOP+10, LOOP+11, LOOP+12, LOOP+13, LOOP+14, LOOP+15, LOOP+16 |
| DGPAY | LOOP+1~, LOOP+14* |
| DGPRIEN | UPDATE+1~, UPDATE+6*, UPDATE+7, UPDATE+8 |
| DGRECNT | MAIN+1~, MAIN+2*, MAIN+9, UPDATE+32* |
| DGREL | UPDATE+1~, UPDATE+2*, UPDATE+3, UPDATE+8*, UPDATE+9, UPDATE+11 |
| DGREL("S" | LOOP+19 |
| DGSSN | BUILDLN+5~, BUILDLN+8*, BUILDLN+10*, BUILDLN+15 |
| DGSTA | LOOP+1~, LOOP+11*, UPDATE+12, UPDATE+19, UPDATE+20, UPDATE+25, BUILDLN+15 |
| >> DGTHA | UPDATE+23 |
| DGTOTD | LOOP+1~, LOOP+13*, LOOP+20 |
| DGUPSW | UPDATE+1~, UPDATE+2*, UPDATE+19*, UPDATE+20*, UPDATE+21 |
| DGVINI | UPDATE+1~, UPDATE+4*, UPDATE+5, UPDATE+6 |
| DGVIRI | UPDATE+1~, UPDATE+2*, UPDATE+3*, UPDATE+4, UPDATE+9 |
| ERROR | UPDATE+1~, UPDATE+9*, UPDATE+10, UPDATE+26*, UPDATE+29, ATRXREF+16*, ATRXREF+17 |
| IVIEN | ATRXREF+4~, ATRXREF+5*, ATRXREF+6*, ATRXREF+7, ATRXREF+9 |
| IVIY | ATRXREF+4~, ATRXREF+8*, ATRXREF+9 |
| IVLAST | ATRXREF+4~, ATRXREF+5*, ATRXREF+9* |
| >> IVLIEN | ATRXREF+5*, ATRXREF+9*, ATRXREF+10, ATRXREF+11, ATRXREF+17 |
| IVNOD | ATRXREF+4~, ATRXREF+7*, ATRXREF+8, ATRXREF+12, ATRXREF+13 |
| IVSF | ATRXREF+4~, ATRXREF+13*, ATRXREF+14 |
| IVTS | ATRXREF+4~, ATRXREF+12*, ATRXREF+14 |
| U | MAIN+2*, UPDATE+4, UPDATE+6, UPDATE+8, ATRXREF+8, ATRXREF+12, ATRXREF+13 |
| >> XPDNM | POST+2, LOOP+4, LOOP+21 |
| >> Y | BUILDLN+11*, BUILDLN+13 |
