159: l_pk2_string:= 'to_date(:4,''j'')';
160: END IF;
161: /* Create Execute statement and log strings */
162: l_stmt := l_stmt || ' AND ' || p_pk2_name || ' = ' || l_pk2_string;
163: if ( Length(l_error_msg || fnd_global.local_chr(10)
164: || ' :4 = ' || l_pk2_value) < 4000) then
165: l_error_msg := l_error_msg || fnd_global.local_chr(10)
166: || ' :4 = ' || l_pk2_value;
167: elsif (Length(l_error_msg || ' ...') < 4000) then
161: /* Create Execute statement and log strings */
162: l_stmt := l_stmt || ' AND ' || p_pk2_name || ' = ' || l_pk2_string;
163: if ( Length(l_error_msg || fnd_global.local_chr(10)
164: || ' :4 = ' || l_pk2_value) < 4000) then
165: l_error_msg := l_error_msg || fnd_global.local_chr(10)
166: || ' :4 = ' || l_pk2_value;
167: elsif (Length(l_error_msg || ' ...') < 4000) then
168: l_error_msg := l_error_msg || ' ...';
169: end if;
183: l_pk3_string:= 'to_date(:5,''j'')';
184: END IF;
185: /* Create Execute statement and log strings */
186: l_stmt := l_stmt || ' AND ' || p_pk3_name || ' = ' || l_pk3_string;
187: if ( Length(l_error_msg || fnd_global.local_chr(10)
188: || ' :5 = ' || l_pk3_value) < 4000) then
189: l_error_msg := l_error_msg || fnd_global.local_chr(10)
190: || ' :5 = ' || l_pk3_value;
191: elsif (Length(l_error_msg || ' ...') < 4000) then
185: /* Create Execute statement and log strings */
186: l_stmt := l_stmt || ' AND ' || p_pk3_name || ' = ' || l_pk3_string;
187: if ( Length(l_error_msg || fnd_global.local_chr(10)
188: || ' :5 = ' || l_pk3_value) < 4000) then
189: l_error_msg := l_error_msg || fnd_global.local_chr(10)
190: || ' :5 = ' || l_pk3_value;
191: elsif (Length(l_error_msg || ' ...') < 4000) then
192: l_error_msg := l_error_msg || ' ...';
193: end if;
202: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
203: jtm_message_log_pkg.Log_Msg
204: ( l_merged_pk
205: , p_acc_table_name
206: , 'JTM_HOOK_UTIL_PKG.Get_Acc_Id executing:' || fnd_global.local_chr(10) ||
207: l_stmt || fnd_global.local_chr(10) ||
208: ':1 = ' || p_resource_id || fnd_global.local_chr(10) || l_error_msg
209: , JTM_HOOK_UTIL_PKG.g_debug_level_full
210: , 'jtm_message_log_pkg');
203: jtm_message_log_pkg.Log_Msg
204: ( l_merged_pk
205: , p_acc_table_name
206: , 'JTM_HOOK_UTIL_PKG.Get_Acc_Id executing:' || fnd_global.local_chr(10) ||
207: l_stmt || fnd_global.local_chr(10) ||
208: ':1 = ' || p_resource_id || fnd_global.local_chr(10) || l_error_msg
209: , JTM_HOOK_UTIL_PKG.g_debug_level_full
210: , 'jtm_message_log_pkg');
211: END IF;
204: ( l_merged_pk
205: , p_acc_table_name
206: , 'JTM_HOOK_UTIL_PKG.Get_Acc_Id executing:' || fnd_global.local_chr(10) ||
207: l_stmt || fnd_global.local_chr(10) ||
208: ':1 = ' || p_resource_id || fnd_global.local_chr(10) || l_error_msg
209: , JTM_HOOK_UTIL_PKG.g_debug_level_full
210: , 'jtm_message_log_pkg');
211: END IF;
212:
285: l_pk2_string:= 'to_date(:P2,''j'')';
286: END IF;
287: /* Create Execute statement and log strings */
288: l_stmt := l_stmt || ' AND ' || p_pk2_name || ' = ' || l_pk2_string;
289: if ( Length(l_error_msg || fnd_global.local_chr(10)
290: || ' :P2 = ' || l_pk2_value) < 4000) then
291: l_error_msg := l_error_msg || fnd_global.local_chr(10)
292: || ' :P2 = ' || l_pk2_value;
293: elsif (Length(l_error_msg || ' ...') < 4000) then
287: /* Create Execute statement and log strings */
288: l_stmt := l_stmt || ' AND ' || p_pk2_name || ' = ' || l_pk2_string;
289: if ( Length(l_error_msg || fnd_global.local_chr(10)
290: || ' :P2 = ' || l_pk2_value) < 4000) then
291: l_error_msg := l_error_msg || fnd_global.local_chr(10)
292: || ' :P2 = ' || l_pk2_value;
293: elsif (Length(l_error_msg || ' ...') < 4000) then
294: l_error_msg := l_error_msg || ' ...';
295: end if;
309: l_pk3_string:= 'to_date(:P3,''j'')';
310: END IF;
311: /* Create Execute statement and log strings */
312: l_stmt := l_stmt || ' AND ' || p_pk3_name || ' = ' || l_pk3_string;
313: if ( Length(l_error_msg || fnd_global.local_chr(10)
314: || ' :P3 = ' || l_pk3_value) < 4000) then
315: l_error_msg := l_error_msg || fnd_global.local_chr(10)
316: || ' :P3 = ' || l_pk3_value;
317: elsif (Length(l_error_msg || ' ...') < 4000) then
311: /* Create Execute statement and log strings */
312: l_stmt := l_stmt || ' AND ' || p_pk3_name || ' = ' || l_pk3_string;
313: if ( Length(l_error_msg || fnd_global.local_chr(10)
314: || ' :P3 = ' || l_pk3_value) < 4000) then
315: l_error_msg := l_error_msg || fnd_global.local_chr(10)
316: || ' :P3 = ' || l_pk3_value;
317: elsif (Length(l_error_msg || ' ...') < 4000) then
318: l_error_msg := l_error_msg || ' ...';
319: end if;
328: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
329: jtm_message_log_pkg.Log_Msg
330: ( l_merged_pk
331: , p_acc_table_name
332: , 'JTM_HOOK_UTIL_PKG.Get_Resource_Acc_List executing:' || fnd_global.local_chr(10) ||
333: l_stmt || fnd_global.local_chr(10) || l_error_msg
334: , JTM_HOOK_UTIL_PKG.g_debug_level_full
335: , 'jtm_message_log_pkg');
336: END IF;
329: jtm_message_log_pkg.Log_Msg
330: ( l_merged_pk
331: , p_acc_table_name
332: , 'JTM_HOOK_UTIL_PKG.Get_Resource_Acc_List executing:' || fnd_global.local_chr(10) ||
333: l_stmt || fnd_global.local_chr(10) || l_error_msg
334: , JTM_HOOK_UTIL_PKG.g_debug_level_full
335: , 'jtm_message_log_pkg');
336: END IF;
337:
420: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
421: jtm_message_log_pkg.Log_Msg
422: ( l_access_id
423: , p_acc_table_name
424: , 'JTM_HOOK_UTIL_PKG.Insert_Acc executing:' || fnd_global.local_chr(10) || l_stmt
425: , JTM_HOOK_UTIL_PKG.g_debug_level_full
426: , 'jtm_message_log_pkg');
427: END IF;
428: EXECUTE IMMEDIATE l_stmt using l_access_id;
457: ' CREATION_DATE, CREATED_BY, COUNTER, RESOURCE_ID, ' ||
458: p_pk1_name ||', '|| p_pk2_name || ') ' ||
459: 'VALUES (JTM_ACC_TABLE_S.NEXTVAL, SYSDATE, 1, SYSDATE, 1, 1, :1, ' ||
460: l_pk1_string || ', ' || l_pk2_string || ' ) RETURNING '|| 'ACCESS_ID INTO :3';
461: if ( Length(l_error_msg || fnd_global.local_chr(10)
462: || ' :4 = ' || l_pk2_value) < 4000) then
463: l_error_msg := l_error_msg || fnd_global.local_chr(10)
464: || ' :4 = ' || l_pk2_value;
465: elsif (Length(l_error_msg || ' ...') < 4000) then
459: 'VALUES (JTM_ACC_TABLE_S.NEXTVAL, SYSDATE, 1, SYSDATE, 1, 1, :1, ' ||
460: l_pk1_string || ', ' || l_pk2_string || ' ) RETURNING '|| 'ACCESS_ID INTO :3';
461: if ( Length(l_error_msg || fnd_global.local_chr(10)
462: || ' :4 = ' || l_pk2_value) < 4000) then
463: l_error_msg := l_error_msg || fnd_global.local_chr(10)
464: || ' :4 = ' || l_pk2_value;
465: elsif (Length(l_error_msg || ' ...') < 4000) then
466: l_error_msg := l_error_msg || ' ...';
467: end if;
485: p_pk1_name ||', '|| p_pk2_name ||', '|| p_pk3_name || ') ' ||
486: 'VALUES (JTM_ACC_TABLE_S.NEXTVAL, SYSDATE, 1, SYSDATE, 1, 1, :1, ' ||
487: l_pk1_string || ', ' || l_pk2_string || ', ' || l_pk3_string || ' ) RETURNING '||
488: 'ACCESS_ID INTO :3';
489: if ( Length(l_error_msg || fnd_global.local_chr(10)
490: || ' :5 = ' || l_pk3_value) < 4000) then
491: l_error_msg := l_error_msg || fnd_global.local_chr(10)
492: || ' :5 = ' || l_pk3_value;
493: elsif (Length(l_error_msg || ' ...') < 4000) then
487: l_pk1_string || ', ' || l_pk2_string || ', ' || l_pk3_string || ' ) RETURNING '||
488: 'ACCESS_ID INTO :3';
489: if ( Length(l_error_msg || fnd_global.local_chr(10)
490: || ' :5 = ' || l_pk3_value) < 4000) then
491: l_error_msg := l_error_msg || fnd_global.local_chr(10)
492: || ' :5 = ' || l_pk3_value;
493: elsif (Length(l_error_msg || ' ...') < 4000) then
494: l_error_msg := l_error_msg || ' ...';
495: end if;
505: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
506: jtm_message_log_pkg.Log_Msg
507: ( l_merged_pk
508: , p_acc_table_name
509: , 'JTM_HOOK_UTIL_PKG.Insert_Acc executing:' || fnd_global.local_chr(10) ||
510: l_stmt || fnd_global.local_chr(10) || ':1 = ' || p_resource_id
511: || fnd_global.local_chr(10) || l_error_msg
512: , JTM_HOOK_UTIL_PKG.g_debug_level_full
513: , 'jtm_message_log_pkg');
506: jtm_message_log_pkg.Log_Msg
507: ( l_merged_pk
508: , p_acc_table_name
509: , 'JTM_HOOK_UTIL_PKG.Insert_Acc executing:' || fnd_global.local_chr(10) ||
510: l_stmt || fnd_global.local_chr(10) || ':1 = ' || p_resource_id
511: || fnd_global.local_chr(10) || l_error_msg
512: , JTM_HOOK_UTIL_PKG.g_debug_level_full
513: , 'jtm_message_log_pkg');
514: END IF;
507: ( l_merged_pk
508: , p_acc_table_name
509: , 'JTM_HOOK_UTIL_PKG.Insert_Acc executing:' || fnd_global.local_chr(10) ||
510: l_stmt || fnd_global.local_chr(10) || ':1 = ' || p_resource_id
511: || fnd_global.local_chr(10) || l_error_msg
512: , JTM_HOOK_UTIL_PKG.g_debug_level_full
513: , 'jtm_message_log_pkg');
514: END IF;
515:
664: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
665: jtm_message_log_pkg.Log_Msg
666: ( l_pk1_value||','||l_pk2_value||','||l_pk3_value
667: , p_acc_table_name
668: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing:' || fnd_global.local_chr(10) ||
669: l_stmt || fnd_global.local_chr(10) ||
670: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
671: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
672: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
665: jtm_message_log_pkg.Log_Msg
666: ( l_pk1_value||','||l_pk2_value||','||l_pk3_value
667: , p_acc_table_name
668: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing:' || fnd_global.local_chr(10) ||
669: l_stmt || fnd_global.local_chr(10) ||
670: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
671: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
672: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
673: ':P4 = ' || p_resource_id
666: ( l_pk1_value||','||l_pk2_value||','||l_pk3_value
667: , p_acc_table_name
668: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing:' || fnd_global.local_chr(10) ||
669: l_stmt || fnd_global.local_chr(10) ||
670: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
671: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
672: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
673: ':P4 = ' || p_resource_id
674: , JTM_HOOK_UTIL_PKG.g_debug_level_full
667: , p_acc_table_name
668: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing:' || fnd_global.local_chr(10) ||
669: l_stmt || fnd_global.local_chr(10) ||
670: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
671: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
672: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
673: ':P4 = ' || p_resource_id
674: , JTM_HOOK_UTIL_PKG.g_debug_level_full
675: , 'jtm_message_log_pkg');
668: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing:' || fnd_global.local_chr(10) ||
669: l_stmt || fnd_global.local_chr(10) ||
670: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
671: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
672: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
673: ':P4 = ' || p_resource_id
674: , JTM_HOOK_UTIL_PKG.g_debug_level_full
675: , 'jtm_message_log_pkg');
676: END IF;
715: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
716: jtm_message_log_pkg.Log_Msg
717: ( l_pk1_value||','||l_pk2_value||','||l_pk3_value
718: , p_acc_table_name
719: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing :' || fnd_global.local_chr(10) ||
720: l_stmt || fnd_global.local_chr(10) ||
721: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
722: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
723: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
716: jtm_message_log_pkg.Log_Msg
717: ( l_pk1_value||','||l_pk2_value||','||l_pk3_value
718: , p_acc_table_name
719: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing :' || fnd_global.local_chr(10) ||
720: l_stmt || fnd_global.local_chr(10) ||
721: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
722: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
723: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
724: ':P4 = ' || p_resource_id
717: ( l_pk1_value||','||l_pk2_value||','||l_pk3_value
718: , p_acc_table_name
719: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing :' || fnd_global.local_chr(10) ||
720: l_stmt || fnd_global.local_chr(10) ||
721: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
722: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
723: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
724: ':P4 = ' || p_resource_id
725: , JTM_HOOK_UTIL_PKG.g_debug_level_full
718: , p_acc_table_name
719: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing :' || fnd_global.local_chr(10) ||
720: l_stmt || fnd_global.local_chr(10) ||
721: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
722: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
723: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
724: ':P4 = ' || p_resource_id
725: , JTM_HOOK_UTIL_PKG.g_debug_level_full
726: , 'jtm_message_log_pkg');
719: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing :' || fnd_global.local_chr(10) ||
720: l_stmt || fnd_global.local_chr(10) ||
721: ':P1 = ' || l_pk1_value || fnd_global.local_chr(10) ||
722: ':P2 = ' || l_pk2_value || fnd_global.local_chr(10) ||
723: ':P3 = ' || l_pk3_value || fnd_global.local_chr(10) ||
724: ':P4 = ' || p_resource_id
725: , JTM_HOOK_UTIL_PKG.g_debug_level_full
726: , 'jtm_message_log_pkg');
727: END IF;
759: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
760: jtm_message_log_pkg.Log_Msg
761: ( l_pk1_value
762: , p_acc_table_name
763: , 'JTM_HOOK_UTIL_PKG.Delete_Acc executing:' || fnd_global.local_chr(10) || l_stmt
764: , JTM_HOOK_UTIL_PKG.g_debug_level_full
765: , 'jtm_message_log_pkg');
766: END IF;
767:
798: IF Get_Debug_Level >= JTM_HOOK_UTIL_PKG.G_DEBUG_LEVEL_SQL THEN
799: jtm_message_log_pkg.Log_Msg
800: ( p_resource_id
801: , p_acc_table_name
802: , 'JTM_HOOK_UTIL_PKG.Delete_Acc_4Res executing:' || fnd_global.local_chr(10) ||
803: l_stmt || fnd_global.local_chr(10)||'P1 = '||p_resource_id
804: , JTM_HOOK_UTIL_PKG.g_debug_level_full
805: , 'jtm_message_log_pkg');
806: END IF;
799: jtm_message_log_pkg.Log_Msg
800: ( p_resource_id
801: , p_acc_table_name
802: , 'JTM_HOOK_UTIL_PKG.Delete_Acc_4Res executing:' || fnd_global.local_chr(10) ||
803: l_stmt || fnd_global.local_chr(10)||'P1 = '||p_resource_id
804: , JTM_HOOK_UTIL_PKG.g_debug_level_full
805: , 'jtm_message_log_pkg');
806: END IF;
807: