WVRPCNO1 ;HIOFO/FT-WV PRINT LETTERS. ;8/21/03 13:37
Source file <WVRPCNO1.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 |
| Package | Total | Caller Graph |
|---|---|---|
| Order Entry Results Reporting | 2 | ORQQPXRM ORQQPXRM GET WH LETTER TEXT |
| Womens Health | 2 | WVRPCGF WVRPCNO |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DEVICE(WVDA,WVPRINTR) | ; Queue to TaskMan to print letter
|
|
| ; Print notification letter, update treatment needs & due dates
; required variable: wvda=ien in ^WV(790.4, |
||
| LETTER(RESULT,WVIEN) | ; Returns the letter text for the purpose of
; notification ; Input: RESULT - array name to return data in [required] ; WVIEN - FILE 790.404 IEN [required] |
|
| GETDXIEN(WVX) | ; Function returns FILE 790.31 IEN
; Input: WVX="A" for Abnormal ; "N" for No Evidence of Malignancy ; "U" for Unsatisfactory for Dx ; Output: IEN of corresponding FILE 790.31 entry |
|
| GETYPIEN(WVX) | ; Function returns FILE 790.403 IEN
; Input: WVX="P" for CONTACT PHN ; WVX="I" for CONVERSATION WITH PATIENT ; WVX="L" for LETTER, FIRST ; Output: IEN of corresponding FILE 790.403 entry |
|
| GETOIEN(WVX) | ; Function returns FILE 790.405 IEN
; Input: WVX = .01 value of FILE 790.405 entry (Outcome) ; Output: IEN of that entry |
| Name | Field # of Occurrence |
|---|---|
| ^%ZTLOAD | DEVICE+7 |
| EN2^DIWF | PRINT+24 |
| DIE^WVFMAN | PRINT+31 |
| KILLXREF^WVLETPR | PRINT+10, PRINT+26, PRINT+30 |
| GADD^WVUTL9 | PRINT+20 |
| GAPPT^WVUTL9 | PRINT+16 |
| KADD^WVUTL9 | PRINT+19 |
| KAPPT^WVUTL9 | PRINT+15 |
| KILLUG^WVUTL9 | PRINT+18 |
| KVAR^WVUTL9 | PRINT+22 |
| SADD^WVUTL9 | PRINT+21 |
| SAPPT^WVUTL9 | PRINT+17 |
| $$NOW^XLFDT | DEVICE+3 |
| $$UP^XLFSTR | GETDXIEN+7, GETYPIEN+7 |
| RPC Name | Call Tags |
|---|---|
| ORQQPXRM GET WH LETTER TEXT | LETTER |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^WV(790.31 - [#790.31] | GETDXIEN+8, GETDXIEN+9, GETDXIEN+10 |
| ^WV(790.4 - [#790.4] | PRINT+5, PRINT+6, PRINT+7, PRINT+26 |
| ^WV(790.403 - [#790.403] | GETYPIEN+8, GETYPIEN+9, GETYPIEN+10 |
| ^WV(790.404 - [#790.404] | LETTER+9, LETTER+12, LETTER+17, LETTER+19 |
| ^WV(790.405 - [#790.405] | GETOIEN+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| BY | PRINT+3~, PRINT+13* |
| DIWF | PRINT+3~, PRINT+11* |
| DIWF(1 | PRINT+12* |
| DT | PRINT+31 |
| ION | PRINT+4 |
| >> IOP | PRINT+4* |
| RESULT | LETTER~ |
| RESULT( | LETTER+19* |
| RESULT(0 | LETTER+8*, LETTER+10*, LETTER+13*, LETTER+16* |
| U | PRINT+5, PRINT+6, PRINT+7, PRINT+26 |
| WVCNT | LETTER+15~, LETTER+16*, LETTER+18*, LETTER+19 |
| WVDA | DEVICE~, PRINT+5, PRINT+6, PRINT+7, PRINT+10, PRINT+26, PRINT+30, PRINT+31 |
| WVDFN | PRINT+3~, PRINT+5*, PRINT+13, PRINT+15, PRINT+16, PRINT+17, PRINT+19, PRINT+20, PRINT+21 |
| WVIEN | LETTER~, LETTER+8, LETTER+9, LETTER+12, LETTER+17, LETTER+19 |
| WVKDT | PRINT+3~, PRINT+7*, PRINT+10, PRINT+26, PRINT+30 |
| WVLOOP | LETTER+15~, LETTER+16*, LETTER+17*, LETTER+19 |
| WVPRINTR | DEVICE~, DEVICE+4 |
| WVPURP | PRINT+3~, PRINT+6*, PRINT+9 |
| WVX | GETDXIEN~, GETDXIEN+5*, GETDXIEN+6, GETDXIEN+7*, GETDXIEN+8, GETDXIEN+9, GETDXIEN+10, GETYPIEN~, GETYPIEN+5*, GETYPIEN+6 , GETYPIEN+7*, GETYPIEN+8, GETYPIEN+9, GETYPIEN+10, GETOIEN~, GETOIEN+3*, GETOIEN+4, GETOIEN+5 |
| ZTDESC | DEVICE+1~, DEVICE+2* |
| ZTDTH | DEVICE+1~, DEVICE+3* |
| ZTIO | DEVICE+1~, DEVICE+4* |
| >> ZTQUEUED | PRINT+2 |
| >> ZTREQ | PRINT+2* |
| ZTRTN | DEVICE+1~, DEVICE+5* |
| ZTSAVE | DEVICE+1~ |
| ZTSAVE("WVDA" | DEVICE+6* |
