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 |  Local Variables  | All
Print Page as PDF
Routine: RAMRPIN

Package: Radiology Nuclear Medicine

Routine: RAMRPIN


Information

RAMRPIN ;BPFO/CLT - LIST ACTVE PROCEDURES WITH INACTIVE MRPF ; 12 Sep 2016 2:17 PM

Source Information

Source file <RAMRPIN.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZTLOAD  $$FMTE^XLFDT  
CPT HCPCS Codes 1 $$CPT^ICPTCOD  

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: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RA MRPF PIN  

Entry Points

Name Comments DBIA/ICR reference
EN ;PRIMARY ENTRY POINT
LOOK ;BEGIN LOOKING FOR ACTIVE PROCEDURES WITH INACTIVE CPT OR MRPF
PRNT ;PRINT THE FOUND DATA
TASK ;ASK DEVICE AND QUEUE
END ;END THE ROUTINE
HDR ;NEW PAGE AND PRINT HEADER

External References

Name Field # of Occurrence
^%ZIS TASK+2
^%ZTLOAD TASK+5
$$CPT^ICPTCOD LOOK+11, LOOK+14, PRNT+11
$$FMTE^XLFDT PRNT+12, PRNT+18

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"There are no active procedures with inactive CPT code or inactive",!,"Master Radiology Procedure File (MRPF) entry.",!
  • Line Location: PRNT+3
Function Call: WRITE
  • Prompt: !,$E(RANAME,1,20)
  • Line Location: PRNT+9
Function Call: WRITE
  • Prompt: ?22,RACPT
  • Line Location: PRNT+10
Function Call: WRITE
  • Prompt: ?22,RACPT
  • Line Location: PRNT+11
Function Call: WRITE
  • Prompt: ?32,$$FMTE^XLFDT($P(^XTMP("RAMRPIN",$J,RANAME,1),U,2),"2M")
  • Line Location: PRNT+12
Function Call: WRITE
  • Prompt: !,$E(RANAME,1,20)
  • Line Location: PRNT+17
Function Call: WRITE
  • Prompt: ?45,$E(MRPFNM,1,20),?67,$$FMTE^XLFDT($P(^XTMP("RAMRPIN",$J,RANAME,1),U,2),"2M")
  • Line Location: PRNT+18
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: @IOF,!!?27,"ACTIVE RADIOLOGY PROCEDURES",?70,"PAGE ",PAGE
  • Line Location: HDR+5
Function Call: WRITE
  • Prompt: !?33,"WITH INACTIVE"
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !?29,"CPT CODE OR MRPF LOINC"
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !!?3,"PROCEDURE NAME",?22,"CPT CODE",?32,"INAC DT",?45,"MRPF NAME",?67,"INAC DT"
  • Line Location: HDR+8
Function Call: WRITE
  • Prompt: !,"====================",?22,"========",?32,"=======",?45,"====================",?67,"======="
  • Line Location: HDR+9
Routine Call
  • %ZIS
  • Line Location:
    • TASK+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RAMIS(71 - [#71] LOOK+2, LOOK+3, LOOK+4, LOOK+5, LOOK+6, LOOK+7, LOOK+8, LOOK+20
^RAMRPF(71.99 - [#71.99] LOOK+18, LOOK+19, LOOK+20
^XTMP("RAMRPIN" LOOK+1!, LOOK+16*, LOOK+20*, LOOK+24*, PRNT+2, PRNT+5, PRNT+7, PRNT+8, PRNT+12, PRNT+14
, PRNT+15, PRNT+16, PRNT+18, END+2!

Label References

Name Line Occurrences
END PRNT+5, PRNT+21
HDR PRNT+1, PRNT+8, PRNT+17
LOOK TASK+2
TASK EN+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS EN+1~
%ZIS("A" TASK+1*
%ZIS("B" TASK+1*
DT LOOK+5, LOOK+24
IOF HDR+2, HDR+4, HDR+5
IOSL PRNT+8, PRNT+17
IOST TASK+2, HDR+3
MRPFNM LOOK+1~, PRNT+16*, PRNT+18
PAGE LOOK+1~*, HDR+1*, HDR+5*
RACINF LOOK+1~, LOOK+11*, LOOK+12, LOOK+14*, LOOK+16, PRNT+11*, END+1!
RACPT LOOK+1~, LOOK+7*, LOOK+11, LOOK+14, LOOK+16, PRNT+8*, PRNT+11*
RADT LOOK+1~
RAIEN EN+1~, LOOK+1~, LOOK+2*, LOOK+3, LOOK+4, LOOK+5, LOOK+6, LOOK+7, LOOK+8, LOOK+20
RAMRPF EN+1~, LOOK+1~, LOOK+8*, LOOK+18, LOOK+19, LOOK+20
RANAME LOOK+1~, LOOK+2*, LOOK+16, PRNT+5*, PRNT+7, PRNT+8, PRNT+9, PRNT+12, PRNT+14, PRNT+15
, PRNT+16, PRNT+17, PRNT+18
RARTN LOOK+1~, PRNT+5, PRNT+6, HDR+2, HDR+3*, HDR+4
RATS LOOK+1~, LOOK+18*, LOOK+19, LOOK+20
U LOOK+4, LOOK+6, LOOK+7, LOOK+8, LOOK+11, LOOK+16, LOOK+18, LOOK+19, LOOK+20, LOOK+24
, PRNT+8, PRNT+12, PRNT+15, PRNT+16, PRNT+18
X TASK+6!
X1 TASK+6!
X2 TASK+6!
ZTDESC TASK+3*, TASK+4*, TASK+6!
ZTDTH TASK+6!
ZTRTN TASK+3*, TASK+4*, TASK+6!
ZTSK TASK+6!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All