[Home] [Help]
20: )
21: IS
22:
23: BEGIN
24: x_return_status := FND_API.g_ret_sts_success;
25:
26: IF (p_sys_parameters_rec.header_tolerance_calc_code is null
27: AND p_sys_parameters_rec.header_tolerance_operand is not null)
28: THEN
30: THEN
31: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_BATCH_TOL_TYPE_REQ');
32: FND_MSG_PUB.add;
33: END IF;
34: x_return_status := FND_API.g_ret_sts_error;
35: RETURN;
36: ELSIF (p_sys_parameters_rec.header_tolerance_calc_code is not null
37: AND p_sys_parameters_rec.header_tolerance_operand is null)
38: THEN
40: THEN
41: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_BATCH_TOL_VAL_REQ');
42: FND_MSG_PUB.add;
43: END IF;
44: x_return_status := FND_API.g_ret_sts_error;
45: RETURN;
46: END IF;
47:
48: IF (p_sys_parameters_rec.line_tolerance_calc_code is null
52: THEN
53: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_LINE_TOL_TYPE_REQ');
54: FND_MSG_PUB.add;
55: END IF;
56: x_return_status := FND_API.g_ret_sts_error;
57: RETURN;
58: ELSIF (p_sys_parameters_rec.line_tolerance_calc_code is not null
59: AND p_sys_parameters_rec.line_tolerance_operand is null)
60: THEN
62: THEN
63: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_LINE_TOL_VAL_REQ');
64: FND_MSG_PUB.add;
65: END IF;
66: x_return_status := FND_API.g_ret_sts_error;
67: RETURN;
68: END IF;
69:
70: -- For Rule Based Settlement
75: THEN
76: FND_MESSAGE.set_name('OZF', 'OZF_CREDIT_THRES_TYPE_REQ');
77: FND_MSG_PUB.add;
78: END IF;
79: x_return_status := FND_API.g_ret_sts_error;
80: RETURN;
81: ELSIF (p_sys_parameters_rec.credit_tolerance_operand is null
82: AND p_sys_parameters_rec.credit_matching_thold_type is not null)
83: THEN
85: THEN
86: FND_MESSAGE.set_name('OZF', 'OZF_CREDIT_THRES_VAL_REQ');
87: FND_MSG_PUB.add;
88: END IF;
89: x_return_status := FND_API.g_ret_sts_error;
90: RETURN;
91: END IF;
92:
93: -- For Rule Based Settlement
98: THEN
99: FND_MESSAGE.set_name('OZF', 'OZF_CREDIT_THRES_VALIDATION');
100: FND_MSG_PUB.add;
101: END IF;
102: x_return_status := FND_API.g_ret_sts_error;
103: RETURN;
104: END IF;
105:
106:
116: -- 03/15/2001 mchang Updated: insert autopay setting columns.
117: ---------------------------------------------------------------------
118: PROCEDURE Create_Sys_Parameters(
119: p_api_version IN NUMBER
120: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
121: ,p_commit IN VARCHAR2 := FND_API.g_false
122: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
123:
124: ,x_return_status OUT NOCOPY VARCHAR2
117: ---------------------------------------------------------------------
118: PROCEDURE Create_Sys_Parameters(
119: p_api_version IN NUMBER
120: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
121: ,p_commit IN VARCHAR2 := FND_API.g_false
122: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
123:
124: ,x_return_status OUT NOCOPY VARCHAR2
125: ,x_msg_count OUT NOCOPY NUMBER
118: PROCEDURE Create_Sys_Parameters(
119: p_api_version IN NUMBER
120: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
121: ,p_commit IN VARCHAR2 := FND_API.g_false
122: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
123:
124: ,x_return_status OUT NOCOPY VARCHAR2
125: ,x_msg_count OUT NOCOPY NUMBER
126: ,x_msg_data OUT NOCOPY VARCHAR2
165: IF g_debug THEN
166: OZF_Utility_PVT.debug_message(l_full_name||': start');
167: END IF;
168:
169: IF FND_API.to_boolean(p_init_msg_list) THEN
170: FND_MSG_PUB.initialize;
171: END IF;
172:
173: IF NOT FND_API.compatible_api_call(
169: IF FND_API.to_boolean(p_init_msg_list) THEN
170: FND_MSG_PUB.initialize;
171: END IF;
172:
173: IF NOT FND_API.compatible_api_call(
174: l_api_version,
175: p_api_version,
176: l_api_name,
177: g_pkg_name
175: p_api_version,
176: l_api_name,
177: g_pkg_name
178: ) THEN
179: RAISE FND_API.g_exc_unexpected_error;
180: END IF;
181:
182: x_return_status := FND_API.g_ret_sts_success;
183:
178: ) THEN
179: RAISE FND_API.g_exc_unexpected_error;
180: END IF;
181:
182: x_return_status := FND_API.g_ret_sts_success;
183:
184: l_last_updated_by := NVL(FND_GLOBAL.user_id,-1);
185: l_created_by := NVL(FND_GLOBAL.user_id,-1);
186: l_last_update_login := NVL(FND_GLOBAL.conc_login_id,-1);
187:
188: l_post_to_gl := l_sys_parameters_rec.post_to_gl; -- Bug 4760420
189:
190: --bugfix 4743804
191: IF l_post_to_gl IS NULL OR l_post_to_gl = FND_API.G_MISS_CHAR
192: THEN
193: l_post_to_gl:=FND_API.g_false;
194: END IF;
195:
189:
190: --bugfix 4743804
191: IF l_post_to_gl IS NULL OR l_post_to_gl = FND_API.G_MISS_CHAR
192: THEN
193: l_post_to_gl:=FND_API.g_false;
194: END IF;
195:
196: IF l_transfer_to_gl IS NULL OR l_transfer_to_gl = FND_API.G_MISS_CHAR
197: THEN
192: THEN
193: l_post_to_gl:=FND_API.g_false;
194: END IF;
195:
196: IF l_transfer_to_gl IS NULL OR l_transfer_to_gl = FND_API.G_MISS_CHAR
197: THEN
198: l_transfer_to_gl:=FND_API.g_false;
199: END IF;
200: --end bugfix 4743804
194: END IF;
195:
196: IF l_transfer_to_gl IS NULL OR l_transfer_to_gl = FND_API.G_MISS_CHAR
197: THEN
198: l_transfer_to_gl:=FND_API.g_false;
199: END IF;
200: --end bugfix 4743804
201:
202: l_org_id := l_sys_parameters_rec.org_id; -- R12 Enhancements
211: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
212: FND_MESSAGE.set_name('OZF', 'OZF_SET_OF_BOOKS_NULL');
213: FND_MSG_PUB.add;
214: END IF;
215: RAISE FND_API.g_exc_error;
216: ELSE
217: --OPEN c_books_id_count(p_sys_parameters_rec.set_of_books_id);
218: OPEN c_books_id_count(l_org_id);
219: FETCH c_books_id_count INTO l_books_id_count;
224: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
225: FND_MESSAGE.set_name('OZF', 'OZF_SET_OF_BOOKS_EXIST');
226: FND_MSG_PUB.add;
227: END IF;
228: RAISE FND_API.g_exc_error;
229: END IF; */
230: END IF;
231:
232: -- Get the set_of_books_id for given org_id
247: x_msg_data => x_msg_data,
248: p_sys_parameters_rec => l_sys_parameters_rec
249: );
250:
251: IF l_return_status = FND_API.g_ret_sts_error THEN
252: RAISE FND_API.g_exc_error;
253: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
254: RAISE FND_API.g_exc_unexpected_error;
255: END IF;
248: p_sys_parameters_rec => l_sys_parameters_rec
249: );
250:
251: IF l_return_status = FND_API.g_ret_sts_error THEN
252: RAISE FND_API.g_exc_error;
253: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
254: RAISE FND_API.g_exc_unexpected_error;
255: END IF;
256:
249: );
250:
251: IF l_return_status = FND_API.g_ret_sts_error THEN
252: RAISE FND_API.g_exc_error;
253: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
254: RAISE FND_API.g_exc_unexpected_error;
255: END IF;
256:
257: -------------------------- insert --------------------------
250:
251: IF l_return_status = FND_API.g_ret_sts_error THEN
252: RAISE FND_API.g_exc_error;
253: ELSIF l_return_status = FND_API.g_ret_sts_unexp_error THEN
254: RAISE FND_API.g_exc_unexpected_error;
255: END IF;
256:
257: -------------------------- insert --------------------------
258: IF g_debug THEN
469: ------------------------- finish -------------------------------
470: x_set_of_books_id := l_sys_parameters_rec.set_of_books_id;
471:
472: -- Check for commit
473: IF FND_API.to_boolean(p_commit) THEN
474: COMMIT;
475: END IF;
476:
477: FND_MSG_PUB.count_and_get(
474: COMMIT;
475: END IF;
476:
477: FND_MSG_PUB.count_and_get(
478: p_encoded => FND_API.g_false,
479: p_count => x_msg_count,
480: p_data => x_msg_data
481: );
482:
484: OZF_Utility_PVT.debug_message(l_full_name ||': end');
485: END IF;
486:
487: EXCEPTION
488: WHEN FND_API.g_exc_error THEN
489: ROLLBACK TO Create_Sys_Parameters;
490: x_return_status := FND_API.g_ret_sts_error;
491: FND_MSG_PUB.count_and_get (
492: p_encoded => FND_API.g_false
486:
487: EXCEPTION
488: WHEN FND_API.g_exc_error THEN
489: ROLLBACK TO Create_Sys_Parameters;
490: x_return_status := FND_API.g_ret_sts_error;
491: FND_MSG_PUB.count_and_get (
492: p_encoded => FND_API.g_false
493: ,p_count => x_msg_count
494: ,p_data => x_msg_data
488: WHEN FND_API.g_exc_error THEN
489: ROLLBACK TO Create_Sys_Parameters;
490: x_return_status := FND_API.g_ret_sts_error;
491: FND_MSG_PUB.count_and_get (
492: p_encoded => FND_API.g_false
493: ,p_count => x_msg_count
494: ,p_data => x_msg_data
495: );
496:
493: ,p_count => x_msg_count
494: ,p_data => x_msg_data
495: );
496:
497: WHEN FND_API.g_exc_unexpected_error THEN
498: ROLLBACK TO Create_Sys_Parameters;
499: x_return_status := FND_API.g_ret_sts_unexp_error ;
500: FND_MSG_PUB.count_and_get (
501: p_encoded => FND_API.g_false
495: );
496:
497: WHEN FND_API.g_exc_unexpected_error THEN
498: ROLLBACK TO Create_Sys_Parameters;
499: x_return_status := FND_API.g_ret_sts_unexp_error ;
500: FND_MSG_PUB.count_and_get (
501: p_encoded => FND_API.g_false
502: ,p_count => x_msg_count
503: ,p_data => x_msg_data
497: WHEN FND_API.g_exc_unexpected_error THEN
498: ROLLBACK TO Create_Sys_Parameters;
499: x_return_status := FND_API.g_ret_sts_unexp_error ;
500: FND_MSG_PUB.count_and_get (
501: p_encoded => FND_API.g_false
502: ,p_count => x_msg_count
503: ,p_data => x_msg_data
504: );
505:
505:
506:
507: WHEN OTHERS THEN
508: ROLLBACK TO Create_Sys_Parameters;
509: x_return_status := FND_API.g_ret_sts_unexp_error ;
510: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
511: THEN
512: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
513: END IF;
511: THEN
512: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
513: END IF;
514: FND_MSG_PUB.count_and_get(
515: p_encoded => FND_API.g_false
516: ,p_count => x_msg_count
517: ,p_data => x_msg_data
518: );
519:
528: -- 06/12/2000 mchang Create.
529: ---------------------------------------------------------------
530: PROCEDURE Delete_Sys_Parameters(
531: p_api_version IN NUMBER
532: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
533: ,p_commit IN VARCHAR2 := FND_API.g_false
534:
535: ,x_return_status OUT NOCOPY VARCHAR2
536: ,x_msg_count OUT NOCOPY NUMBER
529: ---------------------------------------------------------------
530: PROCEDURE Delete_Sys_Parameters(
531: p_api_version IN NUMBER
532: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
533: ,p_commit IN VARCHAR2 := FND_API.g_false
534:
535: ,x_return_status OUT NOCOPY VARCHAR2
536: ,x_msg_count OUT NOCOPY NUMBER
537: ,x_msg_data OUT NOCOPY VARCHAR2
554: IF g_debug THEN
555: OZF_Utility_PVT.debug_message(l_full_name||': start');
556: END IF;
557:
558: IF FND_API.to_boolean(p_init_msg_list) THEN
559: FND_MSG_PUB.initialize;
560: END IF;
561:
562: IF NOT FND_API.compatible_api_call(
558: IF FND_API.to_boolean(p_init_msg_list) THEN
559: FND_MSG_PUB.initialize;
560: END IF;
561:
562: IF NOT FND_API.compatible_api_call(
563: l_api_version,
564: p_api_version,
565: l_api_name,
566: g_pkg_name
564: p_api_version,
565: l_api_name,
566: g_pkg_name
567: ) THEN
568: RAISE FND_API.g_exc_unexpected_error;
569: END IF;
570:
571: x_return_status := FND_API.G_RET_STS_SUCCESS;
572:
567: ) THEN
568: RAISE FND_API.g_exc_unexpected_error;
569: END IF;
570:
571: x_return_status := FND_API.G_RET_STS_SUCCESS;
572:
573: ------------------------ delete ------------------------
574: IF g_debug THEN
575: OZF_Utility_PVT.debug_message(l_full_name ||': delete');
585: THEN
586: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
587: FND_MSG_PUB.add;
588: END IF;
589: RAISE FND_API.g_exc_error;
590: END IF;
591:
592: -------------------- finish --------------------------
593: IF FND_API.to_boolean(p_commit) THEN
589: RAISE FND_API.g_exc_error;
590: END IF;
591:
592: -------------------- finish --------------------------
593: IF FND_API.to_boolean(p_commit) THEN
594: COMMIT;
595: END IF;
596:
597: FND_MSG_PUB.count_and_get(
594: COMMIT;
595: END IF;
596:
597: FND_MSG_PUB.count_and_get(
598: p_encoded => FND_API.g_false,
599: p_count => x_msg_count,
600: p_data => x_msg_data
601: );
602:
604: OZF_Utility_PVT.debug_message(l_full_name ||': end');
605: END IF;
606:
607: EXCEPTION
608: WHEN FND_API.g_exc_error THEN
609: ROLLBACK TO Delete_Sys_Parameters;
610: x_return_status := FND_API.g_ret_sts_error;
611: FND_MSG_PUB.count_and_get(
612: p_encoded => FND_API.g_false,
606:
607: EXCEPTION
608: WHEN FND_API.g_exc_error THEN
609: ROLLBACK TO Delete_Sys_Parameters;
610: x_return_status := FND_API.g_ret_sts_error;
611: FND_MSG_PUB.count_and_get(
612: p_encoded => FND_API.g_false,
613: p_count => x_msg_count,
614: p_data => x_msg_data
608: WHEN FND_API.g_exc_error THEN
609: ROLLBACK TO Delete_Sys_Parameters;
610: x_return_status := FND_API.g_ret_sts_error;
611: FND_MSG_PUB.count_and_get(
612: p_encoded => FND_API.g_false,
613: p_count => x_msg_count,
614: p_data => x_msg_data
615: );
616:
613: p_count => x_msg_count,
614: p_data => x_msg_data
615: );
616:
617: WHEN FND_API.g_exc_unexpected_error THEN
618: ROLLBACK TO Delete_Sys_Parameters;
619: x_return_status := FND_API.g_ret_sts_unexp_error ;
620: FND_MSG_PUB.count_and_get(
621: p_encoded => FND_API.g_false,
615: );
616:
617: WHEN FND_API.g_exc_unexpected_error THEN
618: ROLLBACK TO Delete_Sys_Parameters;
619: x_return_status := FND_API.g_ret_sts_unexp_error ;
620: FND_MSG_PUB.count_and_get(
621: p_encoded => FND_API.g_false,
622: p_count => x_msg_count,
623: p_data => x_msg_data
617: WHEN FND_API.g_exc_unexpected_error THEN
618: ROLLBACK TO Delete_Sys_Parameters;
619: x_return_status := FND_API.g_ret_sts_unexp_error ;
620: FND_MSG_PUB.count_and_get(
621: p_encoded => FND_API.g_false,
622: p_count => x_msg_count,
623: p_data => x_msg_data
624: );
625:
624: );
625:
626: WHEN OTHERS THEN
627: ROLLBACK TO Delete_Sys_Parameters;
628: x_return_status := FND_API.g_ret_sts_unexp_error ;
629: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
630: THEN
631: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
632: END IF;
630: THEN
631: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
632: END IF;
633: FND_MSG_PUB.count_and_get(
634: p_encoded => FND_API.g_false,
635: p_count => x_msg_count,
636: p_data => x_msg_data
637: );
638:
647: -- 06/12/2000 mchang Create.
648: --------------------------------------------------------------------
649: PROCEDURE Lock_Sys_Parameters(
650: p_api_version IN NUMBER
651: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
652:
653: ,x_return_status OUT NOCOPY VARCHAR2
654: ,x_msg_count OUT NOCOPY NUMBER
655: ,x_msg_data OUT NOCOPY VARCHAR2
678: IF g_debug THEN
679: OZF_Utility_PVT.debug_message(l_full_name||': start');
680: END IF;
681:
682: IF FND_API.to_boolean(p_init_msg_list) THEN
683: FND_MSG_PUB.initialize;
684: END IF;
685:
686: IF NOT FND_API.compatible_api_call(
682: IF FND_API.to_boolean(p_init_msg_list) THEN
683: FND_MSG_PUB.initialize;
684: END IF;
685:
686: IF NOT FND_API.compatible_api_call(
687: l_api_version,
688: p_api_version,
689: l_api_name,
690: g_pkg_name
688: p_api_version,
689: l_api_name,
690: g_pkg_name
691: ) THEN
692: RAISE FND_API.g_exc_unexpected_error;
693: END IF;
694:
695: x_return_status := FND_API.G_RET_STS_SUCCESS;
696:
691: ) THEN
692: RAISE FND_API.g_exc_unexpected_error;
693: END IF;
694:
695: x_return_status := FND_API.G_RET_STS_SUCCESS;
696:
697: ------------------------ lock -------------------------
698: IF g_debug THEN
699: OZF_Utility_PVT.debug_message(l_full_name||': lock');
706: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
707: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
708: FND_MSG_PUB.add;
709: END IF;
710: RAISE FND_API.g_exc_error;
711: END IF;
712: CLOSE c_sys_para;
713:
714: -------------------- finish --------------------------
712: CLOSE c_sys_para;
713:
714: -------------------- finish --------------------------
715: FND_MSG_PUB.count_and_get(
716: p_encoded => FND_API.g_false,
717: p_count => x_msg_count,
718: p_data => x_msg_data
719: );
720:
723: END IF;
724:
725: EXCEPTION
726: WHEN OZF_Utility_PVT.resource_locked THEN
727: x_return_status := FND_API.g_ret_sts_error;
728: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
729: FND_MESSAGE.set_name('OZF', 'OZF_API_RESOURCE_LOCKED');
730: FND_MSG_PUB.add;
731: END IF;
730: FND_MSG_PUB.add;
731: END IF;
732:
733: FND_MSG_PUB.count_and_get(
734: p_encoded => FND_API.g_false,
735: p_count => x_msg_count,
736: p_data => x_msg_data
737: );
738:
735: p_count => x_msg_count,
736: p_data => x_msg_data
737: );
738:
739: WHEN FND_API.g_exc_error THEN
740: x_return_status := FND_API.g_ret_sts_error;
741: FND_MSG_PUB.count_and_get(
742: p_encoded => FND_API.g_false,
743: p_count => x_msg_count,
736: p_data => x_msg_data
737: );
738:
739: WHEN FND_API.g_exc_error THEN
740: x_return_status := FND_API.g_ret_sts_error;
741: FND_MSG_PUB.count_and_get(
742: p_encoded => FND_API.g_false,
743: p_count => x_msg_count,
744: p_data => x_msg_data
738:
739: WHEN FND_API.g_exc_error THEN
740: x_return_status := FND_API.g_ret_sts_error;
741: FND_MSG_PUB.count_and_get(
742: p_encoded => FND_API.g_false,
743: p_count => x_msg_count,
744: p_data => x_msg_data
745: );
746:
743: p_count => x_msg_count,
744: p_data => x_msg_data
745: );
746:
747: WHEN FND_API.g_exc_unexpected_error THEN
748: x_return_status := FND_API.g_ret_sts_unexp_error ;
749: FND_MSG_PUB.count_and_get(
750: p_encoded => FND_API.g_false,
751: p_count => x_msg_count,
744: p_data => x_msg_data
745: );
746:
747: WHEN FND_API.g_exc_unexpected_error THEN
748: x_return_status := FND_API.g_ret_sts_unexp_error ;
749: FND_MSG_PUB.count_and_get(
750: p_encoded => FND_API.g_false,
751: p_count => x_msg_count,
752: p_data => x_msg_data
746:
747: WHEN FND_API.g_exc_unexpected_error THEN
748: x_return_status := FND_API.g_ret_sts_unexp_error ;
749: FND_MSG_PUB.count_and_get(
750: p_encoded => FND_API.g_false,
751: p_count => x_msg_count,
752: p_data => x_msg_data
753: );
754:
752: p_data => x_msg_data
753: );
754:
755: WHEN OTHERS THEN
756: x_return_status := FND_API.g_ret_sts_unexp_error ;
757: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
758: THEN
759: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
760: END IF;
758: THEN
759: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
760: END IF;
761: FND_MSG_PUB.count_and_get(
762: p_encoded => FND_API.g_false,
763: p_count => x_msg_count,
764: p_data => x_msg_data
765: );
766:
777: -- 03/15/2001 mchang Updated: insert autopay setting columns.
778: ----------------------------------------------------------------------
779: PROCEDURE Update_Sys_Parameters(
780: p_api_version IN NUMBER
781: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
782: ,p_commit IN VARCHAR2 := FND_API.g_false
783: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
784:
785: ,x_return_status OUT NOCOPY VARCHAR2
778: ----------------------------------------------------------------------
779: PROCEDURE Update_Sys_Parameters(
780: p_api_version IN NUMBER
781: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
782: ,p_commit IN VARCHAR2 := FND_API.g_false
783: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
784:
785: ,x_return_status OUT NOCOPY VARCHAR2
786: ,x_msg_count OUT NOCOPY NUMBER
779: PROCEDURE Update_Sys_Parameters(
780: p_api_version IN NUMBER
781: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
782: ,p_commit IN VARCHAR2 := FND_API.g_false
783: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
784:
785: ,x_return_status OUT NOCOPY VARCHAR2
786: ,x_msg_count OUT NOCOPY NUMBER
787: ,x_msg_data OUT NOCOPY VARCHAR2
817: IF g_debug THEN
818: OZF_Utility_PVT.debug_message(l_full_name||': start');
819: END IF;
820:
821: IF FND_API.to_boolean(p_init_msg_list) THEN
822: FND_MSG_PUB.initialize;
823: END IF;
824:
825: IF NOT FND_API.compatible_api_call(
821: IF FND_API.to_boolean(p_init_msg_list) THEN
822: FND_MSG_PUB.initialize;
823: END IF;
824:
825: IF NOT FND_API.compatible_api_call(
826: l_api_version,
827: p_api_version,
828: l_api_name,
829: g_pkg_name
827: p_api_version,
828: l_api_name,
829: g_pkg_name
830: ) THEN
831: RAISE FND_API.g_exc_unexpected_error;
832: END IF;
833:
834: x_return_status := FND_API.G_RET_STS_SUCCESS;
835:
830: ) THEN
831: RAISE FND_API.g_exc_unexpected_error;
832: END IF;
833:
834: x_return_status := FND_API.G_RET_STS_SUCCESS;
835:
836: l_last_updated_by := NVL(FND_GLOBAL.user_id,-1);
837: l_last_update_login := NVL(FND_GLOBAL.conc_login_id,-1);
838:
846: p_sys_parameters_rec => p_sys_parameters_rec,
847: p_validation_mode => JTF_PLSQL_API.g_update,
848: x_return_status => l_return_status
849: );
850: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
851: RAISE FND_API.g_exc_unexpected_error;
852: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: END IF;
847: p_validation_mode => JTF_PLSQL_API.g_update,
848: x_return_status => l_return_status
849: );
850: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
851: RAISE FND_API.g_exc_unexpected_error;
852: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: END IF;
855: END IF;
848: x_return_status => l_return_status
849: );
850: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
851: RAISE FND_API.g_exc_unexpected_error;
852: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: END IF;
855: END IF;
856:
849: );
850: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
851: RAISE FND_API.g_exc_unexpected_error;
852: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
853: RAISE FND_API.g_exc_error;
854: END IF;
855: END IF;
856:
857: -- replace g_miss_char/num/date with current column values
866: p_complete_rec => l_sys_parameters_rec,
867: p_mode => p_mode,
868: x_return_status => l_return_status
869: );
870: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
871: RAISE FND_API.g_exc_unexpected_error;
872: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
873: RAISE FND_API.g_exc_error;
874: END IF;
867: p_mode => p_mode,
868: x_return_status => l_return_status
869: );
870: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
871: RAISE FND_API.g_exc_unexpected_error;
872: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
873: RAISE FND_API.g_exc_error;
874: END IF;
875: END IF;
868: x_return_status => l_return_status
869: );
870: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
871: RAISE FND_API.g_exc_unexpected_error;
872: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
873: RAISE FND_API.g_exc_error;
874: END IF;
875: END IF;
876:
869: );
870: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
871: RAISE FND_API.g_exc_unexpected_error;
872: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
873: RAISE FND_API.g_exc_error;
874: END IF;
875: END IF;
876:
877: --Check the tolerances.
878: Check_Batch_Tolerances(
879: p_sys_parameters_rec => l_sys_parameters_rec,
880: x_return_status => l_return_status
881: );
882: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
883: RAISE FND_API.g_exc_unexpected_error;
884: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
885: RAISE FND_API.g_exc_error;
886: END IF;
879: p_sys_parameters_rec => l_sys_parameters_rec,
880: x_return_status => l_return_status
881: );
882: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
883: RAISE FND_API.g_exc_unexpected_error;
884: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
885: RAISE FND_API.g_exc_error;
886: END IF;
887:
880: x_return_status => l_return_status
881: );
882: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
883: RAISE FND_API.g_exc_unexpected_error;
884: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
885: RAISE FND_API.g_exc_error;
886: END IF;
887:
888: l_object_version_number := l_sys_parameters_rec.object_version_number + 1;
881: );
882: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
883: RAISE FND_API.g_exc_unexpected_error;
884: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
885: RAISE FND_API.g_exc_error;
886: END IF;
887:
888: l_object_version_number := l_sys_parameters_rec.object_version_number + 1;
889: ozf_utility_pvt.debug_message('Object version number is :'||
1014: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1015: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
1016: FND_MSG_PUB.add;
1017: END IF;
1018: RAISE FND_API.g_exc_error;
1019: END IF;
1020:
1021: -------------------- finish --------------------------
1022:
1022:
1023: x_object_version_number := l_object_version_number;
1024:
1025: -- Check for commit
1026: IF FND_API.to_boolean(p_commit) THEN
1027: COMMIT;
1028: END IF;
1029:
1030: FND_MSG_PUB.count_and_get(
1027: COMMIT;
1028: END IF;
1029:
1030: FND_MSG_PUB.count_and_get(
1031: p_encoded => FND_API.g_false,
1032: p_count => x_msg_count,
1033: p_data => x_msg_data
1034: );
1035:
1038: END IF;
1039:
1040: EXCEPTION
1041:
1042: WHEN FND_API.g_exc_error THEN
1043: ROLLBACK TO Update_Sys_Parameters;
1044: x_return_status := FND_API.g_ret_sts_error;
1045: FND_MSG_PUB.count_and_get(
1046: p_encoded => FND_API.g_false,
1040: EXCEPTION
1041:
1042: WHEN FND_API.g_exc_error THEN
1043: ROLLBACK TO Update_Sys_Parameters;
1044: x_return_status := FND_API.g_ret_sts_error;
1045: FND_MSG_PUB.count_and_get(
1046: p_encoded => FND_API.g_false,
1047: p_count => x_msg_count,
1048: p_data => x_msg_data
1042: WHEN FND_API.g_exc_error THEN
1043: ROLLBACK TO Update_Sys_Parameters;
1044: x_return_status := FND_API.g_ret_sts_error;
1045: FND_MSG_PUB.count_and_get(
1046: p_encoded => FND_API.g_false,
1047: p_count => x_msg_count,
1048: p_data => x_msg_data
1049: );
1050:
1047: p_count => x_msg_count,
1048: p_data => x_msg_data
1049: );
1050:
1051: WHEN FND_API.g_exc_unexpected_error THEN
1052: ROLLBACK TO Update_Sys_Parameters;
1053: x_return_status := FND_API.g_ret_sts_unexp_error ;
1054: FND_MSG_PUB.count_and_get(
1055: p_encoded => FND_API.g_false,
1049: );
1050:
1051: WHEN FND_API.g_exc_unexpected_error THEN
1052: ROLLBACK TO Update_Sys_Parameters;
1053: x_return_status := FND_API.g_ret_sts_unexp_error ;
1054: FND_MSG_PUB.count_and_get(
1055: p_encoded => FND_API.g_false,
1056: p_count => x_msg_count,
1057: p_data => x_msg_data
1051: WHEN FND_API.g_exc_unexpected_error THEN
1052: ROLLBACK TO Update_Sys_Parameters;
1053: x_return_status := FND_API.g_ret_sts_unexp_error ;
1054: FND_MSG_PUB.count_and_get(
1055: p_encoded => FND_API.g_false,
1056: p_count => x_msg_count,
1057: p_data => x_msg_data
1058: );
1059:
1058: );
1059:
1060: WHEN OTHERS THEN
1061: ROLLBACK TO Update_Sys_Parameters;
1062: x_return_status := FND_API.g_ret_sts_unexp_error ;
1063: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1064: THEN
1065: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1066: END IF;
1064: THEN
1065: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1066: END IF;
1067: FND_MSG_PUB.count_and_get(
1068: p_encoded => FND_API.g_false,
1069: p_count => x_msg_count,
1070: p_data => x_msg_data
1071: );
1072:
1081: -- 06/12/2000 mchang Create.
1082: --------------------------------------------------------------------
1083: PROCEDURE Validate_Sys_Parameters(
1084: p_api_version IN NUMBER
1085: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
1086: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
1087:
1088: ,x_return_status OUT NOCOPY VARCHAR2
1089: ,x_msg_count OUT NOCOPY NUMBER
1082: --------------------------------------------------------------------
1083: PROCEDURE Validate_Sys_Parameters(
1084: p_api_version IN NUMBER
1085: ,p_init_msg_list IN VARCHAR2 := FND_API.g_false
1086: ,p_validation_level IN NUMBER := FND_API.g_valid_level_full
1087:
1088: ,x_return_status OUT NOCOPY VARCHAR2
1089: ,x_msg_count OUT NOCOPY NUMBER
1090: ,x_msg_data OUT NOCOPY VARCHAR2
1105: IF g_debug THEN
1106: OZF_Utility_PVT.debug_message(l_full_name||': start');
1107: END IF;
1108:
1109: IF FND_API.to_boolean(p_init_msg_list) THEN
1110: FND_MSG_PUB.initialize;
1111: END IF;
1112:
1113: IF NOT FND_API.compatible_api_call(
1109: IF FND_API.to_boolean(p_init_msg_list) THEN
1110: FND_MSG_PUB.initialize;
1111: END IF;
1112:
1113: IF NOT FND_API.compatible_api_call(
1114: l_api_version,
1115: p_api_version,
1116: l_api_name,
1117: g_pkg_name
1115: p_api_version,
1116: l_api_name,
1117: g_pkg_name
1118: ) THEN
1119: RAISE FND_API.g_exc_unexpected_error;
1120: END IF;
1121:
1122: x_return_status := FND_API.g_ret_sts_success;
1123:
1118: ) THEN
1119: RAISE FND_API.g_exc_unexpected_error;
1120: END IF;
1121:
1122: x_return_status := FND_API.g_ret_sts_success;
1123:
1124: ---------------------- validate ------------------------
1125: IF g_debug THEN
1126: OZF_Utility_PVT.debug_message(l_full_name||': check items');
1132: p_validation_mode => JTF_PLSQL_API.g_create,
1133: x_return_status => l_return_status
1134: );
1135:
1136: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1137: RAISE FND_API.g_exc_unexpected_error;
1138: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1139: RAISE FND_API.g_exc_error;
1140: END IF;
1133: x_return_status => l_return_status
1134: );
1135:
1136: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1137: RAISE FND_API.g_exc_unexpected_error;
1138: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1139: RAISE FND_API.g_exc_error;
1140: END IF;
1141: END IF;
1134: );
1135:
1136: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1137: RAISE FND_API.g_exc_unexpected_error;
1138: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1139: RAISE FND_API.g_exc_error;
1140: END IF;
1141: END IF;
1142:
1135:
1136: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1137: RAISE FND_API.g_exc_unexpected_error;
1138: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1139: RAISE FND_API.g_exc_error;
1140: END IF;
1141: END IF;
1142:
1143: IF g_debug THEN
1150: p_complete_rec => NULL,
1151: x_return_status => l_return_status
1152: );
1153:
1154: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1155: RAISE FND_API.g_exc_unexpected_error;
1156: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1157: RAISE FND_API.g_exc_error;
1158: END IF;
1151: x_return_status => l_return_status
1152: );
1153:
1154: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1155: RAISE FND_API.g_exc_unexpected_error;
1156: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1157: RAISE FND_API.g_exc_error;
1158: END IF;
1159: END IF;
1152: );
1153:
1154: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1155: RAISE FND_API.g_exc_unexpected_error;
1156: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1157: RAISE FND_API.g_exc_error;
1158: END IF;
1159: END IF;
1160:
1153:
1154: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1155: RAISE FND_API.g_exc_unexpected_error;
1156: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1157: RAISE FND_API.g_exc_error;
1158: END IF;
1159: END IF;
1160:
1161:
1163: Check_Batch_Tolerances(
1164: p_sys_parameters_rec => p_sys_parameters_rec,
1165: x_return_status => l_return_status
1166: );
1167: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1168: RAISE FND_API.g_exc_unexpected_error;
1169: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1170: RAISE FND_API.g_exc_error;
1171: END IF;
1164: p_sys_parameters_rec => p_sys_parameters_rec,
1165: x_return_status => l_return_status
1166: );
1167: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1168: RAISE FND_API.g_exc_unexpected_error;
1169: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1170: RAISE FND_API.g_exc_error;
1171: END IF;
1172:
1165: x_return_status => l_return_status
1166: );
1167: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1168: RAISE FND_API.g_exc_unexpected_error;
1169: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1170: RAISE FND_API.g_exc_error;
1171: END IF;
1172:
1173:
1166: );
1167: IF l_return_status = FND_API.g_ret_sts_unexp_error THEN
1168: RAISE FND_API.g_exc_unexpected_error;
1169: ELSIF l_return_status = FND_API.g_ret_sts_error THEN
1170: RAISE FND_API.g_exc_error;
1171: END IF;
1172:
1173:
1174: -------------------- finish --------------------------
1172:
1173:
1174: -------------------- finish --------------------------
1175: FND_MSG_PUB.count_and_get(
1176: p_encoded => FND_API.g_false,
1177: p_count => x_msg_count,
1178: p_data => x_msg_data
1179: );
1180:
1183: END IF;
1184:
1185: EXCEPTION
1186:
1187: WHEN FND_API.g_exc_error THEN
1188: x_return_status := FND_API.g_ret_sts_error;
1189: FND_MSG_PUB.count_and_get(
1190: p_encoded => FND_API.g_false,
1191: p_count => x_msg_count,
1184:
1185: EXCEPTION
1186:
1187: WHEN FND_API.g_exc_error THEN
1188: x_return_status := FND_API.g_ret_sts_error;
1189: FND_MSG_PUB.count_and_get(
1190: p_encoded => FND_API.g_false,
1191: p_count => x_msg_count,
1192: p_data => x_msg_data
1186:
1187: WHEN FND_API.g_exc_error THEN
1188: x_return_status := FND_API.g_ret_sts_error;
1189: FND_MSG_PUB.count_and_get(
1190: p_encoded => FND_API.g_false,
1191: p_count => x_msg_count,
1192: p_data => x_msg_data
1193: );
1194:
1191: p_count => x_msg_count,
1192: p_data => x_msg_data
1193: );
1194:
1195: WHEN FND_API.g_exc_unexpected_error THEN
1196: x_return_status := FND_API.g_ret_sts_unexp_error ;
1197: FND_MSG_PUB.count_and_get(
1198: p_encoded => FND_API.g_false,
1199: p_count => x_msg_count,
1192: p_data => x_msg_data
1193: );
1194:
1195: WHEN FND_API.g_exc_unexpected_error THEN
1196: x_return_status := FND_API.g_ret_sts_unexp_error ;
1197: FND_MSG_PUB.count_and_get(
1198: p_encoded => FND_API.g_false,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data
1194:
1195: WHEN FND_API.g_exc_unexpected_error THEN
1196: x_return_status := FND_API.g_ret_sts_unexp_error ;
1197: FND_MSG_PUB.count_and_get(
1198: p_encoded => FND_API.g_false,
1199: p_count => x_msg_count,
1200: p_data => x_msg_data
1201: );
1202:
1200: p_data => x_msg_data
1201: );
1202:
1203: WHEN OTHERS THEN
1204: x_return_status := FND_API.g_ret_sts_unexp_error;
1205: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_unexp_error)
1206: THEN
1207: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1208: END IF;
1206: THEN
1207: FND_MSG_PUB.add_exc_msg(g_pkg_name, l_api_name);
1208: END IF;
1209: FND_MSG_PUB.count_and_get(
1210: p_encoded => FND_API.g_false,
1211: p_count => x_msg_count,
1212: p_data => x_msg_data
1213: );
1214:
1228: )
1229: IS
1230: BEGIN
1231:
1232: x_return_status := FND_API.g_ret_sts_success;
1233:
1234: END Check_Sys_Para_Req_Items;
1235:
1236:
1249: IS
1250: l_valid_flag VARCHAR2(1);
1251: BEGIN
1252:
1253: x_return_status := FND_API.g_ret_sts_success;
1254:
1255: END Check_Sys_Para_Uk_Items;
1256:
1257:
1268: )
1269: IS
1270: BEGIN
1271:
1272: x_return_status := FND_API.g_ret_sts_success;
1273:
1274: -- check other fk items
1275:
1276: END Check_Sys_Para_Fk_Items;
1289: )
1290: IS
1291: BEGIN
1292:
1293: x_return_status := FND_API.g_ret_sts_success;
1294:
1295: -- check other lookup codes
1296:
1297: END Check_Sys_Para_Lookup_Items;
1302: -- Check_Sys_Para_Flag_Items
1303: --
1304: -- HISTORY
1305: -- 06/12/2000 mchang Create.
1306: -- 08/31/2000 mchang Updated: check flag column value (FND_API.G_TRUE/FALSE)
1307: ---------------------------------------------------------------------
1308: PROCEDURE Check_Sys_Para_Flag_Items(
1309: p_sys_parameters_rec IN sys_parameters_rec_type
1310: ,x_return_status OUT NOCOPY VARCHAR2
1311: )
1312: IS
1313: BEGIN
1314:
1315: x_return_status := FND_API.g_ret_sts_success;
1316:
1317: ----------------------- POST_TO_GL ------------------------
1318: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_miss_char
1319: AND p_sys_parameters_rec.post_to_gl IS NOT NULL
1314:
1315: x_return_status := FND_API.g_ret_sts_success;
1316:
1317: ----------------------- POST_TO_GL ------------------------
1318: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_miss_char
1319: AND p_sys_parameters_rec.post_to_gl IS NOT NULL
1320: THEN
1321: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_true
1322: AND p_sys_parameters_rec.post_to_gl <> FND_API.g_false
1317: ----------------------- POST_TO_GL ------------------------
1318: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_miss_char
1319: AND p_sys_parameters_rec.post_to_gl IS NOT NULL
1320: THEN
1321: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_true
1322: AND p_sys_parameters_rec.post_to_gl <> FND_API.g_false
1323: THEN
1324: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1325: THEN
1318: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_miss_char
1319: AND p_sys_parameters_rec.post_to_gl IS NOT NULL
1320: THEN
1321: IF p_sys_parameters_rec.post_to_gl <> FND_API.g_true
1322: AND p_sys_parameters_rec.post_to_gl <> FND_API.g_false
1323: THEN
1324: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1325: THEN
1326: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_BAD_FLAG');
1327: FND_MESSAGE.set_token('FLAG', 'POST_TO_GL');
1328: FND_MSG_PUB.add;
1329: END IF;
1330:
1331: x_return_status := FND_API.g_ret_sts_error;
1332: RETURN;
1333: END IF;
1334: END IF;
1335:
1333: END IF;
1334: END IF;
1335:
1336: ----------------------- TRANSFER_TO_GL_IN ------------------------
1337: IF p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_miss_char
1338: AND p_sys_parameters_rec.transfer_to_gl_in IS NOT NULL
1339: THEN
1340: IF p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_true
1341: AND p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_false
1336: ----------------------- TRANSFER_TO_GL_IN ------------------------
1337: IF p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_miss_char
1338: AND p_sys_parameters_rec.transfer_to_gl_in IS NOT NULL
1339: THEN
1340: IF p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_true
1341: AND p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_false
1342: THEN
1343: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1344: THEN
1337: IF p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_miss_char
1338: AND p_sys_parameters_rec.transfer_to_gl_in IS NOT NULL
1339: THEN
1340: IF p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_true
1341: AND p_sys_parameters_rec.transfer_to_gl_in <> FND_API.g_false
1342: THEN
1343: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1344: THEN
1345: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_BAD_FLAG');
1346: FND_MESSAGE.set_token('FLAG', 'TRANSFER_TO_GL_IN');
1347: FND_MSG_PUB.add;
1348: END IF;
1349:
1350: x_return_status := FND_API.g_ret_sts_error;
1351: RETURN;
1352: END IF;
1353: END IF;
1354:
1352: END IF;
1353: END IF;
1354:
1355: ----------------------- ROUNDING_LEVEL_FLAG ------------------------
1356: IF p_sys_parameters_rec.rounding_level_flag <> FND_API.g_miss_char
1357: AND p_sys_parameters_rec.rounding_level_flag IS NOT NULL
1358: THEN
1359: IF p_sys_parameters_rec.rounding_level_flag <> FND_API.g_true
1360: AND p_sys_parameters_rec.rounding_level_flag <> FND_API.g_false
1355: ----------------------- ROUNDING_LEVEL_FLAG ------------------------
1356: IF p_sys_parameters_rec.rounding_level_flag <> FND_API.g_miss_char
1357: AND p_sys_parameters_rec.rounding_level_flag IS NOT NULL
1358: THEN
1359: IF p_sys_parameters_rec.rounding_level_flag <> FND_API.g_true
1360: AND p_sys_parameters_rec.rounding_level_flag <> FND_API.g_false
1361: THEN
1362: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1363: THEN
1356: IF p_sys_parameters_rec.rounding_level_flag <> FND_API.g_miss_char
1357: AND p_sys_parameters_rec.rounding_level_flag IS NOT NULL
1358: THEN
1359: IF p_sys_parameters_rec.rounding_level_flag <> FND_API.g_true
1360: AND p_sys_parameters_rec.rounding_level_flag <> FND_API.g_false
1361: THEN
1362: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1363: THEN
1364: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_BAD_FLAG');
1365: FND_MESSAGE.set_token('FLAG', 'ROUNDING_LEVEL_FLAG');
1366: FND_MSG_PUB.add;
1367: END IF;
1368:
1369: x_return_status := FND_API.g_ret_sts_error;
1370: RETURN;
1371: END IF;
1372: END IF;
1373:
1371: END IF;
1372: END IF;
1373:
1374: ----------------------- AUTOPAY_FLAG ------------------------
1375: IF p_sys_parameters_rec.autopay_flag <> FND_API.g_miss_char
1376: AND p_sys_parameters_rec.autopay_flag IS NOT NULL
1377: THEN
1378: IF p_sys_parameters_rec.autopay_flag <> FND_API.g_true
1379: AND p_sys_parameters_rec.autopay_flag <> FND_API.g_false
1374: ----------------------- AUTOPAY_FLAG ------------------------
1375: IF p_sys_parameters_rec.autopay_flag <> FND_API.g_miss_char
1376: AND p_sys_parameters_rec.autopay_flag IS NOT NULL
1377: THEN
1378: IF p_sys_parameters_rec.autopay_flag <> FND_API.g_true
1379: AND p_sys_parameters_rec.autopay_flag <> FND_API.g_false
1380: THEN
1381: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1382: THEN
1375: IF p_sys_parameters_rec.autopay_flag <> FND_API.g_miss_char
1376: AND p_sys_parameters_rec.autopay_flag IS NOT NULL
1377: THEN
1378: IF p_sys_parameters_rec.autopay_flag <> FND_API.g_true
1379: AND p_sys_parameters_rec.autopay_flag <> FND_API.g_false
1380: THEN
1381: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error)
1382: THEN
1383: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_BAD_FLAG');
1384: FND_MESSAGE.set_token('FLAG', 'AUTOPAY_FLAG');
1385: FND_MSG_PUB.add;
1386: END IF;
1387:
1388: x_return_status := FND_API.g_ret_sts_error;
1389: RETURN;
1390: END IF;
1391: END IF;
1392:
1423: p_sys_parameters_rec => p_sys_parameters_rec
1424: ,x_return_status => x_return_status
1425: );
1426:
1427: IF x_return_status <> FND_API.g_ret_sts_success THEN
1428: RETURN;
1429: END IF;
1430:
1431: Check_Sys_Para_Uk_Items(
1433: ,p_validation_mode => p_validation_mode
1434: ,x_return_status => x_return_status
1435: );
1436:
1437: IF x_return_status <> FND_API.g_ret_sts_success THEN
1438: RETURN;
1439: END IF;
1440:
1441: Check_Sys_Para_Fk_Items(
1442: p_sys_parameters_rec => p_sys_parameters_rec
1443: ,x_return_status => x_return_status
1444: );
1445:
1446: IF x_return_status <> FND_API.g_ret_sts_success THEN
1447: RETURN;
1448: END IF;
1449:
1450: Check_Sys_Para_Lookup_Items(
1451: p_sys_parameters_rec => p_sys_parameters_rec
1452: ,x_return_status => x_return_status
1453: );
1454:
1455: IF x_return_status <> FND_API.g_ret_sts_success THEN
1456: RETURN;
1457: END IF;
1458:
1459: Check_Sys_Para_Flag_Items(
1460: p_sys_parameters_rec => p_sys_parameters_rec
1461: ,x_return_status => x_return_status
1462: );
1463:
1464: IF x_return_status <> FND_API.g_ret_sts_success THEN
1465: RETURN;
1466: END IF;
1467:
1468: --Check the validity of OM Transaction type
1476: THEN
1477: FND_MESSAGE.set_name('OZF', 'OZF_CLAIM_INVALID_OM_TRX_TYPE');
1478: FND_MSG_PUB.add;
1479: END IF;
1480: x_return_status := FND_API.g_ret_sts_error;
1481: RETURN;
1482: END IF;
1483: END IF;
1484:
1501: )
1502: IS
1503:
1504: BEGIN
1505: x_return_status := FND_API.g_ret_sts_success;
1506:
1507: -- do other record level checkings
1508:
1509: END Check_Sys_Parameters_Record;
1660: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.g_msg_lvl_error) THEN
1661: FND_MESSAGE.set_name('OZF', 'OZF_API_RECORD_NOT_FOUND');
1662: FND_MSG_PUB.add;
1663: END IF;
1664: RAISE FND_API.g_exc_error;
1665: END IF;
1666: CLOSE c_sys_para;
1667:
1668: IF p_sys_parameters_rec.object_version_number = FND_API.G_MISS_NUM THEN
1664: RAISE FND_API.g_exc_error;
1665: END IF;
1666: CLOSE c_sys_para;
1667:
1668: IF p_sys_parameters_rec.object_version_number = FND_API.G_MISS_NUM THEN
1669: x_complete_rec.object_version_number := NULL;
1670: END IF;
1671: IF p_sys_parameters_rec.object_version_number IS NULL THEN
1672: x_complete_rec.object_version_number := l_sys_parameters_rec.object_version_number;
1671: IF p_sys_parameters_rec.object_version_number IS NULL THEN
1672: x_complete_rec.object_version_number := l_sys_parameters_rec.object_version_number;
1673: END IF;
1674:
1675: IF p_sys_parameters_rec.post_to_gl = FND_API.G_MISS_CHAR THEN
1676: x_complete_rec.post_to_gl := NULL;
1677:
1678: END IF;
1679: IF p_sys_parameters_rec.post_to_gl IS NULL THEN
1678: END IF;
1679: IF p_sys_parameters_rec.post_to_gl IS NULL THEN
1680: x_complete_rec.post_to_gl := l_sys_parameters_rec.post_to_gl;
1681: END IF;
1682: IF p_sys_parameters_rec.transfer_to_gl_in = FND_API.G_MISS_CHAR THEN
1683: ozf_utility_pvt.debug_message('IN transfer_to_gl_in = FND_API.G_MISS_CHAR');
1684: --Commented as transfer_to_gl_in cannot be NULL and as this object is not displayed, the same value is retained.
1685: --x_complete_rec.transfer_to_gl_in := NULL;
1686: x_complete_rec.transfer_to_gl_in := l_sys_parameters_rec.transfer_to_gl_in;
1679: IF p_sys_parameters_rec.post_to_gl IS NULL THEN
1680: x_complete_rec.post_to_gl := l_sys_parameters_rec.post_to_gl;
1681: END IF;
1682: IF p_sys_parameters_rec.transfer_to_gl_in = FND_API.G_MISS_CHAR THEN
1683: ozf_utility_pvt.debug_message('IN transfer_to_gl_in = FND_API.G_MISS_CHAR');
1684: --Commented as transfer_to_gl_in cannot be NULL and as this object is not displayed, the same value is retained.
1685: --x_complete_rec.transfer_to_gl_in := NULL;
1686: x_complete_rec.transfer_to_gl_in := l_sys_parameters_rec.transfer_to_gl_in;
1687: END IF;
1688: IF p_sys_parameters_rec.transfer_to_gl_in IS NULL THEN
1689: x_complete_rec.transfer_to_gl_in := l_sys_parameters_rec.transfer_to_gl_in;
1690: END IF;
1691:
1692: IF p_sys_parameters_rec.ap_payment_term_id = FND_API.G_MISS_NUM THEN
1693: x_complete_rec.ap_payment_term_id := NULL;
1694: END IF;
1695: IF p_sys_parameters_rec.ap_payment_term_id IS NULL THEN
1696: x_complete_rec.ap_payment_term_id := l_sys_parameters_rec.ap_payment_term_id;
1695: IF p_sys_parameters_rec.ap_payment_term_id IS NULL THEN
1696: x_complete_rec.ap_payment_term_id := l_sys_parameters_rec.ap_payment_term_id;
1697: END IF;
1698:
1699: IF p_sys_parameters_rec.rounding_level_flag = FND_API.G_MISS_CHAR THEN
1700: x_complete_rec.rounding_level_flag := NULL;
1701: END IF;
1702: IF p_sys_parameters_rec.rounding_level_flag IS NULL THEN
1703: x_complete_rec.rounding_level_flag := l_sys_parameters_rec.rounding_level_flag;
1702: IF p_sys_parameters_rec.rounding_level_flag IS NULL THEN
1703: x_complete_rec.rounding_level_flag := l_sys_parameters_rec.rounding_level_flag;
1704: END IF;
1705:
1706: IF p_sys_parameters_rec.gl_id_rounding = FND_API.G_MISS_NUM THEN
1707: x_complete_rec.gl_id_rounding := NULL;
1708: END IF;
1709: IF p_sys_parameters_rec.gl_id_rounding IS NULL THEN
1710: x_complete_rec.gl_id_rounding := l_sys_parameters_rec.gl_id_rounding;
1709: IF p_sys_parameters_rec.gl_id_rounding IS NULL THEN
1710: x_complete_rec.gl_id_rounding := l_sys_parameters_rec.gl_id_rounding;
1711: END IF;
1712:
1713: IF p_sys_parameters_rec.gl_id_ded_clearing = FND_API.G_MISS_NUM THEN
1714: x_complete_rec.gl_id_ded_clearing := NULL;
1715: END IF;
1716: IF p_sys_parameters_rec.gl_id_ded_clearing IS NULL THEN
1717: x_complete_rec.gl_id_ded_clearing := l_sys_parameters_rec.gl_id_ded_clearing;
1716: IF p_sys_parameters_rec.gl_id_ded_clearing IS NULL THEN
1717: x_complete_rec.gl_id_ded_clearing := l_sys_parameters_rec.gl_id_ded_clearing;
1718: END IF;
1719:
1720: IF p_sys_parameters_rec.gl_id_ded_adj = FND_API.G_MISS_NUM THEN
1721: x_complete_rec.gl_id_ded_adj := NULL;
1722: END IF;
1723: IF p_sys_parameters_rec.gl_id_ded_adj IS NULL THEN
1724: x_complete_rec.gl_id_ded_adj := l_sys_parameters_rec.gl_id_ded_adj;
1723: IF p_sys_parameters_rec.gl_id_ded_adj IS NULL THEN
1724: x_complete_rec.gl_id_ded_adj := l_sys_parameters_rec.gl_id_ded_adj;
1725: END IF;
1726:
1727: IF p_sys_parameters_rec.gl_id_accr_promo_liab = FND_API.G_MISS_NUM THEN
1728: x_complete_rec.gl_id_accr_promo_liab := NULL;
1729: END IF;
1730: IF p_sys_parameters_rec.gl_id_accr_promo_liab IS NULL THEN
1731: x_complete_rec.gl_id_accr_promo_liab := l_sys_parameters_rec.gl_id_accr_promo_liab;
1730: IF p_sys_parameters_rec.gl_id_accr_promo_liab IS NULL THEN
1731: x_complete_rec.gl_id_accr_promo_liab := l_sys_parameters_rec.gl_id_accr_promo_liab;
1732: END IF;
1733:
1734: IF p_sys_parameters_rec.gl_id_ded_adj_clearing = FND_API.G_MISS_NUM THEN
1735: x_complete_rec.gl_id_ded_adj_clearing := NULL;
1736: END IF;
1737: IF p_sys_parameters_rec.gl_id_ded_adj_clearing IS NULL THEN
1738: x_complete_rec.gl_id_ded_adj_clearing := l_sys_parameters_rec.gl_id_ded_adj_clearing;
1737: IF p_sys_parameters_rec.gl_id_ded_adj_clearing IS NULL THEN
1738: x_complete_rec.gl_id_ded_adj_clearing := l_sys_parameters_rec.gl_id_ded_adj_clearing;
1739: END IF;
1740:
1741: IF p_sys_parameters_rec.gl_rec_ded_account = FND_API.G_MISS_NUM THEN
1742: x_complete_rec.gl_rec_ded_account := NULL;
1743: END IF;
1744: IF p_sys_parameters_rec.gl_rec_ded_account IS NULL THEN
1745: x_complete_rec.gl_rec_ded_account := l_sys_parameters_rec.gl_rec_ded_account;
1745: x_complete_rec.gl_rec_ded_account := l_sys_parameters_rec.gl_rec_ded_account;
1746: END IF;
1747:
1748:
1749: IF p_sys_parameters_rec.gl_rec_clearing_account = FND_API.G_MISS_NUM THEN
1750: x_complete_rec.gl_rec_clearing_account := NULL;
1751: END IF;
1752: IF p_sys_parameters_rec.gl_rec_clearing_account IS NULL THEN
1753: x_complete_rec.gl_rec_clearing_account := l_sys_parameters_rec.gl_rec_clearing_account;
1752: IF p_sys_parameters_rec.gl_rec_clearing_account IS NULL THEN
1753: x_complete_rec.gl_rec_clearing_account := l_sys_parameters_rec.gl_rec_clearing_account;
1754: END IF;
1755:
1756: IF p_sys_parameters_rec.gl_cost_adjustment_acct = FND_API.G_MISS_NUM THEN
1757: x_complete_rec.gl_cost_adjustment_acct := NULL;
1758: END IF;
1759: IF p_sys_parameters_rec.gl_cost_adjustment_acct IS NULL THEN
1760: x_complete_rec.gl_cost_adjustment_acct := l_sys_parameters_rec.gl_cost_adjustment_acct;
1759: IF p_sys_parameters_rec.gl_cost_adjustment_acct IS NULL THEN
1760: x_complete_rec.gl_cost_adjustment_acct := l_sys_parameters_rec.gl_cost_adjustment_acct;
1761: END IF;
1762:
1763: IF p_sys_parameters_rec.gl_contra_liability_acct = FND_API.G_MISS_NUM THEN
1764: x_complete_rec.gl_contra_liability_acct := NULL;
1765: END IF;
1766: IF p_sys_parameters_rec.gl_contra_liability_acct IS NULL THEN
1767: x_complete_rec.gl_contra_liability_acct := l_sys_parameters_rec.gl_contra_liability_acct;
1766: IF p_sys_parameters_rec.gl_contra_liability_acct IS NULL THEN
1767: x_complete_rec.gl_contra_liability_acct := l_sys_parameters_rec.gl_contra_liability_acct;
1768: END IF;
1769:
1770: IF p_sys_parameters_rec.gl_pp_accrual_acct = FND_API.G_MISS_NUM THEN
1771: x_complete_rec.gl_pp_accrual_acct := NULL;
1772: END IF;
1773: IF p_sys_parameters_rec.gl_pp_accrual_acct IS NULL THEN
1774: x_complete_rec.gl_pp_accrual_acct := l_sys_parameters_rec.gl_pp_accrual_acct;
1774: x_complete_rec.gl_pp_accrual_acct := l_sys_parameters_rec.gl_pp_accrual_acct;
1775: END IF;
1776:
1777:
1778: IF p_sys_parameters_rec.gl_date_type = FND_API.G_MISS_CHAR THEN
1779: x_complete_rec.gl_date_type := NULL;
1780: END IF;
1781: IF p_sys_parameters_rec.gl_date_type IS NULL THEN
1782: x_complete_rec.gl_date_type := l_sys_parameters_rec.gl_date_type;
1782: x_complete_rec.gl_date_type := l_sys_parameters_rec.gl_date_type;
1783: END IF;
1784:
1785:
1786: IF p_sys_parameters_rec.days_due = FND_API.G_MISS_NUM THEN
1787: x_complete_rec.days_due := NULL;
1788: END IF;
1789: IF p_sys_parameters_rec.days_due IS NULL THEN
1790: x_complete_rec.days_due := l_sys_parameters_rec.days_due;
1790: x_complete_rec.days_due := l_sys_parameters_rec.days_due;
1791: END IF;
1792:
1793:
1794: IF p_sys_parameters_rec.claim_type_id = FND_API.G_MISS_NUM THEN
1795: x_complete_rec.claim_type_id := NULL;
1796: END IF;
1797: IF p_sys_parameters_rec.claim_type_id IS NULL THEN
1798: x_complete_rec.claim_type_id := l_sys_parameters_rec.claim_type_id;
1798: x_complete_rec.claim_type_id := l_sys_parameters_rec.claim_type_id;
1799: END IF;
1800:
1801:
1802: IF p_sys_parameters_rec.reason_code_id = FND_API.G_MISS_NUM THEN
1803: x_complete_rec.reason_code_id := NULL;
1804: END IF;
1805: IF p_sys_parameters_rec.reason_code_id IS NULL THEN
1806: x_complete_rec.reason_code_id := l_sys_parameters_rec.reason_code_id;
1806: x_complete_rec.reason_code_id := l_sys_parameters_rec.reason_code_id;
1807: END IF;
1808:
1809:
1810: IF p_sys_parameters_rec.autopay_claim_type_id = FND_API.G_MISS_NUM THEN
1811: x_complete_rec.autopay_claim_type_id := NULL;
1812: END IF;
1813: IF p_sys_parameters_rec.autopay_claim_type_id IS NULL THEN
1814: x_complete_rec.autopay_claim_type_id := l_sys_parameters_rec.autopay_claim_type_id;
1814: x_complete_rec.autopay_claim_type_id := l_sys_parameters_rec.autopay_claim_type_id;
1815: END IF;
1816:
1817:
1818: IF p_sys_parameters_rec.autopay_reason_code_id = FND_API.G_MISS_NUM THEN
1819: x_complete_rec.autopay_reason_code_id := NULL;
1820: END IF;
1821: IF p_sys_parameters_rec.autopay_reason_code_id IS NULL THEN
1822: x_complete_rec.autopay_reason_code_id := l_sys_parameters_rec.autopay_reason_code_id;
1822: x_complete_rec.autopay_reason_code_id := l_sys_parameters_rec.autopay_reason_code_id;
1823: END IF;
1824:
1825:
1826: IF p_sys_parameters_rec.autopay_flag = FND_API.G_MISS_CHAR THEN
1827: x_complete_rec.autopay_flag := NULL;
1828: END IF;
1829: IF p_sys_parameters_rec.autopay_flag IS NULL THEN
1830: x_complete_rec.autopay_flag := l_sys_parameters_rec.autopay_flag;
1830: x_complete_rec.autopay_flag := l_sys_parameters_rec.autopay_flag;
1831: END IF;
1832:
1833:
1834: IF p_sys_parameters_rec.autopay_periodicity = FND_API.G_MISS_NUM THEN
1835: x_complete_rec.autopay_periodicity := NULL;
1836: END IF;
1837: IF p_sys_parameters_rec.autopay_periodicity IS NULL THEN
1838: x_complete_rec.autopay_periodicity := l_sys_parameters_rec.autopay_periodicity;
1838: x_complete_rec.autopay_periodicity := l_sys_parameters_rec.autopay_periodicity;
1839: END IF;
1840:
1841:
1842: IF p_sys_parameters_rec.autopay_periodicity_type = FND_API.G_MISS_CHAR THEN
1843: x_complete_rec.autopay_periodicity_type := NULL;
1844: END IF;
1845: IF p_sys_parameters_rec.autopay_periodicity_type IS NULL THEN
1846: x_complete_rec.autopay_periodicity_type := l_sys_parameters_rec.autopay_periodicity_type;
1846: x_complete_rec.autopay_periodicity_type := l_sys_parameters_rec.autopay_periodicity_type;
1847: END IF;
1848:
1849:
1850: IF p_sys_parameters_rec.accounting_method_option = FND_API.G_MISS_CHAR THEN
1851: x_complete_rec.accounting_method_option := NULL;
1852: END IF;
1853: IF p_sys_parameters_rec.accounting_method_option IS NULL THEN
1854: x_complete_rec.accounting_method_option := l_sys_parameters_rec.accounting_method_option;
1853: IF p_sys_parameters_rec.accounting_method_option IS NULL THEN
1854: x_complete_rec.accounting_method_option := l_sys_parameters_rec.accounting_method_option;
1855: END IF;
1856:
1857: IF p_sys_parameters_rec.billback_trx_type_id = FND_API.G_MISS_NUM THEN
1858: x_complete_rec.billback_trx_type_id := NULL;
1859: END IF;
1860: IF p_sys_parameters_rec.billback_trx_type_id IS NULL THEN
1861: x_complete_rec.billback_trx_type_id := l_sys_parameters_rec.billback_trx_type_id;
1860: IF p_sys_parameters_rec.billback_trx_type_id IS NULL THEN
1861: x_complete_rec.billback_trx_type_id := l_sys_parameters_rec.billback_trx_type_id;
1862: END IF;
1863:
1864: IF p_sys_parameters_rec.cm_trx_type_id = FND_API.G_MISS_NUM THEN
1865: x_complete_rec.cm_trx_type_id := NULL;
1866: END IF;
1867: IF p_sys_parameters_rec.cm_trx_type_id IS NULL THEN
1868: x_complete_rec.cm_trx_type_id := l_sys_parameters_rec.cm_trx_type_id;
1867: IF p_sys_parameters_rec.cm_trx_type_id IS NULL THEN
1868: x_complete_rec.cm_trx_type_id := l_sys_parameters_rec.cm_trx_type_id;
1869: END IF;
1870:
1871: IF p_sys_parameters_rec.attribute_category = FND_API.G_MISS_CHAR THEN
1872: x_complete_rec.attribute_category := NULL;
1873: END IF;
1874: IF p_sys_parameters_rec.attribute_category IS NULL THEN
1875: x_complete_rec.attribute_category := l_sys_parameters_rec.attribute_category;
1874: IF p_sys_parameters_rec.attribute_category IS NULL THEN
1875: x_complete_rec.attribute_category := l_sys_parameters_rec.attribute_category;
1876: END IF;
1877:
1878: IF p_sys_parameters_rec.attribute1 = FND_API.G_MISS_CHAR THEN
1879: x_complete_rec.attribute1 := NULL;
1880: END IF;
1881: IF p_sys_parameters_rec.attribute1 IS NULL THEN
1882: x_complete_rec.attribute1 := l_sys_parameters_rec.attribute1;
1881: IF p_sys_parameters_rec.attribute1 IS NULL THEN
1882: x_complete_rec.attribute1 := l_sys_parameters_rec.attribute1;
1883: END IF;
1884:
1885: IF p_sys_parameters_rec.attribute2 = FND_API.G_MISS_CHAR THEN
1886: x_complete_rec.attribute2 := NULL;
1887: END IF;
1888: IF p_sys_parameters_rec.attribute2 IS NULL THEN
1889: x_complete_rec.attribute2 := l_sys_parameters_rec.attribute2;
1888: IF p_sys_parameters_rec.attribute2 IS NULL THEN
1889: x_complete_rec.attribute2 := l_sys_parameters_rec.attribute2;
1890: END IF;
1891:
1892: IF p_sys_parameters_rec.attribute3 = FND_API.G_MISS_CHAR THEN
1893: x_complete_rec.attribute3 := NULL;
1894: END IF;
1895: IF p_sys_parameters_rec.attribute3 IS NULL THEN
1896: x_complete_rec.attribute3 := l_sys_parameters_rec.attribute3;
1895: IF p_sys_parameters_rec.attribute3 IS NULL THEN
1896: x_complete_rec.attribute3 := l_sys_parameters_rec.attribute3;
1897: END IF;
1898:
1899: IF p_sys_parameters_rec.attribute4 = FND_API.G_MISS_CHAR THEN
1900: x_complete_rec.attribute4 := NULL;
1901: END IF;
1902: IF p_sys_parameters_rec.attribute4 IS NULL THEN
1903: x_complete_rec.attribute4 := l_sys_parameters_rec.attribute4;
1902: IF p_sys_parameters_rec.attribute4 IS NULL THEN
1903: x_complete_rec.attribute4 := l_sys_parameters_rec.attribute4;
1904: END IF;
1905:
1906: IF p_sys_parameters_rec.attribute5 = FND_API.G_MISS_CHAR THEN
1907: x_complete_rec.attribute5 := NULL;
1908: END IF;
1909: IF p_sys_parameters_rec.attribute5 IS NULL THEN
1910: x_complete_rec.attribute5 := l_sys_parameters_rec.attribute5;
1909: IF p_sys_parameters_rec.attribute5 IS NULL THEN
1910: x_complete_rec.attribute5 := l_sys_parameters_rec.attribute5;
1911: END IF;
1912:
1913: IF p_sys_parameters_rec.attribute6 = FND_API.G_MISS_CHAR THEN
1914: x_complete_rec.attribute6 := NULL;
1915: END IF;
1916: IF p_sys_parameters_rec.attribute6 IS NULL THEN
1917: x_complete_rec.attribute6 := l_sys_parameters_rec.attribute6;
1916: IF p_sys_parameters_rec.attribute6 IS NULL THEN
1917: x_complete_rec.attribute6 := l_sys_parameters_rec.attribute6;
1918: END IF;
1919:
1920: IF p_sys_parameters_rec.attribute7 = FND_API.G_MISS_CHAR THEN
1921: x_complete_rec.attribute7 := NULL;
1922: END IF;
1923: IF p_sys_parameters_rec.attribute7 IS NULL THEN
1924: x_complete_rec.attribute7 := l_sys_parameters_rec.attribute7;
1923: IF p_sys_parameters_rec.attribute7 IS NULL THEN
1924: x_complete_rec.attribute7 := l_sys_parameters_rec.attribute7;
1925: END IF;
1926:
1927: IF p_sys_parameters_rec.attribute8 = FND_API.G_MISS_CHAR THEN
1928: x_complete_rec.attribute8 := NULL;
1929: END IF;
1930: IF p_sys_parameters_rec.attribute8 IS NULL THEN
1931: x_complete_rec.attribute8 := l_sys_parameters_rec.attribute8;
1930: IF p_sys_parameters_rec.attribute8 IS NULL THEN
1931: x_complete_rec.attribute8 := l_sys_parameters_rec.attribute8;
1932: END IF;
1933:
1934: IF p_sys_parameters_rec.attribute9 = FND_API.G_MISS_CHAR THEN
1935: x_complete_rec.attribute9 := NULL;
1936: END IF;
1937: IF p_sys_parameters_rec.attribute9 IS NULL THEN
1938: x_complete_rec.attribute9 := l_sys_parameters_rec.attribute9;
1937: IF p_sys_parameters_rec.attribute9 IS NULL THEN
1938: x_complete_rec.attribute9 := l_sys_parameters_rec.attribute9;
1939: END IF;
1940:
1941: IF p_sys_parameters_rec.attribute10 = FND_API.G_MISS_CHAR THEN
1942: x_complete_rec.attribute10 := NULL;
1943: END IF;
1944: IF p_sys_parameters_rec.attribute10 IS NULL THEN
1945: x_complete_rec.attribute10 := l_sys_parameters_rec.attribute10;
1944: IF p_sys_parameters_rec.attribute10 IS NULL THEN
1945: x_complete_rec.attribute10 := l_sys_parameters_rec.attribute10;
1946: END IF;
1947:
1948: IF p_sys_parameters_rec.attribute11 = FND_API.G_MISS_CHAR THEN
1949: x_complete_rec.attribute11 := NULL;
1950: END IF;
1951: IF p_sys_parameters_rec.attribute11 IS NULL THEN
1952: x_complete_rec.attribute11 := l_sys_parameters_rec.attribute11;
1951: IF p_sys_parameters_rec.attribute11 IS NULL THEN
1952: x_complete_rec.attribute11 := l_sys_parameters_rec.attribute11;
1953: END IF;
1954:
1955: IF p_sys_parameters_rec.attribute12 = FND_API.G_MISS_CHAR THEN
1956: x_complete_rec.attribute12 := NULL;
1957: END IF;
1958: IF p_sys_parameters_rec.attribute12 IS NULL THEN
1959: x_complete_rec.attribute12 := l_sys_parameters_rec.attribute12;
1958: IF p_sys_parameters_rec.attribute12 IS NULL THEN
1959: x_complete_rec.attribute12 := l_sys_parameters_rec.attribute12;
1960: END IF;
1961:
1962: IF p_sys_parameters_rec.attribute13 = FND_API.G_MISS_CHAR THEN
1963: x_complete_rec.attribute13 := NULL;
1964: END IF;
1965: IF p_sys_parameters_rec.attribute13 IS NULL THEN
1966: x_complete_rec.attribute13 := l_sys_parameters_rec.attribute13;
1965: IF p_sys_parameters_rec.attribute13 IS NULL THEN
1966: x_complete_rec.attribute13 := l_sys_parameters_rec.attribute13;
1967: END IF;
1968:
1969: IF p_sys_parameters_rec.attribute14 = FND_API.G_MISS_CHAR THEN
1970: x_complete_rec.attribute14 := NULL;
1971: END IF;
1972: IF p_sys_parameters_rec.attribute14 IS NULL THEN
1973: x_complete_rec.attribute14 := l_sys_parameters_rec.attribute14;
1972: IF p_sys_parameters_rec.attribute14 IS NULL THEN
1973: x_complete_rec.attribute14 := l_sys_parameters_rec.attribute14;
1974: END IF;
1975:
1976: IF p_sys_parameters_rec.attribute15 = FND_API.G_MISS_CHAR THEN
1977: x_complete_rec.attribute15 := NULL;
1978: END IF;
1979: IF p_sys_parameters_rec.attribute15 IS NULL THEN
1980: x_complete_rec.attribute15 := l_sys_parameters_rec.attribute15;
1979: IF p_sys_parameters_rec.attribute15 IS NULL THEN
1980: x_complete_rec.attribute15 := l_sys_parameters_rec.attribute15;
1981: END IF;
1982:
1983: IF p_sys_parameters_rec.org_id = FND_API.G_MISS_NUM THEN
1984: x_complete_rec.org_id := NULL;
1985: END IF;
1986: IF p_sys_parameters_rec.org_id IS NULL THEN
1987: x_complete_rec.org_id := l_sys_parameters_rec.org_id;
1986: IF p_sys_parameters_rec.org_id IS NULL THEN
1987: x_complete_rec.org_id := l_sys_parameters_rec.org_id;
1988: END IF;
1989:
1990: IF p_sys_parameters_rec.batch_source_id = FND_API.G_MISS_NUM THEN
1991: x_complete_rec.batch_source_id := NULL;
1992: END IF;
1993: IF p_sys_parameters_rec.batch_source_id IS NULL THEN
1994: x_complete_rec.batch_source_id := l_sys_parameters_rec.batch_source_id;
1993: IF p_sys_parameters_rec.batch_source_id IS NULL THEN
1994: x_complete_rec.batch_source_id := l_sys_parameters_rec.batch_source_id;
1995: END IF;
1996:
1997: IF p_sys_parameters_rec.payables_source = FND_API.G_MISS_CHAR THEN
1998: x_complete_rec.payables_source := NULL;
1999: END IF;
2000: IF p_sys_parameters_rec.payables_source IS NULL THEN
2001: x_complete_rec.payables_source := l_sys_parameters_rec.payables_source;
2000: IF p_sys_parameters_rec.payables_source IS NULL THEN
2001: x_complete_rec.payables_source := l_sys_parameters_rec.payables_source;
2002: END IF;
2003:
2004: IF p_sys_parameters_rec.default_owner_id = FND_API.G_MISS_NUM THEN
2005: x_complete_rec.default_owner_id := NULL;
2006: END IF;
2007: IF p_sys_parameters_rec.default_owner_id IS NULL THEN
2008: x_complete_rec.default_owner_id := l_sys_parameters_rec.default_owner_id;
2007: IF p_sys_parameters_rec.default_owner_id IS NULL THEN
2008: x_complete_rec.default_owner_id := l_sys_parameters_rec.default_owner_id;
2009: END IF;
2010:
2011: IF p_sys_parameters_rec.auto_assign_flag = FND_API.G_MISS_CHAR THEN
2012: x_complete_rec.auto_assign_flag := NULL;
2013: END IF;
2014: IF p_sys_parameters_rec.auto_assign_flag IS NULL THEN
2015: x_complete_rec.auto_assign_flag := l_sys_parameters_rec.auto_assign_flag;
2014: IF p_sys_parameters_rec.auto_assign_flag IS NULL THEN
2015: x_complete_rec.auto_assign_flag := l_sys_parameters_rec.auto_assign_flag;
2016: END IF;
2017:
2018: IF p_sys_parameters_rec.exchange_rate_type = FND_API.G_MISS_CHAR THEN
2019: x_complete_rec.exchange_rate_type := NULL;
2020: END IF;
2021: IF p_sys_parameters_rec.exchange_rate_type IS NULL THEN
2022: x_complete_rec.exchange_rate_type := l_sys_parameters_rec.exchange_rate_type;
2021: IF p_sys_parameters_rec.exchange_rate_type IS NULL THEN
2022: x_complete_rec.exchange_rate_type := l_sys_parameters_rec.exchange_rate_type;
2023: END IF;
2024:
2025: IF p_sys_parameters_rec.order_type_id = FND_API.G_MISS_NUM THEN
2026: x_complete_rec.order_type_id := NULL;
2027: END IF;
2028: IF p_sys_parameters_rec.order_type_id IS NULL THEN
2029: x_complete_rec.order_type_id := l_sys_parameters_rec.order_type_id;
2029: x_complete_rec.order_type_id := l_sys_parameters_rec.order_type_id;
2030: END IF;
2031:
2032: --11.5.10 enhancements
2033: IF p_sys_parameters_rec.gl_acct_for_offinv_flag = FND_API.G_MISS_CHAR THEN
2034: x_complete_rec.gl_acct_for_offinv_flag := NULL;
2035: END IF;
2036: IF p_sys_parameters_rec.gl_acct_for_offinv_flag IS NULL THEN
2037: x_complete_rec.gl_acct_for_offinv_flag := l_sys_parameters_rec.gl_acct_for_offinv_flag;
2037: x_complete_rec.gl_acct_for_offinv_flag := l_sys_parameters_rec.gl_acct_for_offinv_flag;
2038: END IF;
2039:
2040: /*
2041: IF p_sys_parameters_rec.short_payment_reason_code_id = FND_API.G_MISS_NUM THEN
2042: x_complete_rec.short_payment_reason_code_id := NULL;
2043: END IF;
2044: IF p_sys_parameters_rec.short_payment_reason_code_id IS NULL THEN
2045: x_complete_rec.short_payment_reason_code_id := l_sys_parameters_rec.short_payment_reason_code_id;
2045: x_complete_rec.short_payment_reason_code_id := l_sys_parameters_rec.short_payment_reason_code_id;
2046: END IF;
2047: */
2048:
2049: IF p_sys_parameters_rec.cb_trx_type_id = FND_API.G_MISS_NUM THEN
2050: x_complete_rec.cb_trx_type_id := NULL;
2051: END IF;
2052: IF p_sys_parameters_rec.cb_trx_type_id IS NULL THEN
2053: x_complete_rec.cb_trx_type_id := l_sys_parameters_rec.cb_trx_type_id;
2052: IF p_sys_parameters_rec.cb_trx_type_id IS NULL THEN
2053: x_complete_rec.cb_trx_type_id := l_sys_parameters_rec.cb_trx_type_id;
2054: END IF;
2055:
2056: IF p_sys_parameters_rec.pos_write_off_threshold = FND_API.G_MISS_NUM THEN
2057: x_complete_rec.pos_write_off_threshold := NULL;
2058: END IF;
2059: IF p_sys_parameters_rec.pos_write_off_threshold IS NULL THEN
2060: x_complete_rec.pos_write_off_threshold := l_sys_parameters_rec.pos_write_off_threshold;
2059: IF p_sys_parameters_rec.pos_write_off_threshold IS NULL THEN
2060: x_complete_rec.pos_write_off_threshold := l_sys_parameters_rec.pos_write_off_threshold;
2061: END IF;
2062:
2063: IF p_sys_parameters_rec.neg_write_off_threshold = FND_API.G_MISS_NUM THEN
2064: x_complete_rec.neg_write_off_threshold := NULL;
2065: END IF;
2066: IF p_sys_parameters_rec.neg_write_off_threshold IS NULL THEN
2067: x_complete_rec.neg_write_off_threshold := l_sys_parameters_rec.neg_write_off_threshold;
2066: IF p_sys_parameters_rec.neg_write_off_threshold IS NULL THEN
2067: x_complete_rec.neg_write_off_threshold := l_sys_parameters_rec.neg_write_off_threshold;
2068: END IF;
2069:
2070: IF p_sys_parameters_rec.adj_rec_trx_id = FND_API.G_MISS_NUM THEN
2071: x_complete_rec.adj_rec_trx_id := NULL;
2072: END IF;
2073: IF p_sys_parameters_rec.adj_rec_trx_id IS NULL THEN
2074: x_complete_rec.adj_rec_trx_id := l_sys_parameters_rec.adj_rec_trx_id;
2073: IF p_sys_parameters_rec.adj_rec_trx_id IS NULL THEN
2074: x_complete_rec.adj_rec_trx_id := l_sys_parameters_rec.adj_rec_trx_id;
2075: END IF;
2076:
2077: IF p_sys_parameters_rec.wo_rec_trx_id = FND_API.G_MISS_NUM THEN
2078: x_complete_rec.wo_rec_trx_id := NULL;
2079: END IF;
2080: IF p_sys_parameters_rec.wo_rec_trx_id IS NULL THEN
2081: x_complete_rec.wo_rec_trx_id := l_sys_parameters_rec.wo_rec_trx_id;
2080: IF p_sys_parameters_rec.wo_rec_trx_id IS NULL THEN
2081: x_complete_rec.wo_rec_trx_id := l_sys_parameters_rec.wo_rec_trx_id;
2082: END IF;
2083:
2084: IF p_sys_parameters_rec.neg_wo_rec_trx_id = FND_API.G_MISS_NUM THEN
2085: x_complete_rec.neg_wo_rec_trx_id := NULL;
2086: END IF;
2087: IF p_sys_parameters_rec.neg_wo_rec_trx_id IS NULL THEN
2088: x_complete_rec.neg_wo_rec_trx_id := l_sys_parameters_rec.neg_wo_rec_trx_id;
2087: IF p_sys_parameters_rec.neg_wo_rec_trx_id IS NULL THEN
2088: x_complete_rec.neg_wo_rec_trx_id := l_sys_parameters_rec.neg_wo_rec_trx_id;
2089: END IF;
2090:
2091: IF p_sys_parameters_rec.un_earned_pay_allow_to = FND_API.G_MISS_CHAR THEN
2092: x_complete_rec.un_earned_pay_allow_to := NULL;
2093: END IF;
2094: IF p_sys_parameters_rec.un_earned_pay_allow_to IS NULL THEN
2095: x_complete_rec.un_earned_pay_allow_to := l_sys_parameters_rec.un_earned_pay_allow_to;
2094: IF p_sys_parameters_rec.un_earned_pay_allow_to IS NULL THEN
2095: x_complete_rec.un_earned_pay_allow_to := l_sys_parameters_rec.un_earned_pay_allow_to;
2096: END IF;
2097:
2098: IF p_sys_parameters_rec.un_earned_pay_thold_type = FND_API.G_MISS_CHAR THEN
2099: x_complete_rec.un_earned_pay_thold_type := NULL;
2100: END IF;
2101: IF p_sys_parameters_rec.un_earned_pay_thold_type IS NULL THEN
2102: x_complete_rec.un_earned_pay_thold_type := l_sys_parameters_rec.un_earned_pay_thold_type;
2101: IF p_sys_parameters_rec.un_earned_pay_thold_type IS NULL THEN
2102: x_complete_rec.un_earned_pay_thold_type := l_sys_parameters_rec.un_earned_pay_thold_type;
2103: END IF;
2104:
2105: IF p_sys_parameters_rec.un_earned_pay_threshold = FND_API.G_MISS_NUM THEN
2106: x_complete_rec.un_earned_pay_threshold := NULL;
2107: END IF;
2108: IF p_sys_parameters_rec.un_earned_pay_threshold IS NULL THEN
2109: x_complete_rec.un_earned_pay_threshold := l_sys_parameters_rec.un_earned_pay_thold_amount;
2108: IF p_sys_parameters_rec.un_earned_pay_threshold IS NULL THEN
2109: x_complete_rec.un_earned_pay_threshold := l_sys_parameters_rec.un_earned_pay_thold_amount;
2110: END IF;
2111:
2112: IF p_sys_parameters_rec.un_earned_pay_thold_flag = FND_API.G_MISS_CHAR THEN
2113: x_complete_rec.un_earned_pay_thold_flag := NULL;
2114: END IF;
2115: IF p_sys_parameters_rec.un_earned_pay_thold_flag IS NULL THEN
2116: x_complete_rec.un_earned_pay_thold_flag := l_sys_parameters_rec.un_earned_pay_thold_flag;
2115: IF p_sys_parameters_rec.un_earned_pay_thold_flag IS NULL THEN
2116: x_complete_rec.un_earned_pay_thold_flag := l_sys_parameters_rec.un_earned_pay_thold_flag;
2117: END IF;
2118:
2119: IF p_sys_parameters_rec.header_tolerance_calc_code = FND_API.G_MISS_CHAR THEN
2120: x_complete_rec.header_tolerance_calc_code := NULL;
2121: END IF;
2122: IF p_sys_parameters_rec.header_tolerance_calc_code IS NULL THEN
2123: x_complete_rec.header_tolerance_calc_code := l_sys_parameters_rec.header_tolerance_calc_code;
2122: IF p_sys_parameters_rec.header_tolerance_calc_code IS NULL THEN
2123: x_complete_rec.header_tolerance_calc_code := l_sys_parameters_rec.header_tolerance_calc_code;
2124: END IF;
2125:
2126: IF p_sys_parameters_rec.header_tolerance_operand = FND_API.G_MISS_NUM THEN
2127: x_complete_rec.header_tolerance_operand := NULL;
2128: END IF;
2129: IF p_sys_parameters_rec.header_tolerance_operand IS NULL THEN
2130: x_complete_rec.header_tolerance_operand := l_sys_parameters_rec.header_tolerance_operand;
2129: IF p_sys_parameters_rec.header_tolerance_operand IS NULL THEN
2130: x_complete_rec.header_tolerance_operand := l_sys_parameters_rec.header_tolerance_operand;
2131: END IF;
2132:
2133: IF p_sys_parameters_rec.line_tolerance_calc_code = FND_API.G_MISS_CHAR THEN
2134: x_complete_rec.line_tolerance_calc_code := NULL;
2135: END IF;
2136: IF p_sys_parameters_rec.line_tolerance_calc_code IS NULL THEN
2137: x_complete_rec.line_tolerance_calc_code := l_sys_parameters_rec.line_tolerance_calc_code;
2136: IF p_sys_parameters_rec.line_tolerance_calc_code IS NULL THEN
2137: x_complete_rec.line_tolerance_calc_code := l_sys_parameters_rec.line_tolerance_calc_code;
2138: END IF;
2139:
2140: IF p_sys_parameters_rec.line_tolerance_operand = FND_API.G_MISS_NUM THEN
2141: x_complete_rec.line_tolerance_operand := NULL;
2142: END IF;
2143: IF p_sys_parameters_rec.line_tolerance_operand IS NULL THEN
2144: x_complete_rec.line_tolerance_operand := l_sys_parameters_rec.line_tolerance_operand;
2143: IF p_sys_parameters_rec.line_tolerance_operand IS NULL THEN
2144: x_complete_rec.line_tolerance_operand := l_sys_parameters_rec.line_tolerance_operand;
2145: END IF;
2146:
2147: IF p_sys_parameters_rec.ship_debit_accrual_flag = FND_API.G_MISS_CHAR THEN
2148: x_complete_rec.ship_debit_accrual_flag := NULL;
2149: END IF;
2150: IF p_sys_parameters_rec.ship_debit_accrual_flag IS NULL THEN
2151: x_complete_rec.ship_debit_accrual_flag := l_sys_parameters_rec.ship_debit_accrual_flag;
2150: IF p_sys_parameters_rec.ship_debit_accrual_flag IS NULL THEN
2151: x_complete_rec.ship_debit_accrual_flag := l_sys_parameters_rec.ship_debit_accrual_flag;
2152: END IF;
2153:
2154: IF p_sys_parameters_rec.ship_debit_calc_type = FND_API.G_MISS_CHAR THEN
2155: x_complete_rec.ship_debit_calc_type := NULL;
2156: END IF;
2157: IF p_sys_parameters_rec.ship_debit_calc_type IS NULL THEN
2158: x_complete_rec.ship_debit_calc_type := l_sys_parameters_rec.ship_debit_calc_type;
2157: IF p_sys_parameters_rec.ship_debit_calc_type IS NULL THEN
2158: x_complete_rec.ship_debit_calc_type := l_sys_parameters_rec.ship_debit_calc_type;
2159: END IF;
2160:
2161: IF p_sys_parameters_rec.inventory_tracking_flag = FND_API.G_MISS_CHAR THEN
2162: x_complete_rec.inventory_tracking_flag := NULL;
2163: END IF;
2164: IF p_sys_parameters_rec.inventory_tracking_flag IS NULL THEN
2165: x_complete_rec.inventory_tracking_flag := l_sys_parameters_rec.inventory_tracking_flag;
2164: IF p_sys_parameters_rec.inventory_tracking_flag IS NULL THEN
2165: x_complete_rec.inventory_tracking_flag := l_sys_parameters_rec.inventory_tracking_flag;
2166: END IF;
2167:
2168: IF p_sys_parameters_rec.end_cust_relation_flag = FND_API.G_MISS_CHAR THEN
2169: x_complete_rec.end_cust_relation_flag := NULL;
2170: END IF;
2171: IF p_sys_parameters_rec.end_cust_relation_flag IS NULL THEN
2172: x_complete_rec.end_cust_relation_flag := l_sys_parameters_rec.end_cust_relation_flag;
2171: IF p_sys_parameters_rec.end_cust_relation_flag IS NULL THEN
2172: x_complete_rec.end_cust_relation_flag := l_sys_parameters_rec.end_cust_relation_flag;
2173: END IF;
2174:
2175: IF p_sys_parameters_rec.auto_tp_accrual_flag = FND_API.G_MISS_CHAR THEN
2176: x_complete_rec.auto_tp_accrual_flag := NULL;
2177: END IF;
2178: IF p_sys_parameters_rec.auto_tp_accrual_flag IS NULL THEN
2179: x_complete_rec.auto_tp_accrual_flag := l_sys_parameters_rec.auto_tp_accrual_flag;
2178: IF p_sys_parameters_rec.auto_tp_accrual_flag IS NULL THEN
2179: x_complete_rec.auto_tp_accrual_flag := l_sys_parameters_rec.auto_tp_accrual_flag;
2180: END IF;
2181:
2182: IF p_sys_parameters_rec.gl_balancing_flex_value = FND_API.G_MISS_CHAR THEN
2183: x_complete_rec.gl_balancing_flex_value := NULL;
2184: END IF;
2185: IF p_sys_parameters_rec.gl_balancing_flex_value IS NULL THEN
2186: x_complete_rec.gl_balancing_flex_value := l_sys_parameters_rec.gl_balancing_flex_value;
2185: IF p_sys_parameters_rec.gl_balancing_flex_value IS NULL THEN
2186: x_complete_rec.gl_balancing_flex_value := l_sys_parameters_rec.gl_balancing_flex_value;
2187: END IF;
2188:
2189: IF p_sys_parameters_rec.prorate_earnings_flag = FND_API.G_MISS_CHAR THEN
2190: x_complete_rec.prorate_earnings_flag := NULL;
2191: END IF;
2192: IF p_sys_parameters_rec.prorate_earnings_flag IS NULL THEN
2193: x_complete_rec.prorate_earnings_flag := l_sys_parameters_rec.prorate_earnings_flag;
2192: IF p_sys_parameters_rec.prorate_earnings_flag IS NULL THEN
2193: x_complete_rec.prorate_earnings_flag := l_sys_parameters_rec.prorate_earnings_flag;
2194: END IF;
2195:
2196: IF p_sys_parameters_rec.sales_credit_default_type = FND_API.G_MISS_CHAR THEN
2197: x_complete_rec.sales_credit_default_type := NULL;
2198: END IF;
2199: IF p_sys_parameters_rec.sales_credit_default_type IS NULL THEN
2200: x_complete_rec.sales_credit_default_type := l_sys_parameters_rec.sales_credit_default_type;
2199: IF p_sys_parameters_rec.sales_credit_default_type IS NULL THEN
2200: x_complete_rec.sales_credit_default_type := l_sys_parameters_rec.sales_credit_default_type;
2201: END IF;
2202:
2203: IF p_sys_parameters_rec.net_amt_for_mass_settle_flag = FND_API.G_MISS_CHAR THEN
2204: x_complete_rec.net_amt_for_mass_settle_flag := NULL;
2205: END IF;
2206: IF p_sys_parameters_rec.net_amt_for_mass_settle_flag IS NULL THEN
2207: x_complete_rec.net_amt_for_mass_settle_flag := l_sys_parameters_rec.net_amt_for_mass_settle_flag;
2206: IF p_sys_parameters_rec.net_amt_for_mass_settle_flag IS NULL THEN
2207: x_complete_rec.net_amt_for_mass_settle_flag := l_sys_parameters_rec.net_amt_for_mass_settle_flag;
2208: END IF;
2209:
2210: IF p_sys_parameters_rec.claim_tax_incl_flag = FND_API.G_MISS_CHAR THEN
2211: x_complete_rec.claim_tax_incl_flag := NULL;
2212: END IF;
2213: IF p_sys_parameters_rec.claim_tax_incl_flag IS NULL THEN
2214: x_complete_rec.claim_tax_incl_flag := l_sys_parameters_rec.claim_tax_incl_flag;
2213: IF p_sys_parameters_rec.claim_tax_incl_flag IS NULL THEN
2214: x_complete_rec.claim_tax_incl_flag := l_sys_parameters_rec.claim_tax_incl_flag;
2215: END IF;
2216: --For Rule Based Settlement
2217: IF p_sys_parameters_rec.rule_based = FND_API.G_MISS_CHAR THEN
2218: x_complete_rec.rule_based := NULL;
2219: END IF;
2220: IF p_sys_parameters_rec.rule_based IS NULL THEN
2221: x_complete_rec.rule_based := l_sys_parameters_rec.rule_based;
2219: END IF;
2220: IF p_sys_parameters_rec.rule_based IS NULL THEN
2221: x_complete_rec.rule_based := l_sys_parameters_rec.rule_based;
2222: END IF;
2223: IF p_sys_parameters_rec.approval_new_credit = FND_API.G_MISS_CHAR THEN
2224: x_complete_rec.approval_new_credit := NULL;
2225: END IF;
2226: IF p_sys_parameters_rec.approval_new_credit IS NULL THEN
2227: x_complete_rec.approval_new_credit := l_sys_parameters_rec.approval_new_credit;
2225: END IF;
2226: IF p_sys_parameters_rec.approval_new_credit IS NULL THEN
2227: x_complete_rec.approval_new_credit := l_sys_parameters_rec.approval_new_credit;
2228: END IF;
2229: IF p_sys_parameters_rec.approval_matched_credit = FND_API.G_MISS_CHAR THEN
2230: x_complete_rec.approval_matched_credit := NULL;
2231: END IF;
2232: IF p_sys_parameters_rec.approval_matched_credit IS NULL THEN
2233: x_complete_rec.approval_matched_credit := l_sys_parameters_rec.approval_matched_credit;
2231: END IF;
2232: IF p_sys_parameters_rec.approval_matched_credit IS NULL THEN
2233: x_complete_rec.approval_matched_credit := l_sys_parameters_rec.approval_matched_credit;
2234: END IF;
2235: IF p_sys_parameters_rec.cust_name_match_type = FND_API.G_MISS_CHAR THEN
2236: x_complete_rec.cust_name_match_type := NULL;
2237: END IF;
2238: IF p_sys_parameters_rec.cust_name_match_type IS NULL THEN
2239: x_complete_rec.cust_name_match_type := l_sys_parameters_rec.cust_name_match_type;
2237: END IF;
2238: IF p_sys_parameters_rec.cust_name_match_type IS NULL THEN
2239: x_complete_rec.cust_name_match_type := l_sys_parameters_rec.cust_name_match_type;
2240: END IF;
2241: IF p_sys_parameters_rec.credit_matching_thold_type = FND_API.G_MISS_CHAR THEN
2242: x_complete_rec.credit_matching_thold_type := NULL;
2243: END IF;
2244: IF p_sys_parameters_rec.credit_matching_thold_type IS NULL THEN
2245: x_complete_rec.credit_matching_thold_type := l_sys_parameters_rec.credit_matching_thold_type;
2244: IF p_sys_parameters_rec.credit_matching_thold_type IS NULL THEN
2245: x_complete_rec.credit_matching_thold_type := l_sys_parameters_rec.credit_matching_thold_type;
2246: END IF;
2247:
2248: IF p_sys_parameters_rec.credit_tolerance_operand = FND_API.G_MISS_NUM THEN
2249: x_complete_rec.credit_tolerance_operand := NULL;
2250: END IF;
2251: IF p_sys_parameters_rec.credit_tolerance_operand IS NULL THEN
2252: x_complete_rec.credit_tolerance_operand := l_sys_parameters_rec.credit_tolerance_operand;
2252: x_complete_rec.credit_tolerance_operand := l_sys_parameters_rec.credit_tolerance_operand;
2253: END IF;
2254:
2255: -- For Price Protection Parallel Approval
2256: IF p_sys_parameters_rec.automate_notification_days = FND_API.G_MISS_NUM THEN
2257: x_complete_rec.automate_notification_days := NULL;
2258: END IF;
2259: IF p_sys_parameters_rec.automate_notification_days IS NULL THEN
2260: x_complete_rec.automate_notification_days := l_sys_parameters_rec.automate_notification_days;
2260: x_complete_rec.automate_notification_days := l_sys_parameters_rec.automate_notification_days;
2261: END IF;
2262:
2263: -- For SSD Default Adjustment Types
2264: IF p_sys_parameters_rec.ssd_inc_adj_type_id = FND_API.G_MISS_NUM THEN
2265: x_complete_rec.ssd_inc_adj_type_id := NULL;
2266: END IF;
2267: IF p_sys_parameters_rec.ssd_inc_adj_type_id IS NULL THEN
2268: x_complete_rec.ssd_inc_adj_type_id := l_sys_parameters_rec.ssd_inc_adj_type_id;
2267: IF p_sys_parameters_rec.ssd_inc_adj_type_id IS NULL THEN
2268: x_complete_rec.ssd_inc_adj_type_id := l_sys_parameters_rec.ssd_inc_adj_type_id;
2269: END IF;
2270:
2271: IF p_sys_parameters_rec.ssd_dec_adj_type_id = FND_API.G_MISS_NUM THEN
2272: x_complete_rec.ssd_dec_adj_type_id := NULL;
2273: END IF;
2274: IF p_sys_parameters_rec.ssd_dec_adj_type_id IS NULL THEN
2275: x_complete_rec.ssd_dec_adj_type_id := l_sys_parameters_rec.ssd_dec_adj_type_id;
2274: IF p_sys_parameters_rec.ssd_dec_adj_type_id IS NULL THEN
2275: x_complete_rec.ssd_dec_adj_type_id := l_sys_parameters_rec.ssd_dec_adj_type_id;
2276: END IF;
2277:
2278: IF p_sys_parameters_rec.ssd_imd_claim_flag = FND_API.G_MISS_CHAR THEN
2279: x_complete_rec.ssd_imd_claim_flag := NULL;
2280: END IF;
2281: IF p_sys_parameters_rec.ssd_imd_claim_flag IS NULL THEN
2282: x_complete_rec.ssd_imd_claim_flag := l_sys_parameters_rec.ssd_imd_claim_flag;