RMPRED5 ;HIN/RVD-EDIT ISSUE FROM STOCK UTILITY;2/1/1999
Source file <RMPRED5.m>
Package | Total | Call Graph |
---|---|---|
VA FileMan | 2 | FILE^DICN IX1^DIK |
Prosthetics | 1 | BAL^RMPR5NU1 |
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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
NHCPC(RX) | ;HCPCS, location or psas/item different
|
|
QTYN(RX) | ;change quantity
|
|
NEWVAR | ||
RMVAR | ;piece array variable
|
|
RMHC() | ; get HCPCS IEN in #661.3
|
|
UPD | ;update Pros Inventory balance.
|
|
SETC | ;
|
|
CHK | ;check for source and type of transaction changes.
|
|
SOUC | ;logic for updating SOURCE change for commercial.
|
|
SOUV | ;logic for updating SOURCE change for VA.
|
|
DELRPRR | ;logic for deleting 'RP' or 'RR' modifier with transaction change.
|
|
ADDRP | ;logic for adding 'RP' modifier with transaction change.
|
FileNo | Call Tags |
---|---|
^RMPR(661.2 - [#661.2] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RMPR(660 - [#660] | NHCPC+15*, NHCPC+16*, QTYN+8*, SETC+1! |
^RMPR(661.1 - [#661.1] | CHK+3 |
^RMPR(661.2 - [#661.2] | NHCPC+7*, UPD+14* |
^RMPR(661.3 - [#661.3] | RMHC+2, UPD+2, UPD+5, UPD+6, UPD+7, UPD+8*, UPD+9* |
Name | Field # of Occurrence |
---|---|
^(0 | NHCPC+7* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> DA | UPD+15* |
DD | UPD+12! |
>> DIC | UPD+12*, UPD+15 |
>> DIC(0 | UPD+12* |
>> DIK | UPD+15* |
DLAYGO | UPD+12*, UPD+13! |
DO | UPD+12! |
DT | UPD+12, UPD+14 |
DUZ | UPD+14 |
>> R1(0 | CHK+1 |
>> R1(1 | CHK+1, CHK+5*, CHK+9*, SOUC+1*, SOUV+1*, DELRPRR+6*, ADDRP+1* |
>> R12(0 | SETC+1 |
RAV | NEWVAR+1~, UPD+7*, UPD+9 |
RAVA | NEWVAR+1~, UPD+7*, UPD+14 |
RBAL | NEWVAR+1~, UPD+4*, UPD+5*, UPD+8, UPD+9 |
>> RCOS | UPD+4* |
RD6612 | NHCPC+9*, NHCPC+15, NEWVAR+1~, UPD+15* |
>> RDES | NHCPC+16, QTYN+8 |
>> RDF | NHCPC+13*, QTYN+6*, RMVAR+1*, UPD+14 |
>> RF | NHCPC+13, QTYN+6, RMVAR+11* |
>> RH | NHCPC+7, NHCPC+10, NHCPC+11, NHCPC+13, NHCPC+16, QTYN+3, RMVAR+3* |
>> RHO | NHCPC+3, NHCPC+4, NHCPC+7, NHCPC+13, NHCPC+16, RMVAR+4* |
>> RI | NHCPC+13, QTYN+5, RMVAR+6* |
>> RIO | NHCPC+6, RMVAR+7* |
>> RL | NHCPC+4*, NHCPC+5, NHCPC+11*, NHCPC+12, NHCPC+15, QTYN+3*, QTYN+4, QTYN+8, RMHC+2, UPD+1 , UPD+2, UPD+5, UPD+6, UPD+7, UPD+8, UPD+9, UPD+14 |
RMBA | NEWVAR+1~, UPD+5* |
>> RMC | SOUC+1*, SOUV+1*, DELRPRR+1* |
>> RMCI | SOUC+1*, SOUV+1*, DELRPRR+1* |
>> RMCLEN | DELRPRR+3*, DELRPRR+4, DELRPRR+5 |
>> RMCO | UPD+6* |
>> RMCOM | UPD+13*, UPD+14 |
>> RMCPT1 | CHK+3*, CHK+4, CHK+5, CHK+8, CHK+9, CHK+10 |
>> RMCPTOLD | CHK+1*, CHK+4, CHK+5, CHK+6, CHK+7, CHK+8, CHK+9, CHK+10, CHK+11, SOUC+1* , SOUV+1*, DELRPRR+1*, DELRPRR+2, DELRPRR+3*, DELRPRR+4*, DELRPRR+5*, DELRPRR+6, ADDRP+1* |
>> RMDAHC | UPD+10*, UPD+14 |
>> RMDESC | NHCPC+7, RMVAR+12* |
>> RMF | DELRPRR+2*, DELRPRR+3 |
>> RMFPIECE | DELRPRR+2*, DELRPRR+3 |
RMHCDA | NHCPC+5*, NHCPC+8, NHCPC+9*, NHCPC+12*, NHCPC+14, QTYN+4*, QTYN+7, NEWVAR~, UPD+1, UPD+2 , UPD+5, UPD+6, UPD+7, UPD+8, UPD+9 |
RMHCPC | NHCPC+4*, NHCPC+5, NHCPC+11*, NHCPC+12, QTYN+3*, QTYN+4, NEWVAR~, RMHC+2, UPD+10, CHK+2 , CHK+3 |
RMIT | NHCPC+6*, NHCPC+13*, QTYN+5*, NEWVAR~, UPD+1, UPD+2, UPD+14 |
>> RMITDA | UPD+2*, UPD+3, UPD+5, UPD+6, UPD+7, UPD+8, UPD+9 |
RMLOC | NEWVAR~ |
>> RMLPIECE | DELRPRR+3* |
>> RMPR("STA" | UPD+14 |
>> RMPRIEN | NHCPC+15, NHCPC+16, QTYN+8, SETC+1 |
RMQTY | NHCPC+6*, NHCPC+13*, QTYN+5*, NEWVAR~, UPD+5, UPD+14 |
RMRR | CHK+6*, CHK+7*, CHK+11*, DELRPRR+1, DELRPRR+7! |
>> RMSONEW | CHK+1*, CHK+4, CHK+5, CHK+6, CHK+7, CHK+8, CHK+9 |
>> RMSTOCK | NHCPC+7 |
>> RMTOBA | UPD+14 |
>> RMTOCO | UPD+14 |
>> RMTYNEW | CHK+1*, CHK+10, CHK+11 |
>> RN | NHCPC+10, NHCPC+11, QTYN+3, RMVAR+2* |
>> RO | NHCPC+3, NHCPC+4, RMVAR+5* |
>> RQ | NHCPC+13, QTYN+5, RMVAR+8* |
>> RQO | NHCPC+6, QTYN+5, RMVAR+9* |
RSO | NHCPC+13*, QTYN+6*, NEWVAR+1~, RMVAR+1*, UPD+14 |
RSOUR | NHCPC+13, QTYN+6, NEWVAR+1~, RMVAR+10* |
RX | NHCPC~, QTYN~, RMVAR+2, RMVAR+3, RMVAR+4, RMVAR+5, RMVAR+6, RMVAR+7, RMVAR+8, RMVAR+9 , RMVAR+10, RMVAR+11 |
U | NHCPC+7, NHCPC+15, NHCPC+16, QTYN+8, UPD+5, UPD+6, UPD+7, UPD+8, UPD+9, SETC+1 , CHK+1, CHK+5, CHK+9, SOUC+1, SOUV+1, DELRPRR+6, ADDRP+1 |
X | NEWVAR~, UPD+12* |
Y | NEWVAR~, RMHC+1~, RMHC+2*, RMHC+3, UPD+14, UPD+15 |