RMPFRPC1 ;DALC/PJU - Module to get Demographics for Patient ;06/18/08
Source file <RMPFRPC1.m>
| Package | Total | Call Graph |
|---|---|---|
| Kernel | 1 | $$PROD^XUPROD |
| Master Patient Index VistA | 1 | $$GETICN^MPIF001 |
| Registration | 1 | (ADD,DEM,KVAR)^VADPT |
| Remote Order Entry System | 1 | START^RMPFRPC0 |
| VA FileMan | 1 | ^DIC |
| 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 |
|---|---|---|
| START(RE,DFN) | ;Descrip of ret array(RE) in EXAMP at bottom of pg
|
|
| END | ||
| EXIT | ||
| CLEAN(RMVAR) | ||
| ENDC | ||
| EXAMP |
| RPC Name | Call Tags |
|---|---|
| RMPFDEMOG | START |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | END+13, END+18 |
| ^DGSL(38.1 - [#38.1] | START+15, START+16, START+17 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARR | START+7~, END+2 |
| ARR(0 | END+3 |
| ARR(2 | END+5 |
| ARR(3 | END+8 |
| ARR(5 | END+10 |
| ARR(6 | END+11 |
| ARR(7 | END+12 |
| ARR(8 | END+6 |
| BD | START+7~, START+9*, START+20* |
| CI | START+7~, START+9*, START+27* |
| CL | START+7~, START+9* |
| DFN | START~, START+4, START+15, START+16, END+2, END+14 |
| DIC | START+31*! |
| DIC(0 | START+31* |
| DT | END+4 |
| ED | START+7~, START+9* |
| EL | START+7~, START+9* |
| ER | START+5*, START+7~, START+9*, START+14*, START+23*, START+30*, START+31, START+33*, END+9 |
| ES | START+7~, START+9* |
| GP | START+7~, START+9* |
| ICN | START+7~, START+9*, END+13*, END+14*, END+15*, END+16 |
| L1 | START+7~, START+9*, START+24* |
| L2 | START+7~, START+9*, START+25* |
| L3 | START+7~, START+9*, START+26* |
| NM | START+8~, START+10*, START+18* |
| PD | START+8~, START+10* |
| PN | START+8~, START+10*, START+39* |
| POP | EXIT+2! |
| PR | START+8~, START+10* |
| RE | START~, START+6! |
| RE( | START+11*, EXIT* |
| RE(0 | END+3* |
| RE(11 | START+18* |
| RE(12 | START+19* |
| RE(13 | START+20* |
| RE(14 | START+24* |
| RE(15 | START+25* |
| RE(16 | START+26* |
| RE(17 | START+27* |
| RE(18 | START+35* |
| RE(19 | START+36* |
| RE(20 | START+37* |
| RE(21 | START+38* |
| RE(22 | START+39* |
| RE(23 | END+4* |
| RE(24 | END+5*, END+6* |
| RE(25 | END+8* |
| RE(26 | START+17* |
| RE(27 | END+9*, END+10* |
| RE(28 | END+11* |
| RE(29 | END+12* |
| RE(30 | END+16* |
| RE(31 | END+21* |
| RMPFRTN | CLEAN+1~, CLEAN+2*, ENDC |
| RMVAR | CLEAN~, CLEAN+2 |
| S0 | EXIT+2! |
| S1 | EXIT+2! |
| S2 | EXIT+2! |
| S6 | EXIT+2! |
| SR | START+8~, START+10*, START+16*, START+17 |
| SS | START+8~, START+10*, START+19* |
| ST | START+8~, START+10*, START+28*, START+29, START+31, START+34*, START+35 |
| TD | START+8~, START+10*, START+37* |
| TE | START+8~, START+10*, START+38* |
| U | START+17, START+19, START+28, START+34, START+35, START+36, END+8 |
| >> VADM(1 | START+18 |
| >> VADM(2 | START+19 |
| >> VADM(3 | START+20 |
| VAERR | START+13, START+22, EXIT+2! |
| >> VAPA(1 | START+24 |
| >> VAPA(10 | START+38 |
| >> VAPA(11 | START+36 |
| >> VAPA(2 | START+25 |
| >> VAPA(3 | START+26 |
| >> VAPA(4 | START+27 |
| >> VAPA(5 | START+28, START+35 |
| >> VAPA(6 | START+36 |
| >> VAPA(8 | START+39 |
| >> VAPA(9 | START+37 |
| VH | START+8~, START+10*, END+17*, END+19*, END+20*, END+21 |
| VT | START+8~, START+10* |
| >> X | START+11*, START+31*, END+13*, END+18*, EXIT* |
| Y | START+32!, START+34! |
| Y(0 | START+34 |
| YY | EXIT+2! |
| ZP | START+8~, START+10*, START+36* |