DBA Data[Home] [Help]

APPS.HZ_BES_BO_GEN_PKG dependencies on FND_LOG

Line 66: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

62: /*
63: FND_FILE.LOG = 1 - means log file
64: FND_FILE.LOG = 2 - means out file
65: */
66: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
67: hz_utility_v2pub.DEBUG (
68: p_message=>message,
69: p_prefix=>l_prefix,
70: p_msg_level=>fnd_log.level_procedure);

Line 70: p_msg_level=>fnd_log.level_procedure);

66: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
67: hz_utility_v2pub.DEBUG (
68: p_message=>message,
69: p_prefix=>l_prefix,
70: p_msg_level=>fnd_log.level_procedure);
71: END IF ;
72:
73: IF newline THEN
74: FND_FILE.put_line(FND_FILE.LOG,message);

Line 298: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

294: l_schema_name VARCHAR2(30);
295: l_tmp NUMBER;
296:
297: BEGIN -- gen_pkg_body
298: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
299: hz_utility_v2pub.DEBUG (
300: p_message=>'genPkgBdyHdr()+',
301: p_prefix=>l_prefix,
302: p_msg_level=>fnd_log.level_procedure);

Line 302: p_msg_level=>fnd_log.level_procedure);

298: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
299: hz_utility_v2pub.DEBUG (
300: p_message=>'genPkgBdyHdr()+',
301: p_prefix=>l_prefix,
302: p_msg_level=>fnd_log.level_procedure);
303: END IF ;
304: -- for any reason if the
305: -- new a package body object package body exists and is invalid, the create or replace is not working.
306: -- then we may have to do the following:

Line 328: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

324: execute immediate 'DROP PACKAGE BODY HZ_BES_BO_SITE_UTIL_PKG';
325: END IF;
326: EXCEPTION
327: WHEN NO_DATA_FOUND THEN
328: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
329: hz_utility_v2pub.DEBUG (
330: p_message=>'pkg body does not exist.',
331: p_prefix=>l_prefix,
332: p_msg_level=>fnd_log.level_procedure);

Line 332: p_msg_level=>fnd_log.level_procedure);

328: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
329: hz_utility_v2pub.DEBUG (
330: p_message=>'pkg body does not exist.',
331: p_prefix=>l_prefix,
332: p_msg_level=>fnd_log.level_procedure);
333: END IF ;
334: WHEN OTHERS THEN
335: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
336: hz_utility_v2pub.DEBUG (

Line 335: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

331: p_prefix=>l_prefix,
332: p_msg_level=>fnd_log.level_procedure);
333: END IF ;
334: WHEN OTHERS THEN
335: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
336: hz_utility_v2pub.DEBUG (
337: p_message=>sqlerrm,
338: p_prefix=>l_prefix,
339: p_msg_level=>fnd_log.level_procedure);

Line 339: p_msg_level=>fnd_log.level_procedure);

335: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
336: hz_utility_v2pub.DEBUG (
337: p_message=>sqlerrm,
338: p_prefix=>l_prefix,
339: p_msg_level=>fnd_log.level_procedure);
340: END IF ;
341: END;
342: HZ_GEN_PLSQL.new(p_package_name, 'PACKAGE BODY');
343: l('CREATE OR REPLACE PACKAGE BODY '||p_package_name||' AS');

Line 362: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

358: l(' |');
359: l(' *=======================================================================*/');
360: l(' ');
361:
362: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
363: hz_utility_v2pub.debug(p_message=>'genPkgBdyHdr()-',
364: p_prefix=>l_prefix,
365: p_msg_level=>fnd_log.level_procedure);
366: end if;

Line 365: p_msg_level=>fnd_log.level_procedure);

361:
362: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
363: hz_utility_v2pub.debug(p_message=>'genPkgBdyHdr()-',
364: p_prefix=>l_prefix,
365: p_msg_level=>fnd_log.level_procedure);
366: end if;
367:
368: END genPkgBdyHdr;
369: --------------------------------------

Line 378: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

374: l_schema_name VARCHAR2(30);
375: l_tmp NUMBER;
376:
377: BEGIN -- gen_pkg_hdr
378: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
379: hz_utility_v2pub.DEBUG (
380: p_message=>'genPkgHdr()+',
381: p_prefix=>l_prefix,
382: p_msg_level=>fnd_log.level_procedure);

Line 382: p_msg_level=>fnd_log.level_procedure);

378: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
379: hz_utility_v2pub.DEBUG (
380: p_message=>'genPkgHdr()+',
381: p_prefix=>l_prefix,
382: p_msg_level=>fnd_log.level_procedure);
383: END IF ;
384:
385: HZ_GEN_PLSQL.new(p_package_name, 'PACKAGE');
386: l('CREATE OR REPLACE PACKAGE '||p_package_name||' AS');

Line 403: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

399: l(' |');
400: l(' *=======================================================================*/');
401: l(' ');
402:
403: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
404: hz_utility_v2pub.debug(p_message=>'genPkgHdr()-',
405: p_prefix=>l_prefix,
406: p_msg_level=>fnd_log.level_procedure);
407: end if;

Line 406: p_msg_level=>fnd_log.level_procedure);

402:
403: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
404: hz_utility_v2pub.debug(p_message=>'genPkgHdr()-',
405: p_prefix=>l_prefix,
406: p_msg_level=>fnd_log.level_procedure);
407: end if;
408:
409: END genPkgHdr;
410: --------------------------------------

Line 432: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

428: ) IS
429: l_debug_prefix VARCHAR2(15) := 'PKGTAIL:';
430: BEGIN
431:
432: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
433: hz_utility_v2pub.debug(p_message=>'genPkgBdyTail()+',
434: p_prefix=>l_debug_prefix,
435: p_msg_level=>fnd_log.level_procedure);
436: end if;

Line 435: p_msg_level=>fnd_log.level_procedure);

431:
432: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
433: hz_utility_v2pub.debug(p_message=>'genPkgBdyTail()+',
434: p_prefix=>l_debug_prefix,
435: p_msg_level=>fnd_log.level_procedure);
436: end if;
437:
438:
439: l('END '||p_package_name||';');

Line 443: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

439: l('END '||p_package_name||';');
440: -- compile the package.
441: HZ_GEN_PLSQL.compile_code;
442:
443: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
444: hz_utility_v2pub.debug(p_message=>'genPkgBdyTail()-',
445: p_prefix=>l_debug_prefix,
446: p_msg_level=>fnd_log.level_procedure);
447: end if;

Line 446: p_msg_level=>fnd_log.level_procedure);

442:
443: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
444: hz_utility_v2pub.debug(p_message=>'genPkgBdyTail()-',
445: p_prefix=>l_debug_prefix,
446: p_msg_level=>fnd_log.level_procedure);
447: end if;
448:
449:
450: END genPkgBdyTail;

Line 522: l2i('IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');

518: p_msg IN VARCHAR2,
519: p_prefix IN VARCHAR2) IS
520: BEGIN
521: l(' ');
522: l2i('IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN');
523: l(' ');
524: l2i(' HZ_UTILITY_V2PUB.DEBUG(');
525: l2i(' p_message=>'''||p_msg||''',');
526: l2i(' p_prefix=>'''||p_prefix||''',');

Line 527: l2i(' p_msg_level=>fnd_log.level_procedure);');

523: l(' ');
524: l2i(' HZ_UTILITY_V2PUB.DEBUG(');
525: l2i(' p_message=>'''||p_msg||''',');
526: l2i(' p_prefix=>'''||p_prefix||''',');
527: l2i(' p_msg_level=>fnd_log.level_procedure);');
528: l2i('END IF;');
529: l(' ');
530: END writeDebugMesg;
531: --------------------------------------

Line 610: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

606: l_chk_node NUMBER;
607:
608: BEGIN
609:
610: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
611: hz_utility_v2pub.debug(p_message=>'GENBOSQL()+',
612: p_prefix=>l_debug_prefix,
613: p_msg_level=>fnd_log.level_procedure);
614: END IF;

Line 613: p_msg_level=>fnd_log.level_procedure);

609:
610: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
611: hz_utility_v2pub.debug(p_message=>'GENBOSQL()+',
612: p_prefix=>l_debug_prefix,
613: p_msg_level=>fnd_log.level_procedure);
614: END IF;
615: -- set the retun status to false. If the SQL generation is successfull, this
616: -- will set to TRUE
617: P_STATUS := FALSE;

Line 619: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

615: -- set the retun status to false. If the SQL generation is successfull, this
616: -- will set to TRUE
617: P_STATUS := FALSE;
618: OPEN c_bo(p_bo_code);
619: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
620: hz_utility_v2pub.debug(
621: p_message=>'cursor opened',
622: p_prefix=>l_debug_prefix,
623: p_msg_level=>fnd_log.level_procedure);

Line 623: p_msg_level=>fnd_log.level_procedure);

619: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
620: hz_utility_v2pub.debug(
621: p_message=>'cursor opened',
622: p_prefix=>l_debug_prefix,
623: p_msg_level=>fnd_log.level_procedure);
624: END IF;
625: -- read the entire hierarchy of the BO into a collection
626: FETCH c_bo BULK COLLECT INTO l_node_tbl;
627: CLOSE c_bo;

Line 629: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

625: -- read the entire hierarchy of the BO into a collection
626: FETCH c_bo BULK COLLECT INTO l_node_tbl;
627: CLOSE c_bo;
628:
629: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
630: hz_utility_v2pub.debug(
631: p_message=>'bulk collected and cursor closed',
632: p_prefix=>l_debug_prefix,
633: p_msg_level=>fnd_log.level_procedure);

Line 633: p_msg_level=>fnd_log.level_procedure);

629: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
630: hz_utility_v2pub.debug(
631: p_message=>'bulk collected and cursor closed',
632: p_prefix=>l_debug_prefix,
633: p_msg_level=>fnd_log.level_procedure);
634: END IF;
635: l_node_count := l_node_tbl.COUNT;
636: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
637: hz_utility_v2pub.debug(

Line 636: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

632: p_prefix=>l_debug_prefix,
633: p_msg_level=>fnd_log.level_procedure);
634: END IF;
635: l_node_count := l_node_tbl.COUNT;
636: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
637: hz_utility_v2pub.debug(
638: p_message=>'number of nodes in the tree are:'||l_node_count,
639: p_prefix=>l_debug_prefix,
640: p_msg_level=>fnd_log.level_procedure);

Line 640: p_msg_level=>fnd_log.level_procedure);

636: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
637: hz_utility_v2pub.debug(
638: p_message=>'number of nodes in the tree are:'||l_node_count,
639: p_prefix=>l_debug_prefix,
640: p_msg_level=>fnd_log.level_procedure);
641: END IF;
642: FOR i IN l_node_tbl.FIRST..l_node_tbl.LAST
643: LOOP
644: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

Line 644: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

640: p_msg_level=>fnd_log.level_procedure);
641: END IF;
642: FOR i IN l_node_tbl.FIRST..l_node_tbl.LAST
643: LOOP
644: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
645: hz_utility_v2pub.debug(
646: p_message=>'--node '||i||':BO:'||l_node_tbl(i).bo_code||':ent:'||l_node_tbl(i).entity_name||':parent:'||l_node_tbl(i).parent_bo_code,
647: p_prefix=>l_debug_prefix,
648: p_msg_level=>fnd_log.level_procedure);

Line 648: p_msg_level=>fnd_log.level_procedure);

644: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
645: hz_utility_v2pub.debug(
646: p_message=>'--node '||i||':BO:'||l_node_tbl(i).bo_code||':ent:'||l_node_tbl(i).entity_name||':parent:'||l_node_tbl(i).parent_bo_code,
647: p_prefix=>l_debug_prefix,
648: p_msg_level=>fnd_log.level_procedure);
649: END IF;
650: END LOOP;
651:
652: -- for the level 1 node, write the SQL statement to buffer.

Line 726: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

722: li(G_RT_NODE_2);
723: li(G_RT_NODE_BOCODE||''''||l_node_tbl(1).BO_CODE||'''');
724: END IF;
725: ELSE
726: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
727: hz_utility_v2pub.debug(
728: p_message=>'invalid first node a.k.a invalid root_node node ',
729: p_prefix=>l_debug_prefix,
730: p_msg_level=>fnd_log.level_procedure);

Line 730: p_msg_level=>fnd_log.level_procedure);

726: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
727: hz_utility_v2pub.debug(
728: p_message=>'invalid first node a.k.a invalid root_node node ',
729: p_prefix=>l_debug_prefix,
730: p_msg_level=>fnd_log.level_procedure);
731: END IF;
732: END CASE;
733: /*
734: Now figuring out when to write right parenthesis.

Line 777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

773: -- Hence, when processing second node SQL, we do not need to process the
774: -- first node right paranthisis. Hence, we skip part to figure out the
775: -- right paranthesis for the second node and go directly to figuring out the
776: -- SQL for second node.
777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
778: hz_utility_v2pub.debug(
779: p_message=>'the node that is being processed is: '||i,
780: p_prefix=>l_debug_prefix,
781: p_msg_level=>fnd_log.level_procedure);

Line 781: p_msg_level=>fnd_log.level_procedure);

777: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
778: hz_utility_v2pub.debug(
779: p_message=>'the node that is being processed is: '||i,
780: p_prefix=>l_debug_prefix,
781: p_msg_level=>fnd_log.level_procedure);
782: END IF;
783: -- figuring out the right paranthesis
784: /* Some of the definitions that are useful to know to
785: code this section are:

Line 836: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

832: l_rp_tbl(l_rpc).node := (i-1); --right paranthesis is ALWAYS stored for prev node
833: l_rp_tbl(l_rpc).rp := l_rp;
834: l_rp_tbl(l_rpc).BO_CODE := l_node_tbl(i).PARENT_BO_CODE;
835: l_rp_tbl(l_rpc).PARENT_BO_CODE := l_node_tbl(i-1).PARENT_BO_CODE;
836: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
837: hz_utility_v2pub.debug(
838: p_message=>'The prev node is type 1 parent of the current node '||i,
839: p_prefix=>l_debug_prefix,
840: p_msg_level=>fnd_log.level_procedure);

Line 840: p_msg_level=>fnd_log.level_procedure);

836: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
837: hz_utility_v2pub.debug(
838: p_message=>'The prev node is type 1 parent of the current node '||i,
839: p_prefix=>l_debug_prefix,
840: p_msg_level=>fnd_log.level_procedure);
841: hz_utility_v2pub.debug(
842: p_message=>'storing the right paranthesis. details of the hashmap',
843: p_prefix=>l_debug_prefix,
844: p_msg_level=>fnd_log.level_procedure);

Line 844: p_msg_level=>fnd_log.level_procedure);

840: p_msg_level=>fnd_log.level_procedure);
841: hz_utility_v2pub.debug(
842: p_message=>'storing the right paranthesis. details of the hashmap',
843: p_prefix=>l_debug_prefix,
844: p_msg_level=>fnd_log.level_procedure);
845: hz_utility_v2pub.debug(
846: p_message=>'rec:'||l_rpc||'BOCODE:'||l_node_tbl(i).PARENT_BO_CODE||':parent node:'||(i-1)||':PARENTBO:'||l_node_tbl(i-1).PARENT_BO_CODE,
847: p_prefix=>l_debug_prefix,
848: p_msg_level=>fnd_log.level_procedure);

Line 848: p_msg_level=>fnd_log.level_procedure);

844: p_msg_level=>fnd_log.level_procedure);
845: hz_utility_v2pub.debug(
846: p_message=>'rec:'||l_rpc||'BOCODE:'||l_node_tbl(i).PARENT_BO_CODE||':parent node:'||(i-1)||':PARENTBO:'||l_node_tbl(i-1).PARENT_BO_CODE,
847: p_prefix=>l_debug_prefix,
848: p_msg_level=>fnd_log.level_procedure);
849: END IF;
850: END IF; -- end of if stmt for skipping the ) collection
851: ------------------------------------
852: /*

Line 881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

877: l_rp_tbl(l_rpc).node := (i-1); -- right paranthesis is stored for prev node -ALWAYS
878: l_rp_tbl(l_rpc).rp := l_rp;
879: l_rp_tbl(l_rpc).BO_CODE := l_node_tbl(i).BO_CODE;
880: l_rp_tbl(l_rpc).PARENT_BO_CODE := l_node_tbl(i).PARENT_BO_CODE;
881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
882: hz_utility_v2pub.debug(
883: p_message=>'The prev node is type 2 parent of the current node '||i,
884: p_prefix=>l_debug_prefix,
885: p_msg_level=>fnd_log.level_procedure);

Line 885: p_msg_level=>fnd_log.level_procedure);

881: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
882: hz_utility_v2pub.debug(
883: p_message=>'The prev node is type 2 parent of the current node '||i,
884: p_prefix=>l_debug_prefix,
885: p_msg_level=>fnd_log.level_procedure);
886: hz_utility_v2pub.debug(
887: p_message=>'storing the right paranthesis. details of the hashmap',
888: p_prefix=>l_debug_prefix,
889: p_msg_level=>fnd_log.level_procedure);

Line 889: p_msg_level=>fnd_log.level_procedure);

885: p_msg_level=>fnd_log.level_procedure);
886: hz_utility_v2pub.debug(
887: p_message=>'storing the right paranthesis. details of the hashmap',
888: p_prefix=>l_debug_prefix,
889: p_msg_level=>fnd_log.level_procedure);
890: hz_utility_v2pub.debug(
891: p_message=>'rec:'||l_rpc||'BOCODE:'||l_node_tbl(i).BO_CODE||':parentnode: '||(i-1)||':PARENTBO:'||l_node_tbl(i).PARENT_BO_CODE,
892: p_prefix=>l_debug_prefix,
893: p_msg_level=>fnd_log.level_procedure);

Line 893: p_msg_level=>fnd_log.level_procedure);

889: p_msg_level=>fnd_log.level_procedure);
890: hz_utility_v2pub.debug(
891: p_message=>'rec:'||l_rpc||'BOCODE:'||l_node_tbl(i).BO_CODE||':parentnode: '||(i-1)||':PARENTBO:'||l_node_tbl(i).PARENT_BO_CODE,
892: p_prefix=>l_debug_prefix,
893: p_msg_level=>fnd_log.level_procedure);
894: END IF;
895: END IF;-- end of if stmt for skipping the ) collection for typ2 parent
896: ---------------------------------------
897: /*

Line 907: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

903: ---------------------------------------
904: WHEN ((l_node_tbl(i-1).BO_CODE = l_node_tbl(i).PARENT_BO_CODE) AND
905: (l_node_tbl(i-1).RNF = 'N' )) THEN
906: l2i(l_rp||'--'||l_node_tbl(i-1).entity_name);
907: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
908: hz_utility_v2pub.debug(
909: p_message=>'for node: '||i|| 'is the type 1 sibling of:'||l_node_tbl(i).PARENT_BO_CODE,
910: p_prefix=>l_debug_prefix,
911: p_msg_level=>fnd_log.level_procedure);

Line 911: p_msg_level=>fnd_log.level_procedure);

907: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
908: hz_utility_v2pub.debug(
909: p_message=>'for node: '||i|| 'is the type 1 sibling of:'||l_node_tbl(i).PARENT_BO_CODE,
910: p_prefix=>l_debug_prefix,
911: p_msg_level=>fnd_log.level_procedure);
912: END IF;
913: ---------------------------------------
914: /*
915: 2. Prev belongs to the parent BO of the current record, but it (prev rec)

Line 925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

921: WHEN ((l_node_tbl(i).PARENT_BO_CODE = l_node_tbl(i-1).PARENT_BO_CODE) AND
922: (l_node_tbl(i-1).BO_CODE = l_node_tbl(i).BO_CODE) AND
923: (l_node_tbl(i-1).RNF = 'N')) THEN
924: l2i(l_rp||'--'||l_node_tbl(i-1).entity_name);
925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
926: hz_utility_v2pub.debug(
927: p_message=>'node: '||i|| 'is the type 2 sibling of node:'||(i-1)||'and its parent bo is:'||l_node_tbl(i).PARENT_BO_CODE,
928: p_prefix=>l_debug_prefix,
929: p_msg_level=>fnd_log.level_procedure);

Line 929: p_msg_level=>fnd_log.level_procedure);

925: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
926: hz_utility_v2pub.debug(
927: p_message=>'node: '||i|| 'is the type 2 sibling of node:'||(i-1)||'and its parent bo is:'||l_node_tbl(i).PARENT_BO_CODE,
928: p_prefix=>l_debug_prefix,
929: p_msg_level=>fnd_log.level_procedure);
930: END IF;
931: ---------------------------------------
932: /*
933: 3. Prev and current recs belong to different BOs, but has same

Line 944: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

940: WHEN ((l_node_tbl(i).PARENT_BO_CODE = l_node_tbl(i-1).PARENT_BO_CODE) AND
941: (l_node_tbl(i-1).BO_CODE <> l_node_tbl(i).BO_CODE) AND
942: (l_node_tbl(i-1).RNF = 'Y')) THEN
943: l2i(l_rp||'--'||l_node_tbl(i-1).entity_name);
944: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
945: hz_utility_v2pub.debug(
946: p_message=>'node: '||i||' is the type 3 sibling of:'||(i-1)||' and its parent bo is:'||l_node_tbl(i).PARENT_BO_CODE,
947: p_prefix=>l_debug_prefix,
948: p_msg_level=>fnd_log.level_procedure);

Line 948: p_msg_level=>fnd_log.level_procedure);

944: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
945: hz_utility_v2pub.debug(
946: p_message=>'node: '||i||' is the type 3 sibling of:'||(i-1)||' and its parent bo is:'||l_node_tbl(i).PARENT_BO_CODE,
947: p_prefix=>l_debug_prefix,
948: p_msg_level=>fnd_log.level_procedure);
949: END IF;
950: -- when neither parent nor sibling
951: ELSE
952: -- this section of code is executed when we need to write the

Line 964: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

960: -- 3. every sql segment for any given entity barring the first node
961: -- in node_tbl will have left parnthesis in its global variable
962: l2i(l_rp||' --'||l_node_tbl(i-1).entity_name);
963:
964: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
965: hz_utility_v2pub.debug(
966: p_message=>'previous node is neither the parent nor sibling of node:'||i,
967: p_prefix=>l_debug_prefix,
968: p_msg_level=>fnd_log.level_procedure);

Line 968: p_msg_level=>fnd_log.level_procedure);

964: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
965: hz_utility_v2pub.debug(
966: p_message=>'previous node is neither the parent nor sibling of node:'||i,
967: p_prefix=>l_debug_prefix,
968: p_msg_level=>fnd_log.level_procedure);
969: hz_utility_v2pub.debug(
970: p_message=>'node: '||i|| 'is not a parent or sibling of node:'||(i-1)||' and its parent bo:'||l_node_tbl(i).PARENT_BO_CODE,
971: p_prefix=>l_debug_prefix,
972: p_msg_level=>fnd_log.level_procedure);

Line 972: p_msg_level=>fnd_log.level_procedure);

968: p_msg_level=>fnd_log.level_procedure);
969: hz_utility_v2pub.debug(
970: p_message=>'node: '||i|| 'is not a parent or sibling of node:'||(i-1)||' and its parent bo:'||l_node_tbl(i).PARENT_BO_CODE,
971: p_prefix=>l_debug_prefix,
972: p_msg_level=>fnd_log.level_procedure);
973: hz_utility_v2pub.debug(
974: p_message=>'number of right paranthesis collected so far:'||l_rpc,
975: p_prefix=>l_debug_prefix,
976: p_msg_level=>fnd_log.level_procedure);

Line 976: p_msg_level=>fnd_log.level_procedure);

972: p_msg_level=>fnd_log.level_procedure);
973: hz_utility_v2pub.debug(
974: p_message=>'number of right paranthesis collected so far:'||l_rpc,
975: p_prefix=>l_debug_prefix,
976: p_msg_level=>fnd_log.level_procedure);
977: END IF;
978: -- now, start writing the stored right paranthesis to the buffer.
979: l_gpvar := NULL; -- temporarily stores grand-parent of the prev rec
980: l_rp_ct := l_rpc;

Line 2355: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2351: */
2352: END CASE; -- end of CASE for figuring out the entity name to get right SQL
2353: END LOOP; -- end of looping through hierarchy of collection.
2354:
2355: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2356: hz_utility_v2pub.debug(
2357: p_message=>'all the sql segments were identified',
2358: p_prefix=>l_debug_prefix,
2359: p_msg_level=>fnd_log.level_procedure);

Line 2359: p_msg_level=>fnd_log.level_procedure);

2355: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2356: hz_utility_v2pub.debug(
2357: p_message=>'all the sql segments were identified',
2358: p_prefix=>l_debug_prefix,
2359: p_msg_level=>fnd_log.level_procedure);
2360: END IF;
2361: -- writing one right paranthesis for the last SQL.
2362: -- this is because, each sql has left paranthesis as part of its global var
2363: l2i(l_rp||' --for last sql segment');

Line 2394: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2390: -- this is needed as so far, only cursor sql statement is generated.
2391: l2i('; -- cursor for '||P_SQL_FOR||' SQL');
2392:
2393: COMMIT;
2394: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2395: hz_utility_v2pub.debug(p_message=>'GENBOSQL()-',
2396: p_prefix=>l_debug_prefix,
2397: p_msg_level=>fnd_log.level_procedure);
2398: END IF;

Line 2397: p_msg_level=>fnd_log.level_procedure);

2393: COMMIT;
2394: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2395: hz_utility_v2pub.debug(p_message=>'GENBOSQL()-',
2396: p_prefix=>l_debug_prefix,
2397: p_msg_level=>fnd_log.level_procedure);
2398: END IF;
2399: P_STATUS := TRUE; -- this means sql generation is successfull
2400: /*
2401: EXCEPTION

Line 2403: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2399: P_STATUS := TRUE; -- this means sql generation is successfull
2400: /*
2401: EXCEPTION
2402: WHEN others THEN
2403: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2404: hz_utility_v2pub.debug(
2405: p_message=>'in excp block of genBOSQL()'||SQLERRM,
2406: p_prefix=>l_debug_prefix,
2407: p_msg_level=>fnd_log.level_procedure);

Line 2407: p_msg_level=>fnd_log.level_procedure);

2403: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2404: hz_utility_v2pub.debug(
2405: p_message=>'in excp block of genBOSQL()'||SQLERRM,
2406: p_prefix=>l_debug_prefix,
2407: p_msg_level=>fnd_log.level_procedure);
2408: END IF;
2409: P_STATUS := FALSE;
2410: */
2411: END; -- genBOSQL()

Line 2433: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

2429: l_sql_for VARCHAR2(30) := 'COMPLETE';
2430: l_param_name VARCHAR2(30) := 'P_BO_CODE';
2431:
2432: BEGIN
2433: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
2434: hz_utility_v2pub.debug(p_message=>'genCompletenessProc ()+',
2435: p_prefix=>l_prefix,
2436: p_msg_level=>fnd_log.level_procedure);
2437: end if;

Line 2436: p_msg_level=>fnd_log.level_procedure);

2432: BEGIN
2433: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
2434: hz_utility_v2pub.debug(p_message=>'genCompletenessProc ()+',
2435: p_prefix=>l_prefix,
2436: p_msg_level=>fnd_log.level_procedure);
2437: end if;
2438: /*
2439: This procedure will take P_BO_CODE as a parameter.
2440: For each BO, a separate delete statement must be generated.

Line 2508: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2504: writeDebugMesg(l_msg, l_gen_prefix);
2505: li('END IF; -- end of check for '||G_PER_BO_CODE);
2506: ELSE
2507: l_msg := 'Unable to generate the completeness() del stmt for PERSON BO';
2508: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2509: hz_utility_v2pub.debug(
2510: p_message=>l_msg,
2511: p_prefix=>l_prefix,
2512: p_msg_level=>fnd_log.level_procedure);

Line 2512: p_msg_level=>fnd_log.level_procedure);

2508: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2509: hz_utility_v2pub.debug(
2510: p_message=>l_msg,
2511: p_prefix=>l_prefix,
2512: p_msg_level=>fnd_log.level_procedure);
2513: END IF;
2514: -- raise to calling program, in this case BOD API
2515: l_msg := 'error generating completeness del stmt for '||G_PER_BO_CODE||' BO';
2516: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2537: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2533: writeDebugMesg(l_msg, l_gen_prefix);
2534: li('END IF; -- end of check for '||G_ORG_BO_CODE);
2535: ELSE
2536: l_msg := 'Unable to generate the completeness() del stmt for '||G_ORG_BO_CODE||' BO';
2537: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2538: hz_utility_v2pub.debug(
2539: p_message=>l_msg,
2540: p_prefix=>l_prefix,
2541: p_msg_level=>fnd_log.level_procedure);

Line 2541: p_msg_level=>fnd_log.level_procedure);

2537: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2538: hz_utility_v2pub.debug(
2539: p_message=>l_msg,
2540: p_prefix=>l_prefix,
2541: p_msg_level=>fnd_log.level_procedure);
2542: END IF;
2543: -- raise to calling program, in this case BOD API
2544: l_msg := 'error generating completeness del stmt for '||G_ORG_BO_CODE||' ';
2545: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2566: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2562: writeDebugMesg(l_msg, l_gen_prefix);
2563: li('END IF; -- end of check for '||G_PER_CUST_BO_CODE);
2564: ELSE
2565: l_msg := 'Unable to generate the completeness() del stmt for '||G_PER_CUST_BO_CODE||' BO';
2566: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2567: hz_utility_v2pub.debug(
2568: p_message=>l_msg,
2569: p_prefix=>l_prefix,
2570: p_msg_level=>fnd_log.level_procedure);

Line 2570: p_msg_level=>fnd_log.level_procedure);

2566: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2567: hz_utility_v2pub.debug(
2568: p_message=>l_msg,
2569: p_prefix=>l_prefix,
2570: p_msg_level=>fnd_log.level_procedure);
2571: END IF;
2572: -- raise to calling program, in this case BOD API
2573: l_msg := 'error generating completeness del stmt for '||G_PER_CUST_BO_CODE||' ';
2574: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2595: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2591: writeDebugMesg(l_msg, l_gen_prefix);
2592: li('END IF; -- end of check for '||G_PER_CUST_BO_CODE);
2593: ELSE
2594: l_msg := 'Unable to generate the completeness() del stmt for '||G_ORG_CUST_BO_CODE||' BO';
2595: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2596: hz_utility_v2pub.debug(
2597: p_message=>l_msg,
2598: p_prefix=>l_prefix,
2599: p_msg_level=>fnd_log.level_procedure);

Line 2599: p_msg_level=>fnd_log.level_procedure);

2595: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2596: hz_utility_v2pub.debug(
2597: p_message=>l_msg,
2598: p_prefix=>l_prefix,
2599: p_msg_level=>fnd_log.level_procedure);
2600: END IF;
2601: -- raise to calling program, in this case BOD API
2602: l_msg := 'error generating completeness del stmt for '||G_ORG_CUST_BO_CODE||' ';
2603: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2614: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2610: l_msg := l_procName||'()-';
2611: writeDebugMesg(l_msg, l_gen_prefix);
2612:
2613: procEnd(l_procName);
2614: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2615: hz_utility_v2pub.DEBUG (
2616: p_message=>'genCompletenessProc()-',
2617: p_prefix=>l_prefix,
2618: p_msg_level=>fnd_log.level_procedure);

Line 2618: p_msg_level=>fnd_log.level_procedure);

2614: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2615: hz_utility_v2pub.DEBUG (
2616: p_message=>'genCompletenessProc()-',
2617: p_prefix=>l_prefix,
2618: p_msg_level=>fnd_log.level_procedure);
2619: END IF;
2620: END genCompletenessProc;
2621:
2622: ----------------------------------------------------------------------------

Line 2642: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2638: l_sql_for VARCHAR2(30) := 'EVENT';
2639: l_param_name VARCHAR2(30) := 'P_BO_CODE';
2640:
2641: BEGIN
2642: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2643: hz_utility_v2pub.debug(p_message=>'genEvtTypeProc()+',
2644: p_prefix=>l_prefix,
2645: p_msg_level=>fnd_log.level_procedure);
2646: END IF;

Line 2645: p_msg_level=>fnd_log.level_procedure);

2641: BEGIN
2642: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2643: hz_utility_v2pub.debug(p_message=>'genEvtTypeProc()+',
2644: p_prefix=>l_prefix,
2645: p_msg_level=>fnd_log.level_procedure);
2646: END IF;
2647:
2648: /*
2649: This procedure will generate BO_EVT_CHECK() procedure in HZ_BES_BO_SITE_UTIL_PKG

Line 2708: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2704: writeDebugMesg(l_msg, l_gen_prefix);
2705: li('END IF; -- end of check for '||G_PER_BO_CODE);
2706: ELSE
2707: l_msg := 'Unable to generate the evt type upd stmt for PERSON BO';
2708: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2709: hz_utility_v2pub.debug(
2710: p_message=>l_msg,
2711: p_prefix=>l_prefix,
2712: p_msg_level=>fnd_log.level_procedure);

Line 2712: p_msg_level=>fnd_log.level_procedure);

2708: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2709: hz_utility_v2pub.debug(
2710: p_message=>l_msg,
2711: p_prefix=>l_prefix,
2712: p_msg_level=>fnd_log.level_procedure);
2713: END IF;
2714: -- raise to calling program, in this case BOD API
2715: l_msg := 'error generating evt type upd stmt for '||G_PER_BO_CODE||' BO';
2716: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2735: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2731: writeDebugMesg(l_msg, l_gen_prefix);
2732: li('END IF; -- end of check for '||G_ORG_BO_CODE);
2733: ELSE
2734: l_msg := 'Unable to generate the evt type upd stmt for Org BO';
2735: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2736: hz_utility_v2pub.debug(
2737: p_message=>l_msg,
2738: p_prefix=>l_prefix,
2739: p_msg_level=>fnd_log.level_procedure);

Line 2739: p_msg_level=>fnd_log.level_procedure);

2735: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2736: hz_utility_v2pub.debug(
2737: p_message=>l_msg,
2738: p_prefix=>l_prefix,
2739: p_msg_level=>fnd_log.level_procedure);
2740: END IF;
2741: -- raise to calling program, in this case BOD API
2742: l_msg := 'error generating evt type upd stmt for '||G_ORG_BO_CODE||' BO';
2743: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2760: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2756: writeDebugMesg(l_msg, l_gen_prefix);
2757: li('END IF; -- end of check for '||G_PER_CUST_BO_CODE);
2758: ELSE
2759: l_msg := 'Unable to generate the evt type upd stmt for Person Customer BO';
2760: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2761: hz_utility_v2pub.debug(
2762: p_message=>l_msg,
2763: p_prefix=>l_prefix,
2764: p_msg_level=>fnd_log.level_procedure);

Line 2764: p_msg_level=>fnd_log.level_procedure);

2760: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2761: hz_utility_v2pub.debug(
2762: p_message=>l_msg,
2763: p_prefix=>l_prefix,
2764: p_msg_level=>fnd_log.level_procedure);
2765: END IF;
2766: -- raise to calling program, in this case BOD API
2767: l_msg := 'error generating evt type upd stmt for '||G_PER_CUST_BO_CODE||' BO';
2768: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2785: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2781: writeDebugMesg(l_msg, l_gen_prefix);
2782: li('END IF; -- end of check for '||G_ORG_CUST_BO_CODE);
2783: ELSE
2784: l_msg := 'Unable to generate the evt type upd stmt for Person Customer BO';
2785: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2786: hz_utility_v2pub.debug(
2787: p_message=>l_msg,
2788: p_prefix=>l_prefix,
2789: p_msg_level=>fnd_log.level_procedure);

Line 2789: p_msg_level=>fnd_log.level_procedure);

2785: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2786: hz_utility_v2pub.debug(
2787: p_message=>l_msg,
2788: p_prefix=>l_prefix,
2789: p_msg_level=>fnd_log.level_procedure);
2790: END IF;
2791: -- raise to calling program, in this case BOD API
2792: l_msg := 'error generating evt type upd stmt for '||G_ORG_CUST_BO_CODE||' BO';
2793: writeDebugMesg(l_msg||sqlerrm, l_gen_prefix);

Line 2803: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN

2799: l_msg := l_procName||'()-';
2800: writeDebugMesg(l_msg, l_gen_prefix);
2801:
2802: procEnd(l_procName);
2803: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2804: hz_utility_v2pub.DEBUG (
2805: p_message=>'genEvtTypeProc()-',
2806: p_prefix=>l_prefix,
2807: p_msg_level=>fnd_log.level_procedure);

Line 2807: p_msg_level=>fnd_log.level_procedure);

2803: IF fnd_log.level_procedure>=fnd_log.g_current_runtime_level THEN
2804: hz_utility_v2pub.DEBUG (
2805: p_message=>'genEvtTypeProc()-',
2806: p_prefix=>l_prefix,
2807: p_msg_level=>fnd_log.level_procedure);
2808: END IF;
2809: END genEvtTypeProc;
2810:
2811:

Line 2827: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

2823: IS
2824: l_debug_prefix VARCHAR2(15) := 'GENPKG:';
2825: l_pkg_name VARCHAR2(30) := 'HZ_BES_BO_SITE_UTIL_PKG';
2826: BEGIN -- gen_pkg_body
2827: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
2828: hz_utility_v2pub.debug(p_message=>'gen_pkg_body()+',
2829: p_prefix=>l_debug_prefix,
2830: p_msg_level=>fnd_log.level_procedure);
2831: end if;

Line 2830: p_msg_level=>fnd_log.level_procedure);

2826: BEGIN -- gen_pkg_body
2827: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
2828: hz_utility_v2pub.debug(p_message=>'gen_pkg_body()+',
2829: p_prefix=>l_debug_prefix,
2830: p_msg_level=>fnd_log.level_procedure);
2831: end if;
2832:
2833: /*
2834: Flow:

Line 2848: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then

2844: genPkgBdyTail(l_pkg_name);
2845:
2846: COMMIT;
2847: P_STATUS := TRUE; -- assigning the return status to success
2848: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
2849: hz_utility_v2pub.debug(p_message=>'gen_pkg_body()-',
2850: p_prefix=>l_debug_prefix,
2851: p_msg_level=>fnd_log.level_procedure);
2852: END IF;

Line 2851: p_msg_level=>fnd_log.level_procedure);

2847: P_STATUS := TRUE; -- assigning the return status to success
2848: if fnd_log.level_procedure>=fnd_log.g_current_runtime_level then
2849: hz_utility_v2pub.debug(p_message=>'gen_pkg_body()-',
2850: p_prefix=>l_debug_prefix,
2851: p_msg_level=>fnd_log.level_procedure);
2852: END IF;
2853:
2854: END ; -- gen_pkg_body()
2855: ------------------------------------------------------------------------------