[Home] [Help]
686: AND gcer.balance_type_code = p_balance_type_code
687: AND gcer.most_recent_flag = 'Y');
688:
689: IF (l_prior_entry_id IS NOT NULL) THEN
690: SELECT gcs_entry_headers_s.nextval INTO l_entry_id FROM dual;
691:
692: gcs_entry_pkg.create_entry_header(x_errbuf => l_errbuf,
693: x_retcode => l_retcode,
694: p_entry_id => l_entry_id,
703: p_category_code => 'DATAPREPARATION');
704: END IF;
705:
706: IF (l_prior_stat_entry_id IS NOT NULL) THEN
707: SELECT gcs_entry_headers_s.nextval INTO l_stat_entry_id FROM dual;
708:
709: gcs_entry_pkg.create_entry_header(x_errbuf => l_errbuf,
710: x_retcode => l_retcode,
711: p_entry_id => l_stat_entry_id,
2095: END IF;
2096:
2097: SELECT gcs_entry_headers_s.NEXTVAL
2098: INTO l_entry_id
2099: FROM DUAL;
2100: SELECT gcs_entry_headers_s.NEXTVAL
2101: INTO l_stat_entry_id
2102: FROM DUAL;
2103:
2098: INTO l_entry_id
2099: FROM DUAL;
2100: SELECT gcs_entry_headers_s.NEXTVAL
2101: INTO l_stat_entry_id
2102: FROM DUAL;
2103:
2104: -------------------------------------------
2105: -- this is the mapping not required case --
2106: -------------------------------------------
2230:
2231: BEGIN
2232: SELECT ''Y''
2233: INTO l_has_row_flag
2234: FROM DUAL
2235: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines_gt WHERE entry_id = l_entry_id);
2236:
2237: gcs_entry_pkg.create_entry_header
2238: (x_errbuf => errbuf,
2250: );
2251: IF p_owner_percentage IS NOT NULL AND p_owner_percentage <> 1 THEN
2252: SELECT gcs_entry_headers_s.NEXTVAL
2253: INTO l_proportional_entry_id
2254: FROM DUAL;
2255:
2256: gcs_entry_pkg.create_entry_header
2257: (x_errbuf => errbuf,
2258: x_retcode => retcode,
2275: END;
2276: BEGIN
2277: SELECT ''Y''
2278: INTO l_has_stat_row_flag
2279: FROM DUAL
2280: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines_gt WHERE entry_id = l_stat_entry_id);
2281:
2282: gcs_entry_pkg.create_entry_header
2283: (x_errbuf => errbuf,
2296:
2297: IF p_owner_percentage IS NOT NULL AND p_owner_percentage <> 1 THEN
2298: SELECT gcs_entry_headers_s.NEXTVAL
2299: INTO l_stat_proportional_entry_id
2300: FROM DUAL;
2301:
2302: gcs_entry_pkg.create_entry_header
2303: (x_errbuf => errbuf,
2304: x_retcode => retcode,
2827: RAISE init_mapping_error;
2828: END IF;
2829: SELECT gcs_entry_headers_s.NEXTVAL
2830: INTO x_entry_id
2831: FROM DUAL;
2832: SELECT gcs_entry_headers_s.NEXTVAL
2833: INTO x_stat_entry_id
2834: FROM DUAL;
2835: IF (l_mapping_required = ''N'') THEN
2830: INTO x_entry_id
2831: FROM DUAL;
2832: SELECT gcs_entry_headers_s.NEXTVAL
2833: INTO x_stat_entry_id
2834: FROM DUAL;
2835: IF (l_mapping_required = ''N'') THEN
2836: IF fnd_log.g_current_runtime_level <= fnd_log.level_statement
2837: THEN
2838: fnd_log.STRING (fnd_log.level_statement,
2883:
2884: BEGIN
2885: SELECT ''Y''
2886: INTO l_has_row_flag
2887: FROM DUAL
2888: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines WHERE entry_id = x_entry_id);
2889: EXCEPTION
2890: WHEN NO_DATA_FOUND THEN
2891: l_has_row_flag := ''N'';
2892: END;
2893: BEGIN
2894: SELECT ''Y''
2895: INTO l_has_stat_row_flag
2896: FROM DUAL
2897: WHERE EXISTS (SELECT 1 FROM gcs_entry_lines WHERE entry_id = x_stat_entry_id);
2898: EXCEPTION
2899: WHEN NO_DATA_FOUND THEN
2900: l_has_stat_row_flag := ''N'';
2950: IF l_has_stat_row_flag = ''Y'' THEN
2951: if p_owner_percentage <> 1 THEN
2952: SELECT gcs_entry_headers_s.NEXTVAL
2953: INTO x_stat_prop_entry_id
2954: FROM DUAL;
2955: END IF;
2956: ELSE
2957: x_stat_entry_id := NULL;
2958: END IF;
2959: IF l_has_row_flag = ''Y'' THEN
2960: if p_owner_percentage <> 1 THEN
2961: SELECT gcs_entry_headers_s.NEXTVAL
2962: INTO x_prop_entry_id
2963: FROM DUAL;
2964: END IF;
2965: ELSE
2966: x_entry_id := NULL;
2967: END IF;