RCCPCPS1 ;WISC/RFJ - build description for patient statement ;08 Aug 2001
Source file <RCCPCPS1.m>
| Package | Total | Call Graph |
|---|---|---|
| VA FileMan | 2 | ^%DT $$GET1^DIQ |
| Accounts Receivable | 1 | $$DET^RCFN01 |
| Integrated Billing | 1 | (STMT,STMTB)^IBRFN1 |
| 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 |
|---|---|---|
| TRANDESC(RCTRANDA,RCWIDTH) | ; build the description array for a transaction
|
|
| BILLDESC(RCBILLDA,RCWIDTH) | ;
; initialize |
|
| IBDATA | ; get data from IB for description
|
|
| SETDESC(DESCRIPT) | ||
| DATE(FMDT) | ; format date mm/dd/yyyy
|
| FileNo | Call Tags |
|---|---|
| ^IB - [#350] | GET1^DIQ |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^%ZOSF("TEST" | TRANDESC+84, TRANDESC+92, BILLDESC+21 |
| ^IB("B" | IBDATA+5 |
| ^PRCA(430 - [#430] | TRANDESC+9, BILLDESC+7 |
| ^PRCA(430.2 - [#430.2] | TRANDESC+10, TRANDESC+18, BILLDESC+8, BILLDESC+11 |
| ^PRCA(430.3 - [#430.3] | TRANDESC+51 |
| ^PRCA(433 - [#433] | TRANDESC+8, TRANDESC+11, TRANDESC+44, TRANDESC+62, TRANDESC+74 |
| ^TMP("IBRFN1" | TRANDESC+85!, TRANDESC+93!, BILLDESC+22!, IBDATA+4, IBDATA+51! |
| Name | Line Occurrences |
|---|---|
| $$DATE | TRANDESC+55, IBDATA+6, IBDATA+19, IBDATA+28, IBDATA+32, IBDATA+33, IBDATA+34, IBDATA+35, IBDATA+39 |
| IBDATA | TRANDESC+87, TRANDESC+95, BILLDESC+24 |
| SETDESC | TRANDESC+58, TRANDESC+70, BILLDESC+11, BILLDESC+14, IBDATA+6, IBDATA+11, IBDATA+12, IBDATA+15, IBDATA+16, IBDATA+19 , IBDATA+25, IBDATA+28, IBDATA+32, IBDATA+33, IBDATA+34, IBDATA+35, IBDATA+38, IBDATA+39, IBDATA+45, IBDATA+46 , IBDATA+47, IBDATA+48, IBDATA+49 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| %DT | DATE+2~* |
| DESCRIPT | TRANDESC+3~, TRANDESC+18*, TRANDESC+22*, TRANDESC+23*, TRANDESC+24*, TRANDESC+25*, TRANDESC+26*, TRANDESC+27*, TRANDESC+30*, TRANDESC+34* , TRANDESC+37*, TRANDESC+41*, TRANDESC+44*, TRANDESC+47*, TRANDESC+51*, TRANDESC+55*, TRANDESC+58, TRANDESC+66*, TRANDESC+69*, TRANDESC+70 , BILLDESC+2~, BILLDESC+11*, IBDATA+16*, SETDESC~, SETDESC+2, SETDESC+6, SETDESC+10, SETDESC+12, SETDESC+14, SETDESC+18 |
| FMDT | DATE~, DATE+1, DATE+2, DATE+3 |
| IBACNM | IBDATA+1~, IBDATA+5*, IBDATA+6, IBDATA+25 |
| IBDATA | IBDATA+1~, IBDATA+4*, IBDATA+5, IBDATA+6, IBDATA+11, IBDATA+15, IBDATA+19, IBDATA+28, IBDATA+31, IBDATA+32 , IBDATA+33, IBDATA+34, IBDATA+35, IBDATA+38, IBDATA+39, IBDATA+45, IBDATA+46, IBDATA+47, IBDATA+48, IBDATA+49 |
| IBIEN | IBDATA+1~, IBDATA+5* |
| IBJ | IBDATA+1~, IBDATA+4* |
| LENGTH | SETDESC~, SETDESC+2*, SETDESC+3*, SETDESC+6 |
| RCBILLDA | TRANDESC+3~, TRANDESC+8*, TRANDESC+9, BILLDESC~, BILLDESC+7 |
| RCCATEG | TRANDESC+3~, TRANDESC+10*, TRANDESC+18, TRANDESC+21, TRANDESC+34, TRANDESC+37, TRANDESC+41, TRANDESC+47, TRANDESC+83, TRANDESC+91 , BILLDESC+2~, BILLDESC+8*, BILLDESC+11, BILLDESC+17 |
| RCCATTXT | TRANDESC+3~, TRANDESC+10*, TRANDESC+18, TRANDESC+22, TRANDESC+23, TRANDESC+24, TRANDESC+25, TRANDESC+26, TRANDESC+27, TRANDESC+30 , TRANDESC+41, BILLDESC+2~, BILLDESC+8*, BILLDESC+11, BILLDESC+14 |
| RCDATA0 | TRANDESC+3~, TRANDESC+9*, TRANDESC+10, TRANDESC+18, BILLDESC+2~, BILLDESC+7*, BILLDESC+8, BILLDESC+11, BILLDESC+23, IBDATA+42 |
| RCDATA1 | TRANDESC+3~, TRANDESC+11*, TRANDESC+12, TRANDESC+51, TRANDESC+55, TRANDESC+68, TRANDESC+77 |
| RCDATA3 | TRANDESC+3~, TRANDESC+62*, TRANDESC+64, TRANDESC+66, TRANDESC+68 |
| RCDESC | TRANDESC+5!, BILLDESC+4! |
| RCDESC( | SETDESC+2, SETDESC+3, SETDESC+6*, SETDESC+11, SETDESC+12*, SETDESC+14*, SETDESC+17, SETDESC+18* |
| RCDESC(1 | TRANDESC+6*, BILLDESC+5*, IBDATA+10, IBDATA+14, IBDATA+16*, IBDATA+18, IBDATA+24 |
| RCLINE | TRANDESC+3~, TRANDESC+6*, BILLDESC+2~, BILLDESC+5*, SETDESC+2, SETDESC+3, SETDESC+6, SETDESC+11*, SETDESC+12, SETDESC+13* , SETDESC+14, SETDESC+17*, SETDESC+18 |
| >> RCTOTAL("ADM" | TRANDESC+76* |
| >> RCTOTAL("INT" | TRANDESC+75* |
| >> RCTOTAL("OTH" | TRANDESC+77* |
| RCTRANDA | TRANDESC~, TRANDESC+8, TRANDESC+11, TRANDESC+44, TRANDESC+62, TRANDESC+74, TRANDESC+86, TRANDESC+94 |
| RCWIDTH | TRANDESC~, TRANDESC+4*, BILLDESC~, BILLDESC+3*, SETDESC+6, SETDESC+10, SETDESC+12, SETDESC+14 |
| TRANTYPE | TRANDESC+3~, TRANDESC+12*, TRANDESC+16, TRANDESC+34, TRANDESC+44, TRANDESC+47, TRANDESC+61, TRANDESC+73, TRANDESC+80 |
| U | IBDATA+5, IBDATA+6 |
| X | TRANDESC+3~, TRANDESC+68*, TRANDESC+69, TRANDESC+74*, TRANDESC+75, TRANDESC+76, TRANDESC+77, TRANDESC+84*, TRANDESC+92*, BILLDESC+2~ , BILLDESC+21*, DATE+2~* |
| Y | DATE+2~ |