©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
DG311PTR ;ALB/JJG-Patient Relation Pointer Utility ; 23 MAY 2000
Source file <DG311PTR.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | ($$NEWCP,$$PARCP,$$UPCP)^XPDUTL |
| Registration | 1 | $$UPD^DGENDBS |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;entry point for post-install, setting up checkpoints
|
|
| MAIN | ;Main Driver
|
|
| UPDATE | ;Update .02 field in Individual Annual Income file
|
|
| LOOP | ; Locate and correct invalid pointers
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DGMT(408.21 - [#408.21] | LOOP+4 |
| ^DGMT(408.22 - [#408.22] | LOOP+6, LOOP+7 |
| ^DGPR(408.12 - [#408.12] | LOOP+10 |
| Name | Line Occurrences |
|---|---|
| LOOP | MAIN+3 |
| UPDATE | LOOP+11 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | POST+1~, POST+2*, LOOP+12* |
| DATA | UPDATE+1~, UPDATE+3 |
| DATA( | UPDATE+2* |
| DGENDA | UPDATE+1~, UPDATE+2*, UPDATE+3 |
| DGIEN2 | LOOP+1~, LOOP+8*, LOOP+10 |
| DGIEN21 | LOOP+1~, LOOP+2*, LOOP+3*, LOOP+4*, LOOP+6, LOOP+12, UPDATE+2 |
| DGIEN22 | LOOP+1~, LOOP+5*, LOOP+6*, LOOP+7 |
| DGNOD22 | LOOP+1~, LOOP+7*, LOOP+8 |
| DGRECNT | MAIN+1~, MAIN+2*, UPDATE+4* |
| DGRLIEN | LOOP+1~, LOOP+9*, LOOP+10*, UPDATE+2 |
| ERROR | UPDATE+1~, UPDATE+2*, UPDATE+3 |
| >> XPDNM | POST+2, LOOP+3, LOOP+12 |