DBA Data[Home] [Help]

APPS.RLM_AD_SV dependencies on RLM_CORE_SV

Line 26: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,

22: CURSOR c_Hdr IS
23: SELECT *
24: FROM rlm_interface_headers_all
25: WHERE header_id = x_InterfaceHeaderId
26: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
27: rlm_core_sv.k_PS_PARTIAL_PROCESSED);
28: --
29: BEGIN
30: --

Line 27: rlm_core_sv.k_PS_PARTIAL_PROCESSED);

23: SELECT *
24: FROM rlm_interface_headers_all
25: WHERE header_id = x_InterfaceHeaderId
26: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
27: rlm_core_sv.k_PS_PARTIAL_PROCESSED);
28: --
29: BEGIN
30: --
31: IF (l_debug <> -1) THEN

Line 32: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Headers');

28: --
29: BEGIN
30: --
31: IF (l_debug <> -1) THEN
32: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Headers');
33: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
34: END IF;
35: --
36: SELECT rlm_schedule_headers_s.nextval

Line 33: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);

29: BEGIN
30: --
31: IF (l_debug <> -1) THEN
32: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Headers');
33: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
34: END IF;
35: --
36: SELECT rlm_schedule_headers_s.nextval
37: INTO v_RlmScheduleId

Line 43: rlm_core_sv.dlog(C_SDEBUG, 'v_RlmScheduleId ',v_RlmScheduleId);

39: --
40: x_progress :='020';
41: --
42: IF (l_debug <> -1) THEN
43: rlm_core_sv.dlog(C_SDEBUG, 'v_RlmScheduleId ',v_RlmScheduleId);
44: END IF;
45: --
46: x_RlmScheduleId := v_RlmScheduleId;
47: --

Line 51: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,

47: --
48: UPDATE rlm_interface_headers_all
49: SET schedule_header_id = v_RlmScheduleId
50: WHERE header_id = x_InterfaceHeaderId
51: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
52: rlm_core_sv.k_PS_PARTIAL_PROCESSED);
53: --
54: x_progress :='030';
55: --

Line 52: rlm_core_sv.k_PS_PARTIAL_PROCESSED);

48: UPDATE rlm_interface_headers_all
49: SET schedule_header_id = v_RlmScheduleId
50: WHERE header_id = x_InterfaceHeaderId
51: AND process_status IN (rlm_core_sv.k_PS_AVAILABLE,
52: rlm_core_sv.k_PS_PARTIAL_PROCESSED);
53: --
54: x_progress :='030';
55: --
56: IF (l_debug <> -1) THEN

Line 57: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated ',SQL%ROWCOUNT);

53: --
54: x_progress :='030';
55: --
56: IF (l_debug <> -1) THEN
57: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated ',SQL%ROWCOUNT);
58: END IF;
59: --
60: OPEN c_Hdr;
61: FETCH c_Hdr INTO v_HdrRec;

Line 65: rlm_core_sv.dlog(C_DEBUG, 'Org ID at header level', v_HdrRec.org_id);

61: FETCH c_Hdr INTO v_HdrRec;
62: CLOSE c_Hdr;
63: --
64: IF (l_debug <> -1) THEN
65: rlm_core_sv.dlog(C_DEBUG, 'Org ID at header level', v_HdrRec.org_id);
66: END IF;
67: --
68: -- Check if ORG_ID is null. Ideally, such a condition should not arise.
69: -- This is added only as a fail-safe mechanism.

Line 251: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Inserted ',SQL%ROWCOUNT);

247: --
248: x_progress :='040';
249: --
250: IF (l_debug <> -1) THEN
251: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Inserted ',SQL%ROWCOUNT);
252: rlm_core_sv.dpop(C_SDEBUG);
253: END IF;
254: --
255: return TRUE;

Line 252: rlm_core_sv.dpop(C_SDEBUG);

248: x_progress :='040';
249: --
250: IF (l_debug <> -1) THEN
251: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Inserted ',SQL%ROWCOUNT);
252: rlm_core_sv.dpop(C_SDEBUG);
253: END IF;
254: --
255: return TRUE;
256: --

Line 262: rlm_core_sv.dlog(C_DEBUG, 'Null Org ID found at header level');

258: --
259: WHEN e_NullOrgIDHdr THEN
260: --
261: IF (l_debug <> -1) THEN
262: rlm_core_sv.dlog(C_DEBUG, 'Null Org ID found at header level');
263: END IF;
264: --
265: rlm_message_sv.app_error(
266: x_ExceptionLevel => rlm_message_sv.k_error_level,

Line 272: rlm_core_sv.dpop(C_SDEBUG);

268: x_InterfaceHeaderId => x_InterfaceHeaderId,
269: x_ScheduleHeaderId => x_RLMScheduleID);
270: --
271: IF (l_debug <> -1) THEN
272: rlm_core_sv.dpop(C_SDEBUG);
273: END IF;
274: --
275: RETURN FALSE;
276: --

Line 282: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);

278: rlm_message_sv.sql_error ('rlm_archive_demand_sv.Archive_Headers',
279: x_progress);
280: IF (l_debug <> -1) THEN
281: --
282: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);
283: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
284: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
285: --
286: END IF;

Line 283: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);

279: x_progress);
280: IF (l_debug <> -1) THEN
281: --
282: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);
283: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
284: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
285: --
286: END IF;
287: --

Line 284: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');

280: IF (l_debug <> -1) THEN
281: --
282: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);
283: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
284: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
285: --
286: END IF;
287: --
288: raise;

Line 314: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;

310: blanket_number,
311: org_id
312: FROM rlm_interface_lines_all
313: WHERE header_id = x_InterfaceHeaderId
314: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;
315: --
316: v_count NUMBER := 0;
317: --
318: x_progress number;

Line 325: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Lines');

321: BEGIN
322: --
323: IF (l_debug <> -1) THEN
324: --
325: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Lines');
326: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
327: rlm_core_sv.dlog(C_SDEBUG, 'x_RlmScheduleId ',x_RlmScheduleId);
328: --
329: END IF;

Line 326: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);

322: --
323: IF (l_debug <> -1) THEN
324: --
325: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Lines');
326: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
327: rlm_core_sv.dlog(C_SDEBUG, 'x_RlmScheduleId ',x_RlmScheduleId);
328: --
329: END IF;
330: --

Line 327: rlm_core_sv.dlog(C_SDEBUG, 'x_RlmScheduleId ',x_RlmScheduleId);

323: IF (l_debug <> -1) THEN
324: --
325: rlm_core_sv.dpush(C_SDEBUG, 'Archive_Lines');
326: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
327: rlm_core_sv.dlog(C_SDEBUG, 'x_RlmScheduleId ',x_RlmScheduleId);
328: --
329: END IF;
330: --
331: FOR c_rec IN c_cur LOOP

Line 345: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;

341: SET schedule_line_id = rlm_schedule_lines_s.nextval
342: WHERE header_id = c_rec.interface_header_id
343: AND line_id = c_rec.interface_line_id
344: AND schedule_line_id IS NULL
345: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;
346: --
347: IF (l_debug <> -1) THEN
348: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated ',SQL%ROWCOUNT);
349: END IF;

Line 348: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated ',SQL%ROWCOUNT);

344: AND schedule_line_id IS NULL
345: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;
346: --
347: IF (l_debug <> -1) THEN
348: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated ',SQL%ROWCOUNT);
349: END IF;
350: --
351: v_count := v_count + 1;
352: --

Line 847: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;

843: SHIP_TO_CUSTOMER_ID
844: FROM rlm_interface_lines_all
845: WHERE header_id = x_InterfaceHeaderId
846: AND line_id = c_rec.interface_line_id
847: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;
848: --
849: IF (l_debug <> -1) THEN
850: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Inserted ',SQL%ROWCOUNT);
851: END IF;

Line 850: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Inserted ',SQL%ROWCOUNT);

846: AND line_id = c_rec.interface_line_id
847: AND process_status = rlm_core_sv.k_PS_AVAILABLE ;
848: --
849: IF (l_debug <> -1) THEN
850: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Inserted ',SQL%ROWCOUNT);
851: END IF;
852: --
853: ELSE
854: --

Line 866: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated to new request id ', SQL%ROWCOUNT);

862: WHERE header_id = x_RLMScheduleID
863: AND line_id = c_rec.schedule_line_id;
864: --
865: IF (l_debug <> -1) THEN
866: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated to new request id ', SQL%ROWCOUNT);
867: END IF;
868: --
869: END IF;
870:

Line 878: SET process_status = rlm_core_sv.k_PS_PROCESSED

874: --
875: IF c_rec.item_detail_type IN ('3','5') THEN
876: --
877: UPDATE rlm_interface_lines_all
878: SET process_status = rlm_core_sv.k_PS_PROCESSED
879: WHERE header_id = x_InterfaceHeaderId
880: AND line_id = c_rec.interface_line_id
881: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
882: --

Line 881: AND process_status = rlm_core_sv.k_PS_AVAILABLE;

877: UPDATE rlm_interface_lines_all
878: SET process_status = rlm_core_sv.k_PS_PROCESSED
879: WHERE header_id = x_InterfaceHeaderId
880: AND line_id = c_rec.interface_line_id
881: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
882: --
883: IF (l_debug <> -1) THEN
884: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface for cum auth '
885: ,SQL%ROWCOUNT);

Line 884: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface for cum auth '

880: AND line_id = c_rec.interface_line_id
881: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
882: --
883: IF (l_debug <> -1) THEN
884: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface for cum auth '
885: ,SQL%ROWCOUNT);
886: END IF;
887:
888: --

Line 890: SET process_status = rlm_core_sv.k_PS_PROCESSED

886: END IF;
887:
888: --
889: UPDATE rlm_schedule_lines
890: SET process_status = rlm_core_sv.k_PS_PROCESSED
891: WHERE header_id = x_RLMScheduleID
892: AND interface_line_id = c_rec.interface_line_id
893: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
894: --

Line 893: AND process_status = rlm_core_sv.k_PS_AVAILABLE;

889: UPDATE rlm_schedule_lines
890: SET process_status = rlm_core_sv.k_PS_PROCESSED
891: WHERE header_id = x_RLMScheduleID
892: AND interface_line_id = c_rec.interface_line_id
893: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
894: --
895: IF (l_debug <> -1) THEN
896: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule for auth
897: cum and test',SQL%ROWCOUNT);

Line 896: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule for auth

892: AND interface_line_id = c_rec.interface_line_id
893: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
894: --
895: IF (l_debug <> -1) THEN
896: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule for auth
897: cum and test',SQL%ROWCOUNT);
898: END IF;
899: --
900: END IF;

Line 907: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Scanned ',v_count);

903: --
904: END LOOP;
905: --
906: IF (l_debug <> -1) THEN
907: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Scanned ',v_count);
908: END IF;
909: --
910: x_progress :='040';
911: --

Line 913: rlm_core_sv.dpop(C_SDEBUG);

909: --
910: x_progress :='040';
911: --
912: IF (l_debug <> -1) THEN
913: rlm_core_sv.dpop(C_SDEBUG);
914: END IF;
915: --
916: return TRUE;
917: --

Line 923: rlm_core_sv.dlog(C_DEBUG, 'Null Org ID found');

919: --
920: WHEN e_NullOrgID THEN
921: --
922: IF (l_debug <> -1) THEN
923: rlm_core_sv.dlog(C_DEBUG, 'Null Org ID found');
924: END IF;
925: --
926: rlm_message_sv.app_error(
927: x_ExceptionLevel => rlm_message_sv.k_error_level,

Line 933: rlm_core_sv.dpop(C_SDEBUG);

929: x_InterfaceHeaderId => x_InterfaceHeaderId,
930: x_ScheduleHeaderId => x_RLMScheduleID);
931: --
932: IF (l_debug <> -1) THEN
933: rlm_core_sv.dpop(C_SDEBUG);
934: END IF;
935: --
936: RETURN FALSE;
937: --

Line 941: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);

937: --
938: WHEN OTHERS THEN
939: rlm_message_sv.sql_error ('rlm_archive_demand_sv.Archive_Lines', x_progress);
940: IF (l_debug <> -1) THEN
941: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
942: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
943: END IF;
944: raise;
945: return FALSE;

Line 942: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');

938: WHEN OTHERS THEN
939: rlm_message_sv.sql_error ('rlm_archive_demand_sv.Archive_Lines', x_progress);
940: IF (l_debug <> -1) THEN
941: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
942: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
943: END IF;
944: raise;
945: return FALSE;
946: END;

Line 968: rlm_core_sv.dpush(C_SDEBUG, 'Archive_demand');

964:
965: BEGIN
966: --
967: IF (l_debug <> -1) THEN
968: rlm_core_sv.dpush(C_SDEBUG, 'Archive_demand');
969: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
970: END IF;
971: --
972: FOR c_rec IN c_cur LOOP

Line 969: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);

965: BEGIN
966: --
967: IF (l_debug <> -1) THEN
968: rlm_core_sv.dpush(C_SDEBUG, 'Archive_demand');
969: rlm_core_sv.dlog(C_SDEBUG, 'x_InterfaceHeaderId ',x_InterfaceHeaderId);
970: END IF;
971: --
972: FOR c_rec IN c_cur LOOP
973: --

Line 979: rlm_core_sv.dlog(C_DEBUG, 'Schedule Header Already Archived',

975: --
976: v_RlmScheduleID := c_rec.schedule_header_id;
977: --
978: IF (l_debug <> -1) THEN
979: rlm_core_sv.dlog(C_DEBUG, 'Schedule Header Already Archived',
980: c_rec.schedule_header_id);
981: rlm_core_sv.dlog(C_DEBUG, 'request_id ',rlm_message_sv.g_conc_req_id );
982: END IF;
983: --

Line 981: rlm_core_sv.dlog(C_DEBUG, 'request_id ',rlm_message_sv.g_conc_req_id );

977: --
978: IF (l_debug <> -1) THEN
979: rlm_core_sv.dlog(C_DEBUG, 'Schedule Header Already Archived',
980: c_rec.schedule_header_id);
981: rlm_core_sv.dlog(C_DEBUG, 'request_id ',rlm_message_sv.g_conc_req_id );
982: END IF;
983: --
984: Update rlm_schedule_headers_all
985: SET request_id = rlm_message_sv.g_conc_req_id ,

Line 991: rlm_core_sv.dlog(C_DEBUG, 'Schedule headers updated', SQL%ROWCOUNT);

987: last_updated_by = fnd_global.user_id
988: WHERE header_id = c_rec.schedule_header_id;
989: --
990: IF (l_debug <> -1) THEN
991: rlm_core_sv.dlog(C_DEBUG, 'Schedule headers updated', SQL%ROWCOUNT);
992: END IF;
993: --
994: -- The lines are updated in Archive Lines no need to do this again
995: --

Line 1004: rlm_core_sv.dlog(C_DEBUG, 'Schedule lines updated', SQL%ROWCOUNT);

1000: last_updated_by = fnd_global.user_id
1001: WHERE header_id = c_rec.schedule_header_id;
1002: --
1003: IF (l_debug <> -1) THEN
1004: rlm_core_sv.dlog(C_DEBUG, 'Schedule lines updated', SQL%ROWCOUNT);
1005: END IF;
1006: --
1007: */
1008: ELSE

Line 1013: rlm_core_sv.dpop(C_SDEBUG);

1009: --
1010: IF NOT(Archive_Headers(x_InterfaceHeaderId,v_RlmScheduleID)) then
1011: --
1012: IF (l_debug <> -1) THEN
1013: rlm_core_sv.dpop(C_SDEBUG);
1014: END IF;
1015: --
1016: return FALSE;
1017: --

Line 1021: rlm_core_sv.dlog(C_SDEBUG, 'Archived Header with ', v_RlmScheduleId);

1017: --
1018: END IF;
1019: --
1020: IF (l_debug <> -1) THEN
1021: rlm_core_sv.dlog(C_SDEBUG, 'Archived Header with ', v_RlmScheduleId);
1022: END IF;
1023: --
1024: END IF;
1025: --

Line 1027: rlm_core_sv.dlog(C_SDEBUG, 'Archiving Schedule Lines');

1023: --
1024: END IF;
1025: --
1026: IF (l_debug <> -1) THEN
1027: rlm_core_sv.dlog(C_SDEBUG, 'Archiving Schedule Lines');
1028: END IF;
1029: --
1030: IF NOT(Archive_lines(x_InterfaceHeaderId,v_RlmScheduleId)) then
1031: --

Line 1033: rlm_core_sv.dpop(C_SDEBUG);

1029: --
1030: IF NOT(Archive_lines(x_InterfaceHeaderId,v_RlmScheduleId)) then
1031: --
1032: IF (l_debug <> -1) THEN
1033: rlm_core_sv.dpop(C_SDEBUG);
1034: END IF;
1035: --
1036: return FALSE;
1037: --

Line 1043: SET process_status = rlm_core_sv.k_PS_PROCESSED

1039: --
1040: IF c_rec.edi_test_indicator = 'T' THEN
1041: --
1042: UPDATE rlm_interface_lines
1043: SET process_status = rlm_core_sv.k_PS_PROCESSED
1044: WHERE header_id = x_InterfaceHeaderId
1045: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1046: --
1047: IF (l_debug <> -1) THEN

Line 1045: AND process_status = rlm_core_sv.k_PS_AVAILABLE;

1041: --
1042: UPDATE rlm_interface_lines
1043: SET process_status = rlm_core_sv.k_PS_PROCESSED
1044: WHERE header_id = x_InterfaceHeaderId
1045: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1046: --
1047: IF (l_debug <> -1) THEN
1048: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface lines for test',SQL%ROWCOUNT);
1049: END IF;

Line 1048: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface lines for test',SQL%ROWCOUNT);

1044: WHERE header_id = x_InterfaceHeaderId
1045: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1046: --
1047: IF (l_debug <> -1) THEN
1048: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface lines for test',SQL%ROWCOUNT);
1049: END IF;
1050: --
1051: UPDATE rlm_schedule_lines
1052: SET process_status = rlm_core_sv.k_PS_PROCESSED

Line 1052: SET process_status = rlm_core_sv.k_PS_PROCESSED

1048: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface lines for test',SQL%ROWCOUNT);
1049: END IF;
1050: --
1051: UPDATE rlm_schedule_lines
1052: SET process_status = rlm_core_sv.k_PS_PROCESSED
1053: WHERE header_id = v_RlmScheduleID
1054: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1055: --
1056: IF (l_debug <> -1) THEN

Line 1054: AND process_status = rlm_core_sv.k_PS_AVAILABLE;

1050: --
1051: UPDATE rlm_schedule_lines
1052: SET process_status = rlm_core_sv.k_PS_PROCESSED
1053: WHERE header_id = v_RlmScheduleID
1054: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1055: --
1056: IF (l_debug <> -1) THEN
1057: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule lines for test',SQL%ROWCOUNT);
1058: END IF;

Line 1057: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule lines for test',SQL%ROWCOUNT);

1053: WHERE header_id = v_RlmScheduleID
1054: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1055: --
1056: IF (l_debug <> -1) THEN
1057: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule lines for test',SQL%ROWCOUNT);
1058: END IF;
1059: --
1060: UPDATE rlm_interface_headers_all
1061: SET process_status = rlm_core_sv.k_PS_PROCESSED

Line 1061: SET process_status = rlm_core_sv.k_PS_PROCESSED

1057: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule lines for test',SQL%ROWCOUNT);
1058: END IF;
1059: --
1060: UPDATE rlm_interface_headers_all
1061: SET process_status = rlm_core_sv.k_PS_PROCESSED
1062: WHERE header_id = x_InterfaceHeaderId
1063: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1064: --
1065: IF (l_debug <> -1) THEN

Line 1063: AND process_status = rlm_core_sv.k_PS_AVAILABLE;

1059: --
1060: UPDATE rlm_interface_headers_all
1061: SET process_status = rlm_core_sv.k_PS_PROCESSED
1062: WHERE header_id = x_InterfaceHeaderId
1063: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1064: --
1065: IF (l_debug <> -1) THEN
1066: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface header for test',SQL%ROWCOUNT);
1067: END IF;

Line 1066: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface header for test',SQL%ROWCOUNT);

1062: WHERE header_id = x_InterfaceHeaderId
1063: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1064: --
1065: IF (l_debug <> -1) THEN
1066: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in interface header for test',SQL%ROWCOUNT);
1067: END IF;
1068: --
1069: -- Update the schedule headers with v_RlmScheduleID instead of
1070: -- c_rec.header_id for new schedules bug 1085917

Line 1073: SET process_status = rlm_core_sv.k_PS_PROCESSED

1069: -- Update the schedule headers with v_RlmScheduleID instead of
1070: -- c_rec.header_id for new schedules bug 1085917
1071: --
1072: UPDATE rlm_schedule_headers_all
1073: SET process_status = rlm_core_sv.k_PS_PROCESSED
1074: WHERE header_id = v_RlmScheduleID
1075: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1076: --
1077: IF (l_debug <> -1) THEN

Line 1075: AND process_status = rlm_core_sv.k_PS_AVAILABLE;

1071: --
1072: UPDATE rlm_schedule_headers_all
1073: SET process_status = rlm_core_sv.k_PS_PROCESSED
1074: WHERE header_id = v_RlmScheduleID
1075: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1076: --
1077: IF (l_debug <> -1) THEN
1078: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule headers for test',SQL%ROWCOUNT);
1079: END IF;

Line 1078: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule headers for test',SQL%ROWCOUNT);

1074: WHERE header_id = v_RlmScheduleID
1075: AND process_status = rlm_core_sv.k_PS_AVAILABLE;
1076: --
1077: IF (l_debug <> -1) THEN
1078: rlm_core_sv.dlog(C_SDEBUG, 'No of Records Updated in schedule headers for test',SQL%ROWCOUNT);
1079: END IF;
1080: --
1081: END IF;
1082: END LOOP;

Line 1085: rlm_core_sv.dpop(C_SDEBUG);

1081: END IF;
1082: END LOOP;
1083: --
1084: IF (l_debug <> -1) THEN
1085: rlm_core_sv.dpop(C_SDEBUG);
1086: END IF;
1087: --
1088: return TRUE;
1089: --

Line 1095: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);

1091: WHEN OTHERS THEN
1092: rlm_message_sv.sql_error ('rlm_archive_demand_sv.Archive_demand',
1093: x_progress);
1094: IF (l_debug <> -1) THEN
1095: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);
1096: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
1097: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
1098: END IF;
1099: --

Line 1096: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);

1092: rlm_message_sv.sql_error ('rlm_archive_demand_sv.Archive_demand',
1093: x_progress);
1094: IF (l_debug <> -1) THEN
1095: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);
1096: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
1097: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
1098: END IF;
1099: --
1100: raise;

Line 1097: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');

1093: x_progress);
1094: IF (l_debug <> -1) THEN
1095: rlm_core_sv.dlog(C_DEBUG,'x_progress',x_progress);
1096: rlm_core_sv.dlog(C_DEBUG,'Error',sqlerrm);
1097: rlm_core_sv.dpop(C_SDEBUG,'EXCEPTION: OTHER - sql error');
1098: END IF;
1099: --
1100: raise;
1101: END;