DBIA1247    ICR (1247)

The Health Summary Package desires to set up an
integration agreement with the PCE Package to call the entry point
VISIT^PXRHS12 to retrieve Hospitalization Visit, ICD-9, CPT, and Provider
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: VISIT(DFN,ENDDT,BEGDT,OCCLIM)

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 visits returned OUTPUT :
Data from VISIT (9000010) file except for hosp. loc. abbr.
^TMP("PXHSV",$J,InvExDt,COUNT,0) = VISIT/ADMIT DATE&TIME [I;.01]
^ TYPE [E;.03] ^ LOC. OF ENCOUNTER [E;.06]
^ SERVICE CATEGORY [E;.07] ^ CHECK OUT DATE&TIME [I;.18]
^ HOSPITAL LOCATION [E;.22] ^ HOSP. LOC. ABBREVIATION [E;44;1]
^ OUTSIDE LOCATION [E;2101] ^ CLINIC [E;.08]
^ WALK IN/APPT [E;.16] ^ LEVEL OF SERVICE [E;.17]
^ ELIGIBILITY [E;.21]
Data from V CPT (9000010.18) file
^TMP("PXHSV",$J,InvExDt,COUNT,"C",X) = CPT [I;.01]
^ PROVIDER NARRATIVE [E;.04]
^TMP("PXHSV",$J,InvExDt,COUNT,"C",X,MODIFIER [E;1/.01]) = ""
Data from V POV (9000010.07) file
^TMP("PXHSV",$J,InvExDt,COUNT,"D",X) = POV [I;.01]
^ MODIFIER [E;.06] ^ CAUSE OF DX [E;.07]
^ PLACE OF ACCIDENT [E;.11] ^ PRIMARY/SECONDARY [E;.12]
^TMP("PXHSV",$J,InvExDt,COUNT,"D",X,"N") = PROVIDER NARRATIVE [E;.04]
Data from V PROVIDER (9000010.06) file
^TMP("PXHSV",$J,InvExDt,COUNT,"P",X) = PROVIDER [E;.01]
^ PRIMARY/SECONDARY [E;.04]
Data from V HOSPITALIZATION (9000010.02) file (If Service Category
is for hospitalization)
^TMP("PXHSV",$J,InvExDt,COUNT,"H",X) = DATE OF DISCHARGE [I;.01]
^ ADMITTING DX [E;.12]

[] = [I(nternal)/E(xternal); Optional file #; Record #]
Subscripts:
InvExDt - Inverse FileMan date of DATE OF visit [.01]
Count   - # of entry