PXBGPOV ;ISL/JVS,ESW - GATHER POV (DIAGNOSIS) ; 12/2/02 6:22pm
Source file <PXBGPOV.m>
| Package | Total | Call Graph | 
|---|---|---|
| PCE Patient Care Encounter | 2 | PL^PXBGPL $$EXTTEXT^PXUTL1 | 
| VA Fileman | 1 | EN^DIQ1 | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| A | ;--Set array with DIAGNOSIS codes | |
| EXIT | ;--KILL | |
| B | ;--Add line numbers | |
| FINISG | ;--finish up some variables | |
| POV(VISIT) | ;--Gather the entries in the V POV file | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVPOV("AD" | POV+8, POV+9 | 
| ^TMP("PXBGPOVMATCH" | A+23* | 
| ^TMP("PXBKYPL" | A+9, EXIT+1! | 
| ^TMP("PXBPOV" | A+22*, 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+14, EXIT+3! | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DA | POV+3~, A+5*, A+6, A+7, A+8, A+10, A+11, A+12, A+14 | 
| DIC | POV+3~, A+5* | 
| DIQ | POV+3~ | 
| DIQ(0 | A+5* | 
| DR | POV+3~, A+5* | 
| >> FPRI | POV+7*, A+18*, FINISG+2* | 
| GROUP | POV+2~, A+19*, A+22, A+24 | 
| IEN | POV+2~, POV+9*, POV+10, A+4*, A+5, A+22, A+23, B+4*, B+5, B+6 | 
| >> LNARR | A+7*, A+17*, B+7 | 
| NOPLLIST | POV+5!, A+24* | 
| >> PATIENT | A+2 | 
| PKG | POV+3~, A+12*, A+13* | 
| POV | POV+2~, POV+5!, A+8*, A+9, A+19, A+21, A+22, B+3*, B+4, B+5 | 
| POVI | POV+2~, A+10*, A+16, A+17, A+23 | 
| PRIM | POV+3~, A+11*, A+18, A+19, A+21 | 
| PROBLEM | POV+3~, POV+7*, A+9*, A+19 | 
| PROVIDER | POV+2~, A+6*, A+19 | 
| PXBC | POV+2~, B+3*, B+4*, B+5, B+6, B+7, EXIT+4 | 
| >> PXBCNT | EXIT+4* | 
| PXBKY | POV+5! | 
| PXBKY( | B+5* | 
| PXBPL | POV+3~ | 
| PXBPLA | POV+3~ | 
| PXBSAM | POV+5! | 
| PXBSAM( | B+5*, B+7* | 
| PXBSKY | POV+5! | 
| PXBSKY( | B+6* | 
| PXBSKYPL | EXIT+1! | 
| PXDIGNS | POV+5! | 
| PXDIGNS("PRIMARY" | A+21* | 
| QUANTITY | POV+2~ | 
| SNARR | POV+2~, A+16*, A+19 | 
| SOURC | POV+3~, A+14*, A+15* | 
| VISIT | POV~, POV+8, POV+9 |