Home Package List Routine Alphabetical List Global Alphabetical List FileMan Files List FileMan Sub-Files List Package Component Lists Package-Namespace Mapping

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Local Variables | All

Print Page as PDF

Global: ^RMPR(661.11

Package: Prosthetics

Global: ^RMPR(661.11

Information

FileMan FileNo	FileMan Filename	Package
661.11	PROSTHETICS HCPCS ITEM MASTER FILE	Prosthetics

Description

This file contains all unique (Prosthetics Sensory and Aids Service) PSAS HCPCS Items for all stations or divisions under one computer system.

Directly Accessed By Routines, Total: 26

Package	Total	Routines
Prosthetics	26	RMPRPIQ5 ^RMPR(661.11 HO LETTER 3 LIST RMPR5HQ5 RMPR5NU RMPRPI01 RMPRPI02 RMPRPI09 RMPRPI16 RMPRPIFD RMPRPIUH RMPRPIUI RMPRPIUJ RMPRPIX1 RMPRPIXJ RMPRPIXR RMPRPIY1 RMPRPIY6 RMPRPIY7 RMPRPIY9 RMPRPIYC RMPRPIYD RMPRPIYI RMPRPIYO RMPRPIYZ RMPRPS36

Accessed By FileMan Db Calls, Total: 3

Package	Total	Routines
Prosthetics	3	RMPRPIUG RMPRPIX1 RMPRPIYO

Pointer To FileMan Files, Total: 3

Package	Total	FileMan Files
IFCAP	1	UNIT OF ISSUE(#420.5)[5]
Kernel	1	INSTITUTION(#4)[3]
Prosthetics	1	PROS ITEM MASTER(#661)[7]

Fields, Total: 10

Field #	Name	Loc	Type	Details
.01	HCPCS	0;1	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>20!($L(X)<5)!'(X'?1P.E) X` LAST EDITED: `SEP 08, 2005` HELP-PROMPT: `Answer must be 5-20 characters in length.` DESCRIPTION: `This is the HCPCS name as it shows in file #661.1.` PRE-LOOKUP: `D LKP^RMPRPIYI` CROSS-REFERENCE: `661.11^B` `1)= S ^RMPR(661.11,"B",$E(X,1,30),DA)=""` `2)= K ^RMPR(661.11,"B",$E(X,1,30),DA)` RECORD INDEXES: `ASHD (#10), ASHI (#13), ASHMDI (#14), XSD (#15)`
1	HCPCS ITEM	0;2	NUMBER	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:+X'=X!(X>9999999999)!(X<1)!(X?.E1"."1N.N) X` LAST EDITED: `AUG 15, 2001` HELP-PROMPT: `Type a Number between 1 and 9999999999, 0 Decimal Digits` DESCRIPTION: `This is the item number for a HCPCS item.` RECORD INDEXES: `ASHI (#13), ASHMDI (#14)`
2	DESCRIPTION	0;3	FREE TEXT	INPUT TRANSFORM: `K:$L(X)>60!($L(X)<1) X` LAST EDITED: `AUG 15, 2001` HELP-PROMPT: `Answer must be 1-60 characters in length.` DESCRIPTION: `This is the description of an item.` CROSS-REFERENCE: `661.11^D` `1)= S ^RMPR(661.11,"D",$E(X,1,30),DA)=""` `2)= K ^RMPR(661.11,"D",$E(X,1,30),DA)` RECORD INDEXES: `ASHD (#10), ASHMDI (#14), XSD (#15)`
3	STATION	0;4	POINTER TO INSTITUTION FILE (#4)	INSTITUTION(#4) LAST EDITED: `AUG 15, 2001` RECORD INDEXES: `ASHD (#10), ASHI (#13), ASHMDI (#14), XSD (#15)`
4	SOURCE	0;5	SET	'V' FOR VA; 'C' FOR COMMERCIAL; LAST EDITED: `AUG 15, 2001` DESCRIPTION: `This is the source of an item: 'V' stands for VA or USED items and 'C' for COMMERCIAL or NEW items. NEW and USED items are tracked seperately so that seperate inventory records should be maintained for each source.`
5	UNIT OF ISSUE	0;6	POINTER TO UNIT OF ISSUE FILE (#420.5)	UNIT OF ISSUE(#420.5) LAST EDITED: `JUN 05, 2001` DESCRIPTION: `This field is a pointer to Unit of Issue file (#420.5).`
6	PSAS ITEM	0;7	FREE TEXT	**********************REQUIRED FIELD********************** INPUT TRANSFORM: `K:$L(X)>12!($L(X)<7) X` LAST EDITED: `AUG 15, 2001` HELP-PROMPT: `Answer must be 7-12 characters in length.` DESCRIPTION: `PSAS Items are items used by PROSTHETICS SENSORY and AIDS SERVICE (PSAS) and are based from the HCPCS concatenated with the HCPCS ITEM NUMBER.` CROSS-REFERENCE: `661.11^C` `1)= S ^RMPR(661.11,"C",$E(X,1,30),DA)=""` `2)= K ^RMPR(661.11,"C",$E(X,1,30),DA)`
7	ITEM MASTER	0;8	POINTER TO PROS ITEM MASTER FILE (#661)	PROS ITEM MASTER(#661) LAST EDITED: `AUG 15, 2001` DESCRIPTION: `POINTER TO 661` RECORD INDEXES: `ASHMDI (#14)`
8	STATUS	0;9	SET	'0' FOR ACTIVE; '1' FOR INACTIVE; LAST EDITED: `DEC 11, 2002` DESCRIPTION: `This field represent if an ITEM is ACTIVE OR INACTIVE. If the STATUS is INACTIVE, an Item will not be printed in PROSTHETICS INVENTORY BALANCE BY HCPCS and PROSTHETICS INVENTORY BALANCE BY LOCATION reports for the station` `selected.`
9	INACTIVATION DATE	0;10	DATE	INPUT TRANSFORM: `S %DT="E" D ^%DT S X=Y K:Y<1 X` LAST EDITED: `DEC 11, 2002` DESCRIPTION: `This is the Date the item is put INACTIVE status.`

ICR, Total: 1

ICR LINK	Subscribing Package(s)	Fields Referenced	Description
ICR #6779	ADVANCED PROSTHETICS ACQUISITION TOOL	HCPCS (.01). Access: Read w/Fileman HCPCS ITEM (1). Access: Read w/Fileman DESCRIPTION (2). Access: Read w/Fileman STATION (3). Access: Read w/Fileman SOURCE (4). Access: Read w/Fileman UNIT OF ISSUE (5). Access: Read w/Fileman PSAS ITEM (6). Access: Read w/Fileman ITEM MASTER (7). Access: Read w/Fileman STATUS (8). Access: Read w/Fileman INACTIVATION DATE (9). Access: Read w/Fileman	File 661.11 'ASHI' cross reference Used to look up theIEN ofa STATION, HCPCS, andHCPCS ITEMFile 661.11 'B' cross reference Used to look up byHCPCS Nameas it appears in file 661.1File 661.11 'ASHD' cross reference Used to look up andsort bySTATION, HCPCS, DESCRIPTIONFile 661.11 'ASHMDI' look up index Used to look up andsort bySTATION, HCPCS, ITEM MASTER,DESCRIPTION, and HCPCS ITEM

External References

Name	Field # of Occurrence
^%DT	9+1
LKP^RMPRPIYI	.01TPL+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^RMPR(661.11 - [#661.11]	IXASHDSL+1, IXASHDKL+1!, IXASHDKEIC+1!, IXASHISL+1, IXASHIKL+1!, IXASHIKEIC+1!, IXASHMDISL+1, IXASHMDIKL+1!, IXASHMDIKEIC+1!, IXXSDSL+1 , IXXSDKL+1!, IXXSDKEIC+1!, .01(XREF 1S), .01(XREF 1K), 2(XREF 1S), 2(XREF 1K), 6(XREF 1S), 6(XREF 1K)

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %DT	9+1*
>> DA	IXASHDSL+1, IXASHDKL+1, IXASHISL+1, IXASHIKL+1, IXASHMDISL+1, IXASHMDIKL+1, IXXSDSL+1, IXXSDKL+1, .01(XREF 1S), .01(XREF 1K) , 2(XREF 1S), 2(XREF 1K), 6(XREF 1S), 6(XREF 1K)
X	.01+1!, .01(XREF 1S), .01(XREF 1K), 1+1!, 2+1!, 2(XREF 1S), 2(XREF 1K), 6+1!, 6(XREF 1S), 6(XREF 1K) , 9+1*!
X(1	IXASHDSL+1, IXASHDKL+1, IXASHISL+1, IXASHIKL+1, IXASHMDISL+1, IXASHMDIKL+1, IXXSDSL+1, IXXSDKL+1
X(2	IXASHDSL+1, IXASHDKL+1, IXASHISL+1, IXASHIKL+1, IXASHMDISL+1, IXASHMDIKL+1, IXXSDSL+1, IXXSDKL+1
X(3	IXASHDSL+1, IXASHDKL+1, IXASHISL+1, IXASHIKL+1, IXASHMDISL+1, IXASHMDIKL+1, IXXSDSL+1, IXXSDKL+1
X(4	IXASHMDISL+1, IXASHMDIKL+1
X(5	IXASHMDISL+1, IXASHMDIKL+1
>> Y	9+1

Info | Desc | Directly Accessed By Routines | Accessed By FileMan Db Calls | Pointer To FileMan Files | Fields | ICR | External References | Global Variables Directly Accessed | Local Variables | All