RMPR5NU1 ;HIN/RVD-INVENTORY UPDATE UTILITY ;3/24/1998
Source file <RMPR5NU1.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 |
Name | Comments | DBIA/ICR reference |
---|---|---|
ADD | ;add a new inventory stock record
|
|
EDIT | ;update the current balance.
|
|
UPD | ;update item current balance in 661.3
|
|
BAL | ;get total cost of the same HCPCS and ITEM @ the same station.
|
|
ITEMLOC(RE,RL,RH,RHO) | ;ASK for an Item Location.
|
|
LODIC | ||
LOCPROC | ;jump here if only one location
|
|
ITEM(RE,RL,RO,RH,RHO,RC,RI) | ;ask for PSAS ITEM
|
|
ITDIC | ;
|
|
DSP | ;display HCPCS @ a LOCATION
|
|
LDIC | ||
VEND() | ;
|
|
BALA() | ;
|
|
COST() | ;
|
|
SOURCE() | ;
|
|
CONV | ;convert utility for Inventory Location field. (in CAPS)
|
|
PROC | ||
ST | ||
EXIT | ;EXIT FOR INVENTORY UPDATE UTILITY
|
|
NDX | ;reindex the 'D1' cross-reference of file 661.3
|
Name | Line Occurrences |
---|---|
Function Call: WRITE |
|
Function Call: WRITE |
|
Function Call: READ |
|
Function Call: WRITE |
|
Routine Call |
|
FileNo | Call Tags |
---|---|
^RMPR(661.2 - [#661.2] | Classic Fileman Calls |
^RMPR(661.3 - [#661.3] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RMPR(661.1 - [#661.1] | EDIT+1, EDIT+2, ITEMLOC+5, ITEMLOC+6, ITEMLOC+7, DSP+3 |
^RMPR(661.2 - [#661.2] | ADD+4*, ADD+5*, EDIT+6* |
^RMPR(661.3 - [#661.3] | UPD+2, UPD+5*, UPD+6*, BAL+2, BAL+4, ITEMLOC+3, LODIC+2, LOCPROC+2, ITDIC+8, ITDIC+9 , DSP+2, DSP+3, VEND+2, BALA+2, COST+2, SOURCE+2, NDX+3, NDX+4 |
^TMP($J | DSP+1!, DSP+3*, DSP+4, DSP+7, LDIC+1! |
Name | Field # of Occurrence |
---|---|
^( | NDX+4 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
DA | ADD+1*, ADD+4, ADD+5, EDIT+4*, EDIT+6, ITEMLOC+2~, ITEM+1~, EXIT+1!, NDX+5*, NDX+7! |
DA(1 | ITDIC+3*, ITDIC+4, NDX+5* |
DA(2 | ITDIC+3*, ITDIC+4, NDX+5* |
DD | ADD+1! |
DIC | ADD+1*, EDIT+4*!, ITEMLOC+2~, LODIC+3*, LODIC+4!, ITEM+1~, ITDIC+4*, ITDIC+5!, LDIC*, EXIT+1! |
DIC("A" | LODIC+1*, ITDIC+5* |
DIC("B" | ITEMLOC+8!, LODIC+2*, ITDIC+1*, ITDIC+10! |
DIC("S" | LODIC*, ITDIC+10! |
DIC("W" | LDIC* |
DIC(0 | ADD+1*, EDIT+4*!, LODIC+3*, ITDIC+5*, LDIC* |
DIE | EXIT+1! |
DIK | ADD+6*, EDIT+7*, NDX+5*, NDX+7! |
DIK(1 | NDX+1* |
>> DIRUT | LODIC+5 |
DLAYGO | ADD+1*!, EDIT+4*!, EXIT+1! |
DO | ADD+1! |
DR | EXIT+1! |
DT | ADD+1, ADD+4, EDIT+4, EDIT+6 |
DTIME | DSP+6 |
DTOUT | LODIC+5, ITDIC+6, DSP+6, EXIT+1! |
DUOUT | LODIC+5, ITDIC+6, DSP+6, EXIT+1! |
DUZ | ADD+4 |
>> RA | PROC* |
RANS | DSP+6*, LDIC+1! |
>> RB | PROC*, ST |
RC | ITEM~, ITDIC+3, ITDIC+8, ITDIC+9, ST* |
RCNT | DSP+1*, DSP+5*, DSP+6*, LDIC+1! |
>> RDESC | ITEMLOC+6* |
RE | ITEMLOC~, LODIC+2, ITEM~, ITDIC+1 |
REND | DSP+1*, DSP+4, DSP+6*, LDIC+1! |
>> RENT | BAL+4*, BAL+5 |
RFL | LDIC! |
RH | ITEMLOC~, ITEMLOC+3, ITEMLOC+5, ITEMLOC+6, ITEMLOC+7, LODIC+2, LOCPROC+2, ITEM~, ITDIC+1 |
>> RHC | BAL+2*, BAL+4 |
RHO | ITEMLOC~, LODIC+2, ITEM~, ITDIC+1 |
RI | ITEM~, ITDIC+1, DSP+4*, DSP+7, LDIC+1!, NDX+3*, NDX+4, NDX+5, NDX+7! |
>> RIT | BAL+2*, BAL+3, BAL+4 |
RJ | CONV+1*, PROC*, NDX+3*, NDX+4, NDX+5, NDX+7! |
RK | NDX+4*, NDX+5, NDX+7! |
RL | ITEMLOC~, LODIC+2, LODIC+7*, LOCPROC+1, LOCPROC+2, ITEM~, ITDIC+1, ITDIC+3, ITDIC+8, ITDIC+9 |
>> RLO | BAL+2*, BAL+4 |
>> RM3 | UPD+2*, UPD+3 |
>> RM6612 | ADD+1* |
>> RMAVA | ADD+4, BAL+1*, BAL+5*, BAL+7* |
>> RMAVCO | UPD+1*, UPD+3*, UPD+4 |
>> RMBA | UPD+3*, UPD+4*, UPD+5 |
>> RMBAA | BAL+5*, BAL+6 |
RMBAL | EDIT+6, EXIT+1! |
>> RMC | PROC*, ST* |
>> RMCO | UPD+3*, UPD+4*, UPD+6 |
>> RMCOA | BAL+5*, BAL+6 |
RMDAHC | ADD+4, BAL+2, ITEM+1~ |
>> RMDAT | CONV+1*, PROC |
>> RMDES | ITDIC+10* |
RMHC | ITEMLOC+2~, ITEMLOC+7*, ITEM+1~ |
RMHCC | ITEMLOC+2~, ITEMLOC+5* |
>> RMHCDA | UPD+2, UPD+5, UPD+6, LOCPROC+2*, VEND+2, BALA+2, COST+2, SOURCE+2 |
RMHCPC | ITEM+1~ |
RMIEN | EXIT+1! |
RMIIF | ITEM+1~ |
>> RMIT | ADD+4, BAL+2, ITDIC+8*, ITDIC+10 |
>> RMITDA | UPD+2, UPD+5, UPD+6, ITDIC+8*, ITDIC+9, VEND+2, BALA+2, COST+2, SOURCE+2 |
>> RMITDES | ITDIC+8* |
RMITEM | EDIT+1*, EDIT+2, EDIT+6, EXIT+1! |
>> RMLAB | ADD+5 |
>> RMLACO | ADD+5 |
RMLCOUNT | ITEMLOC+2~ |
RMLLF | ITEMLOC+2~, ITEMLOC+4*, ITEMLOC+5* |
RMLO1 | ITEMLOC+2~ |
RMLOC | ADD+2, ADD+4, UPD+2, UPD+5, UPD+6, ITEMLOC+3!, LOCPROC+1*, DSP+4, VEND+2, BALA+2 , COST+2, SOURCE+2, EXIT+1! |
RMLOCC | ITEMLOC+2~, ITEMLOC+4* |
>> RMLODA | DSP+2, DSP+3 |
>> RMMES | EDIT+5*, EDIT+6 |
>> RMPR("STA" | ADD+4, BAL+1 |
>> RMPRDFN | ADD+4 |
RMPRI | DSP+1*, DSP+2*, DSP+3, LDIC+1! |
RMPRI1 | DSP+3*, LDIC+1! |
RMPRIEN | EXIT+1! |
RMPRIT | DSP+3*, LDIC+1! |
RMQTY | ADD+4, EDIT+6, UPD+4, EXIT+1! |
>> RMSER | ADD+4 |
RMSO | ADD+4, EXIT+1! |
>> RMSOA | BAL+5* |
>> RMTIME | ADD+5 |
>> RMTOBA | ADD+4, BAL+1*, BAL+6*, BAL+7 |
>> RMTOCO | ADD+4, EDIT+6, BAL+1*, BAL+6*, BAL+7 |
RMU3 | ITEM+1~, ITDIC+9*, ITDIC+11, VEND+1~, VEND+2*, VEND+3, BALA+1~, BALA+2*, BALA+3, COST+1~ , COST+2*, COST+3, SOURCE+1~, SOURCE+2*, SOURCE+3 |
RMUBA | ITEM+1~, ITDIC+11*, ITDIC+12 |
RO | ITEM~, ITDIC+1 |
>> RQUIT | ADD+3, LODIC+5*, ITDIC+6* |
>> RS | BAL+1*, BAL+2 |
U | UPD+3, UPD+5, UPD+6, BAL+5, ITEMLOC+5, ITEMLOC+6, ITEMLOC+7, LODIC+2, ITDIC+8, ITDIC+11 , DSP+3, VEND+3, BALA+3, COST+3, SOURCE+3 |
X | ADD+1*, EDIT+4*!, ITEMLOC+2~, ITEM+1~, LDIC*, CONV+1*, PROC* |
Y | ADD+1!, EDIT+4, ITEMLOC+2~, ITEMLOC+8!, LODIC+6, LODIC+7, ITEM+1~, ITDIC+7, ITDIC+8, VEND+3* , VEND+4, BALA+3*, BALA+4, COST+3*, COST+4, SOURCE+3*, SOURCE+4 |