PACKAGE BODY: APPS.PON_GEOGRAPHY_PKG

Source

1 PACKAGE BODY PON_GEOGRAPHY_PKG as
2 /*$Header: PONGEOB.pls 120.0 2005/06/01 15:28:31 appldev noship $ */
3 
4 PROCEDURE get_all_territories(
5   p_theLanguage IN fnd_territories_tl.LANGUAGE%TYPE,
6   x_territories OUT NOCOPY refCurTyp,
7   x_STATUS OUT NOCOPY VARCHAR2,
8   x_exception_msg OUT NOCOPY VARCHAR2
9 )IS
10 BEGIN
11    OPEN x_territories FOR
12      SELECT T.TERRITORY_CODE, T.ISO_NUMERIC_CODE, TL.TERRITORY_SHORT_NAME, TL.DESCRIPTION
13      FROM   FND_TERRITORIES T, FND_TERRITORIES_TL TL
14      WHERE  T.TERRITORY_CODE = TL.territory_code AND
15      T.TERRITORY_CODE NOT IN ('ZR','FX','LX')
16      AND    TL.LANGUAGE = p_theLanguage
17      ORDER BY TL.TERRITORY_SHORT_NAME;
18 
19    x_STATUS  :='S';
20    x_exception_msg       :=NULL;
21 EXCEPTION
22    WHEN OTHERS THEN
23       x_STATUS  :='U';
24       raise;
25 END get_all_territories;
26 
27 
28 END PON_GEOGRAPHY_PKG;
29