©2011-2018 Open Source Electronic Health Record Alliance
This work is licensed under a Creative Commons Attribution 3.0 Unported License
This work is licensed under a Creative Commons Attribution 3.0 Unported License
RABWPCE ;HISC/MM - Billing Awareness Project: PCE API ; 3/23/04 10:17am
Source file <RABWPCE.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| DXPL | ; Create "DX/PL" Node.
|
|
| DX(RAO) | ; Create ^TMP("RAPXAPI",$J,"DX/PL" for PCE API: Ordering ICD Dx.
; Called from LON+n^RAPCE. ; ^RAO(75.1,RAO,"BAx",0) = ICD Diagnosis^SC^AO^IR^EC^SHAD^MST^HNC ; NOTE: "EC" now represents "SWAC" but this internal value is not being changed. only ; external display text is being modified. This instance of "EC" is passed to PCE and ; PCE will handle converting it to any external value on their end. ; Set an Order" node for Billing Replacement |
|
| PROCDX(X) | ; Called from PROC^RAPCE.
; Add Ordering ICD Dx to Procedure for Billing Purposes. |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RAO(75.1 - [#75.1] | DX+7, DX+8, DX+16, DX+18 |
| ^TMP("RAPXAPI" | DX+7*, DXPL+3*, DXPL+4*, DXPL+7*, PROCDX+3, PROCDX+4*, PROCDX+5* |
| Name | Line Occurrences |
|---|---|
| DXPL | DX+16, DX+18 |
| Name | Field # of Occurrence |
|---|---|
| ^( | DX+18 |
| ^("DIAGNOSIS" | PROCDX+4, PROCDX+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| I | PROCDX+2~, PROCDX+3*, PROCDX+4, PROCDX+5 |
| RA1 | DX+9~, DX+17*, DX+18* |
| RA2 | DX+9~, DX+16*, DX+18*, DXPL+3, DXPL+7 |
| RA3 | DX+9~, DXPL+6*, DXPL+7 |
| RACNT | DX+9~, DX+15*, DXPL+1*, DXPL+2, DXPL+3, DXPL+4, DXPL+7 |
| RADXTYP | DX+9~, DXPL+2*, DXPL+4 |
| RAIND | DX+9~ |
| RAIND( | DXPL+7 |
| RAIND(1 | DX+12* |
| RAIND(2 | DX+12* |
| RAIND(3 | DX+12* |
| RAIND(4 | DX+13* |
| RAIND(5 | DX+13* |
| RAIND(6 | DX+13* |
| RAIND(7 | DX+13* |
| RAIND(8 | DX+13* |
| RAO | DX~, DX+7, DX+8, DX+16, DX+18 |
| U | DX+7, DXPL+3, DXPL+7 |
| X | PROCDX~, PROCDX+4, PROCDX+5 |