PACKAGE BODY: APPS.EDW_FORECAST_PKG

Source

1 PACKAGE BODY edw_forecast_pkg AS
2 
3 	FUNCTION get_forecast_fk (
4 		p_forecast_designator IN VARCHAR2,
5 		p_organization_id IN NUMBER,
6 		p_instance_code in VARCHAR2 := NULL) RETURN VARCHAR2 IS
7 	l_forecast_fk	VARCHAR2(240) := 'NA_EDW';
8 	l_instance VARCHAR2(30) := NULL;
9 
10 	BEGIN
11 		IF ((p_forecast_designator IS null)  OR (p_organization_id IS null))THEN
12 			return 'NA_EDW';
13 		END IF;
14 
15 		IF (p_instance_code is NOT NULL) then
16 			l_instance := p_instance_code;
17 		ELSE
18 			select instance_code into l_instance
19 			from edw_local_instance;
20 		END IF;
21 
22 		l_forecast_fk := p_forecast_designator || '-' || p_organization_id || '-' || l_instance;
23 
24 		RETURN(l_forecast_fk);
25 
26 	EXCEPTION WHEN others THEN
27 		return 'NA_EDW';
28 	END get_forecast_fk;
29 END;