Print Page as PDF
DBIA1242 ICR (1242)

DBIA1242    ICR (1242)

Name Value
NUMBER 1242
IA # 1242
DATE CREATED 1995/05/26
CUSTODIAL PACKAGE PCE PATIENT CARE ENCOUNTER
CUSTODIAL ISC Salt Lake City
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE PXRHS06
NAME DBIA1242
GENERAL DESCRIPTION
The Health Summary Package desires to set up an
integration agreement with the PCE Package to call the entry point
TREAT^PXRHS06 to retrieve Treatment data. Input data will be done via
parameter passing and output data will be placed in the ^TMP global in the
specified format that is described in this agreement.

Entry point: TREAT(DFN,ENDDT,BEGDT,OCCLIM,CATCODE)

INPUT  : DFN      - Pointer to PATIENT file (#2)
ENDDT    - Ending date/time in internal FileMan format
- Defaults to today's date at 11:59 pm
BEGDT    - Beginning date/time in internal FileMan format
- Defaults to one year prior to today's date
OCCLIM   - Maximum number of days for which data is returned
(If multiple visits on a given day, all data for
these visit will be returned) or an "R" for
only the most recent occurrence of each topic
Note: If event date is used, it may appear that too
many occurrences are retrieved but it is
based on visit date not event date.
returned (Can include multiple codes)
CATCODE - Pattern Match which controls visit data that is
A = AMBULATORY
H = HOSPITALIZATION
I = IN HOSPITAL
C = CHART REVIEW
T = TELECOMMUNICATIONS
N = NOT FOUND
S = DAY SURGERY
O = OBSERVATION
E = EVENT (HISTORICAL)
R = NURSING HOME
D = DAILY HOSPITALIZATION DATA
X = ANCILLARY PACKAGE DAILY DATA

OUTPUT :
Data from V TREATMENT (9000010.15) file
^TMP("PXT,$J,InvDt,TREAT,IFN,0) = TREATMENT [E;.01]
^ EVENT DATE/TIME or VISIT/ADMIT DATE&TIME [I;1201 or .03]
^ HOW MANY [I;.04] ^ ORDERING PROVIDER [E;1202]
^ CLINIC [3;1203] ^ ENCOUNTER PROVIDER [E;1204]
^TMP("PXT",$J,InvDt,TREAT,IFN,1) = HOSPITAL LOCATION [E;1205]
^ HOSP. LOC. ABBREVIATION [E;44;1]
^ LOC OF ENCOUNTER [E;9000010;.06] ^ OUTSIDE LOC [E;9000010;2101]
^TMP("PXT",$J,InvDt,TREAT,IFN,"S") = DATA SOURCE [E;80102]
^TMP("PXT",$J,InvDt,TREAT,IFN,"P") = PROVIDER NARRATIVE [E;.06]
^TMP("PXT",$J,InvDt,TREAT,IFN,"PNC") = PROVIDER NARR. CATEGORY [E;80201]

[]  = [I(nternal)/E(xternal); Optional file # ; Record #]
Subscripts:
InvDt - Inverse FileMan date of DATE OF event or visit minus time
TREAT - TREATMENT PROVIDED
IFN   - Internal Record #
STATUS Active
DURATION Till Otherwise Agreed
ID PXRHS06
COMPONENT/ENTRY POINT TREAT
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE ISC
HEALTH SUMMARY Salt Lake City
MAIL MESSAGE 15675684