RAPCE ;HIRMFO/GJC - Interface with PCE APIs for wrkload, visits ; Apr 28, 2022@08:42:59
Source file <RAPCE.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 5 | GETDEPT^RABWIBB (DX,PROCDX)^RABWPCE ($$ACTCODE,$$BASICMOD)^RACPTMSC (CKDUP,RESEND,RSCRFLR)^RAPCE1 FAILBUL^RAPCE2 |
| Integrated Billing | 1 | $$SWSTAT^IBBAPI |
| Kernel | 1 | $$FMADD^XLFDT |
| PCE Patient Care Encounter | 1 | $$DATA2PCE^PXAPI |
| VA FileMan | 1 | FILE^DIE |
| 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 | 4 | RABWORD1 RAKRDIT RAORDU RAPCE1 |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| COMPLETE(RADFN,RADTI,RACNI) | ; When an exam status changes to 'complete'
; Input: RADFN-> Patient DFN, RADTI-> Exam Timestamp, RACNI-> Case IEN ; NOTE: RACNI input param is ignored for exam sets (all cases under |
|
| EN2 | ;check i-loc's credit method quit if 'no credit'
|
|
| LON | ; lock at P level
|
|
| NONSET | ; non-exam sets
|
|
| KOUT | ||
| ENC(X) | ; Set up the '"RAPXAPI",$J,"ENCOUNTER"' nodes
|
|
| PCE(RADFN,RADTI,RACNI) | ; Pass on the information to the PCE software
|
|
| MULCS(RADFN,RADTI) | ; Update the 'Credit recorded' field and the Visit
|
|
| PROC(X) | ; Set up the other '"RAPXAPI",$J,"PROCEDURE"' nodes for this case
; If same procedure repeated in exam set, add to qty of existing ; 'procedure' node. Else, if different provider, create new ; separate 'procedure' nodes |
|
| RECDCS(RADFN,RADTI,RACNI) | ; Set 'Clinic Stop Recorded' to yes
; (70.03, fld 23) |
|
| SETUP | ; Setup examination data node information
; If no provider, or inactive CPT, fail |
|
| VISIT(RADFN,RADTI,RACNI,RAVSIT) | ; Stuff the Visit file pointer passed back
; from $$DATA2PCE^PXAPI() into the Visit field (70.02, fld 6) |
|
| CPTMOD(X3) | ;CPT Modifiers
; CPT Mods for dupl. procedure+provider will be accounted for ; however, same CPT Mod will overwrite previous CPT Mod |
|
| OUTSIDE() | ;is this study tied to an outside report?
; input: none (vars RADFN,RADTI,RACNI must exist) |
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | RECDCS+3, VISIT+3 |
| $$SWSTAT^IBBAPI | EN2+6 |
| $$DATA2PCE^PXAPI | PCE+3, PCE+7 |
| GETDEPT^RABWIBB | PROC+20 |
| DX^RABWPCE | LON+10, NONSET+6 |
| PROCDX^RABWPCE | PROC+22 |
| $$ACTCODE^RACPTMSC | SETUP+12 |
| $$BASICMOD^RACPTMSC | SETUP+10 |
| CKDUP^RAPCE1 | NONSET+2 |
| RESEND^RAPCE1 | NONSET+3 |
| RSCRFLR^RAPCE1 | PCE+18 |
| FAILBUL^RAPCE2 | LON+1, LON+17, NONSET+7, PCE+21, PCE+23 |
| $$FMADD^XLFDT | PROC+15 |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DIC(9.4 - [#9.4] | COMPLETE+20 |
| ^RA(72 - [#72] | LON+7, MULCS+4 |
| ^RA(79.1 - [#79.1] | EN2+1, ENC+4, ENC+5 |
| ^RADPT - [#70] | COMPLETE+22, LON+1, LON+6, LON+7, LON+17, NONSET+1, KOUT+1, PCE+23, MULCS+3, MULCS+4 , SETUP+2, SETUP+10, OUTSIDE+7 |
| ^RAMIS(71 - [#71] | SETUP+8 |
| ^RARPT - [#74] | ENC+3, SETUP+7, OUTSIDE+11 |
| ^TMP("DIERR" | COMPLETE+13! |
| ^TMP("RAPXAPI" | COMPLETE+13!, LON+9, LON+14, KOUT!, ENC+7*, ENC+8*, ENC+9*, ENC+10*, ENC+11*, PROC+4 , PROC+5*, PROC+10*, PROC+11*, PROC+12*, PROC+13*, PROC+14*, PROC+15*, PROC+17*, PROC+18*, CPTMOD+3* , CPTMOD+5* |
| Name | Field # of Occurrence |
|---|---|
| ^( | SETUP+10 |
| ^("ENC PROVIDER" | PROC+4 |
| ^("QTY" | PROC+5 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DUZ | LON+1, LON+17, NONSET+7, PCE+21, PCE+23 |
| RA | COMPLETE+14~, SETUP+10*, CPTMOD+4*, CPTMOD+5* |
| RA1 | COMPLETE+14~, SETUP+10* |
| RA17 | ENC+1~, ENC+2*, ENC+3 |
| RA7002 | COMPLETE+14~, COMPLETE+22*, COMPLETE+23, EN2+1, ENC+5, SETUP+10, SETUP+12 |
| RA7003 | COMPLETE+14~, LON+7*, LON+10, NONSET+1*, NONSET+6, ENC+2, SETUP+2*, SETUP+3, SETUP+4, SETUP+5 , SETUP+7, SETUP+8 |
| RA7003(12 | PROC+4, PROC+13, PROC+17, SETUP+3*, SETUP+7 |
| RA7003(14 | PROC+14, SETUP+4* |
| RA7003(15 | PROC+4, PROC+13, PROC+17, SETUP+5*, SETUP+7 |
| RA71 | COMPLETE+14~, PROC+4, PROC+11, PROC+12, SETUP+8*, SETUP+12 |
| RA791 | COMPLETE+14~, EN2+1*, EN2+2 |
| RABAD | COMPLETE+14~, LON+6, LON+8, LON+14, LON+16, NONSET+6, NONSET+7, ENC+6*, SETUP+7*, SETUP+12* |
| RACCOUNT | EN2+6~, PCE+7 |
| RACNI | COMPLETE~, LON+1, LON+4, LON+5*, LON+6*, LON+7, LON+13*, LON+14, LON+17*, NONSET+1 , NONSET+6, NONSET+7, KOUT+1, PCE~, PCE+12, PCE+13, PCE+21, PCE+23*, MULCS+2~*, MULCS+3* , MULCS+4, MULCS+5, MULCS+6, PROC+15, RECDCS~, RECDCS+2, SETUP+2, SETUP+10, VISIT~, VISIT+2 , OUTSIDE+5, OUTSIDE+7 |
| RACNISAV | COMPLETE+14~, LON+4*, LON+13 |
| RACNT | COMPLETE+14~, COMPLETE+21*, LON+8*, LON+9, LON+11, NONSET+4*, NONSET+6 |
| RACOMIEN | COMPLETE+15~ |
| RACPTM | COMPLETE+14~, SETUP+10! |
| RACPTM( | SETUP+10*, CPTMOD+5 |
| RADFN | COMPLETE~, COMPLETE+22, LON+1, LON+6, LON+7, LON+14, LON+17, NONSET+1, NONSET+6, NONSET+7 , KOUT+1, ENC+7, PCE~, PCE+12, PCE+13, PCE+14, PCE+21, PCE+23, MULCS~, MULCS+3 , MULCS+4, MULCS+5, MULCS+6, RECDCS~, RECDCS+2, SETUP+2, SETUP+10, VISIT~, VISIT+2, OUTSIDE+5 , OUTSIDE+7 |
| RADTE | COMPLETE+14~, COMPLETE+21*, ENC+8, PROC+15 |
| RADTI | COMPLETE~, COMPLETE+21, COMPLETE+22, LON+1, LON+6, LON+7, LON+14, LON+17, NONSET+1, NONSET+6 , NONSET+7, KOUT+1, PCE~, PCE+12, PCE+13, PCE+14, PCE+21, PCE+23, MULCS~, MULCS+3 , MULCS+4, MULCS+5, MULCS+6, RECDCS~, RECDCS+2, SETUP+2, SETUP+10, VISIT~, VISIT+2, OUTSIDE+5 , OUTSIDE+7 |
| RADUP | PROC+4~, PROC+7*, PROC+9 |
| RADUPRC | COMPLETE+15~, NONSET+3 |
| >> RADUZ | LON+1, LON+17, NONSET+7, PCE+21, PCE+23 |
| RAEARRY | COMPLETE+14~, EN2+7*~, PCE+3, PCE+7 |
| RAFDA | RECDCS+2~, VISIT+2~ |
| RAFDA( | RECDCS+2*, VISIT+2* |
| RAIMGLOC | ENC+1~, ENC+4*, ENC+5*, ENC+6, ENC+9 |
| RALCKFAL | COMPLETE+15~, COMPLETE+16*, LON+1* |
| RAPFSW | EN2+6~*, PCE+3, PCE+5, PROC+20 |
| RAPKG | COMPLETE+14~, COMPLETE+20*, PCE+3, PCE+7 |
| RARECMPL | COMPLETE+14~, LON+16, NONSET+7, PCE+11, PCE+20 |
| RARPT | OUTSIDE+6~, OUTSIDE+10*, OUTSIDE+11 |
| RARPT(0 | OUTSIDE+11*, OUTSIDE+14 |
| RARPTLOC | ENC+1~, ENC+3*, ENC+4 |
| RASENT | COMPLETE+15~, PCE+15* |
| RASTAT | COMPLETE+14~ |
| RASULT | PCE+1~, PCE+3*, PCE+7*, PCE+18 |
| RAVSIT | COMPLETE+14~, PCE+3, PCE+7, PCE+10, PCE+12, MULCS+6, VISIT~, VISIT+2 |
| RAWHOERR | PCE+19~* |
| >> RAXAMSET | COMPLETE+23*, LON+2, PCE+12, PCE+13, PCE+14, PCE+21, PCE+22 |
| RAY3 | OUTSIDE+6~, OUTSIDE+7*, OUTSIDE+10 |
| U | LON+7, LON+10, NONSET+6, ENC+2, ENC+3, MULCS+4, SETUP+7, OUTSIDE+10, OUTSIDE+14 |
| X | ENC~, ENC+7, ENC+8, ENC+9, ENC+10, ENC+11, PROC~, PROC+4, PROC+10, PROC+11 , PROC+12, PROC+13, PROC+14, PROC+15, PROC+17, PROC+18, PROC+21, PROC+22 |
| X1 | PROC+4~*, PROC+5, PROC+6 |
| X2 | PROC+4~* |
| X3 | PROC+4~, CPTMOD~, CPTMOD+3, CPTMOD+5 |
| >> ZTQUEUED | LON+16, NONSET+7, PCE+11, PCE+20 |
