©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
AGEDPRV1 ;IHS/ASDS/TPF - EDIT/DISPLAY PRIVATE INSURANCE PAGE A OVERFLOW CODE ;
Source file <AGEDPRV1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 2 | FILE^DICN ^DIR |
| IHS Patient Registration | 1 | (ADDPOLH,PHEDALL)^AGEDPRVP |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DISPHLP(ID0,FIELD) | ;EP -
|
|
| PUTPOLH(NEWPH,PATPTR,POLHPTR,TYPE,FIELD,SAME,EXIT,INSPTR) | ;EP -
|
|
| NOTREG(POLHPTR) | ;EP - IS THIS POLICY HOLDER REGISTERED?
|
|
| CONFIRM | ;EP -
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Function Call: WRITE |
|
| Routine Call |
|
| FileNo | Call Tags |
|---|---|
| ^AUPN3PPH - [#9000003.1] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPN3PPH - [#9000003.1] | NOTREG+3 |
| ^DD(9000003.1 | PUTPOLH+10 |
| ^DPT - [#2] | NOTREG+4 |
| Name | Line Occurrences |
|---|---|
| DISPHLP | PUTPOLH+23 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| >> AGINSPTR | PUTPOLH+16 |
| DA | PUTPOLH+3!, PUTPOLH+24! |
| DD | PUTPOLH+3!, PUTPOLH+20!, PUTPOLH+24! |
| DIC | PUTPOLH+3!, PUTPOLH+19*, PUTPOLH+24! |
| DIC("DR" | PUTPOLH+13*, PUTPOLH+14*, PUTPOLH+15*, PUTPOLH+16* |
| DIC(0 | PUTPOLH+18* |
| DIE | PUTPOLH+3!, PUTPOLH+24! |
| DINUM | PUTPOLH+3!, PUTPOLH+20!, PUTPOLH+24! |
| DIR | CONFIRM+1!, PUTPOLH+3!, PUTPOLH+24! |
| DIR("A" | CONFIRM+3* |
| DIR(0 | CONFIRM+2* |
| DO | PUTPOLH+3!, PUTPOLH+20!, PUTPOLH+24! |
| DR | PUTPOLH+3! |
| EXIT | CONFIRM+5*, PUTPOLH~, PUTPOLH+5, PUTPOLH+23*, PUTPOLH+26*, PUTPOLH+29* |
| FIELD | DISPHLP~, PUTPOLH~, PUTPOLH+23 |
| FIELD( | PUTPOLH+5, PUTPOLH+7, PUTPOLH+10, PUTPOLH+13, PUTPOLH+14 |
| FIELD("2" | PUTPOLH+17 |
| >> FILE | PUTPOLH+4*, PUTPOLH+5*, PUTPOLH+7, PUTPOLH+8, PUTPOLH+9, PUTPOLH+10, PUTPOLH+13, PUTPOLH+14 |
| >> FLD | PUTPOLH+6*, PUTPOLH+7*, PUTPOLH+8, PUTPOLH+9, PUTPOLH+10, PUTPOLH+13, PUTPOLH+14 |
| ID0 | DISPHLP~, CONFIRM+8, PUTPOLH+23 |
| >> ID1 | CONFIRM+8 |
| INSPTR | PUTPOLH~, PUTPOLH+28 |
| NEWPH | PUTPOLH~ |
| NEWPTR | CONFIRM+5! |
| >> NFLD | PUTPOLH+8*, PUTPOLH+9*, PUTPOLH+10, PUTPOLH+13, PUTPOLH+14 |
| PATPTR | NOTREG+2~, NOTREG+3*, NOTREG+4, NOTREG+5, PUTPOLH~, PUTPOLH+15, PUTPOLH+28 |
| POLHPTR | NOTREG~, NOTREG+1, NOTREG+3, CONFIRM+5!, CONFIRM+8, PUTPOLH~, PUTPOLH+22*, PUTPOLH+23, PUTPOLH+26, PUTPOLH+28 |
| >> REGISTER | CONFIRM+7, CONFIRM+8 |
| SAME | CONFIRM+8, PUTPOLH~, PUTPOLH+28 |
| >> TARGET | CONFIRM+3, CONFIRM+8 |
| TYPE | PUTPOLH~, PUTPOLH+2, PUTPOLH+25*, PUTPOLH+28 |
| U | NOTREG+3, PUTPOLH+10 |
| X | PUTPOLH+3!, PUTPOLH+10*, PUTPOLH+17*, PUTPOLH+24! |
| >> Y | CONFIRM+5, PUTPOLH+22 |