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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables  | All
Print Page as PDF
Routine: RANPROU

Package: Radiology Nuclear Medicine

Routine: RANPROU


Information

RANPROU ;BPFO/CLT - NEW RADIOLOGY PROCEDURES UTILITIES ;22 Mar 2018 10:24 AM

Source Information

Source file <RANPROU.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 FILE^DIE  ^DIR  

Entry Points

Name Comments DBIA/ICR reference
CPT(DA,RAX) ;Ask for CPT Code when the 'Procedure Enter/Edit' option
CHKSTAT() ;Check the status of the study. If the
; exam status of the study is complete bypass the
; editing of the PROCEDURE (70.03 ; 2) field. This
; function is called from [RA EXAM EDIT] grzeis P124

External References

Name Field # of Occurrence
FILE^DIE CPT+19
^DIR CPT+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: RADIOLOGY
  • Line Location: CPT+1
Function Call: WRITE
  • Prompt: !!,"Are you adding '"_$P(Y,U,2)_"' as the CPT Code for the new Rad/Nuc Med Procedure",!,"'"_RAX_"'? NO// "
  • Line Location: CPT+9
Function Call: WRITE
  • Prompt: !!,"Are you adding '"_$P(Y,U,2)_"' as the CPT Code for the new Rad/Nuc Med Procedure",!,"'"_RAX_"'? NO// "
  • Line Location: CPT+10
Function Call: WRITE
  • Prompt: !?3,"Enter 'Y' to accept the CPT Code, or 'N' to reject the CPT Code or '^' to",!?3,"exit without selecting a CPT Code."
  • Line Location: CPT+14
Function Call: WRITE
  • Prompt: !?5,"Note: If an erroneous CPT Code is accepted it cannot be changed; the",!?5,"procedure must be inactivated."
  • Line Location: CPT+15
Function Call: WRITE
  • Prompt: !?3,"MISSING EXAM STATUS, EXIT CASE EDIT!",!
  • Line Location: CHKSTAT+16
Routine Call
  • DIE
  • Line Location:
    • CPT+19
Routine Call
  • DIR
  • Line Location:
    • CPT+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RA(72 - [#72] CHKSTAT+17
^RAMRPF(71.11 - [#71.11] CPT+9
^TMP("RA7111DA" CPT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DA CPT~, CPT+19
DIR CPT+3~
DIR(0 CPT+5*
DIROUT CPT+3~
DIRUT CPT+3~, CPT+4, CPT+5
DTIME CPT+11
DTOUT CPT+3~
DUOUT CPT+3~
>> RA0(3 CHKSTAT+16, CHKSTAT+17
>> RA7111DA CPT+8*, CPT+9
RAFDA CPT+3~
RAFDA( CPT+19*
RAX CPT~, CPT+9*, CHKSTAT+17~*
RAX(3 CHKSTAT+17*, CHKSTAT+18
RAYN CPT+3~*, CPT+4, CPT+11*, CPT+12*, CPT+13*, CPT+14, CPT+16*, CPT+17*, CPT+19
U CPT+9, CPT+19, CHKSTAT+17
X CPT+3~, CPT+5!
Y CPT+3~, CPT+5!, CPT+9, CPT+19
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Local Variables  | All