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

Package: Radiology Nuclear Medicine

Routine: RABWORD2


Information

RABWORD2 ;HOIFO/KAR - Radiology Billing Awareness ; 04 Apr 2014 6:57 AM

Source Information

Source file <RABWORD2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA Fileman 3 Y^DIQ  EN^DIQ1  ^DIR  
Kernel 2 HOME^%ZIS  $$FMTE^XLFDT  
Registration 1 (DEM,ELIG,SVC)^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Radiology Nuclear Medicine 1 RAORD1  

Entry Points

Name Comments DBIA/ICR reference
PREV ;Prompt for Copying a previous Order's DX/SC/EC values.
ELIG ;List the Service Connected ratios for the patient
ORDER ; List Exam Orders to select to copy ICD-9 SC/EC Indicator values from
ADDEXAM ;Add DX/SC/EI data to new order when adding order to Last Visit
HDR ; Header

External References

Name Field # of Occurrence
HOME^%ZIS HDR+1
Y^DIQ ORDER+8, ORDER+9
EN^DIQ1 ELIG+5
^DIR ORDER+15, PREV+14, PREV+17, PREV+20
DEM^VADPT ELIG+2
ELIG^VADPT ELIG+2
SVC^VADPT ELIG+2
$$FMTE^XLFDT ORDER+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ORDER+16
Function Call: WRITE
  • Prompt: !!,"#",?10,"Last Procedures/New Orders",?39,"Order Date",?52,"Imaging Loc."
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !,"------",?10,"----------------------------",?39,"------------",?52,"------------"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,"*Invalid selection"
  • Line Location: PREV+21
Function Call: WRITE
  • Prompt: !,"*No Previous ICD codes entered for this order"
  • Line Location: PREV+23
Function Call: WRITE
  • Prompt: @IOF,!,VADM(1)_" ("_VA("PID")_") ",$P(VAEL(6),"^",2),!!," * * * Eligibility Information and Service Connected Conditions * * *"
  • Line Location: ELIG+7
Function Call: WRITE
  • Prompt: !!,?5,"Primary Eligibility: "_RAELIG,!,?5,"A/O Exp.: "_RAAO,?22,"ION Rad.: "_RAIR,?40,"SWAC: "_RAEC,?57,"SHAD: "_RASHAD,!
  • Line Location: ELIG+8
Routine Call
  • %ZIS
  • Line Location:
    • HDR+1
Routine Call
  • DIR
  • Line Location:
    • ORDER+15
    • PREV+14
    • PREV+17
    • PREV+20

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(75.1 ORDER+8, ORDER+9
^RADPT - [#70] ADDEXAM+12
^RAO(75.1 - [#75.1] ORDER+3, ORDER+4, PREV+23, PREV+24, PREV+25, PREV+26, ADDEXAM+13, ADDEXAM+14, ADDEXAM+15, ADDEXAM+16
^TMP("RACOPY" PREV+24*, PREV+26*, ADDEXAM+14*, ADDEXAM+16*
^XUSEC("PROVIDER" PREV+7, ADDEXAM+7

Label References

Name Line Occurrences
HDR ORDER+1, ORDER+16
ORDER PREV+19
PREV PREV+27

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> C ORDER+8*, ORDER+9*
DA ELIG+5*!
DIC ELIG+5*!
DIQ ELIG+5*!
DIQ(0 ELIG+5*
DIR ORDER+15!, PREV+11!, PREV+20!
DIR("?" PREV+14*, PREV+17*
DIR("A" PREV+13*, PREV+16*, PREV+20*
DIR("B" PREV+13*, PREV+16*
DIR(0 ORDER+15*, PREV+13*, PREV+16*, PREV+20*
DIROUT ORDER+2~
DIRUT ORDER+2~
DR ELIG+5*!
DTOUT ORDER+2~
DUOUT ORDER+2~
DUZ PREV+7, ADDEXAM+7
IOF ORDER+16, HDR+1, ELIG+7
IOSL ORDER+14
IOST ORDER+14
RA751 ORDER+2~
RA751(0 ORDER+4*, ORDER+6, ORDER+7
RA751(16 ORDER+6*, ORDER+12
RA751(2 ORDER+4*, ORDER+5, ORDER+8*, ORDER+11
RA751(20 ORDER+6*, ORDER+9*, ORDER+13
RA751(5 ORDER+7*
RAAO ELIG+1~, ELIG+4*, ELIG+8
RABASEC PREV+25~*, PREV+26, ADDEXAM+11~, ADDEXAM+15*, ADDEXAM+16
RACOPY ORDER+1*, ORDER+10*, ORDER+11, PREV+19~, ADDEXAM+11~
RACOPY( ORDER+10*, PREV+21, PREV+23, PREV+24, PREV+25, PREV+26
>> RADFN ORDER+3, ELIG+5, ELIG+6, ADDEXAM+12
RAEC ELIG+1~, ELIG+6*, ELIG+8
RAELIG ELIG+1~, ELIG+3*, ELIG+8
RAIR ELIG+1~, ELIG+4*, ELIG+8
RALP ORDER+2~*, ORDER+3*, ORDER+4, ORDER+10
RAOIEN ADDEXAM+11~, ADDEXAM+12*, ADDEXAM+13, ADDEXAM+14, ADDEXAM+15, ADDEXAM+16
>> RAOPT("ORDEREXAM" HDR+1
RAPERC ELIG+1~, ELIG+3*
RAPREV PREV+11~*, PREV+21*, PREV+27
RASC ELIG+1~, ELIG+3*
RASHAD ELIG+1~, ELIG+4*, ELIG+8
>> RAVLECNI ADDEXAM+12
>> RAVLEDTI ADDEXAM+12
>> RAXIT ORDER+1*, ORDER+2*, ORDER+3, ORDER+15*, ORDER+16
RAY ELIG+1~
RAY(2 ELIG+6
U ORDER+4, ORDER+6, ORDER+7, ORDER+8, ORDER+9, PREV+26, ADDEXAM+12, ADDEXAM+16
>> VA("PID" ELIG+7
>> VADM(1 ELIG+7
>> VAEL(1 ELIG+3
>> VAEL(3 PREV+12, PREV+15, ELIG+3
>> VAEL(6 ELIG+7
>> VASV(11 ELIG+4
>> VASV(2 ELIG+4
>> VASV(3 ELIG+4
>> Y ORDER+8*, ORDER+9*, ORDER+15, PREV+18, PREV+21, PREV+22, PREV+23, PREV+24, PREV+25, PREV+26
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All