Print Page as PDF
PROJECT ARCH ICR (5619)

PROJECT ARCH    ICR (5619)

Name Value
NUMBER 5619
IA # 5619
DATE CREATED 2011/03/24
CUSTODIAL PACKAGE FEE BASIS
USAGE Private
TYPE Routine
DBIC APPROVAL STATUS APPROVED
ROUTINE FBARCH0
NAME PROJECT ARCH
GENERAL DESCRIPTION 


This Integration agreement provides two functions.  The output data comes from
the ARCH ELIGIBILITY multiple from Fee Basis Patient file #161.

$$ELIG^FBARCH0  - lists the ARCH (Access Received Closer to Home) eligibility
for a patient on a specific date range.

$$LIST^FBARCH0 - provides a list of ARCH eligible patients on a specific date
range.
STATUS Active
KEYWORDS ARCH
ID FBARCH0
COMPONENT/ENTRY POINT
COMPONENT/ENTRY POINT COMPONENT DESCRIPTION VARIABLES
ELIG 
This function returns the patient's ARCH eligibility.
See example below:

> S A=$$ELIG^FBARCH0(DFN,3100930,3110305,.FBDATA) ZW FBDATA A=1
FBDATA(1)="1^3101130" FBDATA(2)="0^3101030" FBDATA(3)="1^3100930"
VARIABLES TYPE VARIABLES DESCRIPTION
DFN Input 
Patient IEN which is DINUM to the internal entry of
file #161.
FBBDT Input 
Starting/beginning date range of the listing.
FBEDT Input 
Ending date of the listing.
FBDATA Output 
An array of patient ARCH eligibility.
LIST 
Output of this function will be in ^TMP($J,"ARCHFEE"
global.  Below is the example:

>S A=$$LIST^FBARCH0(3100930,3110305)

Global ^TMP($J -- NOTE: translation in effect
^TMP(540785357,"ARCHFEE",1)="12^0^3100930"
2)="12^1^3100925"
3)="12^0^3100920"
4)="12^1^3100910"
Piece 1 = is the DFN
Piece 2 = is the ARCH Eligibility 1 = YES; 0 = NO
Piece 3 = date of ARCH Eligibility
VARIABLES TYPE VARIABLES DESCRIPTION
FBBDT Input 
Starting/beginning date of the listing.
FBEDT Input 
Ending date of the listing.
SUBSCRIBING PACKAGE
SUBSCRIBING PACKAGE SUBSCRIBING DETAILS
CLINICAL REMINDERS 
Clinical Reminders needs two functions to list the
patient's ARCH (Access Received Closer to Home) Eligibility of a certain date
range and a list of all patients and their ARCH Eligibility.
DATE ACTIVATED 2011/06/06