VAFCTFU1 ;BHM/RGY-Utilities for the Treating Facility file 391.91, CONTINUED ; 7/27/09 6:16pm
Source file <VAFCTFU1.m>
| Package | Total | Call Graph | 
|---|---|---|
| Kernel | 1 | $$STA^XUAF4 | 
| Uncategorized | 1 | ($$GETDFN,$$GETICN,$$IFLOCAL)^MPIF001 | 
| VA Fileman | 1 | EN^DIQ1 | 
| Package | Total | Caller Graph | 
|---|---|---|
| Registration | 4 | DGPFHLS DGPFUT2 VAFCOFIN VAFCTFIN | 
| Clinical Reminders | 1 | PXRMRDI | 
| Health Summary | 1 | GMTSDEMB | 
| Order Entry Results Reporting | 1 | ORWMHV | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| IFLOCAL(RESULT,DFN) | ; | |
| GETDFN(RESULT,ICN) | ; | |
| QUERYTFQ | ||
| 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. | 
 
 | 
| TFL(LIST,DFN) | ;for dfn get list of treating facilities | 
 
 | 
| GETICN(RESULT,DFN) | ; | 
| 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+31, QUERYTF+32, QUERYTF+38 | 
| Name | Line Occurrences | 
|---|---|
| $$QUERYTF | TFL+6 | 
| QUERYTFQ | QUERYTF+25, QUERYTF+27, QUERYTF+29 | 
| SET | QUERYTF+31, QUERYTF+38 | 
| Name | Field # of Occurrence | 
|---|---|
| ^( | QUERYTF+31 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| ARY | SET~, SET+7, QUERYTF~, QUERYTF+25, QUERYTF+31, QUERYTF+38, QUERYTF+40 | 
| CTR | SET~, SET+7*, QUERYTF+24~, QUERYTF+26*, QUERYTF+31, QUERYTF+38 | 
| 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+31, QUERYTF+32 | 
| 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+31*, QUERYTF+32*, QUERYTF+38 | 
| LSTA | SET+3~, SET+5*, SET+6 | 
| PAT | QUERYTF~, QUERYTF+25, QUERYTF+28 | 
| PDFN | QUERYTF+24~, QUERYTF+28*, QUERYTF+29, QUERYTF+31, QUERYTF+32, QUERYTF+38 | 
| RESULT | GETICN~, GETICN+1*, GETDFN~, GETDFN+1*, IFLOCAL~, IFLOCAL+1* | 
| TFIEN | SET~, SET+3, QUERYTF+31*, QUERYTF+38* | 
| U | TFL+7, SET+7 | 
| VAFC | TFL+1~, TFL+8*, TFL+10, TFL+12 | 
| VAFCER | QUERYTF+24~, QUERYTF+25*, QUERYTF+26*, QUERYTF+29*, QUERYTF+40*, QUERYTFQ | 
| VAFCTFU1 | TFL+1~, TFL+9! | 
| VAFCTFU1(4 | TFL+12 | 
| X | TFL+1~, TFL+2*, TFL+6*, TFL+7, QUERYTF+27* |