©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
AMEREDDY ; IHS/OIT/SCR - Sub-routine for ER VISIT EDIT of DX information - Overflow from ^AMEREDDX
Source file <AMEREDDY.m>
| Package | Total | Call Graph |
|---|---|---|
| VA Fileman | 3 | ^DIC ^DIE ^DIK |
| DRG Grouper | 1 | $$CODEN^ICDCODE |
| Kernel | 1 | $$NOW^XLFDT |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DELVPOV(AMERDA,DIEN) | ; DELETE THE V POV ENTRY CORRESPONDING TO THE DELETED ER VISIT FILE DX THAT WILL BE DELETED
|
|
| EPX | ; EP - UPDATE V POV PROPERTIES VIA DIE
|
|
| NARR(X) | ; RETURN THE IEN OF A PROVIDER NARRATIVE ENTRY - IF NECESSARY CREAT THE ENTRY
|
|
| EPY | ||
| UPVPOV(AMERNDX,AMERODX,AMERNNAR,AMERONAR,AMERDA) | ; If a secondary V POV record is edited, sync the corresponding V POV record
|
|
| ADDVPOV(ICD,AMERNNAR,AMERDA) | ; EP - ADD NEW V POV ENTRY CORRESPONDING TO NEW ER VISIT FILE DX
|
| FileNo | Call Tags |
|---|---|
| ^AUPNVPOV - [#9000010.07] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AMERVSIT - [#9009080] | UPVPOV+4, EPX+4, EPX+6, DELVPOV+4, DELVPOV+5, DELVPOV+6, ADDVPOV+4 |
| ^AUPNVPOV - [#9000010.07] | UPVPOV+12, EPX+10, EPX+14, EPY, DELVPOV+10, DELVPOV+11, ADDVPOV+9 |
| ^AUPNVPOV("AD" | UPVPOV+12, DELVPOV+9, ADDVPOV+9 |
| ^AUPNVSIT - [#9000010] | EPX+1, EPX+2 |
| ^AUTNPOV("B" | DELVPOV+7 |
| ^ICD9("BA" | UPVPOV+5, UPVPOV+8, ADDVPOV+5 |
| Name | Line Occurrences |
|---|---|
| $$NARR | EPX+19 |
| EPX | ADDVPOV+15 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | UPVPOV+3~, EPX+6*, EPX+7, DELVPOV+3~, ADDVPOV+3~ |
| AMERDA | UPVPOV~, UPVPOV+1, UPVPOV+4, EPX+4, EPX+6, DELVPOV~, DELVPOV+1, DELVPOV+4, DELVPOV+5, DELVPOV+6 , ADDVPOV~, ADDVPOV+1, ADDVPOV+4 |
| AMERNDX | UPVPOV~, UPVPOV+1, UPVPOV+8, UPVPOV+9, EPX+9 |
| AMERNNAR | UPVPOV~, UPVPOV+1, EPX+18, EPX+19, ADDVPOV~, ADDVPOV+1 |
| AMERODX | UPVPOV~, UPVPOV+1, UPVPOV+5, UPVPOV+6, EPX+9 |
| AMERONAR | UPVPOV~, EPX+18 |
| CSIEN | UPVPOV+3~, EPX+2* |
| DA | UPVPOV+3~, UPVPOV+14*, EPX+10, EPX+14, EPY, DELVPOV+3~, DELVPOV+8*, DELVPOV+9*, DELVPOV+10, DELVPOV+11 , DELVPOV+14, ADDVPOV+3~, ADDVPOV+14* |
| DFN | UPVPOV+3~, EPX+1*, ADDVPOV+3~ |
| DIC | UPVPOV+3~, NARR+3~, NARR+4*, ADDVPOV+3~, ADDVPOV+11* |
| DIC(0 | NARR+4*, ADDVPOV+11* |
| DIE | UPVPOV+3~, UPVPOV+14*, ADDVPOV+3~, ADDVPOV+11* |
| DIEN | DELVPOV~, DELVPOV+1, DELVPOV+4, DELVPOV+6 |
| DIK | DELVPOV+3~, DELVPOV+15* |
| DLAYGO | NARR+3~, NARR+4*, ADDVPOV+3~, ADDVPOV+11* |
| DR | UPVPOV+3~, UPVPOV+14*, EPX+8*, EPX+9*, EPX+11*, EPX+12*, EPX+15*, EPX+16*, EPX+20*, EPX+21* , EPX+23*, EPX+24*, ADDVPOV+3~ |
| ICD | ADDVPOV~, ADDVPOV+1, ADDVPOV+5, ADDVPOV+6, ADDVPOV+9 |
| IEN | UPVPOV+3~, UPVPOV+11*, UPVPOV+12*, UPVPOV+13, UPVPOV+14, DELVPOV+3~, ADDVPOV+3~, ADDVPOV+8*, ADDVPOV+9*, ADDVPOV+10 |
| IIEN | UPVPOV+8*, UPVPOV+9*, UPVPOV+10, DELVPOV+3~, DELVPOV+4*, DELVPOV+10, ADDVPOV+3~, ADDVPOV+5*, ADDVPOV+6*, ADDVPOV+7 , ADDVPOV+9, ADDVPOV+12, ADDVPOV+14 |
| NARR | DELVPOV+3~, DELVPOV+6*, DELVPOV+7 |
| NIEN | EPX+19*, DELVPOV+3~, DELVPOV+7*, DELVPOV+11, ADDVPOV+3~ |
| NOW | UPVPOV+3~, EPX+3* |
| OIEN | UPVPOV+5*, UPVPOV+6*, UPVPOV+7, UPVPOV+12, EPX+7, ADDVPOV+3~, ADDVPOV+14* |
| PRVIEN | UPVPOV+3~, EPX+4* |
| PS | UPVPOV+3~, EPX+5*, EPX+7* |
| STAT | UPVPOV+3~ |
| STOP | DELVPOV+3~, DELVPOV+8*, DELVPOV+9, DELVPOV+12* |
| U | UPVPOV+4, EPX+1, EPX+2, EPX+4, EPX+6, EPX+10, EPX+14, DELVPOV+5, DELVPOV+11, ADDVPOV+4 |
| VIEN | UPVPOV+3~, UPVPOV+4*, UPVPOV+12, EPX+1, EPX+2, DELVPOV+3~, DELVPOV+5*, DELVPOV+9, ADDVPOV+3~, ADDVPOV+4* , ADDVPOV+9 |
| X | UPVPOV+3~, NARR~, NARR+1, DELVPOV+3~, ADDVPOV+3~, ADDVPOV+12* |
| Y | UPVPOV+3~, NARR+3~, NARR+5, NARR+6, DELVPOV+3~, ADDVPOV+3~, ADDVPOV+13, ADDVPOV+14 |
| Z | UPVPOV+3~, DELVPOV+3~, ADDVPOV+3~ |