| $$ETOI(RMPRE,RMPRI) |
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
RMPRE |
Input |
Array of data fields from the PROSTHETICS HCPCS ITEM
MASTER (#661.11) including:
RMPRE("IEN") - the PROSTHETICS HCPCS ITEM MASTER file (#661.11) IEN
|
RMPRI |
Output |
Array of data fields containing PROSTHETICS HCPCS
ITEM MASTER file (#661.11) fields in internal format:
RMPRI("IEN") - specified PROSTHETICS HCPCS ITEM MASTER file(#661.11) IEN
RMPRI("HCPCS") - field #.01 HCPCS
RMPRI("ITEM") - field #1 HCPCS ITEM
RMPRI("DESCRIPTION") - field #2 DESCRIPTION
RMPRI("STATION") - field #3 STATION
RMPRI("SOURCE") - field #4 SOURCE
RMPRI("UNIT") - field #5 UNIT OF ISSUE
RMPRI("ITEM MASTER IEN") - field #7 ITEM MASTER
|
RMPRERR |
Output |
Function Error Code:
RMPRERR = 0 - no errors
= 1 - error retrieving data from the PROSTHETICS HCPCS ITEM
MASTER file (#661.11) using GETS^DIQ
|
|
$$GET(RMPR) |
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
RMPR |
Both |
Input:
Array of fields containing:
RMPR("IEN") - PROSTHETICS HCPCS ITEM file #661.11 IEN
Output:
Array of data fields from the PROSTHETICS HCPCS ITEM file (#661.11)
including:
RMPR("IEN") - PROSTHETICS HCPCS ITEM file 661.11 IEN
RMPR("HCPCS") - field #.01 HCPCS
RMPR("ITEM") - field #1 HCPCS ITEM
RMPR("DESCRIPTION") - field #2 DESCRIPTION
RMPR("STATION") - field #3 STATION
RMPR("SOURCE") - field #4 SOURCE
RMPR("UNIT") - field #5 UNIT OF ISSUE
RMPR("HCPCS-ITEM") - field #6 PSAS ITEM
RMPR("ITEM MASTER") - field #7 ITEM MASTER
RMPR("STATUS") - field #8 STATUS
|
RMPRCRE |
Output |
Function Exit Code:
RMPRCRE = 0 - no problems
= 1 - problems retrieving data from file 661.11
using GETS^DIQ
|
|
$$HPACT(RMPR) |
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
RMPR |
Both |
Input:
Array of data fields from the PROSTHETIC HCPCS file (#661.1) including:
RMPR("HCPCS") - HCPCS Code
Output:
Array of data fields containing the following fields for all PROSTHETIC
HCPCS IENs for the specified HCPCS code:
RMPR("IEN") - PROSTHETIC HCPCS file (#661.1 ) IEN
RMPR("HCPCS") - field #.01 HCPCS
RMPR("SHORT DESC") - field #.02 SHORT NAME
RMPR("NEW HCPC IEN") - field #1 NEW HCPCS CODE
RMPR("CPT CODE") - field #2 CPT
RMPR("STATUS") - field #3 STATUS
RMPR("NPPD REPAIR CODE") - field #5 NPPD REPAIR CODE
RMPR("NPPD NEW CODE") - field #6 NPPD NEW CODE
RMPR("CALC FLAG") - field #9 CALCULATION FLAG
RMPR("INV FLAG") - field #10 INVENTORY FLAG
RMPR("LAB TIME") - field #11 PRE-DETERMINED LAB TIME
|
RMPRCRE |
Output |
Function Error Code:
RMPRCRE = 0 - no problems
= 1 - null RMPR("IEN")
= 2 - error occurred when retrieving a record from file
661.1 using GETS^DIQ
|
|
$$HPETOI(RMPRE,RMPRI) |
| VARIABLES |
TYPE |
VARIABLES DESCRIPTION |
RMPRE |
Input |
RMPRE - array of external values for PROSTHETIC HCPCS
(#661.1) file:
RMPRE("IEN") - PROSTHETIC HCPCS (#661.1) file IEN
|
RMPRI |
Output |
Array of data fields from the PROSTHETIC HCPCS file
(#661.1) in internal
format including:
RMPRI("IEN") - set to the specified PROSTHETIC HCPCS file
(#661.1) IEN
RMPRI("NEW HCPC IEN") - field #1 NEW HCPC CODE
RMPRI("CPT CODE") - field #2 CPT
RMPRI("STATUS") - field #3 STATUS
RMPRI("NPPD REPAIR CODE") - field #5 NPPD REPAIR CODE
RMPRI("NPPD NEW CODE") - field #6 NPPD NEW CODE
RMPRI("CALC FLAG") - field #9 CALCULATION FLAG
RMPRI("INV FLAG") - field #10 INVENTORY FLAG
RMPRI("LAB TIME") - field #11 PRE-DETERMINED LAB TIME
|
RMPRERR |
Output |
Function Error Code -
RMPRERR=0 - no errors
=1 - error occurred when retrieving specified PROSTHETIC
HCPCS file (#661.1)
|
|
