ORWDBA3 ; SLC/GSS Billing Awareness (CIDC) [8/20/03 9:19am];22-Aug-2012 13:28;PLS
Source file <ORWDBA3.m>
| Package | Total | Call Graph | 
|---|---|---|
| Order Entry Results Reporting | 2 | ($$BASTAT,RCVORCI,TFSTGS)^ORWDBA1 GETTFCI^ORWDBA4 | 
| DRG Grouper | 1 | $$ICDDX^ICDCODE | 
| Scheduling | 1 | CL^SDCO21 | 
| VA Fileman | 1 | NOW^%DTC | 
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| HINTS(Y) | ; Return HINTS for ORBA Treatment Factors - used by Delphi ; The hints returned in the Y array will be used in the CPRS GUI and ; displayed on fly-over of the cursor over the TxF text in the window | |
| ZCL | ;create all the ZCL segments (currently 8 TxF's) for order number OCT | |
| BDOSTR | ;Store backdoor order DG1 and ZCL messages from HL7 | |
| ORFMDAT(ORDFN) | ; Return date in FM format regarding order for CSV/CTD/HIPAA ; Pass in Order IEN | |
| FRMTLST | ; Format the variable LST(ILST) for DISPLAY tag | |
| DG1(ORDFN,COUNTER,CTVALUE) | ; Create DG1 segment(s) & make call for ZCL seg. | |
| DISPLAY | ; Display of BA data from original copied order (ORIT = ORIEN) ; Displayed in window with all order info and user can accept/edit ; Note: TxF = Treatment Factor ; BA data (Dx,TxF's) not editable but in signature window, not in above ; ORIT defined in ORWDXM1, DISPLAY called from ORWDXM2 | |
| ERRMSG(VISIT) | ; Error handling and message ; to be determined | 
| RPC Name | Call Tags | 
|---|---|
| ORWDBA3 HINTS | HINTS | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^DIC(9.2 - [#9.2] | HINTS+23, HINTS+25, HINTS+26 | 
| ^OR(100 - [#100] | ORFMDAT+2, DG1+16, DG1+17, ZCL+5 | 
| Name | Line Occurrences | 
|---|---|
| $$ORFMDAT | DG1+14 | 
| FRMTLST | DISPLAY+32, DISPLAY+51, DISPLAY+52 | 
| ZCL | DG1+30 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> % | BDOSTR+36 | 
| COUNTER | DG1~, DG1+31 | 
| CPNODE | BDOSTR+29~, BDOSTR+34* | 
| CT | HINTS+18~, HINTS+20*, HINTS+26*, BDOSTR+29~, BDOSTR+34* | 
| CTVALUE | DG1~, DG1+28*, DG1+29, DG1+31, ZCL+11*, ZCL+16 | 
| CUN | DISPLAY+23~, DISPLAY+27*, DISPLAY+50 | 
| >> DFN | BDOSTR+36 | 
| DG1 | BDOSTR+29~ | 
| DG1( | BDOSTR+44* | 
| DG1(1 | BDOSTR+56 | 
| DG1(2 | BDOSTR+56 | 
| DG1(3 | BDOSTR+56 | 
| DG1(4 | BDOSTR+56 | 
| DG13 | DG1+10~, DG1+27*, DG1+29 | 
| DXIEN | DG1+10~, DG1+18*, DG1+22, DG1+23, DG1+27 | 
| DXR | DG1+10~, DG1+23*, DG1+25 | 
| DXV | DG1+10~, DG1+21*, DG1+25*, DG1+27 | 
| FROMFILE | DG1+10~, DG1+26*, DG1+27 | 
| GUITF | BDOSTR+29~, BDOSTR+34*, BDOSTR+52*, BDOSTR+54*, BDOSTR+56 | 
| I | DISPLAY+23~, DISPLAY+29*, DISPLAY+30, DISPLAY+31, DISPLAY+50*, DISPLAY+51, DISPLAY+52, HINTS+18~, HINTS+22*, ZCL+2~ , ZCL+8*, BDOSTR+29~, BDOSTR+39*, BDOSTR+50* | 
| ICD9 | DG1+10~, DG1+21*, DG1+25*, DG1+27 | 
| >> ILST | DISPLAY+30*, DISPLAY+31, DISPLAY+51, DISPLAY+52*, FRMTLST+1 | 
| J | ZCL+2~, ZCL+8*, BDOSTR+29~, BDOSTR+41*, BDOSTR+44, BDOSTR+46, BDOSTR+50*, BDOSTR+54 | 
| >> LST( | DISPLAY+30*, DISPLAY+31*, DISPLAY+51*, DISPLAY+52*, FRMTLST+1* | 
| NDX | BDOSTR+29~, BDOSTR+34*, BDOSTR+44* | 
| NTF | DISPLAY+23~, DISPLAY+24*, DISPLAY+50, BDOSTR+29~, BDOSTR+34*, BDOSTR+39, BDOSTR+50 | 
| OBX | BDOSTR+29~, BDOSTR+34*, BDOSTR+41*, BDOSTR+42 | 
| OCT | DG1+10~, DG1+12*, DG1+16*, DG1+17, DG1+29, ZCL+16 | 
| ORDFN | ORFMDAT~, ORFMDAT+2, DG1~, DG1+14, DG1+16, DG1+17, ZCL+5 | 
| OREC | DG1+10~, DG1+17*, DG1+18 | 
| ORFMDAT | DG1+10~, DG1+14*, DG1+23 | 
| >> ORIFN | BDOSTR+56 | 
| >> ORIT | DISPLAY+24 | 
| ORITARY | DISPLAY+23~, DISPLAY+26 | 
| ORITARY(1 | DISPLAY+24* | 
| >> ORMSG | BDOSTR+41, BDOSTR+42 | 
| >> ORMSG( | DG1+29*, ZCL+16* | 
| ORSDCARY | BDOSTR+29~, BDOSTR+32!, BDOSTR+36 | 
| ORSDCARY( | BDOSTR+39 | 
| ORTFIEN | HINTS+18~, HINTS+23*, HINTS+25, HINTS+26 | 
| REC | BDOSTR+29~, BDOSTR+42*, BDOSTR+44, BDOSTR+47*, BDOSTR+48 | 
| ROUT | BDOSTR+29~, BDOSTR+58 | 
| ROUT(1 | BDOSTR+56* | 
| SDCARYA | BDOSTR+29~, BDOSTR+32! | 
| SDCARYA( | BDOSTR+39*, BDOSTR+52 | 
| SPCS | DISPLAY+23~, DISPLAY+24*, FRMTLST+1 | 
| TABLE | ZCL+2~, ZCL+5*, ZCL+8*, ZCL+13 | 
| TF | HINTS+18~, HINTS+22*, HINTS+23, HINTS+26, ZCL+2~, ZCL+8*, BDOSTR+30~, BDOSTR+34*, BDOSTR+50*, BDOSTR+52 | 
| TF1 | DISPLAY+23~, DISPLAY+43*, DISPLAY+51* | 
| TFGBL | DISPLAY+23~, ZCL+2~, ZCL+8, BDOSTR+30~ | 
| TFGUI | DISPLAY+23~, DISPLAY+51, DISPLAY+52, ZCL+2~, BDOSTR+30~, BDOSTR+50 | 
| TFIN | ZCL+2~, ZCL+9*, ZCL+13, ZCL+16 | 
| TFLN | HINTS+18~, HINTS+23*, HINTS+25*, HINTS+26 | 
| TFS | HINTS+18~, HINTS+20*, HINTS+22, ZCL+2~, ZCL+5*, ZCL+13 | 
| TFTBL | ZCL+2~, ZCL+8, BDOSTR+30~, BDOSTR+50 | 
| TFV | DISPLAY+23~, HINTS+18~, HINTS+23* | 
| TFV( | DISPLAY+51, DISPLAY+52 | 
| U | DISPLAY+27, DISPLAY+29, DISPLAY+31, DISPLAY+51, DISPLAY+52, HINTS+22, HINTS+26, DG1+18, DG1+25, DG1+27 , ZCL+8, ZCL+13, BDOSTR+39, BDOSTR+44, BDOSTR+50, BDOSTR+56 | 
| VAL | BDOSTR+30~, BDOSTR+54* | 
| VALUE | ZCL+2~, ZCL+13*, ZCL+14*, ZCL+16 | 
| VISIT | ERRMSG~ | 
| X | BDOSTR+30~, BDOSTR+34* | 
| Y | DISPLAY+23~, DISPLAY+26, HINTS~, BDOSTR+34*, BDOSTR+58 | 
| Y( | HINTS+26* | 
| Y(1 | DISPLAY+27, DISPLAY+29, DISPLAY+31 | 
| ZCL | BDOSTR+30~, BDOSTR+34*, BDOSTR+48*, BDOSTR+54 |