Print Page as PDF
OUTPATIENT SITE FILE ICR (4827)

OUTPATIENT SITE FILE    ICR (4827)

Name Value
NUMBER 4827
IA # 4827
DATE CREATED 2005/12/07
CUSTODIAL PACKAGE OUTPATIENT PHARMACY
USAGE Supported
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PSO59
NAME OUTPATIENT SITE FILE
GENERAL DESCRIPTION
This API shall return the following fields from the
OUTPATIENT SITE file (#59) for the IEN or free text entry received: NAME,
MAILING FRANK STREET ADDRESS, AREA CODE, PHONE NUMBER, MAILING FRANK ZIP+4
CODE, SITE NUMBER, MAILING FRANK CITY, MAILING FRANK STATE, SITE DEA NUMBER,
RELATED INSTITUTION, NPI INSTITUTION, IB SERVICE/SECTION and NCPDP NUMBER.
STATUS Active
DURATION Till Otherwise Agreed
ID PSO59
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
PSS(PSOIEN,PSOTXT,LIST)
PSS^PSO59(PSOIEN,PSOTXT,LIST)

Input:
PSOIEN
PSOTXT
LIST

Where:
PSOIEN = Internal Entry Number in OUTPATIENT SITE file (#59) [optional]
PSOTXT = Free text entry (a value of "??" may be used)  [optional]
LIST = Subscript name used in the ^TMP global [required]

Note: Either the IEN or free text entry must be present.

Output:
^TMP($J,LIST,PSOIEN,0)=Total entries returned by patient or -1^NO DATA FOUND
^TMP($J,LIST,PSOIEN,.01)=NAME(59,.01)
^TMP($J,LIST,PSOIEN,.02)=MAILING FRANK STREET ADDRESS(59,.02)
^TMP($J,LIST,PSOIEN,.03)=AREA CODE (59,.03)
^TMP($J,LIST,PSOIEN,.04)=PHONE NUMBER (59,.04)
^TMP($J,LIST,PSOIEN,.05)=MAILING FRANK ZIP+4 CODE(59,.05)
^TMP($J,LIST,PSOIEN,.06)=SITE NUMBER(59,.06)
^TMP($J,LIST,PSOIEN,.07)=MAILING FRANK CITY(59,.07)
^TMP($J,LIST,PSOIEN,.08)=MAILING FRANK STATE (59,.08)^NAME (5,.01)
^TMP($J,LIST,PSOIEN,1)=SITE DEA NUMBER (59,1)
^TMP($J,LIST,PSOIEN,2)=SITE (NATIONAL NAME)(59,2)^NAME (736,.01) <***See
note below***>
^TMP($J,LIST,PSOIEN,100)=RELATED INSTITUTION (59,100)^NAME (4,.01)
^TMP($J,LIST,PSOIEN,101)=NPI INSTITUTION (59,101)^NAME (4,.01)
^TMP($J,LIST,PSOIEN,1003)=IB SERVICE/SECTION (59,1003)^NAME (49,.01)
^TMP($J,LIST,PSOIEN,1008)=NCPDP NUMBER (59,1008)
^TMP($J,LIST,"B",NAME,PSOIEN)=""

Note: The SITE (NATIONAL NAME) field (#2) of the OUTPATIENT SITE file (#59)
points to the QUIC SORT DATA file (#736), which no longer exists.  Therefore,
the PSO59 routine will no longer return the ^TMP($J,LIST,PSOIEN,2) node.
.
VARIABLES TYPE VARIABLES DESCRIPTION
PSOIEN Input
Internal Entry Number [optional]
PSOTXT Input
Free text entry of .01 field from OUTPATIENT SITE
file (#59) or a value of "??" may be used [optional]
LIST Both
Subscript name used in the ^TMP global [required]
DATE ACTIVATED 2011/02/16
MAIL MESSAGE 41991012