Call Graph
Call Graph Total: 4
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 2 | (EN2,MULCS,RECDCS,VISIT)^RAPCE FAILBUL^RAPCE2 |
| PCE Patient Care Encounter | 1 | ($$DATA2PCE,$$DELVFILE)^PXAPI |
| VA FileMan | 1 | FILE^DIE |
RAPCE1 ;HIRMFO/GJC-Interface with PCE APIs for workload, visits;6/4/96 15:03 ; Apr 28, 2022@08:43:27
Source file <RAPCE1.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 2 | (EN2,MULCS,RECDCS,VISIT)^RAPCE FAILBUL^RAPCE2 |
| PCE Patient Care Encounter | 1 | ($$DATA2PCE,$$DELVFILE)^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 |
| 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 | ||
| RSCRFLR | ;p189/KLM Resend credit failure to PCE (PX211 work around)
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| Routine Call |
|
| 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, C1, RESEND+5, D1+1 , DUNL, RSCRFLR+15 |
| ^TMP("RAPXAPI" | UNCOMPL+11!, UNCOMPL+26! |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DUZ | DELVST+5, RESEND+5, RSCRFLR+13, RSCRFLR+15 |
| 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 |
| PXAERR | RSCRFLR+1! |
| >> PXKERROR("VISIT" | RSCRFLR+1! |
| 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, RSCRFLR+5, RSCRFLR+6, RSCRFLR+13, RSCRFLR+15* |
| 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, C1, RESEND+5, D1+1, DUNL , RSCRFLR+5, RSCRFLR+6, RSCRFLR+7, RSCRFLR+13, RSCRFLR+15 |
| >> 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, C1, RESEND+5, D1+1 , DUNL, RSCRFLR+5, RSCRFLR+6, RSCRFLR+7, RSCRFLR+13, RSCRFLR+15 |
| >> RADUPRC | DELVST+11, CKDUP+5*, C9+1* |
| >> RADUZ | DELVST+5, RESEND+5, RSCRFLR+13, RSCRFLR+15 |
| RAEARRY | UNCOMPL+10~, UNCOMPL+24*~, RSCRFLR+2 |
| RAFDA | REPNT+1~ |
| RAFDA( | REPNT+1* |
| RALCKFAL | UNCOMPL+10~, UNCOMPL+12*, DELVST+5*, RESEND+5* |
| >> RAPKG | UNCOMPL+21*, DELVST+8, RSCRFLR+2 |
| RAPRCIEN | CKDUP+7~, CKDUP+8*, C9 |
| RARECMPL | UNCOMPL+10~, DELVST+15*, RSCRFLR+4, RSCRFLR+12 |
| >> RASENT | D9+2, RSCRFLR+8* |
| RASTAT | DELVST+15~ |
| RASULT | DELVST+8*, DELVST+9, RSCRFLR+1!, RSCRFLR+2* |
| RAVSIT | UNCOMPL+10~, UNCOMPL+20*, DELVST+8, DELVST+15!, REPNT+1, D1+2*, D9, RSCRFLR+1!, RSCRFLR+2, RSCRFLR+3 , RSCRFLR+5 |
| RAWHOERR | RSCRFLR+11~* |
| RAX | CKDUP+7~ |
| RAX( | C1+4*, C9 |
| RAXAMSET | UNCOMPL+10~, UNCOMPL+15*, DELVST+12, DELVST+15*, RSCRFLR+5, RSCRFLR+6, RSCRFLR+7, RSCRFLR+13, RSCRFLR+14 |
| U | UNCOMPL+20, CKDUP+8, C1+1, C1+2, D1+1, D1+2 |
| >> ZTQUEUED | DELVST+11, D9+2, RSCRFLR+4, RSCRFLR+12 |
