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 |