6: BEGIN
7: P_CONC_REQUEST_ID := FND_GLOBAL.CONC_REQUEST_ID;
8: /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
9: IF P_SOB_ID IS NULL THEN
10: FND_MESSAGE.SET_NAME('PSB'
11: ,'PSB_ALL');
12: CP_SOB := FND_MESSAGE.GET;
13: IF P_BGP_ID IS NULL THEN
14: FND_MESSAGE.SET_NAME('PSB'
8: /*SRW.USER_EXIT('FND SRWINIT')*/NULL;
9: IF P_SOB_ID IS NULL THEN
10: FND_MESSAGE.SET_NAME('PSB'
11: ,'PSB_ALL');
12: CP_SOB := FND_MESSAGE.GET;
13: IF P_BGP_ID IS NULL THEN
14: FND_MESSAGE.SET_NAME('PSB'
15: ,'PSB_ALL');
16: CP_BGP := FND_MESSAGE.GET;
10: FND_MESSAGE.SET_NAME('PSB'
11: ,'PSB_ALL');
12: CP_SOB := FND_MESSAGE.GET;
13: IF P_BGP_ID IS NULL THEN
14: FND_MESSAGE.SET_NAME('PSB'
15: ,'PSB_ALL');
16: CP_BGP := FND_MESSAGE.GET;
17: ELSE
18: SELECT
12: CP_SOB := FND_MESSAGE.GET;
13: IF P_BGP_ID IS NULL THEN
14: FND_MESSAGE.SET_NAME('PSB'
15: ,'PSB_ALL');
16: CP_BGP := FND_MESSAGE.GET;
17: ELSE
18: SELECT
19: SHORT_NAME
20: INTO CP_BGP
29: FROM
30: GL_SETS_OF_BOOKS
31: WHERE SET_OF_BOOKS_ID = P_SOB_ID;
32: IF (P_BGP_ID IS NULL) THEN
33: FND_MESSAGE.SET_NAME('PSB'
34: ,'PSB_ALL');
35: CP_BGP := FND_MESSAGE.GET;
36: ELSE
37: SELECT
31: WHERE SET_OF_BOOKS_ID = P_SOB_ID;
32: IF (P_BGP_ID IS NULL) THEN
33: FND_MESSAGE.SET_NAME('PSB'
34: ,'PSB_ALL');
35: CP_BGP := FND_MESSAGE.GET;
36: ELSE
37: SELECT
38: SHORT_NAME
39: INTO CP_BGP
42: WHERE BUDGET_GROUP_ID = P_BGP_ID;
43: END IF;
44: END IF;
45: IF P_SET_ID IS NULL THEN
46: FND_MESSAGE.SET_NAME('PSB'
47: ,'PSB_ALL');
48: CP_SET := FND_MESSAGE.GET;
49: ELSE
50: SELECT
44: END IF;
45: IF P_SET_ID IS NULL THEN
46: FND_MESSAGE.SET_NAME('PSB'
47: ,'PSB_ALL');
48: CP_SET := FND_MESSAGE.GET;
49: ELSE
50: SELECT
51: NAME
52: INTO CP_SET
72: FROM
73: GL_SETS_OF_BOOKS
74: WHERE SET_OF_BOOKS_ID = SOB_ID;
75: END IF;
76: FND_MESSAGE.SET_NAME('PSB'
77: ,'PSB_NO_DATA_FOUND');
78: CP_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
79: FND_MESSAGE.SET_NAME('PSB'
80: ,'PSB_END_OF_REPORT');
74: WHERE SET_OF_BOOKS_ID = SOB_ID;
75: END IF;
76: FND_MESSAGE.SET_NAME('PSB'
77: ,'PSB_NO_DATA_FOUND');
78: CP_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
79: FND_MESSAGE.SET_NAME('PSB'
80: ,'PSB_END_OF_REPORT');
81: CP_NLS_END_OF_REPORT := FND_MESSAGE.GET;
82: RETURN (TRUE);
75: END IF;
76: FND_MESSAGE.SET_NAME('PSB'
77: ,'PSB_NO_DATA_FOUND');
78: CP_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
79: FND_MESSAGE.SET_NAME('PSB'
80: ,'PSB_END_OF_REPORT');
81: CP_NLS_END_OF_REPORT := FND_MESSAGE.GET;
82: RETURN (TRUE);
83: EXCEPTION
77: ,'PSB_NO_DATA_FOUND');
78: CP_NLS_NO_DATA_EXISTS := FND_MESSAGE.GET;
79: FND_MESSAGE.SET_NAME('PSB'
80: ,'PSB_END_OF_REPORT');
81: CP_NLS_END_OF_REPORT := FND_MESSAGE.GET;
82: RETURN (TRUE);
83: EXCEPTION
84: WHEN NO_DATA_FOUND THEN
85: RETURN NULL;