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

Package: Prosthetics

Routine: RMPRE29


Information

RMPRE29 ;PHX/JLT,RVD-EDIT 2319 ;10/2/03 13:04

Source Information

Source file <RMPRE29.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 ^DIC  (,UPDATE)^DIE  IX1^DIK  $$GET1^DIQ  ^DIR  
Prosthetics 2 CPT^RMPRCPTU  QUICK^RMPRE29  
Kernel 1 KILL^XUSCLEAN  

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

Package Total Caller Graph
Prosthetics 4 RMPR EDIT 2319  RMPR NPPD QUICK EDIT  RMPRE29  RMPROP  

Entry Points

Name Comments DBIA/ICR reference
TYP1 ;edit type of transaction....
TRAN
PCAT
HCPC ;set type and ask item and HCPCS
QED2 ;
EXIT ;
SETED2 ;set 660
QUICK ;quick edit for HCPCS and type
SET
CHK ;check for transaction changes
DELRP ;logic for deleting 'RP' modifier with transaction change.
DELNU ;logic for deleting 'NU' modifier.
ADDRP ;logic for adding 'RP' modifier with transaction change.
ADDNU ;logic for adding 'NU' modifier.
UPD664 ; update file 664 for Lot Number, Model, Serial Number, and Contract # Changes
; -- get the changes from 660

External References

Name Field # of Occurrence
^DIC RMPRE29+17, QUICK+5
^DIE HCPC+6, HCPC+28, HCPC+29, QUICK+11
UPDATE^DIE UPD664+16
IX1^DIK SETED2+2
$$GET1^DIQ UPD664+3, UPD664+5
^DIR TRAN+3, PCAT+2, PCAT+10, HCPC+21, QED2+3, QUICK+21, SET+1
CPT^RMPRCPTU HCPC+16, HCPC+24, QUICK+17, QUICK+23
QUICK^RMPRE29 SET+2
KILL^XUSCLEAN EXIT+1, SET+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: RMPRE29+14
Function Call: WRITE
  • Prompt: !
  • Line Location: RMPRE29+16
Function Call: WRITE
  • Prompt: !,?5,$C(7),"Someone else is Editing this entry!"
  • Line Location: RMPRE29+17
Function Call: WRITE
  • Prompt: !,"Please enter type of Transaction!!"
  • Line Location: TRAN+5
Function Call: WRITE
  • Prompt: !,"Please enter Patient Category!!"
  • Line Location: PCAT+4
Function Call: WRITE
  • Prompt: !,"OLD CPT MODIFER: ",$P(R1(1),U,6)
  • Line Location: HCPC+12
Function Call: WRITE
  • Prompt: !
  • Line Location: QED2+3
Function Call: WRITE
  • Prompt: !
  • Line Location: QUICK+2
Function Call: WRITE
  • Prompt: !
  • Line Location: QUICK+4
Function Call: WRITE
  • Prompt: !,?5,$C(7),"Someone else is Editing this entry!"
  • Line Location: QUICK+5
Function Call: WRITE
  • Prompt: !,"OLD CPT MODIFER: ",$P(R1(1),U,6)
  • Line Location: QUICK+15
Function Call: WRITE
  • Prompt: !
  • Line Location: SET+1
Routine Call
  • DIC
  • Line Location:
    • RMPRE29+17
    • QUICK+5
Routine Call
  • DIE
  • Line Location:
    • HCPC+6
    • HCPC+28
    • HCPC+29
    • QUICK+11
Routine Call
  • DIE
  • Line Location:
    • UPD664+16
Routine Call
  • DIR
  • Line Location:
    • TRAN+3
    • PCAT+2
    • PCAT+10
    • HCPC+21
    • QED2+3
    • QUICK+21
    • SET+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^RMPR(660 - [#660] Classic Fileman Calls,  GET1^DIQ

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^RMPR(660 - [#660] RMPRE29+17, TYP1+1, HCPC+9, HCPC+16*, HCPC+24*, HCPC+29, QED2+2, SETED2+1*, QUICK+5, QUICK+8
QUICK+12, QUICK+13, QUICK+19*, QUICK+26*, SET+3, CHK+1, CHK+2, CHK+4, DELRP+6*, DELNU+6*
ADDRP+1*, ADDNU+1*
^RMPR(661.1 - [#661.1] CHK+3, CHK+5
^RMPR(664 - [#664] UPD664+7, UPD664+11

Label References

Name Line Occurrences
ADDNU CHK+8
ADDRP CHK+5
CHK HCPC+30, SETED2+3, SET
DELNU CHK+7
DELRP CHK+6
EXIT RMPRE29+17, QUICK+5
HCPC PCAT+7
PCAT PCAT+4
QED2 TRAN+4, PCAT+3, PCAT+10, HCPC+8
RMPRE29 QED2+4
SET QUICK+11
SETED2 TRAN+4, PCAT+3, PCAT+10, HCPC+1
TRAN TRAN+5
UPD664 HCPC+32

Naked Globals

Name Field # of Occurrence
^("AM" TYP1+1
^(1 TYP1+1, HCPC+9

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% EXIT+2!
>> DA RMPRE29+19*, HCPC+29, SETED2+1, SETED2+2*, QUICK+7*, QUICK+8, QUICK+12, QUICK+13, QUICK+19, QUICK+26
UPD664+3, UPD664+5, UPD664+11
DIC RMPRE29+14*, RMPRE29+19, EXIT+2!, SETED2+2!, QUICK+2*, QUICK+7
DIC("A" RMPRE29+14*, QUICK+2*
DIC("S" RMPRE29+16*, QUICK+4*
DIC("W" RMPRE29+15*, QUICK+3*
DIC(0 RMPRE29+14*, QUICK+2*
DIE RMPRE29+19*, EXIT+2!, QUICK+7*
DIE("NO^" HCPC+5*, HCPC+7!
>> DIK SETED2+2*
DIR TRAN!, PCAT!, PCAT+7!, PCAT+12!, HCPC+25!, QED2+3!, EXIT+2!, QUICK+22!, SET!
DIR("A" HCPC+20*, QED2+3*, QUICK+21*, SET+1*
DIR("B" TRAN+2*, PCAT+1*, PCAT+9*, HCPC+20*, QUICK+21*
DIR(0 TRAN*, PCAT*, PCAT+8*, HCPC+20*, QED2+3*, QUICK+21*, SET+1*
>> DIROUT QUICK+11
>> DR HCPC+6*, HCPC+28*, HCPC+29*, QUICK+7*
>> DTOUT TRAN+4, PCAT+3, PCAT+10, HCPC+8, HCPC+21, HCPC+30, QED2+4, QUICK+11, QUICK+22, SET+2
>> DUOUT TRAN+4, PCAT+3, PCAT+10, HCPC+8, HCPC+21, HCPC+30, QUICK+11
>> R1("AM" TYP1+1*, TYP1+3, PCAT+6*, PCAT+7*, PCAT+11*, SETED2+1
>> R1(0 TYP1+1*, TYP1+2, TYP1+3, TRAN+6*, HCPC+4, HCPC+9*, HCPC+10, HCPC+15, HCPC+23, SETED2+1
QUICK+8*, QUICK+9
>> R1(1 TYP1+1*, TYP1+3, HCPC+9*, HCPC+11, HCPC+12, HCPC+26, HCPC+27, SETED2+1, QUICK+8*, QUICK+10
QUICK+15, QUICK+24, QUICK+25
R4DA CHK+9!
>> RDA HCPC+15*, HCPC+16, HCPC+23*, HCPC+24, QUICK+14*, QUICK+17, QUICK+23
RMC CHK+9!, DELRP+1*, DELNU+1*
>> RMCAT TYP1+3*, PCAT+5*, PCAT+7, PCAT+10, PCAT+11
>> RMCATS TYP1+3*, PCAT+1, PCAT+6*
RMCI CHK+9!, DELRP+1*, DELNU+1*
RMCLEN CHK+9!, DELRP+3*, DELRP+4, DELRP+5, DELNU+3*, DELNU+4, DELNU+5
RMCPT HCPC+16, HCPC+17, HCPC+24, HCPC+26, HCPC+27, QUICK+1!, QUICK+18, QUICK+19, QUICK+24, QUICK+25
QUICK+26, CHK+4*, CHK+5, CHK+6, CHK+7, CHK+8, DELRP+1*, DELRP+2, DELRP+3*, DELRP+4*
DELRP+5*, DELRP+6, DELNU+1*, DELNU+2, DELNU+3*, DELNU+4*, DELNU+5*, DELNU+6, ADDRP+1*, ADDNU+1*
>> RMCPT1 CHK+3*, CHK+8
>> RMEND RMPRE29+15*, TRAN+4*, PCAT+3*, PCAT+10*, HCPC+8*
RMF CHK+9!, DELRP+2*, DELRP+3, DELNU+2*, DELNU+3
RMFDA UPD664+2~
RMFDA( UPD664+3*, UPD664+14, UPD664+15
RMFDA1 UPD664+2~
RMFDA1( UPD664+15*
RMFERR UPD664+2~
RMFPIECE CHK+9!, DELRP+2*, DELRP+3, DELNU+2*, DELNU+3
>> RMHCNEW QUICK+12*, QUICK+14, QUICK+16, QUICK+20
>> RMHCOLD TYP1+3*, HCPC+10*, HCPC+14, QUICK+10*, QUICK+16, QUICK+20
RMHCPC TYP1+3*, HCPC+11*, HCPC+14, HCPC+15, HCPC+23, CHK+2*, CHK+3, CHK+5, CHK+9!
RMI UPD664+2~, UPD664+3*, UPD664+14*, UPD664+15
RMLPIECE CHK+9!, DELRP+3*, DELNU+3*
RMN UPD664+2~, UPD664+13*, UPD664+14*, UPD664+15
RMNS UPD664+2~, UPD664+10*, UPD664+11*, UPD664+15
RMORD UPD664+2~, UPD664+5*, UPD664+6, UPD664+7
RMPR EXIT+1~
RMPRA CHK+9!
>> RMPRDA RMPRE29+19*, TYP1+1, HCPC+9, HCPC+16, HCPC+24, QED2+2, SETED2+2, QUICK+7*, SET+3, CHK+1
CHK+2, CHK+4, DELRP+6, DELNU+6, ADDRP+1, ADDNU+1
>> RMPREDT QED2+1
RMPRSITE EXIT+1~
>> RMSOUR TYP1+3*, QUICK+9*, QUICK+14, CHK+7, CHK+8
>> RMSPE TYP1+3*, PCAT+11*
>> RMSPES TYP1+3*, PCAT+9, PCAT+11*
RMSSFI UPD664+2~, UPD664+7*, UPD664+8, UPD664+11, UPD664+15
>> RMTOTCOS TYP1+2*, HCPC+29
RMTYPE TYP1+3*, TRAN+6*, QUICK+9*, QUICK+13*, QUICK+14, CHK+1*, CHK+5, CHK+6, CHK+9!
>> RMTYPS TYP1+3*, TRAN+2, TRAN+7*
SRC HCPC+3~, HCPC+4*, HCPC+10
U TYP1+2, TYP1+3, TRAN+6, PCAT+6, PCAT+7, PCAT+11, HCPC+4, HCPC+10, HCPC+11, HCPC+12
HCPC+15, HCPC+16, HCPC+23, HCPC+24, HCPC+26, HCPC+27, HCPC+29, QUICK+9, QUICK+10, QUICK+12
QUICK+13, QUICK+15, QUICK+19, QUICK+24, QUICK+25, QUICK+26, CHK+1, CHK+2, CHK+3, CHK+4
DELRP+6, DELNU+6, ADDRP+1, ADDNU+1, UPD664+11
X EXIT+2!
Y RMPRE29+17, RMPRE29+19, TRAN+5, TRAN+6, TRAN+7, PCAT+4, PCAT+5, PCAT+6, PCAT+11, HCPC+8
HCPC+22, HCPC+30, QED2+4, EXIT+2!, QUICK+5, QUICK+7, QUICK+11, QUICK+22, SET+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All