RMPRE29 ;PHX/JLT,RVD-EDIT 2319 ;10/2/03 13:04
Source file <RMPRE29.m>
action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
Package | Total | Caller Graph |
---|---|---|
Prosthetics | 4 | RMPR EDIT 2319 RMPR NPPD QUICK EDIT RMPRE29 RMPROP |
Kernel | 1 | ^DIC(19 |
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 |
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 |
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: WRITE |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^RMPR(660 - [#660] | Classic Fileman Calls, GET1^DIQ |
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 |
>> | 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 |