Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RAPCE

Package: Radiology Nuclear Medicine

Routine: RAPCE


Information

RAPCE ;HIRMFO/GJC-Interface with PCE APIs for wrkload, visits ; Sep 22, 2020@09:27:59

Source Information

Source file <RAPCE.m>

Call Graph

Call Graph

Call Graph Total: 9

Package Total Call Graph
Radiology Nuclear Medicine 5 GETDEPT^RABWIBB  (DX,PROCDX)^RABWPCE  ($$ACTCODE,$$BASICMOD)^RACPTMSC  (CKDUP,RESEND)^RAPCE1  FAILBUL^RAPCE2  
Integrated Billing 1 $$SWSTAT^IBBAPI  
Kernel 1 $$FMADD^XLFDT  
PCE Patient Care Encounter 1 $$DATA2PCE^PXAPI  
VA FileMan 1 FILE^DIE  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Radiology Nuclear Medicine 4 RABWORD1  RAKRDIT  RAORDU  RAPCE1  

Entry Points

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)

External References

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
FAILBUL^RAPCE2 LON+1, LON+17, NONSET+7, PCE+20, PCE+22
$$FMADD^XLFDT PROC+15

Global Variables Directly Accessed

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+22, 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*

Label References

Name Line Occurrences
$$OUTSIDE COMPLETE+7
CPTMOD PROC+6, PROC+21
ENC LON+9, NONSET+6
KOUT LON+18, NONSET+3
MULCS PCE+14
NONSET LON+2
PCE LON+14, NONSET+6
PROC LON+11, NONSET+6
RECDCS PCE+13, MULCS+5
SETUP LON+8, NONSET+5
VISIT PCE+12, MULCS+6

Naked Globals

Name Field # of Occurrence
^( SETUP+10
^("ENC PROVIDER" PROC+4
^("QTY" PROC+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DUZ LON+1, LON+17, NONSET+7, PCE+20, PCE+22
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+20, PCE+22*, 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+20, PCE+22, 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+20, PCE+22, 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+20, PCE+22
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+19
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*
RAVSIT COMPLETE+14~, PCE+3, PCE+7, PCE+10, PCE+12, MULCS+6, VISIT~, VISIT+2
RAWHOERR PCE+18~*
>> RAXAMSET COMPLETE+23*, LON+2, PCE+12, PCE+13, PCE+14, PCE+20, PCE+21
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+19
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All