| RMPR7 | 
Both | 
On input, this array contains:
RMPR7("STATION") - Station IEN (P4)
RMPR7("HCPCS") - HCPCS Code (contained in bar code)
RMPR7("DATE&TIME") - DATE&TIME STAMP (contained in bar code)
On output, this array contains the following fields from the PROSTHETIC
CURRENT STOCK file (#661.7):
RMPR7("IEN") - PROSTHETIC CURRENT STOCK (#661.7) file IEN
RMPR7("STATION") - field #4 STATION
RMPR7("HCPCS") - field #.01 HCPCS
RMPR7("SEQUENCE") - field #2 SEQUENCE
RMPR7("HCPCS ITEM") - field #3 HCPCS ITEM
RMPR7("LOCATION") - field #5 LOCATION
RMPR7("QUANTITY") - field #6 QUANTITY
RMPR7("VALUE") - field #7 VALUE
RMPR7("UNIT" - field #8 UNIT OF ISSUE
 | 
RMPREXC | 
Output | 
Exit Condition:
0 -> normal, everything ok
1 -> multi-instance but with station match (RMPR7 set)
2 -> single instance but with station mis-match (RMPR7 set)
3 -> multi-instance and station mis-match (RMPR7 not set)
 
 | 
RMPRERR | 
Output | 
Function Error Code:
0  -> no error
1  -> null HCPCS input
2  -> null Date&Time entered
3  -> corrupt file (sequence but no IEN)
4  -> corrupt file (ien but no record)
5  -> error reading 661.7
99 -> no instances found for input HCPCS and Date&Time
 
 |