7: PROCEDURE validate_id (p_llnv_rec IN llnv_rec_type,
8: x_return_status OUT NOCOPY VARCHAR2) IS
9:
10: BEGIN
11: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
12: --Check for Null
13: IF p_llnv_rec.id = Okl_Api.G_MISS_NUM OR
14: p_llnv_rec.id IS NULL
15: THEN
9:
10: BEGIN
11: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
12: --Check for Null
13: IF p_llnv_rec.id = Okl_Api.G_MISS_NUM OR
14: p_llnv_rec.id IS NULL
15: THEN
16:
17: x_return_status := Okl_Api.G_RET_STS_ERROR;
13: IF p_llnv_rec.id = Okl_Api.G_MISS_NUM OR
14: p_llnv_rec.id IS NULL
15: THEN
16:
17: x_return_status := Okl_Api.G_RET_STS_ERROR;
18: --set error message in message stack
19: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
20: p_msg_name => G_REQUIRED_VALUE,
21: p_token1 => G_COL_NAME_TOKEN,
15: THEN
16:
17: x_return_status := Okl_Api.G_RET_STS_ERROR;
18: --set error message in message stack
19: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
20: p_msg_name => G_REQUIRED_VALUE,
21: p_token1 => G_COL_NAME_TOKEN,
22: p_token1_value => 'id');
23: RAISE G_EXCEPTION_HALT_VALIDATION;
31:
32: PROCEDURE validate_org_id (p_llnv_rec IN llnv_rec_type,
33: x_return_status OUT NOCOPY VARCHAR2) IS
34: BEGIN
35: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
36:
37: x_return_status := Okl_Util.check_org_id(p_llnv_rec.org_id);
38:
39: END validate_org_id;
44: PROCEDURE validate_object_version_number (p_llnv_rec IN llnv_rec_type,
45: x_return_status OUT NOCOPY VARCHAR2) IS
46:
47: BEGIN
48: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
49: --Check for Null
50: IF p_llnv_rec.object_version_number = Okl_Api.G_MISS_NUM OR
51: p_llnv_rec.object_version_number IS NULL
52: THEN
46:
47: BEGIN
48: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
49: --Check for Null
50: IF p_llnv_rec.object_version_number = Okl_Api.G_MISS_NUM OR
51: p_llnv_rec.object_version_number IS NULL
52: THEN
53:
54: x_return_status := Okl_Api.G_RET_STS_ERROR;
50: IF p_llnv_rec.object_version_number = Okl_Api.G_MISS_NUM OR
51: p_llnv_rec.object_version_number IS NULL
52: THEN
53:
54: x_return_status := Okl_Api.G_RET_STS_ERROR;
55: --set error message in message stack
56: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
57: p_msg_name => G_REQUIRED_VALUE,
58: p_token1 => G_COL_NAME_TOKEN,
52: THEN
53:
54: x_return_status := Okl_Api.G_RET_STS_ERROR;
55: --set error message in message stack
56: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
57: p_msg_name => G_REQUIRED_VALUE,
58: p_token1 => G_COL_NAME_TOKEN,
59: p_token1_value => 'object_version_number');
60: RAISE G_EXCEPTION_HALT_VALIDATION;
68: PROCEDURE validate_sequence_number (p_llnv_rec IN llnv_rec_type,
69: x_return_status OUT NOCOPY VARCHAR2) IS
70:
71: BEGIN
72: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
73: --Check for Null
74: IF p_llnv_rec.sequence_number = Okl_Api.G_MISS_NUM OR
75: p_llnv_rec.sequence_number IS NULL
76: THEN
70:
71: BEGIN
72: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
73: --Check for Null
74: IF p_llnv_rec.sequence_number = Okl_Api.G_MISS_NUM OR
75: p_llnv_rec.sequence_number IS NULL
76: THEN
77:
78: x_return_status := Okl_Api.G_RET_STS_ERROR;
74: IF p_llnv_rec.sequence_number = Okl_Api.G_MISS_NUM OR
75: p_llnv_rec.sequence_number IS NULL
76: THEN
77:
78: x_return_status := Okl_Api.G_RET_STS_ERROR;
79: --set error message in message stack
80: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
81: p_msg_name => G_REQUIRED_VALUE,
82: p_token1 => G_COL_NAME_TOKEN,
76: THEN
77:
78: x_return_status := Okl_Api.G_RET_STS_ERROR;
79: --set error message in message stack
80: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
81: p_msg_name => G_REQUIRED_VALUE,
82: p_token1 => G_COL_NAME_TOKEN,
83: p_token1_value => 'sequence_number');
84: RAISE G_EXCEPTION_HALT_VALIDATION;
92: PROCEDURE validate_line_type (p_llnv_rec IN llnv_rec_type,
93: x_return_status OUT NOCOPY VARCHAR2) IS
94:
95: BEGIN
96: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
97: --Check for Null
98: IF p_llnv_rec.line_type = Okl_Api.G_MISS_CHAR OR
99: p_llnv_rec.line_type IS NULL
100: THEN
94:
95: BEGIN
96: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
97: --Check for Null
98: IF p_llnv_rec.line_type = Okl_Api.G_MISS_CHAR OR
99: p_llnv_rec.line_type IS NULL
100: THEN
101:
102: x_return_status := Okl_Api.G_RET_STS_ERROR;
98: IF p_llnv_rec.line_type = Okl_Api.G_MISS_CHAR OR
99: p_llnv_rec.line_type IS NULL
100: THEN
101:
102: x_return_status := Okl_Api.G_RET_STS_ERROR;
103: --set error message in message stack
104: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
105: p_msg_name => G_REQUIRED_VALUE,
106: p_token1 => G_COL_NAME_TOKEN,
100: THEN
101:
102: x_return_status := Okl_Api.G_RET_STS_ERROR;
103: --set error message in message stack
104: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
105: p_msg_name => G_REQUIRED_VALUE,
106: p_token1 => G_COL_NAME_TOKEN,
107: p_token1_value => 'line_type');
108: RAISE G_EXCEPTION_HALT_VALIDATION;
124: WHERE id = p_llnv_rec.lln_id_parent;
125:
126:
127: BEGIN
128: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
129:
130: IF (p_llnv_rec.lln_id_parent IS NOT NULL) THEN
131: OPEN l_lln_id_parent_csr;
132: FETCH l_lln_id_parent_csr INTO l_dummy_var;
132: FETCH l_lln_id_parent_csr INTO l_dummy_var;
133: CLOSE l_lln_id_parent_csr;
134:
135: IF (l_dummy_var <> '1') THEN
136: x_return_status := Okl_Api.G_RET_STS_ERROR;
137: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
138: p_msg_name => G_NO_PARENT_RECORD,
139: p_token1 => G_COL_NAME_TOKEN,
140: p_token1_value => 'LLN_ID_PARENT_FOR',
133: CLOSE l_lln_id_parent_csr;
134:
135: IF (l_dummy_var <> '1') THEN
136: x_return_status := Okl_Api.G_RET_STS_ERROR;
137: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
138: p_msg_name => G_NO_PARENT_RECORD,
139: p_token1 => G_COL_NAME_TOKEN,
140: p_token1_value => 'LLN_ID_PARENT_FOR',
141: p_token2 => G_CHILD_TABLE_TOKEN,
162: WHERE id = p_llnv_rec.kle_id;
163:
164:
165: BEGIN
166: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
167:
168: IF (p_llnv_rec.kle_id IS NOT NULL) THEN
169: OPEN l_kle_id_csr;
170: FETCH l_kle_id_csr INTO l_dummy_var;
170: FETCH l_kle_id_csr INTO l_dummy_var;
171: CLOSE l_kle_id_csr;
172:
173: IF (l_dummy_var <> '1') THEN
174: x_return_status := Okl_Api.G_RET_STS_ERROR;
175: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
176: p_msg_name => G_NO_PARENT_RECORD,
177: p_token1 => G_COL_NAME_TOKEN,
178: p_token1_value => 'KLE_ID_FOR',
171: CLOSE l_kle_id_csr;
172:
173: IF (l_dummy_var <> '1') THEN
174: x_return_status := Okl_Api.G_RET_STS_ERROR;
175: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
176: p_msg_name => G_NO_PARENT_RECORD,
177: p_token1 => G_COL_NAME_TOKEN,
178: p_token1_value => 'KLE_ID_FOR',
179: p_token2 => G_CHILD_TABLE_TOKEN,
200: WHERE id = p_llnv_rec.khr_id;
201:
202:
203: BEGIN
204: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
205:
206: IF (p_llnv_rec.khr_id IS NOT NULL) THEN
207: OPEN l_khr_id_csr;
208: FETCH l_khr_id_csr INTO l_dummy_var;
208: FETCH l_khr_id_csr INTO l_dummy_var;
209: CLOSE l_khr_id_csr;
210:
211: IF (l_dummy_var <> '1') THEN
212: x_return_status := Okl_Api.G_RET_STS_ERROR;
213: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
214: p_msg_name => G_NO_PARENT_RECORD,
215: p_token1 => G_COL_NAME_TOKEN,
216: p_token1_value => 'KHR_ID_FOR',
209: CLOSE l_khr_id_csr;
210:
211: IF (l_dummy_var <> '1') THEN
212: x_return_status := Okl_Api.G_RET_STS_ERROR;
213: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
214: p_msg_name => G_NO_PARENT_RECORD,
215: p_token1 => G_COL_NAME_TOKEN,
216: p_token1_value => 'KHR_ID_FOR',
217: p_token2 => G_CHILD_TABLE_TOKEN,
238: WHERE id = p_llnv_rec.cnr_id;
239:
240:
241: BEGIN
242: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
243:
244: IF (p_llnv_rec.cnr_id IS NOT NULL) THEN
245: OPEN l_cnr_id_csr;
246: FETCH l_cnr_id_csr INTO l_dummy_var;
246: FETCH l_cnr_id_csr INTO l_dummy_var;
247: CLOSE l_cnr_id_csr;
248:
249: IF (l_dummy_var <> '1') THEN
250: x_return_status := Okl_Api.G_RET_STS_ERROR;
251: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
252: p_msg_name => G_NO_PARENT_RECORD,
253: p_token1 => G_COL_NAME_TOKEN,
254: p_token1_value => 'CNR_ID_FOR',
247: CLOSE l_cnr_id_csr;
248:
249: IF (l_dummy_var <> '1') THEN
250: x_return_status := Okl_Api.G_RET_STS_ERROR;
251: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
252: p_msg_name => G_NO_PARENT_RECORD,
253: p_token1 => G_COL_NAME_TOKEN,
254: p_token1_value => 'CNR_ID_FOR',
255: p_token2 => G_CHILD_TABLE_TOKEN,
276: WHERE id = p_llnv_rec.ilt_id;
277:
278:
279: BEGIN
280: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
281:
282: IF (p_llnv_rec.ilt_id IS NOT NULL) THEN
283: OPEN l_ilt_id_csr;
284: FETCH l_ilt_id_csr INTO l_dummy_var;
284: FETCH l_ilt_id_csr INTO l_dummy_var;
285: CLOSE l_ilt_id_csr;
286:
287: IF (l_dummy_var <> '1') THEN
288: x_return_status := Okl_Api.G_RET_STS_ERROR;
289: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
290: p_msg_name => G_NO_PARENT_RECORD,
291: p_token1 => G_COL_NAME_TOKEN,
292: p_token1_value => 'ILT_ID_FOR',
285: CLOSE l_ilt_id_csr;
286:
287: IF (l_dummy_var <> '1') THEN
288: x_return_status := Okl_Api.G_RET_STS_ERROR;
289: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
290: p_msg_name => G_NO_PARENT_RECORD,
291: p_token1 => G_COL_NAME_TOKEN,
292: p_token1_value => 'ILT_ID_FOR',
293: p_token2 => G_CHILD_TABLE_TOKEN,
315: WHERE currency_code = p_llnv_rec.currency_code;
316:
317:
318: BEGIN
319: x_return_status := Okl_Api.G_RET_STS_SUCCESS;
320:
321: IF (p_llnv_rec.currency_code IS NOT NULL) THEN
322: OPEN l_currency_code_csr;
323: FETCH l_currency_code_csr INTO l_dummy_var;
323: FETCH l_currency_code_csr INTO l_dummy_var;
324: CLOSE l_currency_code_csr;
325:
326: IF (l_dummy_var <> '1') THEN
327: x_return_status := Okl_Api.G_RET_STS_ERROR;
328: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
329: p_msg_name => G_NO_PARENT_RECORD,
330: p_token1 => G_COL_NAME_TOKEN,
331: p_token1_value => 'CURRENCY_CODE_FOR',
324: CLOSE l_currency_code_csr;
325:
326: IF (l_dummy_var <> '1') THEN
327: x_return_status := Okl_Api.G_RET_STS_ERROR;
328: Okl_Api.SET_MESSAGE(p_app_name => G_APP_NAME,
329: p_msg_name => G_NO_PARENT_RECORD,
330: p_token1 => G_COL_NAME_TOKEN,
331: p_token1_value => 'CURRENCY_CODE_FOR',
332: p_token2 => G_CHILD_TABLE_TOKEN,
834: p_llnv_rec IN llnv_rec_type
835: ) RETURN VARCHAR2 IS
836: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
837: -- Added 04/19/2001 -- Sunil Mathew
838: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
839: BEGIN
840: -- Added 04/19/2001 Sunil Mathew
841: validate_lln_id_parent(p_llnv_rec, x_return_status);
842: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
838: x_return_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
839: BEGIN
840: -- Added 04/19/2001 Sunil Mathew
841: validate_lln_id_parent(p_llnv_rec, x_return_status);
842: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
843: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
844: l_return_status := x_return_status;
845: RAISE G_EXCEPTION_HALT_VALIDATION;
846: ELSE
839: BEGIN
840: -- Added 04/19/2001 Sunil Mathew
841: validate_lln_id_parent(p_llnv_rec, x_return_status);
842: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
843: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
844: l_return_status := x_return_status;
845: RAISE G_EXCEPTION_HALT_VALIDATION;
846: ELSE
847: l_return_status := x_return_status; -- record that there was an error
848: END IF;
849: END IF;
850:
851: validate_kle_id(p_llnv_rec, x_return_status);
852: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
853: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
854: l_return_status := x_return_status;
855: RAISE G_EXCEPTION_HALT_VALIDATION;
856: ELSE
849: END IF;
850:
851: validate_kle_id(p_llnv_rec, x_return_status);
852: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
853: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
854: l_return_status := x_return_status;
855: RAISE G_EXCEPTION_HALT_VALIDATION;
856: ELSE
857: l_return_status := x_return_status; -- record that there was an error
858: END IF;
859: END IF;
860:
861: validate_khr_id(p_llnv_rec, x_return_status);
862: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
863: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
864: l_return_status := x_return_status;
865: RAISE G_EXCEPTION_HALT_VALIDATION;
866: ELSE
859: END IF;
860:
861: validate_khr_id(p_llnv_rec, x_return_status);
862: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
863: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
864: l_return_status := x_return_status;
865: RAISE G_EXCEPTION_HALT_VALIDATION;
866: ELSE
867: l_return_status := x_return_status; -- record that there was an error
868: END IF;
869: END IF;
870:
871: validate_cnr_id(p_llnv_rec, x_return_status);
872: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
873: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
874: l_return_status := x_return_status;
875: RAISE G_EXCEPTION_HALT_VALIDATION;
876: ELSE
869: END IF;
870:
871: validate_cnr_id(p_llnv_rec, x_return_status);
872: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
873: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
874: l_return_status := x_return_status;
875: RAISE G_EXCEPTION_HALT_VALIDATION;
876: ELSE
877: l_return_status := x_return_status; -- record that there was an error
878: END IF;
879: END IF;
880:
881: validate_ilt_id(p_llnv_rec, x_return_status);
882: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
883: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
884: l_return_status := x_return_status;
885: RAISE G_EXCEPTION_HALT_VALIDATION;
886: ELSE
879: END IF;
880:
881: validate_ilt_id(p_llnv_rec, x_return_status);
882: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
883: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
884: l_return_status := x_return_status;
885: RAISE G_EXCEPTION_HALT_VALIDATION;
886: ELSE
887: l_return_status := x_return_status; -- record that there was an error
888: END IF;
889: END IF;
890:
891: validate_id(p_llnv_rec, x_return_status);
892: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
893: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
894: l_return_status := x_return_status;
895: RAISE G_EXCEPTION_HALT_VALIDATION;
896: ELSE
889: END IF;
890:
891: validate_id(p_llnv_rec, x_return_status);
892: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
893: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
894: l_return_status := x_return_status;
895: RAISE G_EXCEPTION_HALT_VALIDATION;
896: ELSE
897: l_return_status := x_return_status; -- record that there was an error
899: END IF;
900:
901:
902: validate_object_version_number(p_llnv_rec, x_return_status);
903: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
904: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
905: l_return_status := x_return_status;
906: RAISE G_EXCEPTION_HALT_VALIDATION;
907: ELSE
900:
901:
902: validate_object_version_number(p_llnv_rec, x_return_status);
903: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
904: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
905: l_return_status := x_return_status;
906: RAISE G_EXCEPTION_HALT_VALIDATION;
907: ELSE
908: l_return_status := x_return_status; -- record that there was an error
909: END IF;
910: END IF;
911:
912: validate_sequence_number(p_llnv_rec, x_return_status);
913: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
914: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
915: l_return_status := x_return_status;
916: RAISE G_EXCEPTION_HALT_VALIDATION;
917: ELSE
910: END IF;
911:
912: validate_sequence_number(p_llnv_rec, x_return_status);
913: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
914: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
915: l_return_status := x_return_status;
916: RAISE G_EXCEPTION_HALT_VALIDATION;
917: ELSE
918: l_return_status := x_return_status; -- record that there was an error
919: END IF;
920: END IF;
921:
922: validate_line_type(p_llnv_rec, x_return_status);
923: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
924: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
925: l_return_status := x_return_status;
926: RAISE G_EXCEPTION_HALT_VALIDATION;
927: ELSE
920: END IF;
921:
922: validate_line_type(p_llnv_rec, x_return_status);
923: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
924: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
925: l_return_status := x_return_status;
926: RAISE G_EXCEPTION_HALT_VALIDATION;
927: ELSE
928: l_return_status := x_return_status; -- record that there was an error
929: END IF;
930: END IF;
931:
932: validate_org_id(p_llnv_rec, x_return_status);
933: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
934: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
935: l_return_status := x_return_status;
936: RAISE G_EXCEPTION_HALT_VALIDATION;
937: ELSE
930: END IF;
931:
932: validate_org_id(p_llnv_rec, x_return_status);
933: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
934: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
935: l_return_status := x_return_status;
936: RAISE G_EXCEPTION_HALT_VALIDATION;
937: ELSE
938: l_return_status := x_return_status; -- record that there was an error
939: END IF;
940: END IF;
941:
942: -- validate_currency_code(p_llnv_rec, x_return_status);
943: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
944: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
945: l_return_status := x_return_status;
946: RAISE G_EXCEPTION_HALT_VALIDATION;
947: ELSE
940: END IF;
941:
942: -- validate_currency_code(p_llnv_rec, x_return_status);
943: IF (x_return_status <> Okl_Api.G_RET_STS_SUCCESS) THEN
944: IF (x_return_status = Okl_Api.G_RET_STS_UNEXP_ERROR) THEN -- need to leave
945: l_return_status := x_return_status;
946: RAISE G_EXCEPTION_HALT_VALIDATION;
947: ELSE
948: l_return_status := x_return_status; -- record that there was an error
1201: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1202:
1203: -- Begin Post-Generation Change
1204: -- overall error status
1205: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1206: -- End Post-Generation Change
1207:
1208: i NUMBER := 0;
1209: BEGIN
1221: p_llnv_rec => p_llnv_tbl(i));
1222:
1223: -- Begin Post-Generation Change
1224: -- store the highest degree of error
1225: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
1226: IF l_overall_status <> Okl_Api.G_RET_STS_UNEXP_ERROR THEN
1227: l_overall_status := x_return_status;
1228: END IF;
1229: END IF;
1222:
1223: -- Begin Post-Generation Change
1224: -- store the highest degree of error
1225: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
1226: IF l_overall_status <> Okl_Api.G_RET_STS_UNEXP_ERROR THEN
1227: l_overall_status := x_return_status;
1228: END IF;
1229: END IF;
1230: -- End Post-Generation Change
1592: x_llnv_rec := p_llnv_rec;
1593: x_llnv_rec.OBJECT_VERSION_NUMBER := 1;
1594: x_llnv_rec.SFWT_FLAG := 'N';
1595:
1596: IF (x_llnv_rec.request_id IS NULL OR x_llnv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
1597: SELECT
1598: DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1599: DECODE(Fnd_Global.PROG_APPL_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
1600: DECODE(Fnd_Global.CONC_PROGRAM_ID,-1,NULL,Fnd_Global.CONC_PROGRAM_ID),
1738: l_api_name CONSTANT VARCHAR2(30) := 'V_tbl_insert_row';
1739: l_return_status VARCHAR2(1) := Okc_Api.G_RET_STS_SUCCESS;
1740: -- Begin Post-Generation Change
1741: -- overall error status
1742: l_overall_status VARCHAR2(1) := Okl_Api.G_RET_STS_SUCCESS;
1743: -- End Post-Generation Change
1744:
1745: i NUMBER := 0;
1746: BEGIN
1759: x_llnv_rec => x_llnv_tbl(i));
1760: EXIT WHEN (i = p_llnv_tbl.LAST);
1761: -- Begin Post-Generation Change
1762: -- store the highest degree of error
1763: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
1764: IF l_overall_status <> Okl_Api.G_RET_STS_UNEXP_ERROR THEN
1765: l_overall_status := x_return_status;
1766: END IF;
1767: END IF;
1760: EXIT WHEN (i = p_llnv_tbl.LAST);
1761: -- Begin Post-Generation Change
1762: -- store the highest degree of error
1763: IF x_return_status <> Okl_Api.G_RET_STS_SUCCESS THEN
1764: IF l_overall_status <> Okl_Api.G_RET_STS_UNEXP_ERROR THEN
1765: l_overall_status := x_return_status;
1766: END IF;
1767: END IF;
1768: -- End Post-Generation Change
2834: BEGIN
2835: x_llnv_rec := p_llnv_rec;
2836: x_llnv_rec.OBJECT_VERSION_NUMBER := NVL(x_llnv_rec.OBJECT_VERSION_NUMBER, 0) + 1;
2837:
2838: IF (x_llnv_rec.request_id IS NULL OR x_llnv_rec.request_id = Okl_Api.G_MISS_NUM) THEN
2839: -- Begin Post-Generation Change
2840: SELECT
2841: NVL(DECODE(Fnd_Global.CONC_REQUEST_ID,-1,NULL,Fnd_Global.CONC_REQUEST_ID),
2842: x_llnv_rec.request_id),