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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: RMPRPST3

Package: Prosthetics

Routine: RMPRPST3


Information

RMPRPST3 ;HISC/ODJ - POST INIT FOR +AL HCPCS;8/1/00

Source Information

Source file <RMPRPST3.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
VA FileMan 2 UPDATE^DIE  GETS^DIQ  

Entry Points

Name Comments DBIA/ICR reference
START ;Populate the 661.1 HCPC File with additional codes
UPD(RMPRIEN,RMPRDAT,RMPRDES) ;
E0434
V5299
DAT ;;table for +al HCPCs (grabbed from NPP)

External References

Name Field # of Occurrence
UPDATE^DIE UPD+15, UPD+20, UPD+23, E0434+6, V5299+5
GETS^DIQ E0434+3, V5299+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Must use correct line label - review source code.",!!
  • Line Location: RMPRPST3+2
Function Call: WRITE
  • Prompt: !!,"Entering Additional HCPCs......."
  • Line Location: START+3
Function Call: WRITE
  • Prompt: !,RMPRIEN," ",RMPRDAT
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !,"Finished entering Additional HCPCs",!
  • Line Location: START+12
Function Call: WRITE
  • Prompt: !,"Adding RR modifier to HCPC E0434"
  • Line Location: START+13
Function Call: WRITE
  • Prompt: !,"Finished adding modifier to HCPC E0434",!
  • Line Location: START+15
Function Call: WRITE
  • Prompt: !,"Amending HCPC V5299"
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !,"Finished amending V5299"
  • Line Location: START+18
Function Call: WRITE
  • Prompt: !,"Finished post init",!
  • Line Location: START+19
Routine Call
  • DIE
  • Line Location:
    • UPD+15
    • UPD+20
    • UPD+23
    • E0434+6
    • V5299+5

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(661.1 - [#661.1] GETS^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(661.1 - [#661.1] UPD+3, UPD+14, E0434+2, V5299+2

Label References

Name Line Occurrences
E0434 START+14
UPD START+10
V5299 START+17

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
HCPC E0434~, E0434+1*, E0434+2, V5299~, V5299+1*, V5299+2
I START+1~, START+4*
IEN E0434~, E0434+2*, E0434+3, E0434+4, E0434+5, V5299~, V5299+2*, V5299+3, V5299+4
OUP E0434~, V5299~
OUP( E0434+4, E0434+5*, V5299+4*
RMPRDAT START+1~, START+5*, START+6, START+7*, START+8, START+10, UPD~, UPD+4, UPD+5, UPD+6
, UPD+7, UPD+8, UPD+9, UPD+10, UPD+11, UPD+12, UPD+13
RMPRDES START+1~, START+9*, START+10, UPD~, UPD+19
RMPRFDA UPD+1~, UPD+16!
RMPRFDA( UPD+4*, UPD+5*, UPD+6*, UPD+7*, UPD+8*, UPD+9*, UPD+10*, UPD+11*, UPD+12*, UPD+13*
, UPD+19*
RMPRIA UPD+1~, UPD+18!
RMPRIA(1 UPD+2*, UPD+3, UPD+14, UPD+17
RMPRIEN START+1~, START+6*, START+8, START+10, UPD~, UPD+2*, UPD+3*, UPD+4, UPD+5, UPD+6
, UPD+7, UPD+8, UPD+9, UPD+10, UPD+11, UPD+12, UPD+13, UPD+17*, UPD+19
U START+2*, UPD+4, UPD+5, UPD+6, UPD+7, UPD+8, UPD+9, UPD+10, UPD+11, UPD+12
, UPD+13

Marked Items

Name Field # of Occurrence
$T(DAT+I START+4, START+5
$T(DAT+I+1 START+9
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items  | All