DBA Data[Home] [Help]

APPS.GMF_GET_MAPPINGS dependencies on GL_PLCY_SEG

Line 6: TYPE A_seg_len IS TABLE OF gl_plcy_seg.length%TYPE INDEX BY BINARY_INTEGER;

2: /* $Header: gmfactmb.pls 115.27 2003/05/21 20:34:01 sschinch ship $ */
3:
4: /* Declarations for AR merge */
5:
6: TYPE A_seg_len IS TABLE OF gl_plcy_seg.length%TYPE INDEX BY BINARY_INTEGER;
7:
8: GA_of_seg A_segment;
9: GA_of_seg_len A_seg_len;
10: GA_of_seg_pos A_seg_len;

Line 545: gl_plcy_seg p,

541: /* B2227050: select f.segment_num instead of f.application_column_name
542: REM order by f.segment_num instead of p.segment_no */
543: f.segment_num, p.segment_no, p.length
544: FROM
545: gl_plcy_seg p,
546: gl_plcy_mst pm,
547: fnd_id_flex_segments f,
548: gl_sets_of_books s
549: WHERE

Line 1088: FROM gl_plcy_seg

1084:
1085: CURSOR Cur_get_seg_cnttyp(pco_code VARCHAR2,
1086: ptype NUMBER) IS
1087: SELECT COUNT(*)
1088: FROM gl_plcy_seg
1089: WHERE co_code = pco_code
1090: AND type = ptype
1091: AND delete_mark = 0;
1092:

Line 1101: FROM gl_plcy_seg

1097: AND delete_mark = 0;
1098:
1099: CURSOR Cur_get_seg_cnt(pco_code VARCHAR2) IS
1100: SELECT COUNT(*)
1101: FROM gl_plcy_seg
1102: WHERE co_code = pco_code
1103: AND delete_mark = 0;
1104:
1105: l_account_value gl_acct_mst.acct_no%TYPE;

Line 1192: -- and the segment_no in gl_plcy_seg is always put in ascending order

1188: -- is in ascending order of segment_num in GL
1189: --
1190: -- OPM does not allow account to be defined before accounting units
1191: -- segment_no and segment_ref are display only fields in the application
1192: -- and the segment_no in gl_plcy_seg is always put in ascending order
1193: --
1194: -- Can OPM have a subset of GL segments and others in GL might be
1195: -- disabled?
1196: --

Line 1226: short_name gl_plcy_seg.short_name%TYPE,

1222: l_opm_account_err opm_account;
1223:
1224: TYPE rectype_opm_seg IS RECORD(
1225: segment_no NUMBER(5),
1226: short_name gl_plcy_seg.short_name%TYPE,
1227: type gl_plcy_seg.type%TYPE,
1228: segment_ref gl_plcy_seg.segment_ref%TYPE,
1229: gl_seg_val varchar2(255),
1230: segment_desc fnd_flex_values_vl.description%TYPE

Line 1227: type gl_plcy_seg.type%TYPE,

1223:
1224: TYPE rectype_opm_seg IS RECORD(
1225: segment_no NUMBER(5),
1226: short_name gl_plcy_seg.short_name%TYPE,
1227: type gl_plcy_seg.type%TYPE,
1228: segment_ref gl_plcy_seg.segment_ref%TYPE,
1229: gl_seg_val varchar2(255),
1230: segment_desc fnd_flex_values_vl.description%TYPE
1231: );

Line 1228: segment_ref gl_plcy_seg.segment_ref%TYPE,

1224: TYPE rectype_opm_seg IS RECORD(
1225: segment_no NUMBER(5),
1226: short_name gl_plcy_seg.short_name%TYPE,
1227: type gl_plcy_seg.type%TYPE,
1228: segment_ref gl_plcy_seg.segment_ref%TYPE,
1229: gl_seg_val varchar2(255),
1230: segment_desc fnd_flex_values_vl.description%TYPE
1231: );
1232:

Line 1233: TYPE tabtype_gl_plcy_seg IS TABLE OF rectype_opm_seg

1229: gl_seg_val varchar2(255),
1230: segment_desc fnd_flex_values_vl.description%TYPE
1231: );
1232:
1233: TYPE tabtype_gl_plcy_seg IS TABLE OF rectype_opm_seg
1234: INDEX BY BINARY_INTEGER;
1235:
1236: lt_gl_plcy_seg tabtype_gl_plcy_seg;
1237:

Line 1236: lt_gl_plcy_seg tabtype_gl_plcy_seg;

1232:
1233: TYPE tabtype_gl_plcy_seg IS TABLE OF rectype_opm_seg
1234: INDEX BY BINARY_INTEGER;
1235:
1236: lt_gl_plcy_seg tabtype_gl_plcy_seg;
1237:
1238: CURSOR cur_opm_plcy_seg(p_opm_company gl_plcy_mst.co_code%TYPE) IS
1239: SELECT
1240: segment_no,

Line 1244: FROM gl_plcy_seg

1240: segment_no,
1241: short_name,
1242: type,
1243: nvl(segment_ref, 0) segment_ref
1244: FROM gl_plcy_seg
1245: WHERE
1246: co_code = p_opm_company
1247: ORDER BY segment_ref;
1248:

Line 1358: FROM gl_plcy_seg

1354: FROM gl_plcy_mst
1355: WHERE co_code = l_opm_company;
1356:
1357: SELECT count(*) INTO l_opm_seg_count
1358: FROM gl_plcy_seg
1359: WHERE co_code = l_opm_company;
1360:
1361: IF( l_opm_seg_count <> l_n_gl_segs )
1362: THEN

Line 1378: lt_gl_plcy_seg(r_seg.segment_no).segment_no := r_seg.segment_no;

1374:
1375: l_seg_count2 := l_seg_count2 + 1;
1376:
1377:
1378: lt_gl_plcy_seg(r_seg.segment_no).segment_no := r_seg.segment_no;
1379: lt_gl_plcy_seg(r_seg.segment_no).short_name := r_seg.short_name;
1380: lt_gl_plcy_seg(r_seg.segment_no).type := r_seg.type;
1381: lt_gl_plcy_seg(r_seg.segment_no).segment_ref := r_seg.segment_ref;
1382:

Line 1379: lt_gl_plcy_seg(r_seg.segment_no).short_name := r_seg.short_name;

1375: l_seg_count2 := l_seg_count2 + 1;
1376:
1377:
1378: lt_gl_plcy_seg(r_seg.segment_no).segment_no := r_seg.segment_no;
1379: lt_gl_plcy_seg(r_seg.segment_no).short_name := r_seg.short_name;
1380: lt_gl_plcy_seg(r_seg.segment_no).type := r_seg.type;
1381: lt_gl_plcy_seg(r_seg.segment_no).segment_ref := r_seg.segment_ref;
1382:
1383: lt_gl_plcy_seg(r_seg.segment_no).gl_seg_val := l_gl_segs(l_seg_count2);

Line 1380: lt_gl_plcy_seg(r_seg.segment_no).type := r_seg.type;

1376:
1377:
1378: lt_gl_plcy_seg(r_seg.segment_no).segment_no := r_seg.segment_no;
1379: lt_gl_plcy_seg(r_seg.segment_no).short_name := r_seg.short_name;
1380: lt_gl_plcy_seg(r_seg.segment_no).type := r_seg.type;
1381: lt_gl_plcy_seg(r_seg.segment_no).segment_ref := r_seg.segment_ref;
1382:
1383: lt_gl_plcy_seg(r_seg.segment_no).gl_seg_val := l_gl_segs(l_seg_count2);
1384:

Line 1381: lt_gl_plcy_seg(r_seg.segment_no).segment_ref := r_seg.segment_ref;

1377:
1378: lt_gl_plcy_seg(r_seg.segment_no).segment_no := r_seg.segment_no;
1379: lt_gl_plcy_seg(r_seg.segment_no).short_name := r_seg.short_name;
1380: lt_gl_plcy_seg(r_seg.segment_no).type := r_seg.type;
1381: lt_gl_plcy_seg(r_seg.segment_no).segment_ref := r_seg.segment_ref;
1382:
1383: lt_gl_plcy_seg(r_seg.segment_no).gl_seg_val := l_gl_segs(l_seg_count2);
1384:
1385: -- Get the segment description

Line 1383: lt_gl_plcy_seg(r_seg.segment_no).gl_seg_val := l_gl_segs(l_seg_count2);

1379: lt_gl_plcy_seg(r_seg.segment_no).short_name := r_seg.short_name;
1380: lt_gl_plcy_seg(r_seg.segment_no).type := r_seg.type;
1381: lt_gl_plcy_seg(r_seg.segment_no).segment_ref := r_seg.segment_ref;
1382:
1383: lt_gl_plcy_seg(r_seg.segment_no).gl_seg_val := l_gl_segs(l_seg_count2);
1384:
1385: -- Get the segment description
1386: l_startdate := NULL;
1387: l_enddate := NULL;

Line 1410: lt_gl_plcy_seg(r_seg.segment_no).segment_desc := l_segmentdesc;

1406: l_statuscode,
1407: l_segmentuom
1408: );
1409:
1410: lt_gl_plcy_seg(r_seg.segment_no).segment_desc := l_segmentdesc;
1411:
1412: -- RS B2485772
1413: IF( l_segmentuom IS NOT NULL )
1414: THEN

Line 1423: lt_gl_plcy_seg(r_seg.segment_no).segment_desc := l_gl_segs(l_seg_count2);

1419: END IF;
1420:
1421: EXCEPTION
1422: WHEN others THEN
1423: lt_gl_plcy_seg(r_seg.segment_no).segment_desc := l_gl_segs(l_seg_count2);
1424: END;
1425:
1426: END LOOP;
1427:

Line 1440: IF( lt_gl_plcy_seg(opm_seg_idx).type = 0 )

1436:
1437: FOR opm_seg_idx IN 1..l_n_gl_segs
1438: LOOP
1439:
1440: IF( lt_gl_plcy_seg(opm_seg_idx).type = 0 )
1441: THEN
1442: -- it's an accu
1443: l_n_accu := l_n_accu + 1;
1444: IF( l_n_accu > 1 )

Line 1446: l_opm_accu := l_opm_accu || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;

1442: -- it's an accu
1443: l_n_accu := l_n_accu + 1;
1444: IF( l_n_accu > 1 )
1445: THEN
1446: l_opm_accu := l_opm_accu || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1447: l_opm_accu_desc := l_opm_accu_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1448: ELSE
1449: l_opm_accu := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1450: l_opm_accu_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;

Line 1447: l_opm_accu_desc := l_opm_accu_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;

1443: l_n_accu := l_n_accu + 1;
1444: IF( l_n_accu > 1 )
1445: THEN
1446: l_opm_accu := l_opm_accu || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1447: l_opm_accu_desc := l_opm_accu_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1448: ELSE
1449: l_opm_accu := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1450: l_opm_accu_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1451: END IF;

Line 1449: l_opm_accu := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;

1445: THEN
1446: l_opm_accu := l_opm_accu || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1447: l_opm_accu_desc := l_opm_accu_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1448: ELSE
1449: l_opm_accu := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1450: l_opm_accu_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1451: END IF;
1452:
1453: ELSE

Line 1450: l_opm_accu_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;

1446: l_opm_accu := l_opm_accu || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1447: l_opm_accu_desc := l_opm_accu_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1448: ELSE
1449: l_opm_accu := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1450: l_opm_accu_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1451: END IF;
1452:
1453: ELSE
1454: -- it's an acct

Line 1458: l_opm_acct := l_opm_acct || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;

1454: -- it's an acct
1455: l_n_acct := l_n_acct + 1;
1456: IF( l_n_acct > 1 )
1457: THEN
1458: l_opm_acct := l_opm_acct || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1459: l_opm_acct_desc := l_opm_acct_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1460: ELSE
1461: l_opm_acct := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1462: l_opm_acct_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;

Line 1459: l_opm_acct_desc := l_opm_acct_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;

1455: l_n_acct := l_n_acct + 1;
1456: IF( l_n_acct > 1 )
1457: THEN
1458: l_opm_acct := l_opm_acct || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1459: l_opm_acct_desc := l_opm_acct_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1460: ELSE
1461: l_opm_acct := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1462: l_opm_acct_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1463: END IF;

Line 1461: l_opm_acct := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;

1457: THEN
1458: l_opm_acct := l_opm_acct || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1459: l_opm_acct_desc := l_opm_acct_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1460: ELSE
1461: l_opm_acct := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1462: l_opm_acct_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1463: END IF;
1464: END IF;
1465:

Line 1462: l_opm_acct_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;

1458: l_opm_acct := l_opm_acct || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1459: l_opm_acct_desc := l_opm_acct_desc || l_opm_delimiter || lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1460: ELSE
1461: l_opm_acct := lt_gl_plcy_seg(opm_seg_idx).gl_seg_val;
1462: l_opm_acct_desc := lt_gl_plcy_seg(opm_seg_idx).segment_desc;
1463: END IF;
1464: END IF;
1465:
1466: END LOOP;