PXKMAIN2 ;ISL/JVS - Special Routine ;Oct 23, 2018@12:50
Source file <PXKMAIN2.m>
| 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 |
|---|---|---|
| SPEC | ;Populate other v files
|
|
| POP | ;Population of more than one v file using PCE CODE MAPPING file 811.1
|
|
| SPEC2 | ;
; Populates V CPT and V POV files based off Immunization and ; Skin Test Coding System mappings. |
|
| GETCODE(PXKCAT,PXGLBL,PXCODESYS,PXSKTYP) | ;
|
|
| RECALL | ; Recall PXKMAIN to populate special circumstances
|
|
| PRVTYPE | ;---POPULATE PROVIDER TYPE
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^AUPNVIMM("AD" | SPEC2+33 |
| ^AUPNVSIT - [#9000010] | SPEC2+21, PRVTYPE+10 |
| ^PXD(811.1 - [#811.1] | SPEC+19, SPEC+20, SPEC+21, SPEC+25, SPEC+28, SPEC+29, SPEC+30, SPEC+34, POP+5, POP+6 |
| ^TMP("PXK" | POP+12, POP+13, SPEC2+20, SPEC2+51, SPEC2+52, RECALL+1!, RECALL+5*, RECALL+6*, PRVTYPE+3, PRVTYPE+6 , PRVTYPE+7, PRVTYPE+10, PRVTYPE+14* |
| ^TMP("PXKSAVE" | RECALL+7! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| NOD0 | PRVTYPE+5~, PRVTYPE+7*, PRVTYPE+8, PRVTYPE+13*, PRVTYPE+14 |
| PXCIEN | GETCODE+2~, GETCODE+13*, GETCODE+14*, GETCODE+15 |
| PXCODE | SPEC2+7~, SPEC2+35*, SPEC2+36, SPEC2+38*, SPEC2+39*, SPEC2+40, SPEC2+44, GETCODE+2~, GETCODE+5, GETCODE+6* , GETCODE+11*, GETCODE+15*, GETCODE+21 |
| PXCODESYS | SPEC2+7~, SPEC2+30*, SPEC2+33, SPEC2+35, SPEC2+38, SPEC2+39, SPEC2+44, SPEC2+45, SPEC2+48, GETCODE~ , GETCODE+5, GETCODE+8 |
| PXCOUNT | GETCODE+2~, GETCODE+12*, GETCODE+16*, GETCODE+19 |
| PXCSIEN | GETCODE+2~, GETCODE+8*, GETCODE+9, GETCODE+14, GETCODE+15 |
| PXFROMENTRY | SPEC2+7~, SPEC2+11*, SPEC2+12, SPEC2+14, SPEC2+15, SPEC2+43 |
| PXGLBL | SPEC2+7~, SPEC2+14*, SPEC2+15*, SPEC2+17, SPEC2+35, GETCODE~, GETCODE+8, GETCODE+14, GETCODE+15 |
| >> PXJ(1 | SPEC+21*, SPEC+22, SPEC+24, SPEC+30*, SPEC+31, SPEC+33 |
| >> PXJ(2 | SPEC+22*, SPEC+23, SPEC+31*, SPEC+32 |
| >> PXJ(3 | SPEC+23*, SPEC+25, SPEC+32*, SPEC+34 |
| >> PXJ(4 | SPEC+24*, SPEC+25, SPEC+33*, SPEC+34 |
| >> PXKAV(0 | SPEC+19, SPEC+20, POP+4, SPEC2+11 |
| >> PXKAV(12 | SPEC2+27 |
| >> PXKBV(0 | SPEC+28, SPEC+29, POP+4, SPEC2+11 |
| PXKCAT | SPEC+19, SPEC+20, SPEC+28, SPEC+29, POP+5, SPEC2+14, SPEC2+15, SPEC2+25, SPEC2+27, SPEC2+33 , SPEC2+35, SPEC2+43, SPEC2+45, SPEC2+48, GETCODE~, GETCODE+5 |
| PXKDIEN | POP+3~, POP+5*, POP+6 |
| PXKDONE | SPEC+16*, SPEC+20*, SPEC+21, SPEC+25*, SPEC+26*, SPEC+29*, SPEC+30, SPEC+34*, SPEC+35*, SPEC+36! |
| PXKDT | PRVTYPE+5~, PRVTYPE+10*, PRVTYPE+12 |
| >> PXKFGAD | SPEC+18, POP+4, SPEC2+11, SPEC2+27 |
| >> PXKFGDE | SPEC+27, POP+4, SPEC2+11, SPEC2+27, SPEC2+33 |
| >> PXKFGED | SPEC+17, SPEC2+9 |
| PXKIN | POP+3~, POP+4*, POP+5 |
| PXKNORG | RECALL+7! |
| PXKNORG("SOR" | POP+12*, SPEC2+51*, RECALL+5 |
| PXKNORG("VSTIEN" | POP+13*, SPEC2+52*, RECALL+6 |
| PXKPRV | PRVTYPE+5~, PRVTYPE+8*, PRVTYPE+9, PRVTYPE+12 |
| PXKPSUB | PRVTYPE+5~, PRVTYPE+6*, PRVTYPE+7, PRVTYPE+14 |
| >> PXKPXD( | SPEC+26, SPEC+35, POP+6*, POP+7, POP+9, POP+10, SPEC2+43*, SPEC2+44*, SPEC2+45* |
| >> PXKPXD("" | SPEC2+42 |
| >> PXKREF | SPEC2+27, RECALL+2*, RECALL+3*, RECALL+4 |
| PXKROU | POP+3~, POP+10*, SPEC2+7~, SPEC2+48*, SPEC2+49 |
| >> PXKSAVE | RECALL+3*, RECALL+4* |
| >> PXKSEQ | SPEC2+27 |
| PXKTO | POP+3~, POP+9*, POP+10 |
| PXKX | POP+3~, POP+7*, POP+8, POP+9, POP+10, POP+11, SPEC2+7~, SPEC2+42*, SPEC2+43, SPEC2+44 , SPEC2+45, SPEC2+46 |
| PXKXX | POP+3~, POP+7*, SPEC2+7~, SPEC2+46* |
| PXSKTYP | SPEC2+7~, SPEC2+28*, SPEC2+35, GETCODE~, GETCODE+5 |
| PXVISIT | SPEC2+7~, SPEC2+20*, SPEC2+21, SPEC2+33 |
| PXVSC | SPEC2+7~, SPEC2+21*, SPEC2+22 |
| >> TMPPX | POP+8, POP+11* |
| TYPE | PRVTYPE+5~, PRVTYPE+12*, PRVTYPE+13 |
| U | SPEC2+21, SPEC2+27, SPEC2+44, SPEC2+45, GETCODE+15 |
| X | SPEC2+26~, SPEC2+27*, SPEC2+28 |
| Name | Field # of Occurrence |
|---|---|
| $T(GET^XUA4A72 | PRVTYPE+4 |
