Call Graph
Call Graph Total: 6
| Package | Total | Call Graph |
|---|---|---|
| PCE Patient Care Encounter | 4 | PL^PXBGPL $$CSDATE^PXDXUTL GETSAFORVPOV^PXSPECAUTH $$DXNARR^PXUTL1 |
| DRG Grouper | 1 | $$ICDDATA^ICDXCODE |
| VA FileMan | 1 | EN^DIQ1 |
PXBGPOV ;ISL/JVS,ESW - GATHER POV (DIAGNOSIS) ;Aug 04, 2025@08:39:34
Source file <PXBGPOV.m>
| Package | Total | Call Graph |
|---|---|---|
| PCE Patient Care Encounter | 4 | PL^PXBGPL $$CSDATE^PXDXUTL GETSAFORVPOV^PXSPECAUTH $$DXNARR^PXUTL1 |
| DRG Grouper | 1 | $$ICDDATA^ICDXCODE |
| VA FileMan | 1 | EN^DIQ1 |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POV(VISIT) | ;--Gather the entries in the V POV file
|
|
| A | ;--Set array with DIAGNOSIS codes
|
|
| B | ;--Add line numbers
|
|
| FINISG | ;--finish up some variables
|
|
| EXIT | ;--KILL
|
|
| XLATE(VST,DX) | ;Translate DX into POV from VST
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVPOV - [#9000010.07] | XLATE+6 |
| ^AUPNVPOV("AD" | POV+8, POV+9, XLATE+1, XLATE+5 |
| ^TMP("PXBGPOVMATCH" | A+25* |
| ^TMP("PXBKYPL" | A+9, EXIT+1! |
| ^TMP("PXBPOV" | A+24*, B+2, B+3, B+4, B+5, EXIT+2! |
| ^TMP("PXBSAMPL" | EXIT+1! |
| ^TMP("PXBU" | POV+5!, POV+10*, A+3, A+4, EXIT+1! |
| ^UTILITY("DIQ1" | POV+6!, A+6, A+7, A+8, A+10, A+11, A+12, A+13, A+15, EXIT+2! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ANS | XLATE+3~*, XLATE+4, XLATE+5*, XLATE+6*, XLATE+7*, XLATE+9 |
| CODE | POV+2~, A+28*, A+29, A+30 |
| DA | POV+2~, A+5*, A+6, A+7, A+8, A+10, A+11, A+12, A+13, A+15 |
| DIC | POV+2~, A+5* |
| DIQ | POV+2~ |
| DIQ(0 | A+5* |
| DR | POV+2~, A+5* |
| DX | XLATE~, XLATE+1, XLATE+2*, XLATE+6, XLATE+7 |
| >> FPRI | POV+7*, A+20*, FINISG+2* |
| GROUP | POV+2~, A+21*, A+24, A+26, A+28*, A+30*, A+31 |
| I | POV+2~ |
| IEN | POV+2~, POV+9*, POV+10, A+4*, A+5, A+24, A+25, A+27, A+31, B+4* , B+5, B+6, B+8, XLATE+3~*, XLATE+5*, XLATE+6, XLATE+7 |
| >> LNARR | A+7*, A+19*, A+21 |
| NODE800 | POV+3~ |
| NOPLLIST | POV+5!, A+26* |
| >> ORDER | A+12*, A+21 |
| >> PATIENT | A+2 |
| PKG | POV+2~, A+13*, A+14* |
| POV | POV+2~, POV+5!, A+8*, A+9, A+21, A+23, A+24, B+3*, B+4, B+5 |
| POVI | POV+2~, A+10*, A+18, A+19, A+25, A+31 |
| PRIM | POV+2~, A+11*, A+20, A+21, A+23 |
| PROBLEM | POV+2~, POV+7*, A+9*, A+21 |
| PROVIDER | POV+2~, A+6*, A+21 |
| PXBC | POV+3~, B+3*, B+4*, B+5, B+6, B+7, B+8, EXIT+3 |
| >> PXBCNT | EXIT+3* |
| PXBKY | POV+5! |
| PXBKY( | B+5* |
| PXBPL | POV+3~ |
| PXBPLA | POV+3~ |
| PXBREQ | POV+3~ |
| PXBREQ( | A+31* |
| PXBSAM | POV+5! |
| PXBSAM( | B+5*, B+7*, B+8* |
| PXBSKY | POV+5! |
| PXBSKY( | B+6* |
| PXBSKYPL | EXIT+1! |
| PXCI | POV+3~ |
| PXCI( | A+31*, B+8 |
| PXDIGNS | POV+5! |
| PXDIGNS("PRIMARY" | A+23* |
| PXDXDATE | POV+3~, A+17*, A+18, A+19 |
| PXSAS | POV+3~, A+27 |
| PXSAS( | A+28, A+29, A+30 |
| QUANTITY | POV+3~ |
| SNARR | POV+3~, A+18*, A+21 |
| SOURC | POV+3~, A+15*, A+16* |
| U | A+18, A+30, B+7, XLATE+6, XLATE+7 |
| VAL | XLATE+3~*, XLATE+6*, XLATE+7 |
| VISIT | POV~, POV+8, POV+9, A+17 |
| VST | XLATE~, XLATE+1, XLATE+2, XLATE+5 |
