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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: RAPCE1

Package: Radiology Nuclear Medicine

Routine: RAPCE1


Information

RAPCE1 ;HIRMFO/GJC-Interface with PCE APIs for workload, visits;6/4/96 15:03 ;5/28/97 12:59

Source Information

Source file <RAPCE1.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Radiology Nuclear Medicine 2 EN2^RAPCE  FAILBUL^RAPCE2  
PCE Patient Care Encounter 1 $$DELVFILE^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: 3

Package Total Caller Graph
Radiology Nuclear Medicine 3 RABWORD1  RAORDC  RAPCE  

Entry Points

Name Comments DBIA/ICR reference
UNCOMPL(RADFN,RADTI,RACNI) ; When an exam backs out of a complete status
DELVST ; Delete all Rad/Nuc Med pkg data from
; Visit file, other V-files for exam date/time
; lock at DT level due re-crediting all prev cmpltd exms for same dt/tm
; also, lock before deleting entire visit, in case can't delete
; cl.stp.rec and visit pointers from locked record
DELVPTR(RADFN,RADTI) ; each case in this exmset: del case ptrs to Visit file
; (subfile: 70.03 Field #: 27) ;visit ptr fld
MULCS(RADFN,RADTI) ; Clear the 'Clinic Stop Recorded?' field for ea case
; in this exam set
; (subfile: 70.03 Field #: 23) ;credit recorded fld
REPNT(RADFN,RADTI) ; Repopulate the visit field
CKDUP ; are there more than one procedure of same name ?
; return 0 if 1 or fewer completed procedure of the same name/dt/tm
; return 1 if more than 1 completed procedure of the same name/dt/tm
; as this case
; RAX(raprcien) = no. cases with this procedure ien
C1
C9
RESEND ; del and resend this dt/tm
; delete what was previously sent to PCE
; need to lock before finding RAVSIT because another case with same
; patient/procedure/dt/tm may be setting up the visit pointer
; for the first time for this dt/tm, at this moment
D1
D9
DUNL

External References

Name Field # of Occurrence
FILE^DIE DELVPTR+5, MULCS+6, REPNT+2
$$DELVFILE^PXAPI DELVST+8
EN2^RAPCE DELVST+15
FAILBUL^RAPCE2 DELVST+5, RESEND+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !?5,"Credit cannot be deleted for this exam due to lock failure for this exam date."
  • Line Location: DELVST+5
Routine Call
  • DIE
  • Line Location:
    • DELVPTR+5
    • MULCS+6
    • REPNT+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] UNCOMPL+21
^RA(72 - [#72] C1+2
^RA(79.1 - [#79.1] UNCOMPL+23
^RADPT - [#70] UNCOMPL+14, UNCOMPL+16, DELVST+5, DELVST+17, DELVPTR+3, MULCS+4, CKDUP+6, C1RESEND+5, D1+1
DUNL
^TMP("RAPXAPI" UNCOMPL+11!, UNCOMPL+26!

Label References

Name Line Occurrences
C1 C1+2, C1+5
C9 C1
D1 D1+1
D9 D1
DELVPTR DELVST+7
DELVST UNCOMPL+25, D9+1
DUNL D9
MULCS DELVST+10

Naked Globals

Name Field # of Occurrence
^( C1+1
^(0 C1+1, D1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DUZ DELVST+5, RESEND+5
I CKDUP+7~, CKDUP+8*, C1*, C1+1, C1+3, RESEND+6~, RESEND+7*, D1*, D1+1
J CKDUP+7~, C1+1*, C1+4
K CKDUP+7~, C1+1*, C1+2
RA7002 UNCOMPL+10~, UNCOMPL+14*, UNCOMPL+15, UNCOMPL+23
RA7003 UNCOMPL+10~, UNCOMPL+16*, UNCOMPL+20, CKDUP+8
RA71 DELVST+15~
>> RA791 UNCOMPL+23*
RABAD DELVST+15~
RACNI UNCOMPL~, UNCOMPL+16, DELVST+5, DELVPTR+2~*, DELVPTR+3*, DELVPTR+4, MULCS+3~*, MULCS+4*, MULCS+5, REPNT+1
CKDUP+6, RESEND+5
RACNT DELVST+15~*
>> RACOMIEN( C1+3*, D1
RADA1 DELVPTR+2~, DELVPTR+6!
RADA1( DELVPTR+4*
RADA2 MULCS+3~, MULCS+7!
RADA2( MULCS+5*
RADFN UNCOMPL~, UNCOMPL+14, UNCOMPL+16, DELVST+5, DELVST+7, DELVST+10, DELVST+17, DELVPTR~, DELVPTR+3, DELVPTR+4
, MULCS~, MULCS+4, MULCS+5, REPNT~, REPNT+1, CKDUP+6, C1RESEND+5, D1+1, DUNL
>> RADTE UNCOMPL+22*
RADTI UNCOMPL~, UNCOMPL+14, UNCOMPL+16, UNCOMPL+22, DELVST+5, DELVST+7, DELVST+10, DELVST+17, DELVPTR~, DELVPTR+3
, DELVPTR+4, MULCS~, MULCS+4, MULCS+5, REPNT~, REPNT+1, CKDUP+6, C1RESEND+5, D1+1
DUNL
>> RADUPRC DELVST+11, CKDUP+5*, C9+1*
>> RADUZ DELVST+5, RESEND+5
RAEARRY UNCOMPL+10~, UNCOMPL+24*~
RAFDA REPNT+1~
RAFDA( REPNT+1*
RALCKFAL UNCOMPL+10~, UNCOMPL+12*, DELVST+5*, RESEND+5*
>> RAPKG UNCOMPL+21*, DELVST+8
RAPRCIEN CKDUP+7~, CKDUP+8*, C9
RARECMPL UNCOMPL+10~, DELVST+15*
>> RASENT D9+2
RASTAT DELVST+15~
>> RASULT DELVST+8*, DELVST+9
RAVSIT UNCOMPL+10~, UNCOMPL+20*, DELVST+8, DELVST+15!, REPNT+1, D1+2*, D9
RAX CKDUP+7~
RAX( C1+4*, C9
RAXAMSET UNCOMPL+10~, UNCOMPL+15*, DELVST+12, DELVST+15*
U UNCOMPL+20, CKDUP+8, C1+1, C1+2, D1+1, D1+2
>> ZTQUEUED DELVST+11, D9+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All