VAFCTFU1 ;BHM/RGY-Utilities for the Treating Facility file 391.91, CONTINUED ; 5/23/12 12:51pm
Source file <VAFCTFU1.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 |
|---|---|---|
| TFL(LIST,DFN) | ;for dfn get list of treating facilities
|
|
| GETICN(RESULT,DFN) | ;
|
|
| GETDFN(RESULT,ICN) | ;
|
|
| IFLOCAL(RESULT,DFN) | ;
|
|
| SET(TFIEN,ARY,CTR) | ;This sets the array with the treating facility list.
; Returns: treating facility ^ treatment date ^ event reason (if any) ; *261 gjc@120899 (formerly part of VAFCTFU prior to DG*5.3*261) |
|
| QUERYTF(PAT,ARY,INDX) | ;a query for Treating Facility.
|
|
| QUERYTFQ |
| RPC Name | Call Tags |
|---|---|
| VAFCTFU CONVERT DFN TO ICN | GETICN |
| VAFCTFU CONVERT ICN TO DFN | GETDFN |
| VAFCTFU LOCAL ICN | IFLOCAL |
| VAFCTFU GET TREATING LIST | TFL |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | TFL+2, QUERYTF+27 |
| ^DGCN(391.91 - [#391.91] | SET+3, QUERYTF+37, QUERYTF+38, QUERYTF+39, QUERYTF+40, QUERYTF+43, QUERYTF+49 |
| Name | Line Occurrences |
|---|---|
| $$QUERYTF | TFL+6 |
| QUERYTFQ | QUERYTF+25, QUERYTF+27, QUERYTF+29 |
| SET | QUERYTF+42, QUERYTF+49 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| ARY | SET~, SET+7, QUERYTF~, QUERYTF+25, QUERYTF+42, QUERYTF+49, QUERYTF+51 |
| CTR | SET~, SET+7*, QUERYTF+24~, QUERYTF+26*, QUERYTF+42, QUERYTF+49 |
| DA | TFL+1~, TFL+10* |
| DFN | TFL~, TFL+4, GETICN~, GETICN+1, IFLOCAL~, IFLOCAL+1 |
| DGCN | SET+3~ |
| DGCN(0 | SET+3*, SET+5, SET+6, SET+7 |
| DIC | TFL+1~, TFL+3* |
| DIQ | TFL+1~, TFL+3* |
| DIQ(0 | TFL+3* |
| DR | TFL+1~, TFL+3* |
| ICN | TFL+1~, TFL+4*, TFL+5, TFL+6, GETDFN~, GETDFN+1 |
| INDX | QUERYTF~, QUERYTF+26*, QUERYTF+37, QUERYTF+43 |
| INSTIEN | SET+3~, SET+5* |
| LIST | TFL~ |
| LIST( | TFL+8, TFL+10, TFL+12* |
| LIST(1 | TFL+2*, TFL+5*, TFL+7* |
| LP | QUERYTF+24~, QUERYTF+37*, QUERYTF+38, QUERYTF+39, QUERYTF+43*, QUERYTF+49 |
| LSTA | SET+3~, SET+5*, SET+6 |
| PAT | QUERYTF~, QUERYTF+25, QUERYTF+28 |
| PDFN | QUERYTF+24~, QUERYTF+28*, QUERYTF+29, QUERYTF+37, QUERYTF+38, QUERYTF+39, QUERYTF+43, QUERYTF+49 |
| RESULT | GETICN~, GETICN+1*, GETDFN~, GETDFN+1*, IFLOCAL~, IFLOCAL+1* |
| TFIEN | SET~, SET+3, QUERYTF+39*, QUERYTF+40, QUERYTF+41, QUERYTF+49* |
| U | TFL+7, SET+7 |
| VAFC | TFL+1~, TFL+8*, TFL+10, TFL+12 |
| VAFCER | QUERYTF+24~, QUERYTF+25*, QUERYTF+26*, QUERYTF+29*, QUERYTF+51*, QUERYTFQ |
| VAFCTFU1 | TFL+1~, TFL+9! |
| VAFCTFU1(4 | TFL+12 |
| X | TFL+1~, TFL+2*, TFL+6*, TFL+7, QUERYTF+27* |
| ZDLT | QUERYTF+24~, QUERYTF+40*, QUERYTF+41 |
| ZTDLT | QUERYTF+24~, QUERYTF+38*, QUERYTF+41* |
| ZTFIEN | QUERYTF+24~, QUERYTF+38*, QUERYTF+41*, QUERYTF+42 |
