Print Page as PDF
PROSTHETICS PATIENT ELIGIBILITY ICR (3614)

PROSTHETICS PATIENT ELIGIBILITY    ICR (3614)

Name Value
NUMBER 3614
IA # 3614
FILE NUMBER 2
GLOBAL ROOT DPT(
DATE CREATED 2002/07/03
CUSTODIAL PACKAGE REGISTRATION
CUSTODIAL ISC Albany
USAGE Private
TYPE File
NAME PROSTHETICS PATIENT ELIGIBILITY
GENERAL DESCRIPTION
The following are patient data to be passed to coreFLS
to support Purchasing and Inventory functions.
GLOBAL REFERENCE
GLOBAL REFERENCE FIELD NUMBER
DPT(D0,0)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.01 Read w/Fileman
Extract data via FileMan utility like $$GET1^DIQ().
NAME 0;1
.09 Read w/Fileman
Extract data via FileMan utility like $$GET1^DIQ().
SOCIAL SECURITY NUMBER 0;9
DPT(D0,.36)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.361 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
PRIMARY ELIGIBILITY CODE .36;1
DPT(D0,.362)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.36205 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
RECEIVING A&A BENEFITS? .362;12
.36215 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
RECEIVING HOUSEBOUND BENEFITS? .362;13
DPT(D0,.372,D1)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME
IEN Direct Global Read & w/Fileman
Loop through subfile entries as via $O(^DPT(D0,.372,D1)).

Internal Entry Number
DPT(D0,.372,D1,0)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.01 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
RATED DISABILITIES (VA) 0;1
2 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
DISABILITY % 0;2
3 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
SERVICE CONNECTED 0;3
DPT(D0,.52)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.525 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
POW STATUS INDICATED? .52;5
DPT(D0,.53)
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
.531 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
CURRENT PH INDICATOR .53;1
.532 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
CURRENT PURPLE HEART STATUS .53;2
.533 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
CURRENT PURPLE HEART REMARKS .53;3
DPT(D0,"MPI")
FIELD NUMBER ACCESS FIELD DESCRIPTION FIELD NAME LOCATION
991.04 Read w/Fileman
Extract data via FileMan utility like EN^DIQ1.
LOCALLY ASSIGNED ICN MPI;4
STATUS Withdrawn
DURATION Till Otherwise Agreed
ID DPT(
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
COMMUNICATIONS SERVICE LIBRARY Washington/Silver Spring