PXKFCPT1 ;ISL/JVS - PROCEDURES Routine #2 ;11/5/96 14:28
Source file <PXKFCPT1.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| IMMDEL | ;Retrieve all CPT information for VISIT from V CPT file | |
| IMMADD | ; | |
| IMM | ; | |
| POVNAR | ; | |
| SK | ;--START OF SKIN TEST | |
| IMMDEL1 | ; | |
| IMMDEL2 | ; | |
| CATEGOR | ; | |
| QUANTIT | 
| Name | Field # of Occurrence | 
|---|---|
| EN^DIQ1 | POVNAR+2, CATEGOR+4 | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^AUPNVCPT - [#9000010.18] | QUANTIT+3, QUANTIT+4, QUANTIT+7, IMMDEL+3, IMMDEL+4, IMMDEL+5, IMMDEL1+2, IMMDEL1+4, IMMDEL1+5, IMMDEL1+7 , IMMDEL1+8, IMMDEL1+9, IMMDEL2+2, IMMDEL2+3, IMMDEL2+5, IMMDEL2+6, IMMDEL2+8, IMMDEL2+9, IMMDEL2+10, IMMDEL2+12 , IMMDEL2+14, IMMDEL2+15, IMMDEL2+17, IMMDEL2+18, IMMDEL2+19 | 
| ^AUPNVCPT("AD" | QUANTIT+2, IMMDEL+2 | 
| ^AUTNPOV("B" | POVNAR+5, CATEGOR+8 | 
| ^TMP("PXKSAVE" | QUANTIT+7*, CATEGOR+11*, CATEGOR+14*, CATEGOR+15*, CATEGOR+16*, CATEGOR+17*, CATEGOR+18*, IMMDEL1+2*, IMMDEL1+6*, IMMDEL1+7* , IMMDEL1+8*, IMMDEL1+9*, IMMDEL1+10*, IMMDEL1+11*, IMMDEL1+12*, IMMDEL1+13*, IMMDEL1+14*, IMMDEL2+3*, IMMDEL2+7*, IMMDEL2+8* , IMMDEL2+9*, IMMDEL2+10*, IMMDEL2+11*, IMMDEL2+12*, IMMDEL2+16*, IMMDEL2+17*, IMMDEL2+18*, IMMDEL2+19*, IMMDEL2+20* | 
| ^UTILITY("DIQ1" | POVNAR+1!, POVNAR+3, POVNAR+4!, CATEGOR+3!, CATEGOR+5, CATEGOR+6, CATEGOR+10! | 
| Name | Line Occurrences | 
|---|---|
| IMM | SK+1 | 
| IMMADD | IMM+2 | 
| IMMDEL | IMM+3 | 
| IMMDEL1 | IMMDEL+4 | 
| IMMDEL2 | IMMDEL+5 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| DA | POVNAR+2*, POVNAR+3, POVNAR+4!, CATEGOR+4*, CATEGOR+5, CATEGOR+6, CATEGOR+10! | 
| DIC | POVNAR+2*, POVNAR+4!, CATEGOR+4*, CATEGOR+10! | 
| DR | POVNAR+2*, POVNAR+4!, CATEGOR+4*, CATEGOR+10! | 
| >> PXKAFT(1 | CATEGOR+13, CATEGOR+14 | 
| >> PXKAFT(12 | CATEGOR+15 | 
| >> PXKAFT(812 | CATEGOR+17 | 
| >> PXKAV(0 | QUANTIT+2, CATEGOR+11 | 
| PXKCA | CATEGOR+16, CATEGOR+19! | 
| >> PXKCPT | IMMADD+3*, POVNAR+2, QUANTIT+3, CATEGOR+2, CATEGOR+11 | 
| PXKCPTN | POVNAR+3*, POVNAR+5*, CATEGOR+11, CATEGOR+19! | 
| PXKCPTT | CATEGOR+10! | 
| PXKCPTT( | CATEGOR+6*, CATEGOR+7 | 
| PXKCPTT(1 | CATEGOR+2*, CATEGOR+4 | 
| PXKCPTT(5 | CATEGOR+7*, CATEGOR+8, CATEGOR+9 | 
| PXKCPTT(6 | CATEGOR+8*, CATEGOR+9 | 
| >> PXKFGAD | IMM+2 | 
| >> PXKFGDE | IMM+3 | 
| PXKKK | IMMADD+1*, QUANTIT+6*, CATEGOR+18, CATEGOR+19! | 
| PXKMOD | IMMDEL1+1~, IMMDEL1+5*, IMMDEL1+6, IMMDEL2+1~, IMMDEL2+6*, IMMDEL2+7, IMMDEL2+15*, IMMDEL2+16 | 
| >> PXKPCA | CATEGOR+9* | 
| >> PXKPXD( | IMMADD+3, IMMDEL+3 | 
| PXKQUN | QUANTIT*, QUANTIT+4*, CATEGOR+11, CATEGOR+19! | 
| >> PXKSEQ | IMMADD+2, IMMDEL+1 | 
| PXKSEQ1 | IMM+1~, IMMADD+2*, QUANTIT+7, CATEGOR+11, CATEGOR+14, CATEGOR+15, CATEGOR+16, CATEGOR+17, CATEGOR+18, IMMDEL+1* , IMMDEL1+2, IMMDEL1+6, IMMDEL1+7, IMMDEL1+8, IMMDEL1+9, IMMDEL1+10, IMMDEL1+11, IMMDEL1+12, IMMDEL1+13, IMMDEL1+14 , IMMDEL2+3, IMMDEL2+7, IMMDEL2+8, IMMDEL2+9, IMMDEL2+10, IMMDEL2+11, IMMDEL2+12, IMMDEL2+16, IMMDEL2+17, IMMDEL2+18 , IMMDEL2+19, IMMDEL2+20 | 
| PXKSEQ2 | CATEGOR+1~, CATEGOR+12*, CATEGOR+13*, CATEGOR+14, IMMDEL1+1~, IMMDEL1+3*, IMMDEL1+4*, IMMDEL1+5, IMMDEL1+6, IMMDEL2+1~ , IMMDEL2+4*, IMMDEL2+5*, IMMDEL2+6, IMMDEL2+7, IMMDEL2+13*, IMMDEL2+14*, IMMDEL2+15, IMMDEL2+16 | 
| >> PXKVST | IMMDEL+2 | 
| >> PXKX | IMMADD+3, IMMDEL+3 | 
| >> PXKXX | IMMADD+2, IMMDEL+1 | 
| PXSTOP | QUANTIT*, QUANTIT+2, QUANTIT+5*, QUANTIT+8! | 
| PXTEMP | IMMDEL2+2*, IMMDEL2+20, IMMDEL2+21! | 
| PXXX | QUANTIT+1*, QUANTIT+2*, QUANTIT+3, QUANTIT+4, QUANTIT+6, QUANTIT+7, CATEGOR+19! | 
| XP | IMMDEL+2*, IMMDEL+3, IMMDEL+4, IMMDEL+5, IMMDEL1+2, IMMDEL1+4, IMMDEL1+5, IMMDEL1+7, IMMDEL1+8, IMMDEL1+9 , IMMDEL1+10, IMMDEL1+15!, IMMDEL2+2, IMMDEL2+3, IMMDEL2+5, IMMDEL2+6, IMMDEL2+8, IMMDEL2+9, IMMDEL2+10, IMMDEL2+11 , IMMDEL2+12, IMMDEL2+14, IMMDEL2+15, IMMDEL2+17, IMMDEL2+18, IMMDEL2+19, IMMDEL2+21! | 
| XPFG | IMMDEL+2*, IMMDEL+3*, IMMDEL1+15!, IMMDEL2+21! |