ORWDBA3 ; SLC/GSS Billing Awareness (CIDC) [8/20/03 9:19am] ;05/23/12 10:36
Source file <ORWDBA3.m>
Package | Total | Call Graph |
---|---|---|
Order Entry Results Reporting | 2 | ($$BASTAT,RCVORCI,TFSTGS)^ORWDBA1 GETTFCI^ORWDBA4 |
DRG Grouper | 1 | $$ICDDATA^ICDXCODE |
Scheduling | 1 | CL^SDCO21 |
VA FileMan | 1 | NOW^%DTC |
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 |
---|---|---|
ORFMDAT(ORDFN) | ; Return date in FM format regarding order for CSV/CTD/HIPAA
; Pass in Order IEN |
|
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 |
|
FRMTLST | ; Format the variable LST(ILST) for DISPLAY tag
|
|
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 |
|
DG1(ORDFN,COUNTER,CTVALUE) | ; Create DG1 segment(s) & make call for ZCL seg.
|
|
ZCL | ;create all the ZCL segments (currently 8 TxF's) for order number OCT
|
|
BDOSTR | ;Store backdoor order DG1 and ZCL messages from HL7
|
|
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 |
>> | 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+37, DISPLAY+41, DISPLAY+49 |
>> 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+49*, DISPLAY+50, DISPLAY+51, 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+36*, DISPLAY+37, DISPLAY+39*, DISPLAY+41, DISPLAY+50, DISPLAY+51*, 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+37*, DISPLAY+39*, DISPLAY+41*, DISPLAY+50*, DISPLAY+51*, FRMTLST+1* |
NDX | BDOSTR+29~, BDOSTR+34*, BDOSTR+44* |
NTF | DISPLAY+23~, DISPLAY+24*, DISPLAY+41, DISPLAY+49, 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+42*, DISPLAY+50* |
TFGBL | DISPLAY+23~, ZCL+2~, ZCL+8, BDOSTR+30~ |
TFGUI | DISPLAY+23~, DISPLAY+50, DISPLAY+51, 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+50, DISPLAY+51 |
TFV("AO" | DISPLAY+44* |
TFV("CV" | DISPLAY+46* |
TFV("EC" | DISPLAY+45* |
TFV("HNC" | DISPLAY+46* |
TFV("IR" | DISPLAY+45* |
TFV("MST" | DISPLAY+44* |
TFV("SHD" | DISPLAY+47* |
U | DISPLAY+27, DISPLAY+29, DISPLAY+31, DISPLAY+50, DISPLAY+51, 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 |