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

Package: Prosthetics

Routine: RMPRPST


Information

RMPRPST ;HISC/RVD - POST INIT FOR HCPCS CONVERSION;1/02/98

Source Information

Source file <RMPRPST.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Prosthetics 1 XREF^RMPRSE2  

Entry Points

Name Comments DBIA/ICR reference
START ;x-ref field 4.1 in file 660
660 ;HCPCS conversion for file 660
664 ;hcpcs conversion for file 664
6641 ;hcpcs conversion for file 664.1
KILL
GETHC ;get hcpcs IEN from 661.1

External References

Name Field # of Occurrence
XREF^RMPRSE2 START+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"Invalid Entry......"
  • Line Location: RMPRPST+2
Function Call: WRITE
  • Prompt: !!!!!!!!!!!
  • Line Location: START+1
Function Call: WRITE
  • Prompt: !,$C(7),"**** Unable to continue POST INIT, file 661.1 was not transported correctly !!!!"
  • Line Location: 660+2
Function Call: WRITE
  • Prompt: !!,"***** CONVERTING HCPCS entry for 660...."
  • Line Location: 660+4
Function Call: WRITE
  • Prompt: !,$C(7),"***** FILE 660, HCPCS CONVERSION IS DONE!!!!"
  • Line Location: 660+6
Function Call: WRITE
  • Prompt: !!,"***** CONVERTING HCPCS entry for 664...."
  • Line Location: 664+2
Function Call: WRITE
  • Prompt: !,$C(7),"***** FILE 664, HCPCS CONVERSION IS DONE!!!!"
  • Line Location: 664+4
Function Call: WRITE
  • Prompt: !!,"***** CONVERTING HCPCS entry for 664.1...."
  • Line Location: 6641+2
Function Call: WRITE
  • Prompt: !,$C(7),"***** FILE 664.1, HCPCS CONVERSION IS DONE!!!!"
  • Line Location: 6641+4
Function Call: WRITE
  • Prompt: !!,$C(7),"Note: Conversion of HCPCS has completed successfully."
  • Line Location: 6641+5
Function Call: WRITE
  • Prompt: !,?6,"You can let Prosthetic users back to the system !!!!!"
  • Line Location: 6641+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(660 - [#660] 660+5*
^RMPR(661.1 - [#661.1] 660+2, GETHC+1
^RMPR(664 - [#664] 664+3*
^RMPR(664.1 - [#664.1] 6641+3*

Label References

Name Line Occurrences
GETHC 660+5, 664+3, 6641+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
I 660+5*, 664+3*, 6641+3*, KILL!
J 664+3*, 6641+3*, KILL!
RM6611 660+5, 664+3, 6641+3, KILL!, GETHC+1*
RMFILE 660+3*, 664+1*, 6641+1*, KILL!
RMHCPC KILL!
RMHIEN 660+5*, 664+3*, 6641+3*, KILL!, GETHC+1
U 660+5, 664+3, 6641+3
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All