RABWORD1 ;HOIFO/MM-Radiology Billing Awareness ;10/26/04 1:36pm
Source file <RABWORD1.m>
Package | Total | Call Graph |
---|---|---|
Radiology Nuclear Medicine | 3 | FILEDX^RABWORD COMPLETE^RAPCE UNCOMPL^RAPCE1 |
DRG Grouper | 1 | $$ICDDX^ICDCODE |
Kernel | 1 | $$PATCH^XPDUTL |
VA FileMan | 1 | ^DIK |
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 |
---|---|---|
Radiology Nuclear Medicine | 3 | RABWORD RAO7NEW RAORDU1 |
Order Entry Results Reporting | 1 | ORWDBA7 |
Name | Comments | DBIA/ICR reference |
---|---|---|
BADISP(RABWDX) | ; Display ICD DX & SC/EI/MST/HNC answers from the Order.
; Called from BADISP^RAORDU1 |
|
PRIMDX | ||
SECDX | ||
BARESP | ; Display the SC/EC/EI/MST/HNC responses associated to each ICD Dx.
; Current Question Sequence is: SC, CV, AO, IR, SWAC, SHAD, MST, HNC |
|
SENDCPRS(RAO) | ; Send Billing Aware Ordering ICD Dx data to CPRS.
; Called from EN1+n^RAO7NEW. ; RABWDX1 variable comes from RAO7NEW routine. |
|
SEND1 | ||
GETCPRS | ; Retrieve and Store Ordering ICD Dx data from CPRS DG1 & ZCL Segments.
; Called from EN1+n^RAO7RON. |
|
CPRSUPD(RADFN,RAITEM,RAORIEN,RADX,RASCEI) | ;Update Order DXs edited during SignOff in CPRS
; PFSS 1B Requirement 1 ; Radiology backdoor orders normally cannot be changed from CPRS GUI. ; The exceptions are TELEPHONE and VERBAL orders which were entered ; from "backdoor" Vista Radiology, and changed later in CPRS GUI. However, ; only the Diagnoses and Clinical Indicators for the order can be changed. ; The change from the CPRS GUI can occur before or after the exam has been ; completed. |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^ICD9 - [#80] | SEND1 |
^RADPT - [#70] | CPRSUPD+36 |
^RADPT("AO" | CPRSUPD+32, CPRSUPD+33 |
^RAO(75.1 - [#75.1] | SENDCPRS+5, SENDCPRS+6, SENDCPRS+8, SENDCPRS+10, CPRSUPD+15, CPRSUPD+17, CPRSUPD+18, CPRSUPD+21, CPRSUPD+29 |
Name | Field # of Occurrence |
---|---|
^( | SENDCPRS+10 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | CPRSUPD+20!*, CPRSUPD+21*, CPRSUPD+23! |
DA(1 | CPRSUPD+20* |
DIK | CPRSUPD+20!*, CPRSUPD+23! |
DT | PRIMDX+2, SECDX+3 |
I | SENDCPRS+4~, SEND1+4*, SEND1+5, SEND1+7, GETCPRS+3~, GETCPRS+8* |
I0 | BARESP+2~, BARESP+3*, BARESP+4 |
I1 | BADISP+3~, SECDX*, SECDX+1*, SECDX+3 |
I2 | BARESP+2~*, BARESP+7, BARESP+8*, BARESP+9 |
II | SENDCPRS+4~, SEND1+5* |
RA1 | BARESP+2~, BARESP+5*, BARESP+6, BARESP+10, SENDCPRS+4~, SENDCPRS+6*, SENDCPRS+9*, SENDCPRS+10*, GETCPRS+3~ |
RA1( | GETCPRS+8* |
RA1(2 | GETCPRS+9*, GETCPRS+11*, GETCPRS+12 |
RA1(3 | GETCPRS+11, GETCPRS+12 |
RA2 | SENDCPRS+4~, SENDCPRS+8*, SENDCPRS+10*, SEND1, SEND1+2, SEND1+5 |
RA2A | SENDCPRS+4~, SEND1+5*, SEND1+7 |
RABA | BARESP+2~, BARESP+4*, BARESP+5, BARESP+10 |
RABWDX | BADISP~, BADISP+2, CPRSUPD+28, CPRSUPD+37! |
RABWDX( | SECDX+1, SECDX+3, BARESP+5, CPRSUPD+27* |
RABWDX(1 | PRIMDX, PRIMDX+2, PRIMDX+3 |
>> RABWDX1( | SEND1+2*, SEND1+7* |
RACNI | CPRSUPD+13~*, CPRSUPD+33*, CPRSUPD+35, CPRSUPD+36 |
RACNT | BADISP+3~, PRIMDX+3*, SECDX+5*, BARESP+5, SENDCPRS+4~, SENDCPRS+7*, SEND1+1*, SEND1+2, SEND1+3, SEND1+7 |
RACNT1 | SENDCPRS+4~, SENDCPRS+7*, SEND1+3*, SEND1+6*, SEND1+7 |
RACPRS | CPRSUPD+14~* |
>> RADATA | GETCPRS+2, GETCPRS+5, GETCPRS+6, GETCPRS+8, GETCPRS+11, GETCPRS+12 |
RADFN | CPRSUPD~, CPRSUPD+17, CPRSUPD+18, CPRSUPD+30, CPRSUPD+32, CPRSUPD+33, CPRSUPD+35, CPRSUPD+36, CPRSUPD+37! |
RADTI | CPRSUPD+13~*, CPRSUPD+32*, CPRSUPD+33, CPRSUPD+35, CPRSUPD+36 |
RADX | CPRSUPD~, CPRSUPD+37! |
RADX( | CPRSUPD+26, CPRSUPD+27 |
RADXIN | CPRSUPD+13~*, CPRSUPD+26*, CPRSUPD+27 |
>> RAECH(1 | SEND1+2 |
>> RAHDR | GETCPRS+4, GETCPRS+7 |
>> RAHLFS | SEND1+2, SEND1+7, GETCPRS+5, GETCPRS+6, GETCPRS+8 |
RAICD | PRIMDX+1~, PRIMDX+2*, SECDX+3*, SECDX+4 |
RAICD1 | SENDCPRS+4~, SEND1*, SEND1+2 |
RAICD3 | SENDCPRS+4~, SEND1*, SEND1+2 |
RAIND | BADISP+3~ |
RAIND( | BARESP+10 |
RAIND(2 | BADISP+5* |
RAIND(3 | BADISP+5* |
RAIND(4 | BADISP+5* |
RAIND(5 | BADISP+6* |
RAIND(6 | BADISP+6* |
RAIND(7 | BADISP+6* |
RAIND(8 | BADISP+6* |
RAIND(9 | BADISP+6* |
RAITEM | CPRSUPD~, CPRSUPD+15, CPRSUPD+16, CPRSUPD+17, CPRSUPD+18, CPRSUPD+20, CPRSUPD+21, CPRSUPD+29, CPRSUPD+30, CPRSUPD+32 , CPRSUPD+33, CPRSUPD+37! |
RAMSG | CPRSUPD+13~*, CPRSUPD+16*, CPRSUPD+17, CPRSUPD+18*, CPRSUPD+19, CPRSUPD+38 |
>> RANEW( | GETCPRS+5*, GETCPRS+6*, GETCPRS+11*, GETCPRS+12* |
RAO | SENDCPRS~, SENDCPRS+5, SENDCPRS+6, SENDCPRS+8, SENDCPRS+10 |
RAORIEN | CPRSUPD~, CPRSUPD+15, CPRSUPD+16, CPRSUPD+18, CPRSUPD+37! |
RASCEI | CPRSUPD~, CPRSUPD+25, CPRSUPD+37! |
RASCEII | CPRSUPD+13~, CPRSUPD+25*, CPRSUPD+27 |
RAUPD | CPRSUPD+13~*, CPRSUPD+29*, CPRSUPD+31 |
U | PRIMDX+2, SECDX+3, SECDX+4, BARESP+5, SEND1, SEND1+5, CPRSUPD+15, CPRSUPD+17, CPRSUPD+18, CPRSUPD+25 , CPRSUPD+29, CPRSUPD+36 |
>> Y | PRIMDX+4* |
>> ZTQUEUED | CPRSUPD+34* |