400: l_chunk_size NUMBER;
401: l_clob_size NUMBER;
402:
403:
404: context DBMS_XMLGEN.ctxHandle;
405: l_x_res_txn_tbl AHL_PRD_RESOURCE_TRANX_PVT.PRD_RESOURCE_TXNS_TBL;
406:
407: BEGIN
408: --set the operating unit.
499: THEN
500: l_user_role := AHL_PRD_WO_LOGIN_PVT.Get_User_Role;
501: END IF;
502:
503: -- XML generated with dbms_xmlgen doesnt have encoding information. so we need to manually insert into the resultant CLOB.
504: dbms_lob.write(l_merged_lob,length(''),1,'');
505:
506: --Put the root node to maintain the XML completeness.
507: dbms_lob.write(l_merged_lob, length('
562:
563: dbms_lob.write(
564: l_merged_lob,
565: length('
566: length(l_merged_lob)+1, '
568:
569: dbms_lob.write(
570: l_merged_lob,
620: );
621: END IF;
622:
623:
624: context := dbms_xmlgen.newContext(l_wo_con_query || p_workorders_tbl(wo_count));
625: dbms_xmlgen.setRowsetTag(context,null);
626: dbms_xmlgen.setRowTag(context,'G_WORKORDER');
627: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
628: l_wo_details_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
621: END IF;
622:
623:
624: context := dbms_xmlgen.newContext(l_wo_con_query || p_workorders_tbl(wo_count));
625: dbms_xmlgen.setRowsetTag(context,null);
626: dbms_xmlgen.setRowTag(context,'G_WORKORDER');
627: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
628: l_wo_details_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
629: dbms_xmlgen.closeContext(context);
622:
623:
624: context := dbms_xmlgen.newContext(l_wo_con_query || p_workorders_tbl(wo_count));
625: dbms_xmlgen.setRowsetTag(context,null);
626: dbms_xmlgen.setRowTag(context,'G_WORKORDER');
627: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
628: l_wo_details_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
629: dbms_xmlgen.closeContext(context);
630:
623:
624: context := dbms_xmlgen.newContext(l_wo_con_query || p_workorders_tbl(wo_count));
625: dbms_xmlgen.setRowsetTag(context,null);
626: dbms_xmlgen.setRowTag(context,'G_WORKORDER');
627: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
628: l_wo_details_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
629: dbms_xmlgen.closeContext(context);
630:
631: -- free the temp variable for query after every iteration.
624: context := dbms_xmlgen.newContext(l_wo_con_query || p_workorders_tbl(wo_count));
625: dbms_xmlgen.setRowsetTag(context,null);
626: dbms_xmlgen.setRowTag(context,'G_WORKORDER');
627: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
628: l_wo_details_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
629: dbms_xmlgen.closeContext(context);
630:
631: -- free the temp variable for query after every iteration.
632: l_wo_con_query := null;
625: dbms_xmlgen.setRowsetTag(context,null);
626: dbms_xmlgen.setRowTag(context,'G_WORKORDER');
627: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
628: l_wo_details_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
629: dbms_xmlgen.closeContext(context);
630:
631: -- free the temp variable for query after every iteration.
632: l_wo_con_query := null;
633:
669: p_collection_id => l_collection_id,
670: x_query_string => l_query_string
671: );
672:
673: context := dbms_xmlgen.newContext(l_query_string);
674: dbms_xmlgen.setRowsetTag(context,'G_WO_QA_LIST');
675: dbms_xmlgen.setRowTag(context,'G_WO_QA');
676: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
677: l_wo_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
670: x_query_string => l_query_string
671: );
672:
673: context := dbms_xmlgen.newContext(l_query_string);
674: dbms_xmlgen.setRowsetTag(context,'G_WO_QA_LIST');
675: dbms_xmlgen.setRowTag(context,'G_WO_QA');
676: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
677: l_wo_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
678: dbms_xmlgen.closeContext(context);
671: );
672:
673: context := dbms_xmlgen.newContext(l_query_string);
674: dbms_xmlgen.setRowsetTag(context,'G_WO_QA_LIST');
675: dbms_xmlgen.setRowTag(context,'G_WO_QA');
676: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
677: l_wo_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
678: dbms_xmlgen.closeContext(context);
679:
672:
673: context := dbms_xmlgen.newContext(l_query_string);
674: dbms_xmlgen.setRowsetTag(context,'G_WO_QA_LIST');
675: dbms_xmlgen.setRowTag(context,'G_WO_QA');
676: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
677: l_wo_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
678: dbms_xmlgen.closeContext(context);
679:
680: -- Write to lob only when some data exists.
673: context := dbms_xmlgen.newContext(l_query_string);
674: dbms_xmlgen.setRowsetTag(context,'G_WO_QA_LIST');
675: dbms_xmlgen.setRowTag(context,'G_WO_QA');
676: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
677: l_wo_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
678: dbms_xmlgen.closeContext(context);
679:
680: -- Write to lob only when some data exists.
681: IF dbms_lob.getlength(l_wo_qa_lob) > 0
674: dbms_xmlgen.setRowsetTag(context,'G_WO_QA_LIST');
675: dbms_xmlgen.setRowTag(context,'G_WO_QA');
676: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
677: l_wo_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
678: dbms_xmlgen.closeContext(context);
679:
680: -- Write to lob only when some data exists.
681: IF dbms_lob.getlength(l_wo_qa_lob) > 0
682: THEN
741: p_collection_id => l_collection_id,
742: x_query_string => l_query_string
743: );
744:
745: context := dbms_xmlgen.newContext(l_query_string);
746: -- Top tag need to be present.
747: dbms_xmlgen.setRowsetTag(context,'G_DUMMY_TOP_OP_QA');
748: dbms_xmlgen.setRowTag(context,'G_WO_OP_QA');
749: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
743: );
744:
745: context := dbms_xmlgen.newContext(l_query_string);
746: -- Top tag need to be present.
747: dbms_xmlgen.setRowsetTag(context,'G_DUMMY_TOP_OP_QA');
748: dbms_xmlgen.setRowTag(context,'G_WO_OP_QA');
749: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
750: l_op_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
751: dbms_xmlgen.closeContext(context);
744:
745: context := dbms_xmlgen.newContext(l_query_string);
746: -- Top tag need to be present.
747: dbms_xmlgen.setRowsetTag(context,'G_DUMMY_TOP_OP_QA');
748: dbms_xmlgen.setRowTag(context,'G_WO_OP_QA');
749: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
750: l_op_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
751: dbms_xmlgen.closeContext(context);
752:
745: context := dbms_xmlgen.newContext(l_query_string);
746: -- Top tag need to be present.
747: dbms_xmlgen.setRowsetTag(context,'G_DUMMY_TOP_OP_QA');
748: dbms_xmlgen.setRowTag(context,'G_WO_OP_QA');
749: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
750: l_op_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
751: dbms_xmlgen.closeContext(context);
752:
753: -- Write to lob only when some data exists.
746: -- Top tag need to be present.
747: dbms_xmlgen.setRowsetTag(context,'G_DUMMY_TOP_OP_QA');
748: dbms_xmlgen.setRowTag(context,'G_WO_OP_QA');
749: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
750: l_op_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
751: dbms_xmlgen.closeContext(context);
752:
753: -- Write to lob only when some data exists.
754: IF dbms_lob.getlength(l_op_qa_lob) > 0
747: dbms_xmlgen.setRowsetTag(context,'G_DUMMY_TOP_OP_QA');
748: dbms_xmlgen.setRowTag(context,'G_WO_OP_QA');
749: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
750: l_op_qa_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
751: dbms_xmlgen.closeContext(context);
752:
753: -- Write to lob only when some data exists.
754: IF dbms_lob.getlength(l_op_qa_lob) > 0
755: THEN
791: /********************************************************************
792: * Create XML data related to turnover notes
793: ********************************************************************/
794:
795: context := dbms_xmlgen.newContext(l_to_notes || p_workorders_tbl(wo_count));
796: dbms_xmlgen.setRowsetTag(context, 'G_TO_NOTES_LIST');-- turn this off if not required
797: dbms_xmlgen.setRowTag(context,'G_TO_NOTES');
798: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
799: l_ton_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
792: * Create XML data related to turnover notes
793: ********************************************************************/
794:
795: context := dbms_xmlgen.newContext(l_to_notes || p_workorders_tbl(wo_count));
796: dbms_xmlgen.setRowsetTag(context, 'G_TO_NOTES_LIST');-- turn this off if not required
797: dbms_xmlgen.setRowTag(context,'G_TO_NOTES');
798: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
799: l_ton_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
800: dbms_xmlgen.closeContext(context);
793: ********************************************************************/
794:
795: context := dbms_xmlgen.newContext(l_to_notes || p_workorders_tbl(wo_count));
796: dbms_xmlgen.setRowsetTag(context, 'G_TO_NOTES_LIST');-- turn this off if not required
797: dbms_xmlgen.setRowTag(context,'G_TO_NOTES');
798: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
799: l_ton_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
800: dbms_xmlgen.closeContext(context);
801:
794:
795: context := dbms_xmlgen.newContext(l_to_notes || p_workorders_tbl(wo_count));
796: dbms_xmlgen.setRowsetTag(context, 'G_TO_NOTES_LIST');-- turn this off if not required
797: dbms_xmlgen.setRowTag(context,'G_TO_NOTES');
798: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
799: l_ton_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
800: dbms_xmlgen.closeContext(context);
801:
802: -- Write to lob only when some data exists.
795: context := dbms_xmlgen.newContext(l_to_notes || p_workorders_tbl(wo_count));
796: dbms_xmlgen.setRowsetTag(context, 'G_TO_NOTES_LIST');-- turn this off if not required
797: dbms_xmlgen.setRowTag(context,'G_TO_NOTES');
798: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
799: l_ton_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
800: dbms_xmlgen.closeContext(context);
801:
802: -- Write to lob only when some data exists.
803: IF dbms_lob.getlength(l_ton_lob) > 0
796: dbms_xmlgen.setRowsetTag(context, 'G_TO_NOTES_LIST');-- turn this off if not required
797: dbms_xmlgen.setRowTag(context,'G_TO_NOTES');
798: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
799: l_ton_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
800: dbms_xmlgen.closeContext(context);
801:
802: -- Write to lob only when some data exists.
803: IF dbms_lob.getlength(l_ton_lob) > 0
804: THEN
854: 'operation details query string --->'||l_op_con_query
855: );
856: END IF;
857:
858: context := dbms_xmlgen.newContext(l_op_con_query);
859:
860: dbms_xmlgen.setRowsetTag(context,null);-- turn this off if not required
861: dbms_xmlgen.setRowTag(context,'G_OP_REC');
862: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
856: END IF;
857:
858: context := dbms_xmlgen.newContext(l_op_con_query);
859:
860: dbms_xmlgen.setRowsetTag(context,null);-- turn this off if not required
861: dbms_xmlgen.setRowTag(context,'G_OP_REC');
862: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
863: l_op_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
864: dbms_xmlgen.closeContext(context);
857:
858: context := dbms_xmlgen.newContext(l_op_con_query);
859:
860: dbms_xmlgen.setRowsetTag(context,null);-- turn this off if not required
861: dbms_xmlgen.setRowTag(context,'G_OP_REC');
862: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
863: l_op_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
864: dbms_xmlgen.closeContext(context);
865:
858: context := dbms_xmlgen.newContext(l_op_con_query);
859:
860: dbms_xmlgen.setRowsetTag(context,null);-- turn this off if not required
861: dbms_xmlgen.setRowTag(context,'G_OP_REC');
862: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
863: l_op_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
864: dbms_xmlgen.closeContext(context);
865:
866: -- Free temp variable once the query is executed for next iteration.
859:
860: dbms_xmlgen.setRowsetTag(context,null);-- turn this off if not required
861: dbms_xmlgen.setRowTag(context,'G_OP_REC');
862: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
863: l_op_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
864: dbms_xmlgen.closeContext(context);
865:
866: -- Free temp variable once the query is executed for next iteration.
867: l_op_con_query := null;
860: dbms_xmlgen.setRowsetTag(context,null);-- turn this off if not required
861: dbms_xmlgen.setRowTag(context,'G_OP_REC');
862: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
863: l_op_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
864: dbms_xmlgen.closeContext(context);
865:
866: -- Free temp variable once the query is executed for next iteration.
867: l_op_con_query := null;
868:
910: FOR j IN l_x_res_txn_tbl.FIRST .. l_x_res_txn_tbl.LAST LOOP
911:
912: l_dummy_string := '
913: l_dummy_string := l_dummy_string ||'
914: l_dummy_string := l_dummy_string || '
915: l_dummy_string := l_dummy_string || '
916: l_dummy_string := l_dummy_string || '
917: dbms_lob.write(l_merged_lob, length(l_dummy_string),length(l_merged_lob)+1, l_dummy_string);
918: END LOOP;
911:
912: l_dummy_string := '
913: l_dummy_string := l_dummy_string ||'
914: l_dummy_string := l_dummy_string || '
915: l_dummy_string := l_dummy_string || '
916: l_dummy_string := l_dummy_string || '
917: dbms_lob.write(l_merged_lob, length(l_dummy_string),length(l_merged_lob)+1, l_dummy_string);
918: END LOOP;
919:
912: l_dummy_string := '
913: l_dummy_string := l_dummy_string ||'
914: l_dummy_string := l_dummy_string || '
915: l_dummy_string := l_dummy_string || '
916: l_dummy_string := l_dummy_string || '
917: dbms_lob.write(l_merged_lob, length(l_dummy_string),length(l_merged_lob)+1, l_dummy_string);
918: END LOOP;
919:
920: --Insert the end tag for current resource transaction.
938: * Create XML data for material requirements of a workorder
939: ********************************************************************/
940:
941: -- Query and process workorder materials
942: context := dbms_xmlgen.newContext(l_wo_materials || p_workorders_tbl(wo_count));
943: dbms_xmlgen.setRowsetTag(context, 'G_WO_MAT_LIST');
944: dbms_xmlgen.setRowTag(context,'G_WO_MAT');
945: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
946: l_wo_mat_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
939: ********************************************************************/
940:
941: -- Query and process workorder materials
942: context := dbms_xmlgen.newContext(l_wo_materials || p_workorders_tbl(wo_count));
943: dbms_xmlgen.setRowsetTag(context, 'G_WO_MAT_LIST');
944: dbms_xmlgen.setRowTag(context,'G_WO_MAT');
945: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
946: l_wo_mat_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
947: dbms_xmlgen.closeContext(context);
940:
941: -- Query and process workorder materials
942: context := dbms_xmlgen.newContext(l_wo_materials || p_workorders_tbl(wo_count));
943: dbms_xmlgen.setRowsetTag(context, 'G_WO_MAT_LIST');
944: dbms_xmlgen.setRowTag(context,'G_WO_MAT');
945: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
946: l_wo_mat_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
947: dbms_xmlgen.closeContext(context);
948:
941: -- Query and process workorder materials
942: context := dbms_xmlgen.newContext(l_wo_materials || p_workorders_tbl(wo_count));
943: dbms_xmlgen.setRowsetTag(context, 'G_WO_MAT_LIST');
944: dbms_xmlgen.setRowTag(context,'G_WO_MAT');
945: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
946: l_wo_mat_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
947: dbms_xmlgen.closeContext(context);
948:
949: -- Write to lob only when some data exists.
942: context := dbms_xmlgen.newContext(l_wo_materials || p_workorders_tbl(wo_count));
943: dbms_xmlgen.setRowsetTag(context, 'G_WO_MAT_LIST');
944: dbms_xmlgen.setRowTag(context,'G_WO_MAT');
945: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
946: l_wo_mat_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
947: dbms_xmlgen.closeContext(context);
948:
949: -- Write to lob only when some data exists.
950: IF dbms_lob.getlength(l_wo_mat_lob) > 0
943: dbms_xmlgen.setRowsetTag(context, 'G_WO_MAT_LIST');
944: dbms_xmlgen.setRowTag(context,'G_WO_MAT');
945: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
946: l_wo_mat_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
947: dbms_xmlgen.closeContext(context);
948:
949: -- Write to lob only when some data exists.
950: IF dbms_lob.getlength(l_wo_mat_lob) > 0
951: THEN
971: * Create XML data for Document associations to a workorder
972: ********************************************************************/
973:
974: -- Query and process workorder materials
975: context := dbms_xmlgen.newContext(
976: l_route_doc || p_workorders_tbl(wo_count) || ' '||
977: l_op_doc || p_workorders_tbl(wo_count) || ' '||
978: l_mr_doc || p_workorders_tbl(wo_count) || ' '||
979: l_mc_doc || p_workorders_tbl(wo_count) || ' '
978: l_mr_doc || p_workorders_tbl(wo_count) || ' '||
979: l_mc_doc || p_workorders_tbl(wo_count) || ' '
980: --||l_pc_doc || p_workorders_tbl(wo_count)
981: );
982: dbms_xmlgen.setRowsetTag(context,'G_WO_DOC_LIST');
983: dbms_xmlgen.setRowTag(context,'G_WO_DOC');
984: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
985: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
986: dbms_xmlgen.closeContext(context);
979: l_mc_doc || p_workorders_tbl(wo_count) || ' '
980: --||l_pc_doc || p_workorders_tbl(wo_count)
981: );
982: dbms_xmlgen.setRowsetTag(context,'G_WO_DOC_LIST');
983: dbms_xmlgen.setRowTag(context,'G_WO_DOC');
984: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
985: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
986: dbms_xmlgen.closeContext(context);
987:
980: --||l_pc_doc || p_workorders_tbl(wo_count)
981: );
982: dbms_xmlgen.setRowsetTag(context,'G_WO_DOC_LIST');
983: dbms_xmlgen.setRowTag(context,'G_WO_DOC');
984: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
985: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
986: dbms_xmlgen.closeContext(context);
987:
988: -- Write to lob only when some data exists.
981: );
982: dbms_xmlgen.setRowsetTag(context,'G_WO_DOC_LIST');
983: dbms_xmlgen.setRowTag(context,'G_WO_DOC');
984: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
985: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
986: dbms_xmlgen.closeContext(context);
987:
988: -- Write to lob only when some data exists.
989: IF dbms_lob.getlength(l_wo_doc_lob) > 0
982: dbms_xmlgen.setRowsetTag(context,'G_WO_DOC_LIST');
983: dbms_xmlgen.setRowTag(context,'G_WO_DOC');
984: dbms_xmlgen.setConvertSpecialChars ( context, TRUE);
985: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
986: dbms_xmlgen.closeContext(context);
987:
988: -- Write to lob only when some data exists.
989: IF dbms_lob.getlength(l_wo_doc_lob) > 0
990: THEN
1912: x_file_name OUT NOCOPY VARCHAR2
1913: --l_merged_lob OUT NOCOPY CLOB -- for testing purpose only ,not required
1914: )
1915: AS
1916: context DBMS_XMLGEN.ctxHandle;
1917:
1918: dummy VARCHAR2 (2500);
1919:
1920: --TYPE workorder_id_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
3150: dbms_lob.write(l_merged_lob, length('
3151: dbms_lob.write(l_merged_lob, length(fnd_global.user_id),length(l_merged_lob)+1, fnd_global.user_id);
3152: dbms_lob.write(l_merged_lob, length('
3153: dbms_lob.write(l_merged_lob, length('
3154: dummy := DBMS_XMLGEN.CONVERT(fnd_global.user_name);
3155: dbms_lob.write(l_merged_lob, length(dummy),length(l_merged_lob)+1, dummy);
3156: dbms_lob.write(l_merged_lob, length('
3157: dbms_lob.write(l_merged_lob, length('
3158: dbms_lob.write(l_merged_lob, length(TO_CHAR(sysdate,'YYYY-MM-DD')||'T'||TO_CHAR(sysdate, 'hh24:mi:ss')),length(l_merged_lob)+1, TO_CHAR(sysdate,'YYYY-MM-DD')||'T'||TO_CHAR(sysdate, 'hh24:mi:ss'));
3170: --added new
3171: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
3172:
3173: /** VisitDetails ===== VisitDetailsType **/
3174: context := dbms_xmlgen.newContext(l_visit_details);
3175: DBMS_XMLGEN.setbindvalue (context, '1', l_visit_id);
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3171: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
3172:
3173: /** VisitDetails ===== VisitDetailsType **/
3174: context := dbms_xmlgen.newContext(l_visit_details);
3175: DBMS_XMLGEN.setbindvalue (context, '1', l_visit_id);
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3172:
3173: /** VisitDetails ===== VisitDetailsType **/
3174: context := dbms_xmlgen.newContext(l_visit_details);
3175: DBMS_XMLGEN.setbindvalue (context, '1', l_visit_id);
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3180: l_visit_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3173: /** VisitDetails ===== VisitDetailsType **/
3174: context := dbms_xmlgen.newContext(l_visit_details);
3175: DBMS_XMLGEN.setbindvalue (context, '1', l_visit_id);
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3180: l_visit_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3181: dbms_xmlgen.closeContext(context);
3174: context := dbms_xmlgen.newContext(l_visit_details);
3175: DBMS_XMLGEN.setbindvalue (context, '1', l_visit_id);
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3180: l_visit_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3181: dbms_xmlgen.closeContext(context);
3182: -- Write to lob only when some data exists.
3175: DBMS_XMLGEN.setbindvalue (context, '1', l_visit_id);
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3180: l_visit_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3181: dbms_xmlgen.closeContext(context);
3182: -- Write to lob only when some data exists.
3183: IF dbms_lob.getlength(l_visit_det_lob) > 0
3176: dbms_xmlgen.setRowsetTag(context, 'VisitDetails');
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3180: l_visit_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3181: dbms_xmlgen.closeContext(context);
3182: -- Write to lob only when some data exists.
3183: IF dbms_lob.getlength(l_visit_det_lob) > 0
3184: THEN
3177: dbms_xmlgen.setRowTag(context,null);
3178: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3179: DBMS_XMLGEN.setNullHandling(context, 2);
3180: l_visit_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3181: dbms_xmlgen.closeContext(context);
3182: -- Write to lob only when some data exists.
3183: IF dbms_lob.getlength(l_visit_det_lob) > 0
3184: THEN
3185: l_offset := dbms_lob.INSTR(l_visit_det_lob, '>');
3268: dbms_lob.write(l_merged_lob, LENGTH(l_ue_id),LENGTH(l_merged_lob)+1, l_ue_id);
3269: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
3270: /** to be added: new release date **/
3271: dbms_lob.write(l_merged_lob, LENGTH('
3273: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3274: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
3275: IF (get_mr_details_rec.description IS NOT NULL) THEN
3276: dbms_lob.write(l_merged_lob, LENGTH('
3277: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.Description);
3278: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3279: dbms_lob.write(l_merged_lob, LENGTH('
3280: ELSE
3281: dbms_lob.write(l_merged_lob, LENGTH('
3281: dbms_lob.write(l_merged_lob, LENGTH('
3282: END IF;
3283:
3284: dbms_lob.write(l_merged_lob, length('
3285: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.Version);
3286: dbms_lob.write(l_merged_lob, length(dummy),length(l_merged_lob)+1, dummy);
3287: dbms_lob.write(l_merged_lob, length('
3288:
3289: dbms_lob.write(l_merged_lob, LENGTH('
3286: dbms_lob.write(l_merged_lob, length(dummy),length(l_merged_lob)+1, dummy);
3287: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
3288:
3289: dbms_lob.write(l_merged_lob, LENGTH('
3290: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.LAST_UPDATE_DATE);
3291: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3292: dbms_lob.write(l_merged_lob, LENGTH('
3293:
3294:
3292: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
3293:
3294:
3295: dbms_lob.write(l_merged_lob, length('
3296: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.ProgramType);
3297: dbms_lob.write(l_merged_lob, length(dummy),length(l_merged_lob)+1, dummy);
3298: dbms_lob.write(l_merged_lob, length('
3299:
3300: IF (get_mr_details_rec.ProgramSubType IS NOT NULL) THEN
3298: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
3299:
3300: IF (get_mr_details_rec.ProgramSubType IS NOT NULL) THEN
3301: dbms_lob.write(l_merged_lob, LENGTH('
3302: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.ProgramSubType);
3303: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3304: dbms_lob.write(l_merged_lob, LENGTH('
3305: ELSE
3306: dbms_lob.write(l_merged_lob, LENGTH('
3313: dbms_lob.write(l_merged_lob, LENGTH('
3314: END IF;
3315: IF (get_mr_details_rec.DueCounterName IS NOT NULL) THEN
3316: dbms_lob.write(l_merged_lob, LENGTH('
3317: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.DueCounterName);
3318: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3319: dbms_lob.write(l_merged_lob, LENGTH('
3320: ELSE
3321: dbms_lob.write(l_merged_lob, LENGTH('
3328: dbms_lob.write(l_merged_lob, LENGTH('
3329: END IF;
3330: IF (get_mr_details_rec.DueCounterValue IS NOT NULL) THEN
3331: dbms_lob.write(l_merged_lob, LENGTH('
3332: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.DueCounterValue);
3333: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3334: dbms_lob.write(l_merged_lob, LENGTH('
3335: ELSE
3336: dbms_lob.write(l_merged_lob, LENGTH('
3336: dbms_lob.write(l_merged_lob, LENGTH('
3337: END IF;
3338: IF (get_mr_details_rec.UOM is not null) THEN
3339: dbms_lob.write(l_merged_lob, LENGTH('
3340: dummy := DBMS_XMLGEN.CONVERT(get_mr_details_rec.UOM);
3341: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3342: dbms_lob.write(l_merged_lob, LENGTH('
3343: ELSE
3344: dbms_lob.write(l_merged_lob, LENGTH('
3382: dbms_lob.write(l_merged_lob, LENGTH('
3383: END IF;
3384: END IF;
3385:
3386: context := dbms_xmlgen.newContext(l_mr_doc_details);
3387: --DBMS_XMLGEN.setbindvalue (context, '1', l_ue_id);
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3383: END IF;
3384: END IF;
3385:
3386: context := dbms_xmlgen.newContext(l_mr_doc_details);
3387: --DBMS_XMLGEN.setbindvalue (context, '1', l_ue_id);
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3384: END IF;
3385:
3386: context := dbms_xmlgen.newContext(l_mr_doc_details);
3387: --DBMS_XMLGEN.setbindvalue (context, '1', l_ue_id);
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3385:
3386: context := dbms_xmlgen.newContext(l_mr_doc_details);
3387: --DBMS_XMLGEN.setbindvalue (context, '1', l_ue_id);
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3393: l_mr_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3386: context := dbms_xmlgen.newContext(l_mr_doc_details);
3387: --DBMS_XMLGEN.setbindvalue (context, '1', l_ue_id);
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3393: l_mr_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3394: dbms_xmlgen.closeContext(context);
3387: --DBMS_XMLGEN.setbindvalue (context, '1', l_ue_id);
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3393: l_mr_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3394: dbms_xmlgen.closeContext(context);
3395: -- Write to lob only when some data exists.
3388: DBMS_XMLGEN.setbindvalue (context, '1', get_mr_details_rec.mr_header_id);
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3393: l_mr_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3394: dbms_xmlgen.closeContext(context);
3395: -- Write to lob only when some data exists.
3396: IF dbms_lob.getlength(l_mr_doc_lob) > 0
3389: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3393: l_mr_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3394: dbms_xmlgen.closeContext(context);
3395: -- Write to lob only when some data exists.
3396: IF dbms_lob.getlength(l_mr_doc_lob) > 0
3397: THEN
3390: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
3391: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3392: DBMS_XMLGEN.setNullHandling(context, 2);
3393: l_mr_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3394: dbms_xmlgen.closeContext(context);
3395: -- Write to lob only when some data exists.
3396: IF dbms_lob.getlength(l_mr_doc_lob) > 0
3397: THEN
3398: l_offset := dbms_lob.INSTR(l_mr_doc_lob, '>');
3423: dbms_lob.write(l_merged_lob, LENGTH(nr_details_rec.UNIT_EFFECTIVITY_ID),LENGTH(l_merged_lob)+1, nr_details_rec.UNIT_EFFECTIVITY_ID);
3424: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
3425: IF (nr_details_rec.RELEASE_DATE IS NOT NULL) THEN
3426: dbms_lob.write(l_merged_lob, LENGTH('
3427: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.RELEASE_DATE);
3428: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3429: dbms_lob.write(l_merged_lob, LENGTH('
3430: ELSE
3431: dbms_lob.write(l_merged_lob, LENGTH('
3431: dbms_lob.write(l_merged_lob, LENGTH('
3432: END IF;
3433: IF (nr_details_rec.TITLE IS NOT NULL) THEN
3434: dbms_lob.write(l_merged_lob, LENGTH('
3439: dbms_lob.write(l_merged_lob, LENGTH('
3447: dbms_lob.write(l_merged_lob, LENGTH('
3448: END IF;
3449: IF (nr_details_rec.FLIGHT_NUMBER IS NOT NULL) THEN
3450: dbms_lob.write(l_merged_lob, LENGTH('
3451: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.FLIGHT_NUMBER);
3452: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3453: dbms_lob.write(l_merged_lob, LENGTH('
3454: ELSE
3455: dbms_lob.write(l_merged_lob, LENGTH('
3455: dbms_lob.write(l_merged_lob, LENGTH('
3456: END IF;
3457: IF (nr_details_rec.UE_LOG_SERIES IS NOT NULL) THEN
3458: dbms_lob.write(l_merged_lob, LENGTH('
3459: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_LOG_SERIES);
3460: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3461: dbms_lob.write(l_merged_lob, LENGTH('
3462: ELSE
3463: dbms_lob.write(l_merged_lob, LENGTH('
3463: dbms_lob.write(l_merged_lob, LENGTH('
3464: END IF;
3465: IF (nr_details_rec.LOG_NUMBER IS NOT NULL) THEN
3466: dbms_lob.write(l_merged_lob, LENGTH('
3467: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.LOG_NUMBER);
3468: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3469: dbms_lob.write(l_merged_lob, LENGTH('
3470: ELSE
3471: dbms_lob.write(l_merged_lob, LENGTH('
3471: dbms_lob.write(l_merged_lob, LENGTH('
3472: END IF;
3473: IF (nr_details_rec.UE_ITEM_NUMBER IS NOT NULL) THEN
3474: dbms_lob.write(l_merged_lob, LENGTH('
3475: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ITEM_NUMBER);
3476: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3477: dbms_lob.write(l_merged_lob, LENGTH('
3478: ELSE
3479: dbms_lob.write(l_merged_lob, LENGTH('
3479: dbms_lob.write(l_merged_lob, LENGTH('
3480: END IF;
3481: IF (nr_details_rec.UE_SERIAL_NUMBER IS NOT NULL) THEN
3482: dbms_lob.write(l_merged_lob, LENGTH('
3483: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_SERIAL_NUMBER);
3484: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3485: dbms_lob.write(l_merged_lob, LENGTH('
3486: ELSE
3487: dbms_lob.write(l_merged_lob, LENGTH('
3487: dbms_lob.write(l_merged_lob, LENGTH('
3488: END IF;
3489: IF (nr_details_rec.UE_STATUS IS NOT NULL) THEN
3490: dbms_lob.write(l_merged_lob, LENGTH('
3491: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_STATUS);
3492: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3493: dbms_lob.write(l_merged_lob, LENGTH('
3494: ELSE
3495: dbms_lob.write(l_merged_lob, LENGTH('
3495: dbms_lob.write(l_merged_lob, LENGTH('
3496: END IF;
3497: IF (nr_details_rec.CREATION_DATE IS NOT NULL) THEN
3498: dbms_lob.write(l_merged_lob, LENGTH('
3499: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.CREATION_DATE);
3500: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3501: dbms_lob.write(l_merged_lob, LENGTH('
3502: ELSE
3503: dbms_lob.write(l_merged_lob, LENGTH('
3503: dbms_lob.write(l_merged_lob, LENGTH('
3504: END IF;
3505: IF (nr_details_rec.INCIDENT_OCCURRED_DATE IS NOT NULL) THEN
3506: dbms_lob.write(l_merged_lob, LENGTH('
3507: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.INCIDENT_OCCURRED_DATE);
3508: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3509: dbms_lob.write(l_merged_lob, LENGTH('
3510: ELSE
3511: dbms_lob.write(l_merged_lob, LENGTH('
3511: dbms_lob.write(l_merged_lob, LENGTH('
3512: END IF;
3513: IF (nr_details_rec.WORKORDER_NAME IS NOT NULL) THEN
3514: dbms_lob.write(l_merged_lob, LENGTH('
3515: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.WORKORDER_NAME);
3516: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3517: dbms_lob.write(l_merged_lob, LENGTH('
3518: ELSE
3519: dbms_lob.write(l_merged_lob, LENGTH('
3519: dbms_lob.write(l_merged_lob, LENGTH('
3520: END IF;
3521: IF (nr_details_rec.SR_CUSTOMER_NAME IS NOT NULL) THEN
3522: dbms_lob.write(l_merged_lob, LENGTH('
3523: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.SR_CUSTOMER_NAME);
3524: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3525: dbms_lob.write(l_merged_lob, LENGTH('
3526: ELSE
3527: dbms_lob.write(l_merged_lob, LENGTH('
3527: dbms_lob.write(l_merged_lob, LENGTH('
3528: END IF;
3529: IF (nr_details_rec.SR_CONTACT_NAME IS NOT NULL) THEN
3530: dbms_lob.write(l_merged_lob, LENGTH('
3531: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.SR_CONTACT_NAME);
3532: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3533: dbms_lob.write(l_merged_lob, LENGTH('
3534: ELSE
3535: dbms_lob.write(l_merged_lob, LENGTH('
3535: dbms_lob.write(l_merged_lob, LENGTH('
3536: END IF;
3537: IF (nr_details_rec.PROBLEM_CODE IS NOT NULL) THEN
3538: dbms_lob.write(l_merged_lob, LENGTH('
3539: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.PROBLEM_CODE);
3540: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3541: dbms_lob.write(l_merged_lob, LENGTH('
3542: ELSE
3543: dbms_lob.write(l_merged_lob, LENGTH('
3543: dbms_lob.write(l_merged_lob, LENGTH('
3544: END IF;
3545: IF (nr_details_rec.SR_PROBLEM_SUMMARY IS NOT NULL) THEN
3546: dbms_lob.write(l_merged_lob, LENGTH('
3547: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.SR_PROBLEM_SUMMARY);
3548: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3549: dbms_lob.write(l_merged_lob, LENGTH('
3550: ELSE
3551: dbms_lob.write(l_merged_lob, LENGTH('
3551: dbms_lob.write(l_merged_lob, LENGTH('
3552: END IF;
3553: IF (nr_details_rec.SR_INCIDENT_SEVERITY IS NOT NULL) THEN
3554: dbms_lob.write(l_merged_lob, LENGTH('
3555: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.SR_INCIDENT_SEVERITY);
3556: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3557: dbms_lob.write(l_merged_lob, LENGTH('
3558: ELSE
3559: dbms_lob.write(l_merged_lob, LENGTH('
3559: dbms_lob.write(l_merged_lob, LENGTH('
3560: END IF;
3561: IF (nr_details_rec.EXPECTED_RESOLUTION_DATE IS NOT NULL) THEN
3562: dbms_lob.write(l_merged_lob, LENGTH('
3563: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.EXPECTED_RESOLUTION_DATE);
3564: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3565: dbms_lob.write(l_merged_lob, LENGTH('
3566: ELSE
3567: dbms_lob.write(l_merged_lob, LENGTH('
3567: dbms_lob.write(l_merged_lob, LENGTH('
3568: END IF;
3569: IF (nr_details_rec.RESOLUTION_CODE IS NOT NULL) THEN
3570: dbms_lob.write(l_merged_lob, LENGTH('
3571: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.RESOLUTION_CODE);
3572: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3573: dbms_lob.write(l_merged_lob, LENGTH('
3574: ELSE
3575: dbms_lob.write(l_merged_lob, LENGTH('
3575: dbms_lob.write(l_merged_lob, LENGTH('
3576: END IF;
3577: IF (nr_details_rec.UE_ATA_MEANING IS NOT NULL) THEN
3578: dbms_lob.write(l_merged_lob, LENGTH('
3579: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_MEANING);
3580: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3581: dbms_lob.write(l_merged_lob, LENGTH('
3582: ELSE
3583: dbms_lob.write(l_merged_lob, LENGTH('
3583: dbms_lob.write(l_merged_lob, LENGTH('
3584: END IF;
3585: IF (nr_details_rec.UE_ATA_DESC IS NOT NULL) THEN
3586: dbms_lob.write(l_merged_lob, LENGTH('
3587: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_DESC);
3588: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3589: dbms_lob.write(l_merged_lob, LENGTH('
3590: ELSE
3591: dbms_lob.write(l_merged_lob, LENGTH('
3591: dbms_lob.write(l_merged_lob, LENGTH('
3592: END IF;
3593: IF (nr_details_rec.UE_MEL_CDL_TYPE IS NOT NULL) THEN
3594: dbms_lob.write(l_merged_lob, LENGTH('
3595: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_MEL_CDL_TYPE);
3596: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3597: dbms_lob.write(l_merged_lob, LENGTH('
3598: ELSE
3599: dbms_lob.write(l_merged_lob, LENGTH('
3599: dbms_lob.write(l_merged_lob, LENGTH('
3600: END IF;
3601: IF (nr_details_rec.UE_MEL_CDL_STATUS IS NOT NULL) THEN
3602: dbms_lob.write(l_merged_lob, LENGTH('
3603: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_MEL_CDL_STATUS);
3604: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3605: dbms_lob.write(l_merged_lob, LENGTH('
3606: ELSE
3607: dbms_lob.write(l_merged_lob, LENGTH('
3607: dbms_lob.write(l_merged_lob, LENGTH('
3608: END IF;
3609: IF (nr_details_rec.UE_ATA_PC_NODE_NAME IS NOT NULL) THEN
3610: dbms_lob.write(l_merged_lob, LENGTH('
3611: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_PC_NODE_NAME);
3612: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3613: dbms_lob.write(l_merged_lob, LENGTH('
3614: ELSE
3615: dbms_lob.write(l_merged_lob, LENGTH('
3615: dbms_lob.write(l_merged_lob, LENGTH('
3616: END IF;
3617: IF (nr_details_rec.UE_ATA_HEADER_REVISION IS NOT NULL) THEN
3618: dbms_lob.write(l_merged_lob, LENGTH('
3619: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_HEADER_REVISION);
3620: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3621: dbms_lob.write(l_merged_lob, LENGTH('
3622: ELSE
3623: dbms_lob.write(l_merged_lob, LENGTH('
3623: dbms_lob.write(l_merged_lob, LENGTH('
3624: END IF;
3625: IF (nr_details_rec.UE_ATA_REPAIR_CATEGORY IS NOT NULL) THEN
3626: dbms_lob.write(l_merged_lob, LENGTH('
3627: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_REPAIR_CATEGORY);
3628: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3629: dbms_lob.write(l_merged_lob, LENGTH('
3630: ELSE
3631: dbms_lob.write(l_merged_lob, LENGTH('
3631: dbms_lob.write(l_merged_lob, LENGTH('
3632: END IF;
3633: IF (nr_details_rec.DUE_DATE IS NOT NULL) THEN
3634: dbms_lob.write(l_merged_lob, LENGTH('
3635: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.DUE_DATE);
3636: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3637: dbms_lob.write(l_merged_lob, LENGTH('
3638: ELSE
3639: dbms_lob.write(l_merged_lob, LENGTH('
3639: dbms_lob.write(l_merged_lob, LENGTH('
3640: END IF;
3641: IF (nr_details_rec.UE_ATA_REPAIR_TIME IS NOT NULL) THEN
3642: dbms_lob.write(l_merged_lob, LENGTH('
3643: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_REPAIR_TIME);
3644: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3645: dbms_lob.write(l_merged_lob, LENGTH('
3646: ELSE
3647: dbms_lob.write(l_merged_lob, LENGTH('
3647: dbms_lob.write(l_merged_lob, LENGTH('
3648: END IF;
3649: IF (nr_details_rec.UE_ATA_REMARKS IS NOT NULL) THEN
3650: dbms_lob.write(l_merged_lob, LENGTH('
3651: dummy := DBMS_XMLGEN.CONVERT(nr_details_rec.UE_ATA_REMARKS);
3652: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3653: dbms_lob.write(l_merged_lob, LENGTH('
3654: ELSE
3655: dbms_lob.write(l_merged_lob, LENGTH('
3709:
3710: IF (l_nr_flag = 'Y' OR l_nr_flag = 'N') THEN
3711:
3712: IF (l_count_instance_id IS NOT NULL) THEN
3713: context := dbms_xmlgen.newContext(l_counter_details);
3714: DBMS_XMLGEN.setbindvalue (context, '1', l_count_instance_id);
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3710: IF (l_nr_flag = 'Y' OR l_nr_flag = 'N') THEN
3711:
3712: IF (l_count_instance_id IS NOT NULL) THEN
3713: context := dbms_xmlgen.newContext(l_counter_details);
3714: DBMS_XMLGEN.setbindvalue (context, '1', l_count_instance_id);
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3711:
3712: IF (l_count_instance_id IS NOT NULL) THEN
3713: context := dbms_xmlgen.newContext(l_counter_details);
3714: DBMS_XMLGEN.setbindvalue (context, '1', l_count_instance_id);
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3719: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3712: IF (l_count_instance_id IS NOT NULL) THEN
3713: context := dbms_xmlgen.newContext(l_counter_details);
3714: DBMS_XMLGEN.setbindvalue (context, '1', l_count_instance_id);
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3719: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3720: dbms_xmlgen.closeContext(context);
3713: context := dbms_xmlgen.newContext(l_counter_details);
3714: DBMS_XMLGEN.setbindvalue (context, '1', l_count_instance_id);
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3719: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3720: dbms_xmlgen.closeContext(context);
3721: -- Write to lob only when some data exists.
3714: DBMS_XMLGEN.setbindvalue (context, '1', l_count_instance_id);
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3719: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3720: dbms_xmlgen.closeContext(context);
3721: -- Write to lob only when some data exists.
3722: IF dbms_lob.getlength(l_counter_lob) > 0 THEN
3715: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3719: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3720: dbms_xmlgen.closeContext(context);
3721: -- Write to lob only when some data exists.
3722: IF dbms_lob.getlength(l_counter_lob) > 0 THEN
3723: l_offset := dbms_lob.INSTR(l_counter_lob, '>');
3716: dbms_xmlgen.setRowTag(context,'ItemCounter');
3717: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
3718: DBMS_XMLGEN.setNullHandling(context, 2);
3719: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
3720: dbms_xmlgen.closeContext(context);
3721: -- Write to lob only when some data exists.
3722: IF dbms_lob.getlength(l_counter_lob) > 0 THEN
3723: l_offset := dbms_lob.INSTR(l_counter_lob, '>');
3724: -- copy workorder details into final lob
3740: EXIT WHEN mr_child_details_csr%NOTFOUND;
3741: dbms_lob.write(l_merged_lob, LENGTH('
3742: IF (mr_child_details_rec.Unit_Effectivity_Id IS NOT NULL) THEN
3743: dbms_lob.write(l_merged_lob, LENGTH('
3744: dummy := DBMS_XMLGEN.CONVERT(mr_child_details_rec.Unit_Effectivity_Id);
3745: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3746: dbms_lob.write(l_merged_lob, LENGTH('
3747: END IF;
3748: IF (mr_child_details_rec.Title IS NOT NULL) THEN
3746: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
3747: END IF;
3748: IF (mr_child_details_rec.Title IS NOT NULL) THEN
3749: dbms_lob.write(l_merged_lob, LENGTH('
3762: EXIT WHEN nr_mr_details_csr%NOTFOUND;
3763: dbms_lob.write(l_merged_lob, LENGTH('
3764: IF (nr_mr_details_rec.Unit_Effectivity_Id IS NOT NULL) THEN
3765: dbms_lob.write(l_merged_lob, LENGTH('
3766: dummy := DBMS_XMLGEN.CONVERT(nr_mr_details_rec.Unit_Effectivity_Id);
3767: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
3768: dbms_lob.write(l_merged_lob, LENGTH('
3769: END IF;
3770: IF (nr_mr_details_rec.Title IS NOT NULL) THEN
3768: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
3769: END IF;
3770: IF (nr_mr_details_rec.Title IS NOT NULL) THEN
3771: dbms_lob.write(l_merged_lob, LENGTH('
7740: l_wo_id_tbl IN OUT NOCOPY workorder_id_tbl_type,
7741: x_return_status OUT NOCOPY VARCHAR2)
7742: IS
7743:
7744: context DBMS_XMLGEN.ctxHandle;
7745:
7746: dummy VARCHAR2 (1000);
7747:
7748: --TYPE workorder_id_tbl_type IS TABLE OF NUMBER INDEX BY BINARY_INTEGER;
8440: dbms_lob.write(l_merged_lob, LENGTH('
8441: dbms_lob.write(l_merged_lob, LENGTH(wo_details_rec.object_version_number),LENGTH(l_merged_lob)+1, wo_details_rec.object_version_number);
8442: dbms_lob.write(l_merged_lob, LENGTH('
8443: dbms_lob.write(l_merged_lob, LENGTH('
8444: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.job_number);
8445: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8446: dbms_lob.write(l_merged_lob, LENGTH('
8447: IF (wo_details_rec.job_description IS NOT NULL) THEN
8448: dbms_lob.write(l_merged_lob, LENGTH('
8445: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8446: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
8447: IF (wo_details_rec.job_description IS NOT NULL) THEN
8448: dbms_lob.write(l_merged_lob, LENGTH('
8449: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.job_description);
8450: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8451: dbms_lob.write(l_merged_lob, LENGTH('
8452: ELSE
8453: dbms_lob.write(l_merged_lob, LENGTH('
8452: ELSE
8453: dbms_lob.write(l_merged_lob, LENGTH('
8454: END IF;
8455: dbms_lob.write(l_merged_lob, LENGTH('
8456: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.job_status_meaning);
8457: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8458: dbms_lob.write(l_merged_lob, LENGTH('
8459: dbms_lob.write(l_merged_lob, LENGTH('
8460: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.department_name);
8456: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.job_status_meaning);
8457: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8458: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
8459: dbms_lob.write(l_merged_lob, LENGTH('
8460: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.department_name);
8461: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8462: dbms_lob.write(l_merged_lob, LENGTH('
8463: dbms_lob.write(l_merged_lob, LENGTH('
8464: dbms_lob.write(l_merged_lob, LENGTH(wo_details_rec.scheduled_start_date),LENGTH(l_merged_lob)+1, wo_details_rec.scheduled_start_date);
8474: dbms_lob.write(l_merged_lob, LENGTH('
8475: END IF;
8476: IF (wo_details_rec.unit_name IS NOT NULL) THEN
8477: dbms_lob.write(l_merged_lob, LENGTH('
8478: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.unit_name);
8479: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8480: dbms_lob.write(l_merged_lob, LENGTH('
8481: ELSE
8482: dbms_lob.write(l_merged_lob, LENGTH('
8482: dbms_lob.write(l_merged_lob, LENGTH('
8483: END IF;
8484: IF (wo_details_rec.model_meaning IS NOT NULL) THEN
8485: dbms_lob.write(l_merged_lob, LENGTH('
8486: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.model_meaning);
8487: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8488: dbms_lob.write(l_merged_lob, LENGTH('
8489: ELSE
8490: dbms_lob.write(l_merged_lob, LENGTH('
8490: dbms_lob.write(l_merged_lob, LENGTH('
8491: END IF;
8492: IF (wo_details_rec.wo_part_number IS NOT NULL) THEN
8493: dbms_lob.write(l_merged_lob, LENGTH('
8494: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.wo_part_number);
8495: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8496: dbms_lob.write(l_merged_lob, LENGTH('
8497: ELSE
8498: dbms_lob.write(l_merged_lob, LENGTH('
8498: dbms_lob.write(l_merged_lob, LENGTH('
8499: END IF;
8500: IF (wo_details_rec.item_instance_number IS NOT NULL) THEN
8501: dbms_lob.write(l_merged_lob, LENGTH('
8502: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.item_instance_number);
8503: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8504: dbms_lob.write(l_merged_lob, LENGTH('
8505: ELSE
8506: dbms_lob.write(l_merged_lob, LENGTH('
8506: dbms_lob.write(l_merged_lob, LENGTH('
8507: END IF;
8508: IF (wo_details_rec.serial_number IS NOT NULL) THEN
8509: dbms_lob.write(l_merged_lob, LENGTH('
8510: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.serial_number);
8511: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8512: dbms_lob.write(l_merged_lob, LENGTH('
8513: ELSE
8514: dbms_lob.write(l_merged_lob, LENGTH('
8521: dbms_lob.write(l_merged_lob, LENGTH('
8522: END IF;
8523: IF (wo_details_rec.lot_number IS NOT NULL) THEN
8524: dbms_lob.write(l_merged_lob, LENGTH('
8525: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.lot_number);
8526: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8527: dbms_lob.write(l_merged_lob, LENGTH('
8528: ELSE
8529: dbms_lob.write(l_merged_lob, LENGTH('
8529: dbms_lob.write(l_merged_lob, LENGTH('
8530: END IF;
8531: IF (wo_details_rec.party_name IS NOT NULL) THEN
8532: dbms_lob.write(l_merged_lob, LENGTH('
8533: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.party_name);
8534: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8535: dbms_lob.write(l_merged_lob, LENGTH('
8536: ELSE
8537: dbms_lob.write(l_merged_lob, LENGTH('
8540: dbms_lob.write(l_merged_lob, LENGTH(wo_details_rec.visit_number),LENGTH(l_merged_lob)+1, wo_details_rec.visit_number);
8541: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
8542: IF (wo_details_rec.ata_code IS NOT NULL) THEN
8543: dbms_lob.write(l_merged_lob, LENGTH('
8544: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.ata_code);
8545: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8546: dbms_lob.write(l_merged_lob, LENGTH('
8547: ELSE
8548: dbms_lob.write(l_merged_lob, LENGTH('
8565: END;
8566:
8567: IF (l_position_meaning IS NOT NULL) THEN
8568: dbms_lob.write(l_merged_lob, LENGTH('
8569: dummy := DBMS_XMLGEN.CONVERT(l_position_meaning);
8570: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8571: dbms_lob.write(l_merged_lob, LENGTH('
8572: ELSE
8573: dbms_lob.write(l_merged_lob, LENGTH('
8576: dbms_lob.write(l_merged_lob, LENGTH('
8577: END IF;
8578: IF (wo_details_rec.incident_number IS NOT NULL) THEN
8579: dbms_lob.write(l_merged_lob, LENGTH('
8580: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.incident_number);
8581: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8582: dbms_lob.write(l_merged_lob, LENGTH('
8583: ELSE
8584: dbms_lob.write(l_merged_lob, LENGTH('
8584: dbms_lob.write(l_merged_lob, LENGTH('
8585: END IF;
8586: IF (wo_details_rec.incident_type IS NOT NULL) THEN
8587: dbms_lob.write(l_merged_lob, LENGTH('
8588: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.incident_type);
8589: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8590: dbms_lob.write(l_merged_lob, LENGTH('
8591: ELSE
8592: dbms_lob.write(l_merged_lob, LENGTH('
8592: dbms_lob.write(l_merged_lob, LENGTH('
8593: END IF;
8594: IF (wo_details_rec.incident_summary IS NOT NULL) THEN
8595: dbms_lob.write(l_merged_lob, LENGTH('
8596: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.incident_summary);
8597: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8598: dbms_lob.write(l_merged_lob, LENGTH('
8599: ELSE
8600: dbms_lob.write(l_merged_lob, LENGTH('
8600: dbms_lob.write(l_merged_lob, LENGTH('
8601: END IF;
8602: IF (wo_details_rec.OriginatingWorkorder IS NOT NULL) THEN
8603: dbms_lob.write(l_merged_lob, LENGTH('
8604: dummy := DBMS_XMLGEN.CONVERT(wo_details_rec.OriginatingWorkorder);
8605: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8606: dbms_lob.write(l_merged_lob, LENGTH('
8607: ELSE
8608: dbms_lob.write(l_merged_lob, LENGTH('
8612: IF (l_log_statement >= l_log_current_level)THEN
8613: fnd_log.string (
8614: l_log_statement, 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,'Checkpoint 4 : l_workorder_id : ' || l_workorder_id);
8615: END IF;
8616: context := dbms_xmlgen.newContext(l_counter_det );
8617: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
8618:
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8613: fnd_log.string (
8614: l_log_statement, 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,'Checkpoint 4 : l_workorder_id : ' || l_workorder_id);
8615: END IF;
8616: context := dbms_xmlgen.newContext(l_counter_det );
8617: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
8618:
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8621: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
8615: END IF;
8616: context := dbms_xmlgen.newContext(l_counter_det );
8617: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
8618:
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8621: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
8622: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
8623: dbms_xmlgen.closeContext(context);
8616: context := dbms_xmlgen.newContext(l_counter_det );
8617: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
8618:
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8621: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
8622: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
8623: dbms_xmlgen.closeContext(context);
8624: -- Write to lob only when some data exists.
8617: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
8618:
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8621: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
8622: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
8623: dbms_xmlgen.closeContext(context);
8624: -- Write to lob only when some data exists.
8625: IF dbms_lob.getlength(l_counter_lob) > 0
8618:
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8621: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
8622: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
8623: dbms_xmlgen.closeContext(context);
8624: -- Write to lob only when some data exists.
8625: IF dbms_lob.getlength(l_counter_lob) > 0
8626: THEN
8619: dbms_xmlgen.setRowsetTag(context, 'ItemCounters');
8620: dbms_xmlgen.setRowTag(context,'ItemCounter');
8621: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
8622: l_counter_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
8623: dbms_xmlgen.closeContext(context);
8624: -- Write to lob only when some data exists.
8625: IF dbms_lob.getlength(l_counter_lob) > 0
8626: THEN
8627: l_offset := dbms_lob.INSTR(l_counter_lob, '>');
8646: dbms_lob.write(l_merged_lob, LENGTH('
8647: dbms_lob.write(l_merged_lob, LENGTH(route_details_rec.object_version_number),LENGTH(l_merged_lob)+1, route_details_rec.object_version_number);
8648: dbms_lob.write(l_merged_lob, LENGTH('
8649: dbms_lob.write(l_merged_lob, LENGTH('
8650: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.route_no);
8651: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8652: dbms_lob.write(l_merged_lob, LENGTH('
8653: dbms_lob.write(l_merged_lob, LENGTH('
8654: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.title);
8650: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.route_no);
8651: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8652: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
8653: dbms_lob.write(l_merged_lob, LENGTH('
8654: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.title);
8655: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8656: dbms_lob.write(l_merged_lob, LENGTH('
8657: IF (route_details_rec.route_type IS NOT NULL) THEN
8658: dbms_lob.write(l_merged_lob, LENGTH('
8655: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8656: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
8657: IF (route_details_rec.route_type IS NOT NULL) THEN
8658: dbms_lob.write(l_merged_lob, LENGTH('
8659: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.route_type);
8660: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8661: dbms_lob.write(l_merged_lob, LENGTH('
8662: ELSE
8663: dbms_lob.write(l_merged_lob, LENGTH('
8662: ELSE
8663: dbms_lob.write(l_merged_lob, LENGTH('
8664: END IF;
8665: dbms_lob.write(l_merged_lob, LENGTH('
8666: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.revision_number);
8667: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8668: dbms_lob.write(l_merged_lob, LENGTH('
8669:
8670: dbms_lob.write(l_merged_lob, LENGTH('
8667: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8668: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
8669:
8670: dbms_lob.write(l_merged_lob, LENGTH('
8671: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.LAST_UPDATE_DATE);
8672: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8673: dbms_lob.write(l_merged_lob, LENGTH('
8674:
8675:
8674:
8675:
8676: IF (route_details_rec.enigma_doc_id IS NOT NULL) THEN
8677: dbms_lob.write(l_merged_lob, LENGTH('
8678: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.enigma_doc_id);
8679: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8680: dbms_lob.write(l_merged_lob, LENGTH('
8681: ELSE
8682: dbms_lob.write(l_merged_lob, LENGTH('
8682: dbms_lob.write(l_merged_lob, LENGTH('
8683: END IF;
8684: IF (route_details_rec.enigma_route_id IS NOT NULL) THEN
8685: dbms_lob.write(l_merged_lob, LENGTH('
8686: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.enigma_route_id);
8687: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8688: dbms_lob.write(l_merged_lob, LENGTH('
8689: ELSE
8690: dbms_lob.write(l_merged_lob, LENGTH('
8690: dbms_lob.write(l_merged_lob, LENGTH('
8691: END IF;
8692: IF (route_details_rec.zone IS NOT NULL) THEN
8693: dbms_lob.write(l_merged_lob, LENGTH('
8694: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.zone);
8695: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8696: dbms_lob.write(l_merged_lob, LENGTH('
8697: ELSE
8698: dbms_lob.write(l_merged_lob, LENGTH('
8698: dbms_lob.write(l_merged_lob, LENGTH('
8699: END IF;
8700: IF (route_details_rec.sub_zone IS NOT NULL) THEN
8701: dbms_lob.write(l_merged_lob, LENGTH('
8702: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.sub_zone);
8703: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8704: dbms_lob.write(l_merged_lob, LENGTH('
8705: ELSE
8706: dbms_lob.write(l_merged_lob, LENGTH('
8706: dbms_lob.write(l_merged_lob, LENGTH('
8707: END IF;
8708: IF (route_details_rec.process IS NOT NULL) THEN
8709: dbms_lob.write(l_merged_lob, LENGTH('
8710: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.process);
8711: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8712: dbms_lob.write(l_merged_lob, LENGTH('
8713: ELSE
8714: dbms_lob.write(l_merged_lob, LENGTH('
8714: dbms_lob.write(l_merged_lob, LENGTH('
8715: END IF;
8716: IF (route_details_rec.job_card_lyt_meaning IS NOT NULL) THEN
8717: dbms_lob.write(l_merged_lob, LENGTH('
8718: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.job_card_lyt_meaning);
8719: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8720: dbms_lob.write(l_merged_lob, LENGTH('
8721: ELSE
8722: dbms_lob.write(l_merged_lob, LENGTH('
8722: dbms_lob.write(l_merged_lob, LENGTH('
8723: END IF;
8724: IF (route_details_rec.model_code IS NOT NULL) THEN
8725: dbms_lob.write(l_merged_lob, LENGTH('
8726: dummy := DBMS_XMLGEN.CONVERT(route_details_rec.model_code);
8727: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8728: dbms_lob.write(l_merged_lob, LENGTH('
8729: ELSE
8730: dbms_lob.write(l_merged_lob, LENGTH('
8754:
8755: dbms_lob.write(l_merged_lob, LENGTH('
8756: IF (route_ffs_rec.Segment1 IS NOT NULL) THEN
8757: dbms_lob.write(l_merged_lob, LENGTH('
8758: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment1);
8759: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8760: dbms_lob.write(l_merged_lob, LENGTH('
8761: ELSE
8762: dbms_lob.write(l_merged_lob, LENGTH('
8762: dbms_lob.write(l_merged_lob, LENGTH('
8763: END IF;
8764: IF (route_ffs_rec.Segment2 IS NOT NULL) THEN
8765: dbms_lob.write(l_merged_lob, LENGTH('
8766: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment2);
8767: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8768: dbms_lob.write(l_merged_lob, LENGTH('
8769: ELSE
8770: dbms_lob.write(l_merged_lob, LENGTH('
8770: dbms_lob.write(l_merged_lob, LENGTH('
8771: END IF;
8772: IF (route_ffs_rec.Segment3 IS NOT NULL) THEN
8773: dbms_lob.write(l_merged_lob, LENGTH('
8774: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment3);
8775: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8776: dbms_lob.write(l_merged_lob, LENGTH('
8777: ELSE
8778: dbms_lob.write(l_merged_lob, LENGTH('
8778: dbms_lob.write(l_merged_lob, LENGTH('
8779: END IF;
8780: IF (route_ffs_rec.Segment4 IS NOT NULL) THEN
8781: dbms_lob.write(l_merged_lob, LENGTH('
8782: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment4);
8783: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8784: dbms_lob.write(l_merged_lob, LENGTH('
8785: ELSE
8786: dbms_lob.write(l_merged_lob, LENGTH('
8786: dbms_lob.write(l_merged_lob, LENGTH('
8787: END IF;
8788: IF (route_ffs_rec.Segment5 IS NOT NULL) THEN
8789: dbms_lob.write(l_merged_lob, LENGTH('
8790: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment5);
8791: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8792: dbms_lob.write(l_merged_lob, LENGTH('
8793: ELSE
8794: dbms_lob.write(l_merged_lob, LENGTH('
8794: dbms_lob.write(l_merged_lob, LENGTH('
8795: END IF;
8796: IF (route_ffs_rec.Segment6 IS NOT NULL) THEN
8797: dbms_lob.write(l_merged_lob, LENGTH('
8798: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment6);
8799: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8800: dbms_lob.write(l_merged_lob, LENGTH('
8801: ELSE
8802: dbms_lob.write(l_merged_lob, LENGTH('
8802: dbms_lob.write(l_merged_lob, LENGTH('
8803: END IF;
8804: IF (route_ffs_rec.Segment7 IS NOT NULL) THEN
8805: dbms_lob.write(l_merged_lob, LENGTH('
8806: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment7);
8807: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8808: dbms_lob.write(l_merged_lob, LENGTH('
8809: ELSE
8810: dbms_lob.write(l_merged_lob, LENGTH('
8810: dbms_lob.write(l_merged_lob, LENGTH('
8811: END IF;
8812: IF (route_ffs_rec.Segment8 IS NOT NULL) THEN
8813: dbms_lob.write(l_merged_lob, LENGTH('
8814: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment8);
8815: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8816: dbms_lob.write(l_merged_lob, LENGTH('
8817: ELSE
8818: dbms_lob.write(l_merged_lob, LENGTH('
8818: dbms_lob.write(l_merged_lob, LENGTH('
8819: END IF;
8820: IF (route_ffs_rec.Segment9 IS NOT NULL) THEN
8821: dbms_lob.write(l_merged_lob, LENGTH('
8822: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment1);
8823: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8824: dbms_lob.write(l_merged_lob, LENGTH('
8825: ELSE
8826: dbms_lob.write(l_merged_lob, LENGTH('
8826: dbms_lob.write(l_merged_lob, LENGTH('
8827: END IF;
8828: IF (route_ffs_rec.Segment10 IS NOT NULL) THEN
8829: dbms_lob.write(l_merged_lob, LENGTH('
8830: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment10);
8831: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8832: dbms_lob.write(l_merged_lob, LENGTH('
8833: ELSE
8834: dbms_lob.write(l_merged_lob, LENGTH('
8834: dbms_lob.write(l_merged_lob, LENGTH('
8835: END IF;
8836: IF (route_ffs_rec.Segment11 IS NOT NULL) THEN
8837: dbms_lob.write(l_merged_lob, LENGTH('
8838: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment11);
8839: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8840: dbms_lob.write(l_merged_lob, LENGTH('
8841: ELSE
8842: dbms_lob.write(l_merged_lob, LENGTH('
8842: dbms_lob.write(l_merged_lob, LENGTH('
8843: END IF;
8844: IF (route_ffs_rec.Segment12 IS NOT NULL) THEN
8845: dbms_lob.write(l_merged_lob, LENGTH('
8846: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment12);
8847: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8848: dbms_lob.write(l_merged_lob, LENGTH('
8849: ELSE
8850: dbms_lob.write(l_merged_lob, LENGTH('
8850: dbms_lob.write(l_merged_lob, LENGTH('
8851: END IF;
8852: IF (route_ffs_rec.Segment13 IS NOT NULL) THEN
8853: dbms_lob.write(l_merged_lob, LENGTH('
8854: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment13);
8855: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8856: dbms_lob.write(l_merged_lob, LENGTH('
8857: ELSE
8858: dbms_lob.write(l_merged_lob, LENGTH('
8858: dbms_lob.write(l_merged_lob, LENGTH('
8859: END IF;
8860: IF (route_ffs_rec.Segment14 IS NOT NULL) THEN
8861: dbms_lob.write(l_merged_lob, LENGTH('
8862: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment14);
8863: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8864: dbms_lob.write(l_merged_lob, LENGTH('
8865: ELSE
8866: dbms_lob.write(l_merged_lob, LENGTH('
8866: dbms_lob.write(l_merged_lob, LENGTH('
8867: END IF;
8868: IF (route_ffs_rec.Segment15 IS NOT NULL) THEN
8869: dbms_lob.write(l_merged_lob, LENGTH('
8870: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Segment15);
8871: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8872: dbms_lob.write(l_merged_lob, LENGTH('
8873: ELSE
8874: dbms_lob.write(l_merged_lob, LENGTH('
8904: IF (kff_return_status = FND_API.G_RET_STS_SUCCESS) THEN
8905:
8906: IF (l_mti_seglist(1) IS NOT NULL) THEN
8907: dbms_lob.write(l_merged_lob, LENGTH('
8908: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(1));
8909: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8910: dbms_lob.write(l_merged_lob, LENGTH('
8911: ELSE
8912: dbms_lob.write(l_merged_lob, LENGTH('
8912: dbms_lob.write(l_merged_lob, LENGTH('
8913: END IF;
8914: IF (l_mti_seglist(2) IS NOT NULL) THEN
8915: dbms_lob.write(l_merged_lob, LENGTH('
8916: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(2));
8917: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8918: dbms_lob.write(l_merged_lob, LENGTH('
8919: ELSE
8920: dbms_lob.write(l_merged_lob, LENGTH('
8920: dbms_lob.write(l_merged_lob, LENGTH('
8921: END IF;
8922: IF (l_mti_seglist(3) IS NOT NULL) THEN
8923: dbms_lob.write(l_merged_lob, LENGTH('
8924: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(3));
8925: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8926: dbms_lob.write(l_merged_lob, LENGTH('
8927: ELSE
8928: dbms_lob.write(l_merged_lob, LENGTH('
8928: dbms_lob.write(l_merged_lob, LENGTH('
8929: END IF;
8930: IF (l_mti_seglist(4) IS NOT NULL) THEN
8931: dbms_lob.write(l_merged_lob, LENGTH('
8932: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(4));
8933: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8934: dbms_lob.write(l_merged_lob, LENGTH('
8935: ELSE
8936: dbms_lob.write(l_merged_lob, LENGTH('
8936: dbms_lob.write(l_merged_lob, LENGTH('
8937: END IF;
8938: IF (l_mti_seglist(5) IS NOT NULL) THEN
8939: dbms_lob.write(l_merged_lob, LENGTH('
8940: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(5));
8941: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8942: dbms_lob.write(l_merged_lob, LENGTH('
8943: ELSE
8944: dbms_lob.write(l_merged_lob, LENGTH('
8944: dbms_lob.write(l_merged_lob, LENGTH('
8945: END IF;
8946: IF (l_mti_seglist(6) IS NOT NULL) THEN
8947: dbms_lob.write(l_merged_lob, LENGTH('
8948: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(6));
8949: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8950: dbms_lob.write(l_merged_lob, LENGTH('
8951: ELSE
8952: dbms_lob.write(l_merged_lob, LENGTH('
8952: dbms_lob.write(l_merged_lob, LENGTH('
8953: END IF;
8954: IF (l_mti_seglist(7) IS NOT NULL) THEN
8955: dbms_lob.write(l_merged_lob, LENGTH('
8956: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(7));
8957: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8958: dbms_lob.write(l_merged_lob, LENGTH('
8959: ELSE
8960: dbms_lob.write(l_merged_lob, LENGTH('
8960: dbms_lob.write(l_merged_lob, LENGTH('
8961: END IF;
8962: IF (l_mti_seglist(8) IS NOT NULL) THEN
8963: dbms_lob.write(l_merged_lob, LENGTH('
8964: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(8));
8965: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8966: dbms_lob.write(l_merged_lob, LENGTH('
8967: ELSE
8968: dbms_lob.write(l_merged_lob, LENGTH('
8968: dbms_lob.write(l_merged_lob, LENGTH('
8969: END IF;
8970: IF (l_mti_seglist(9) IS NOT NULL) THEN
8971: dbms_lob.write(l_merged_lob, LENGTH('
8972: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(9));
8973: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8974: dbms_lob.write(l_merged_lob, LENGTH('
8975: ELSE
8976: dbms_lob.write(l_merged_lob, LENGTH('
8976: dbms_lob.write(l_merged_lob, LENGTH('
8977: END IF;
8978: IF (l_mti_seglist(10) IS NOT NULL) THEN
8979: dbms_lob.write(l_merged_lob, LENGTH('
8980: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(10));
8981: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8982: dbms_lob.write(l_merged_lob, LENGTH('
8983: ELSE
8984: dbms_lob.write(l_merged_lob, LENGTH('
8984: dbms_lob.write(l_merged_lob, LENGTH('
8985: END IF;
8986: IF (l_mti_seglist(11) IS NOT NULL) THEN
8987: dbms_lob.write(l_merged_lob, LENGTH('
8988: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(11));
8989: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8990: dbms_lob.write(l_merged_lob, LENGTH('
8991: ELSE
8992: dbms_lob.write(l_merged_lob, LENGTH('
8992: dbms_lob.write(l_merged_lob, LENGTH('
8993: END IF;
8994: IF (l_mti_seglist(12) IS NOT NULL) THEN
8995: dbms_lob.write(l_merged_lob, LENGTH('
8996: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(12));
8997: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
8998: dbms_lob.write(l_merged_lob, LENGTH('
8999: ELSE
9000: dbms_lob.write(l_merged_lob, LENGTH('
9000: dbms_lob.write(l_merged_lob, LENGTH('
9001: END IF;
9002: IF (l_mti_seglist(13) IS NOT NULL) THEN
9003: dbms_lob.write(l_merged_lob, LENGTH('
9004: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(13));
9005: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9006: dbms_lob.write(l_merged_lob, LENGTH('
9007: ELSE
9008: dbms_lob.write(l_merged_lob, LENGTH('
9008: dbms_lob.write(l_merged_lob, LENGTH('
9009: END IF;
9010: IF (l_mti_seglist(14) IS NOT NULL) THEN
9011: dbms_lob.write(l_merged_lob, LENGTH('
9012: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(14));
9013: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9014: dbms_lob.write(l_merged_lob, LENGTH('
9015: ELSE
9016: dbms_lob.write(l_merged_lob, LENGTH('
9016: dbms_lob.write(l_merged_lob, LENGTH('
9017: END IF;
9018: IF (l_mti_seglist(15) IS NOT NULL) THEN
9019: dbms_lob.write(l_merged_lob, LENGTH('
9020: dummy := DBMS_XMLGEN.CONVERT(l_mti_seglist(15));
9021: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9022: dbms_lob.write(l_merged_lob, LENGTH('
9023: ELSE
9024: dbms_lob.write(l_merged_lob, LENGTH('
9038: -- Route DFFs
9039: dbms_lob.write(l_merged_lob, LENGTH('
9040: IF (route_ffs_rec.Attribute1 IS NOT NULL) THEN
9041: dbms_lob.write(l_merged_lob, LENGTH('
9042: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute1);
9043: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9044: dbms_lob.write(l_merged_lob, LENGTH('
9045: ELSE
9046: dbms_lob.write(l_merged_lob, LENGTH('
9046: dbms_lob.write(l_merged_lob, LENGTH('
9047: END IF;
9048: IF (route_ffs_rec.Attribute2 IS NOT NULL) THEN
9049: dbms_lob.write(l_merged_lob, LENGTH('
9050: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute2);
9051: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9052: dbms_lob.write(l_merged_lob, LENGTH('
9053: ELSE
9054: dbms_lob.write(l_merged_lob, LENGTH('
9054: dbms_lob.write(l_merged_lob, LENGTH('
9055: END IF;
9056: IF (route_ffs_rec.Attribute3 IS NOT NULL) THEN
9057: dbms_lob.write(l_merged_lob, LENGTH('
9058: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute3);
9059: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9060: dbms_lob.write(l_merged_lob, LENGTH('
9061: ELSE
9062: dbms_lob.write(l_merged_lob, LENGTH('
9062: dbms_lob.write(l_merged_lob, LENGTH('
9063: END IF;
9064: IF (route_ffs_rec.Attribute4 IS NOT NULL) THEN
9065: dbms_lob.write(l_merged_lob, LENGTH('
9066: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute4);
9067: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9068: dbms_lob.write(l_merged_lob, LENGTH('
9069: ELSE
9070: dbms_lob.write(l_merged_lob, LENGTH('
9070: dbms_lob.write(l_merged_lob, LENGTH('
9071: END IF;
9072: IF (route_ffs_rec.Attribute5 IS NOT NULL) THEN
9073: dbms_lob.write(l_merged_lob, LENGTH('
9074: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute5);
9075: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9076: dbms_lob.write(l_merged_lob, LENGTH('
9077: ELSE
9078: dbms_lob.write(l_merged_lob, LENGTH('
9078: dbms_lob.write(l_merged_lob, LENGTH('
9079: END IF;
9080: IF (route_ffs_rec.Attribute6 IS NOT NULL) THEN
9081: dbms_lob.write(l_merged_lob, LENGTH('
9082: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute6);
9083: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9084: dbms_lob.write(l_merged_lob, LENGTH('
9085: ELSE
9086: dbms_lob.write(l_merged_lob, LENGTH('
9086: dbms_lob.write(l_merged_lob, LENGTH('
9087: END IF;
9088: IF (route_ffs_rec.Attribute7 IS NOT NULL) THEN
9089: dbms_lob.write(l_merged_lob, LENGTH('
9090: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute7);
9091: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9092: dbms_lob.write(l_merged_lob, LENGTH('
9093: ELSE
9094: dbms_lob.write(l_merged_lob, LENGTH('
9094: dbms_lob.write(l_merged_lob, LENGTH('
9095: END IF;
9096: IF (route_ffs_rec.Attribute8 IS NOT NULL) THEN
9097: dbms_lob.write(l_merged_lob, LENGTH('
9098: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute8);
9099: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9100: dbms_lob.write(l_merged_lob, LENGTH('
9101: ELSE
9102: dbms_lob.write(l_merged_lob, LENGTH('
9102: dbms_lob.write(l_merged_lob, LENGTH('
9103: END IF;
9104: IF (route_ffs_rec.Attribute9 IS NOT NULL) THEN
9105: dbms_lob.write(l_merged_lob, LENGTH('
9106: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute1);
9107: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9108: dbms_lob.write(l_merged_lob, LENGTH('
9109: ELSE
9110: dbms_lob.write(l_merged_lob, LENGTH('
9110: dbms_lob.write(l_merged_lob, LENGTH('
9111: END IF;
9112: IF (route_ffs_rec.Attribute10 IS NOT NULL) THEN
9113: dbms_lob.write(l_merged_lob, LENGTH('
9114: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute10);
9115: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9116: dbms_lob.write(l_merged_lob, LENGTH('
9117: ELSE
9118: dbms_lob.write(l_merged_lob, LENGTH('
9118: dbms_lob.write(l_merged_lob, LENGTH('
9119: END IF;
9120: IF (route_ffs_rec.Attribute11 IS NOT NULL) THEN
9121: dbms_lob.write(l_merged_lob, LENGTH('
9122: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute11);
9123: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9124: dbms_lob.write(l_merged_lob, LENGTH('
9125: ELSE
9126: dbms_lob.write(l_merged_lob, LENGTH('
9126: dbms_lob.write(l_merged_lob, LENGTH('
9127: END IF;
9128: IF (route_ffs_rec.Attribute12 IS NOT NULL) THEN
9129: dbms_lob.write(l_merged_lob, LENGTH('
9130: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute12);
9131: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9132: dbms_lob.write(l_merged_lob, LENGTH('
9133: ELSE
9134: dbms_lob.write(l_merged_lob, LENGTH('
9134: dbms_lob.write(l_merged_lob, LENGTH('
9135: END IF;
9136: IF (route_ffs_rec.Attribute13 IS NOT NULL) THEN
9137: dbms_lob.write(l_merged_lob, LENGTH('
9138: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute13);
9139: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9140: dbms_lob.write(l_merged_lob, LENGTH('
9141: ELSE
9142: dbms_lob.write(l_merged_lob, LENGTH('
9142: dbms_lob.write(l_merged_lob, LENGTH('
9143: END IF;
9144: IF (route_ffs_rec.Attribute14 IS NOT NULL) THEN
9145: dbms_lob.write(l_merged_lob, LENGTH('
9146: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute14);
9147: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9148: dbms_lob.write(l_merged_lob, LENGTH('
9149: ELSE
9150: dbms_lob.write(l_merged_lob, LENGTH('
9150: dbms_lob.write(l_merged_lob, LENGTH('
9151: END IF;
9152: IF (route_ffs_rec.Attribute15 IS NOT NULL) THEN
9153: dbms_lob.write(l_merged_lob, LENGTH('
9154: dummy := DBMS_XMLGEN.CONVERT(route_ffs_rec.Attribute15);
9155: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9156: dbms_lob.write(l_merged_lob, LENGTH('
9157: ELSE
9158: dbms_lob.write(l_merged_lob, LENGTH('
9168: EXIT WHEN panel_details_csr%NOTFOUND;
9169: dbms_lob.write(l_merged_lob, LENGTH('
9170: IF (panel_details_rec.panel_type IS NOT NULL) THEN
9171: dbms_lob.write(l_merged_lob, LENGTH('
9172: dummy := DBMS_XMLGEN.CONVERT(panel_details_rec.panel_type);
9173: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9174: dbms_lob.write(l_merged_lob, LENGTH('
9175: ELSE
9176: dbms_lob.write(l_merged_lob, LENGTH('
9176: dbms_lob.write(l_merged_lob, LENGTH('
9177: END IF;
9178: IF (panel_details_rec.panel_type_desc IS NOT NULL) THEN
9179: dbms_lob.write(l_merged_lob, LENGTH('
9180: dummy := DBMS_XMLGEN.CONVERT(panel_details_rec.panel_type_desc);
9181: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9182: dbms_lob.write(l_merged_lob, LENGTH('
9183: ELSE
9184: dbms_lob.write(l_merged_lob, LENGTH('
9203: dbms_lob.write(l_merged_lob, LENGTH('
9204: END IF;
9205: IF (wo_op_details_rec.OPERATION_CODE IS NOT NULL) THEN
9206: dbms_lob.write(l_merged_lob, LENGTH('
9207: dummy := DBMS_XMLGEN.CONVERT(wo_op_details_rec.OPERATION_CODE);
9208: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9209: dbms_lob.write(l_merged_lob, LENGTH('
9210: ELSE
9211: dbms_lob.write(l_merged_lob, LENGTH('
9211: dbms_lob.write(l_merged_lob, LENGTH('
9212: END IF;
9213: IF (wo_op_details_rec.DESCRIPTION IS NOT NULL) THEN
9214: dbms_lob.write(l_merged_lob, LENGTH('
9215: dummy := DBMS_XMLGEN.CONVERT(wo_op_details_rec.DESCRIPTION);
9216: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9217: dbms_lob.write(l_merged_lob, LENGTH('
9218: ELSE
9219: dbms_lob.write(l_merged_lob, LENGTH('
9219: dbms_lob.write(l_merged_lob, LENGTH('
9220: END IF;
9221: IF (wo_op_details_rec.OPERATION_TYPE IS NOT NULL) THEN
9222: dbms_lob.write(l_merged_lob, LENGTH('
9223: dummy := DBMS_XMLGEN.CONVERT(wo_op_details_rec.OPERATION_TYPE);
9224: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9225: dbms_lob.write(l_merged_lob, LENGTH('
9226: ELSE
9227: dbms_lob.write(l_merged_lob, LENGTH('
9227: dbms_lob.write(l_merged_lob, LENGTH('
9228: END IF;
9229: IF (wo_op_details_rec.REVISION_NUMBER is not null) THEN
9230: dbms_lob.write(l_merged_lob, LENGTH('
9231: dummy := DBMS_XMLGEN.CONVERT(wo_op_details_rec.REVISION_NUMBER);
9232: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9233: dbms_lob.write(l_merged_lob, LENGTH('
9234: ELSE
9235: dbms_lob.write(l_merged_lob, LENGTH('
9235: dbms_lob.write(l_merged_lob, LENGTH('
9236: END IF;
9237:
9238: dbms_lob.write(l_merged_lob, LENGTH('
9239: dummy := DBMS_XMLGEN.CONVERT(wo_op_details_rec.LAST_UPDATE_DATE);
9240: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9241: dbms_lob.write(l_merged_lob, LENGTH('
9242:
9243:
9242:
9243:
9244: IF (wo_op_details_rec.ENIGMA_DOC_ID IS NOT NULL) THEN
9245: dbms_lob.write(l_merged_lob, LENGTH('
9246: dummy := DBMS_XMLGEN.CONVERT(wo_op_details_rec.ENIGMA_DOC_ID);
9247: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9248: dbms_lob.write(l_merged_lob, LENGTH('
9249: ELSE
9250: dbms_lob.write(l_merged_lob, LENGTH('
9254: fnd_log.string (
9255: l_log_statement, 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,'Checkpoint 8 : wo_op_details_rec.operation_id : ' || wo_op_details_rec.operation_id);
9256: END IF;
9257: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9258: context := dbms_xmlgen.newContext(l_op_dffs );
9259: DBMS_XMLGEN.setbindvalue (context, '1', wo_op_details_rec.operation_id);
9260:
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9255: l_log_statement, 'ahl.plsql.'||g_pkg_name||'.'||l_api_name ,'Checkpoint 8 : wo_op_details_rec.operation_id : ' || wo_op_details_rec.operation_id);
9256: END IF;
9257: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9258: context := dbms_xmlgen.newContext(l_op_dffs );
9259: DBMS_XMLGEN.setbindvalue (context, '1', wo_op_details_rec.operation_id);
9260:
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9257: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9258: context := dbms_xmlgen.newContext(l_op_dffs );
9259: DBMS_XMLGEN.setbindvalue (context, '1', wo_op_details_rec.operation_id);
9260:
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9264: DBMS_XMLGEN.setNullHandling(context, 2);
9265: l_op_dffs_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9258: context := dbms_xmlgen.newContext(l_op_dffs );
9259: DBMS_XMLGEN.setbindvalue (context, '1', wo_op_details_rec.operation_id);
9260:
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9264: DBMS_XMLGEN.setNullHandling(context, 2);
9265: l_op_dffs_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9266: dbms_xmlgen.closeContext(context);
9259: DBMS_XMLGEN.setbindvalue (context, '1', wo_op_details_rec.operation_id);
9260:
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9264: DBMS_XMLGEN.setNullHandling(context, 2);
9265: l_op_dffs_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9266: dbms_xmlgen.closeContext(context);
9267: -- Write to lob only when some data exists.
9260:
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9264: DBMS_XMLGEN.setNullHandling(context, 2);
9265: l_op_dffs_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9266: dbms_xmlgen.closeContext(context);
9267: -- Write to lob only when some data exists.
9268: IF dbms_lob.getlength(l_op_dffs_lob) > 0
9261: dbms_xmlgen.setRowsetTag(context, 'OperationDFFs');
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9264: DBMS_XMLGEN.setNullHandling(context, 2);
9265: l_op_dffs_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9266: dbms_xmlgen.closeContext(context);
9267: -- Write to lob only when some data exists.
9268: IF dbms_lob.getlength(l_op_dffs_lob) > 0
9269: THEN
9262: dbms_xmlgen.setRowTag(context,null);
9263: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9264: DBMS_XMLGEN.setNullHandling(context, 2);
9265: l_op_dffs_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9266: dbms_xmlgen.closeContext(context);
9267: -- Write to lob only when some data exists.
9268: IF dbms_lob.getlength(l_op_dffs_lob) > 0
9269: THEN
9270:
9275:
9276: END IF;
9277: END IF;
9278: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9279: context := dbms_xmlgen.newContext(l_op_doc );
9280: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9276: END IF;
9277: END IF;
9278: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9279: context := dbms_xmlgen.newContext(l_op_doc );
9280: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9277: END IF;
9278: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9279: context := dbms_xmlgen.newContext(l_op_doc );
9280: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9278: IF (wo_op_details_rec.operation_id IS NOT NULL) THEN
9279: context := dbms_xmlgen.newContext(l_op_doc );
9280: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9286: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9279: context := dbms_xmlgen.newContext(l_op_doc );
9280: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9286: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9287: dbms_xmlgen.closeContext(context);
9280: DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9286: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9287: dbms_xmlgen.closeContext(context);
9288: -- Write to lob only when some data exists.
9281: DBMS_XMLGEN.setbindvalue (context, '2', wo_op_details_rec.operation_id);
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9286: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9287: dbms_xmlgen.closeContext(context);
9288: -- Write to lob only when some data exists.
9289: IF dbms_lob.getlength(l_wo_doc_lob) > 0
9282: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9286: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9287: dbms_xmlgen.closeContext(context);
9288: -- Write to lob only when some data exists.
9289: IF dbms_lob.getlength(l_wo_doc_lob) > 0
9290: THEN
9283: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9284: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9285: DBMS_XMLGEN.setNullHandling(context, 2);
9286: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9287: dbms_xmlgen.closeContext(context);
9288: -- Write to lob only when some data exists.
9289: IF dbms_lob.getlength(l_wo_doc_lob) > 0
9290: THEN
9291: l_offset := dbms_lob.INSTR(l_wo_doc_lob, '>');
9299: END LOOP;
9300: CLOSE op_det_csr;
9301: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
9302:
9303: context := dbms_xmlgen.newContext(l_route_doc);
9304: --DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9305: DBMS_XMLGEN.setbindvalue (context, '1', l_route_id);
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9300: CLOSE op_det_csr;
9301: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
9302:
9303: context := dbms_xmlgen.newContext(l_route_doc);
9304: --DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9305: DBMS_XMLGEN.setbindvalue (context, '1', l_route_id);
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9301: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
9302:
9303: context := dbms_xmlgen.newContext(l_route_doc);
9304: --DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9305: DBMS_XMLGEN.setbindvalue (context, '1', l_route_id);
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9303: context := dbms_xmlgen.newContext(l_route_doc);
9304: --DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9305: DBMS_XMLGEN.setbindvalue (context, '1', l_route_id);
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9310: DBMS_XMLGEN.setNullHandling(context, 2);
9311: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9304: --DBMS_XMLGEN.setbindvalue (context, '1', l_workorder_id);
9305: DBMS_XMLGEN.setbindvalue (context, '1', l_route_id);
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9310: DBMS_XMLGEN.setNullHandling(context, 2);
9311: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9312: dbms_xmlgen.closeContext(context);
9305: DBMS_XMLGEN.setbindvalue (context, '1', l_route_id);
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9310: DBMS_XMLGEN.setNullHandling(context, 2);
9311: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9312: dbms_xmlgen.closeContext(context);
9313: -- Write to lob only when some data exists.
9306:
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9310: DBMS_XMLGEN.setNullHandling(context, 2);
9311: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9312: dbms_xmlgen.closeContext(context);
9313: -- Write to lob only when some data exists.
9314: IF dbms_lob.getlength(l_wo_doc_lob) > 0
9307: dbms_xmlgen.setRowsetTag(context, 'AssociatedDocuments');
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9310: DBMS_XMLGEN.setNullHandling(context, 2);
9311: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9312: dbms_xmlgen.closeContext(context);
9313: -- Write to lob only when some data exists.
9314: IF dbms_lob.getlength(l_wo_doc_lob) > 0
9315: THEN
9308: dbms_xmlgen.setRowTag(context,'AssociatedDocument');
9309: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9310: DBMS_XMLGEN.setNullHandling(context, 2);
9311: l_wo_doc_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9312: dbms_xmlgen.closeContext(context);
9313: -- Write to lob only when some data exists.
9314: IF dbms_lob.getlength(l_wo_doc_lob) > 0
9315: THEN
9316: l_offset := dbms_lob.INSTR(l_wo_doc_lob, '>');
9344: dbms_lob.write(l_merged_lob, LENGTH(op_details_rec.operation_sequence_num),LENGTH(l_merged_lob)+1, op_details_rec.operation_sequence_num);
9345: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9346: IF (op_details_rec.operation_code IS NOT NULL) THEN
9347: dbms_lob.write(l_merged_lob, LENGTH('
9348: dummy := DBMS_XMLGEN.CONVERT(op_details_rec.operation_code);
9349: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9350: dbms_lob.write(l_merged_lob, LENGTH('
9351: ELSE
9352: dbms_lob.write(l_merged_lob, LENGTH('
9352: dbms_lob.write(l_merged_lob, LENGTH('
9353: END IF;
9354: IF (op_details_rec.description IS NOT NULL) THEN
9355: dbms_lob.write(l_merged_lob, LENGTH('
9356: dummy := DBMS_XMLGEN.CONVERT(op_details_rec.description);
9357: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9358: dbms_lob.write(l_merged_lob, LENGTH('
9359: ELSE
9360: dbms_lob.write(l_merged_lob, LENGTH('
9360: dbms_lob.write(l_merged_lob, LENGTH('
9361: END IF;
9362: IF (op_details_rec.status IS NOT NULL) THEN
9363: dbms_lob.write(l_merged_lob, LENGTH('
9364: dummy := DBMS_XMLGEN.CONVERT(op_details_rec.status);
9365: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9366: dbms_lob.write(l_merged_lob, LENGTH('
9367: ELSE
9368: dbms_lob.write(l_merged_lob, LENGTH('
9368: dbms_lob.write(l_merged_lob, LENGTH('
9369: END IF;
9370: IF (op_details_rec.department_name IS NOT NULL) THEN
9371: dbms_lob.write(l_merged_lob, LENGTH('
9372: dummy := DBMS_XMLGEN.CONVERT(op_details_rec.department_name);
9373: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9374: dbms_lob.write(l_merged_lob, LENGTH('
9375: ELSE
9376: dbms_lob.write(l_merged_lob, LENGTH('
9426: ||l_api_name ,'Checkpoint 11 : l_qa_plan_id : '
9427: || l_qa_plan_id);
9428: END IF;
9429: dbms_lob.write(l_merged_lob, LENGTH('
9430: dummy := DBMS_XMLGEN.CONVERT(qa_plan_rec.plan_name);
9431: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9432: dbms_lob.write(l_merged_lob, LENGTH('
9433: IF (qa_plan_rec.plan_description IS NOT NULL) THEN
9434: dbms_lob.write(l_merged_lob, LENGTH('
9431: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9432: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9433: IF (qa_plan_rec.plan_description IS NOT NULL) THEN
9434: dbms_lob.write(l_merged_lob, LENGTH('
9435: dummy := DBMS_XMLGEN.CONVERT(qa_plan_rec.plan_description);
9436: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9437: dbms_lob.write(l_merged_lob, LENGTH('
9438: ELSE
9439: dbms_lob.write(l_merged_lob, LENGTH('
9456: dbms_lob.write(l_merged_lob, LENGTH(qa_plan_attr_rec.PromptSequence),LENGTH(l_merged_lob)+1, qa_plan_attr_rec.PromptSequence);
9457: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9458: IF (qa_plan_attr_rec.Prompt IS NOT NULL) THEN
9459: dbms_lob.write(l_merged_lob, LENGTH('
9460: dummy := DBMS_XMLGEN.CONVERT(qa_plan_attr_rec.Prompt);
9461: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9462: dbms_lob.write(l_merged_lob, LENGTH('
9463: ELSE
9464: dbms_lob.write(l_merged_lob, LENGTH('
9464: dbms_lob.write(l_merged_lob, LENGTH('
9465: END IF;
9466: IF (qa_plan_attr_rec.DefaultValue IS NOT NULL) THEN
9467: dbms_lob.write(l_merged_lob, LENGTH('
9468: dummy := DBMS_XMLGEN.CONVERT(qa_plan_attr_rec.DefaultValue);
9469: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9470: dbms_lob.write(l_merged_lob, LENGTH('
9471: ELSE
9472: dbms_lob.write(l_merged_lob, LENGTH('
9504: ||'.'
9505: ||l_api_name ,'Checkpoint 13 ');
9506: END IF;
9507: IF (l_collection_id IS NOT NULL) THEN
9508: context := dbms_xmlgen.newContext(l_query_string);
9509: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9505: ||l_api_name ,'Checkpoint 13 ');
9506: END IF;
9507: IF (l_collection_id IS NOT NULL) THEN
9508: context := dbms_xmlgen.newContext(l_query_string);
9509: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9506: END IF;
9507: IF (l_collection_id IS NOT NULL) THEN
9508: context := dbms_xmlgen.newContext(l_query_string);
9509: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9514: l_qa_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9507: IF (l_collection_id IS NOT NULL) THEN
9508: context := dbms_xmlgen.newContext(l_query_string);
9509: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9514: l_qa_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9515: dbms_xmlgen.closeContext(context);
9508: context := dbms_xmlgen.newContext(l_query_string);
9509: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9514: l_qa_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9515: dbms_xmlgen.closeContext(context);
9516: -- Write to lob only when some data exists.
9509: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9514: l_qa_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9515: dbms_xmlgen.closeContext(context);
9516: -- Write to lob only when some data exists.
9517: IF dbms_lob.getlength(l_qa_res_lob) > 0 THEN
9510: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9514: l_qa_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9515: dbms_xmlgen.closeContext(context);
9516: -- Write to lob only when some data exists.
9517: IF dbms_lob.getlength(l_qa_res_lob) > 0 THEN
9518: l_offset := dbms_lob.INSTR(l_qa_res_lob, '>');
9511: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9512: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9513: DBMS_XMLGEN.setNullHandling(context, 2);
9514: l_qa_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9515: dbms_xmlgen.closeContext(context);
9516: -- Write to lob only when some data exists.
9517: IF dbms_lob.getlength(l_qa_res_lob) > 0 THEN
9518: l_offset := dbms_lob.INSTR(l_qa_res_lob, '>');
9519: -- copy workorder details into final lob
9557:
9558: EXIT
9559: WHEN qa_plan_csr%NOTFOUND;
9560: dbms_lob.write(l_merged_lob, LENGTH('
9561: dummy := DBMS_XMLGEN.CONVERT(qa_plan_rec.plan_name);
9562: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9563: dbms_lob.write(l_merged_lob, LENGTH('
9564: IF (qa_plan_rec.plan_description IS NOT NULL) THEN
9565: dbms_lob.write(l_merged_lob, LENGTH('
9562: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9563: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9564: IF (qa_plan_rec.plan_description IS NOT NULL) THEN
9565: dbms_lob.write(l_merged_lob, LENGTH('
9566: dummy := DBMS_XMLGEN.CONVERT(qa_plan_rec.plan_description);
9567: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9568: dbms_lob.write(l_merged_lob, LENGTH('
9569: ELSE
9570: dbms_lob.write(l_merged_lob, LENGTH('
9586: dbms_lob.write(l_merged_lob, LENGTH(qa_plan_attr_rec.PromptSequence),LENGTH(l_merged_lob)+1, qa_plan_attr_rec.PromptSequence);
9587: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9588: IF (qa_plan_attr_rec.Prompt IS NOT NULL) THEN
9589: dbms_lob.write(l_merged_lob, LENGTH('
9590: dummy := DBMS_XMLGEN.CONVERT(qa_plan_attr_rec.Prompt);
9591: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9592: dbms_lob.write(l_merged_lob, LENGTH('
9593: ELSE
9594: dbms_lob.write(l_merged_lob, LENGTH('
9594: dbms_lob.write(l_merged_lob, LENGTH('
9595: END IF;
9596: IF (qa_plan_attr_rec.DefaultValue IS NOT NULL) THEN
9597: dbms_lob.write(l_merged_lob, LENGTH('
9598: dummy := DBMS_XMLGEN.CONVERT(qa_plan_attr_rec.DefaultValue);
9599: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9600: dbms_lob.write(l_merged_lob, LENGTH('
9601: ELSE
9602: dbms_lob.write(l_merged_lob, LENGTH('
9624: p_collection_id => l_collection_id,
9625: x_query_string => l_query_string
9626: );
9627: IF (l_collection_id IS NOT NULL) THEN
9628: context := dbms_xmlgen.newContext(l_query_string);
9629: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9625: x_query_string => l_query_string
9626: );
9627: IF (l_collection_id IS NOT NULL) THEN
9628: context := dbms_xmlgen.newContext(l_query_string);
9629: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9626: );
9627: IF (l_collection_id IS NOT NULL) THEN
9628: context := dbms_xmlgen.newContext(l_query_string);
9629: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9634: l_qa_wo_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9627: IF (l_collection_id IS NOT NULL) THEN
9628: context := dbms_xmlgen.newContext(l_query_string);
9629: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9634: l_qa_wo_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9635: dbms_xmlgen.closeContext(context);
9628: context := dbms_xmlgen.newContext(l_query_string);
9629: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9634: l_qa_wo_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9635: dbms_xmlgen.closeContext(context);
9636: -- Write to lob only when some data exists.
9629: DBMS_XMLGEN.setbindvalue (context, '1',l_collection_id);
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9634: l_qa_wo_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9635: dbms_xmlgen.closeContext(context);
9636: -- Write to lob only when some data exists.
9637: IF dbms_lob.getlength(l_qa_wo_res_lob) > 0
9630: dbms_xmlgen.setRowsetTag(context, 'QaResults');
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9634: l_qa_wo_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9635: dbms_xmlgen.closeContext(context);
9636: -- Write to lob only when some data exists.
9637: IF dbms_lob.getlength(l_qa_wo_res_lob) > 0
9638: THEN
9631: dbms_xmlgen.setRowTag(context,'QualityResultRec');
9632: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9633: DBMS_XMLGEN.setNullHandling(context, 2);
9634: l_qa_wo_res_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9635: dbms_xmlgen.closeContext(context);
9636: -- Write to lob only when some data exists.
9637: IF dbms_lob.getlength(l_qa_wo_res_lob) > 0
9638: THEN
9639:
9681: dbms_lob.write(l_merged_lob, LENGTH('
9682: dbms_lob.write(l_merged_lob, LENGTH(mat_details_rec.OPERATION_SEQUENCE),LENGTH(l_merged_lob)+1, mat_details_rec.OPERATION_SEQUENCE);
9683: dbms_lob.write(l_merged_lob, LENGTH('
9684: dbms_lob.write(l_merged_lob, LENGTH('
9685: dummy := DBMS_XMLGEN.CONVERT(mat_details_rec.CONCATENATED_SEGMENTS);
9686: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9687: dbms_lob.write(l_merged_lob, LENGTH('
9688: IF (mat_details_rec.DESCRIPTION IS NOT NULL) THEN
9689: dbms_lob.write(l_merged_lob, LENGTH('
9686: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9687: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9688: IF (mat_details_rec.DESCRIPTION IS NOT NULL) THEN
9689: dbms_lob.write(l_merged_lob, LENGTH('
9690: dummy := DBMS_XMLGEN.CONVERT(mat_details_rec.DESCRIPTION);
9691: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9692: dbms_lob.write(l_merged_lob, LENGTH('
9693: ELSE
9694: dbms_lob.write(l_merged_lob, LENGTH('
9694: dbms_lob.write(l_merged_lob, LENGTH('
9695: END IF;
9696: IF (mat_details_rec.name IS NOT NULL) THEN
9697: dbms_lob.write(l_merged_lob, LENGTH('
9698: dummy := DBMS_XMLGEN.CONVERT(mat_details_rec.name);
9699: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9700: dbms_lob.write(l_merged_lob, LENGTH('
9701: ELSE
9702: dbms_lob.write(l_merged_lob, LENGTH('
9702: dbms_lob.write(l_merged_lob, LENGTH('
9703: END IF;
9704: IF (mat_details_rec.item_type IS NOT NULL) THEN
9705: dbms_lob.write(l_merged_lob, LENGTH('
9706: dummy := DBMS_XMLGEN.CONVERT(mat_details_rec.item_type);
9707: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9708: dbms_lob.write(l_merged_lob, LENGTH('
9709: ELSE
9710: dbms_lob.write(l_merged_lob, LENGTH('
9712: dbms_lob.write(l_merged_lob, LENGTH('
9713: dbms_lob.write(l_merged_lob, LENGTH(mat_details_rec.REQUESTED_QUANTITY),LENGTH(l_merged_lob)+1, mat_details_rec.REQUESTED_QUANTITY);
9714: dbms_lob.write(l_merged_lob, LENGTH('
9715: dbms_lob.write(l_merged_lob, LENGTH('
9716: dummy := DBMS_XMLGEN.CONVERT(mat_details_rec.UOM);
9717: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9718: dbms_lob.write(l_merged_lob, LENGTH('
9719: dbms_lob.write(l_merged_lob, LENGTH('
9720: dbms_lob.write(l_merged_lob, LENGTH(mat_details_rec.required_date),LENGTH(l_merged_lob)+1, mat_details_rec.required_date);
9726: ||l_api_name , 'Checkpoint 17: mat_details_rec.SCHEDULED_MATERIAL_ID : '
9727: || mat_details_rec.SCHEDULED_MATERIAL_ID);
9728: END IF;
9729: IF (mat_details_rec.SCHEDULED_MATERIAL_ID IS NOT NULL) THEN
9730: context := dbms_xmlgen.newContext(l_mat_dffs);
9731: DBMS_XMLGEN.setbindvalue (context, '1', mat_details_rec.SCHEDULED_MATERIAL_ID);
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9727: || mat_details_rec.SCHEDULED_MATERIAL_ID);
9728: END IF;
9729: IF (mat_details_rec.SCHEDULED_MATERIAL_ID IS NOT NULL) THEN
9730: context := dbms_xmlgen.newContext(l_mat_dffs);
9731: DBMS_XMLGEN.setbindvalue (context, '1', mat_details_rec.SCHEDULED_MATERIAL_ID);
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9728: END IF;
9729: IF (mat_details_rec.SCHEDULED_MATERIAL_ID IS NOT NULL) THEN
9730: context := dbms_xmlgen.newContext(l_mat_dffs);
9731: DBMS_XMLGEN.setbindvalue (context, '1', mat_details_rec.SCHEDULED_MATERIAL_ID);
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9736: l_mat_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9729: IF (mat_details_rec.SCHEDULED_MATERIAL_ID IS NOT NULL) THEN
9730: context := dbms_xmlgen.newContext(l_mat_dffs);
9731: DBMS_XMLGEN.setbindvalue (context, '1', mat_details_rec.SCHEDULED_MATERIAL_ID);
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9736: l_mat_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9737: dbms_xmlgen.closeContext(context);
9730: context := dbms_xmlgen.newContext(l_mat_dffs);
9731: DBMS_XMLGEN.setbindvalue (context, '1', mat_details_rec.SCHEDULED_MATERIAL_ID);
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9736: l_mat_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9737: dbms_xmlgen.closeContext(context);
9738: -- Write to lob only when some data exists.
9731: DBMS_XMLGEN.setbindvalue (context, '1', mat_details_rec.SCHEDULED_MATERIAL_ID);
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9736: l_mat_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9737: dbms_xmlgen.closeContext(context);
9738: -- Write to lob only when some data exists.
9739: IF dbms_lob.getlength(l_mat_dff_lob) > 0 THEN
9732: dbms_xmlgen.setRowsetTag(context, 'MaterialDFFs');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9736: l_mat_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9737: dbms_xmlgen.closeContext(context);
9738: -- Write to lob only when some data exists.
9739: IF dbms_lob.getlength(l_mat_dff_lob) > 0 THEN
9740: l_offset := dbms_lob.INSTR(l_mat_dff_lob, '>');
9733: dbms_xmlgen.setRowTag(context,NULL);
9734: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9735: DBMS_XMLGEN.setNullHandling(context, 2);
9736: l_mat_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9737: dbms_xmlgen.closeContext(context);
9738: -- Write to lob only when some data exists.
9739: IF dbms_lob.getlength(l_mat_dff_lob) > 0 THEN
9740: l_offset := dbms_lob.INSTR(l_mat_dff_lob, '>');
9741: -- copy workorder details into final lob
9785: dbms_lob.write(l_merged_lob, LENGTH('
9786: dbms_lob.write(l_merged_lob, LENGTH(res_req_details_rec.resource_sequence),LENGTH(l_merged_lob)+1, res_req_details_rec.resource_sequence);
9787: dbms_lob.write(l_merged_lob, LENGTH('
9788: dbms_lob.write(l_merged_lob, LENGTH('
9789: dummy := DBMS_XMLGEN.CONVERT(res_req_details_rec.resource_code);
9790: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9791: dbms_lob.write(l_merged_lob, LENGTH('
9792: IF (res_req_details_rec.resource_type_name IS NOT NULL) THEN
9793: dbms_lob.write(l_merged_lob, LENGTH('
9790: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9791: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9792: IF (res_req_details_rec.resource_type_name IS NOT NULL) THEN
9793: dbms_lob.write(l_merged_lob, LENGTH('
9794: dummy := DBMS_XMLGEN.CONVERT(res_req_details_rec.resource_type_name);
9795: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9796: dbms_lob.write(l_merged_lob, LENGTH('
9797: ELSE
9798: dbms_lob.write(l_merged_lob, LENGTH('
9799: END IF;
9800: -- resource_name
9801: IF (res_req_details_rec.resource_name IS NOT NULL) THEN
9802: dbms_lob.write(l_merged_lob, LENGTH('
9803: dummy := DBMS_XMLGEN.CONVERT(res_req_details_rec.resource_name);
9804: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9805: dbms_lob.write(l_merged_lob, LENGTH('
9806: ELSE
9807: dbms_lob.write(l_merged_lob, LENGTH('
9813: dbms_lob.write(l_merged_lob, LENGTH(res_req_details_rec.duration),LENGTH(l_merged_lob)+1, res_req_details_rec.duration);
9814: dbms_lob.write(l_merged_lob, LENGTH(''),LENGTH(l_merged_lob)+1, '');
9815: IF (res_req_details_rec.uom_name IS NOT NULL) THEN
9816: dbms_lob.write(l_merged_lob, LENGTH('
9817: dummy := DBMS_XMLGEN.CONVERT(res_req_details_rec.uom_name);
9818: dbms_lob.write(l_merged_lob, LENGTH(dummy),LENGTH(l_merged_lob)+1, dummy);
9819: dbms_lob.write(l_merged_lob, LENGTH('
9820: ELSE
9821: dbms_lob.write(l_merged_lob, LENGTH('
9829: IF(l_route_op_res_found IN('R','O'))THEN -- fix for bug 10048778
9830: IF ((res_req_details_rec.resource_id IS NOT NULL)
9831: AND ((l_route_op_res_found = 'R' AND l_route_id IS NOT NULL)
9832: OR (l_route_op_res_found = 'O' AND res_req_details_rec.operation_id IS NOT NULL))) THEN
9833: context := dbms_xmlgen.newContext(l_res_dffs);
9834: --DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9835: --DBMS_XMLGEN.setbindvalue (context, '2',l_workorder_id);
9836: DBMS_XMLGEN.setbindvalue (context, '1',res_req_details_rec.resource_id);
9837: IF (l_route_op_res_found = 'R') THEN
9830: IF ((res_req_details_rec.resource_id IS NOT NULL)
9831: AND ((l_route_op_res_found = 'R' AND l_route_id IS NOT NULL)
9832: OR (l_route_op_res_found = 'O' AND res_req_details_rec.operation_id IS NOT NULL))) THEN
9833: context := dbms_xmlgen.newContext(l_res_dffs);
9834: --DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9835: --DBMS_XMLGEN.setbindvalue (context, '2',l_workorder_id);
9836: DBMS_XMLGEN.setbindvalue (context, '1',res_req_details_rec.resource_id);
9837: IF (l_route_op_res_found = 'R') THEN
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9831: AND ((l_route_op_res_found = 'R' AND l_route_id IS NOT NULL)
9832: OR (l_route_op_res_found = 'O' AND res_req_details_rec.operation_id IS NOT NULL))) THEN
9833: context := dbms_xmlgen.newContext(l_res_dffs);
9834: --DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9835: --DBMS_XMLGEN.setbindvalue (context, '2',l_workorder_id);
9836: DBMS_XMLGEN.setbindvalue (context, '1',res_req_details_rec.resource_id);
9837: IF (l_route_op_res_found = 'R') THEN
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9839: DBMS_XMLGEN.setbindvalue (context, '3',l_route_id);
9832: OR (l_route_op_res_found = 'O' AND res_req_details_rec.operation_id IS NOT NULL))) THEN
9833: context := dbms_xmlgen.newContext(l_res_dffs);
9834: --DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9835: --DBMS_XMLGEN.setbindvalue (context, '2',l_workorder_id);
9836: DBMS_XMLGEN.setbindvalue (context, '1',res_req_details_rec.resource_id);
9837: IF (l_route_op_res_found = 'R') THEN
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9839: DBMS_XMLGEN.setbindvalue (context, '3',l_route_id);
9840: ELSE
9834: --DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9835: --DBMS_XMLGEN.setbindvalue (context, '2',l_workorder_id);
9836: DBMS_XMLGEN.setbindvalue (context, '1',res_req_details_rec.resource_id);
9837: IF (l_route_op_res_found = 'R') THEN
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9839: DBMS_XMLGEN.setbindvalue (context, '3',l_route_id);
9840: ELSE
9841: DBMS_XMLGEN.setbindvalue (context, '2','OPERATION');
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9835: --DBMS_XMLGEN.setbindvalue (context, '2',l_workorder_id);
9836: DBMS_XMLGEN.setbindvalue (context, '1',res_req_details_rec.resource_id);
9837: IF (l_route_op_res_found = 'R') THEN
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9839: DBMS_XMLGEN.setbindvalue (context, '3',l_route_id);
9840: ELSE
9841: DBMS_XMLGEN.setbindvalue (context, '2','OPERATION');
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9843: END IF;
9837: IF (l_route_op_res_found = 'R') THEN
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9839: DBMS_XMLGEN.setbindvalue (context, '3',l_route_id);
9840: ELSE
9841: DBMS_XMLGEN.setbindvalue (context, '2','OPERATION');
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9843: END IF;
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9838: DBMS_XMLGEN.setbindvalue (context, '2','ROUTE');
9839: DBMS_XMLGEN.setbindvalue (context, '3',l_route_id);
9840: ELSE
9841: DBMS_XMLGEN.setbindvalue (context, '2','OPERATION');
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9843: END IF;
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9840: ELSE
9841: DBMS_XMLGEN.setbindvalue (context, '2','OPERATION');
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9843: END IF;
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9847: DBMS_XMLGEN.setNullHandling(context, 2);
9848: l_res_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9841: DBMS_XMLGEN.setbindvalue (context, '2','OPERATION');
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9843: END IF;
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9847: DBMS_XMLGEN.setNullHandling(context, 2);
9848: l_res_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9849: dbms_xmlgen.closeContext(context);
9842: DBMS_XMLGEN.setbindvalue (context, '3',res_req_details_rec.operation_id);
9843: END IF;
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9847: DBMS_XMLGEN.setNullHandling(context, 2);
9848: l_res_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9849: dbms_xmlgen.closeContext(context);
9850: -- Write to lob only when some data exists.
9843: END IF;
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9847: DBMS_XMLGEN.setNullHandling(context, 2);
9848: l_res_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9849: dbms_xmlgen.closeContext(context);
9850: -- Write to lob only when some data exists.
9851: IF dbms_lob.getlength(l_res_dff_lob) > 0
9844: dbms_xmlgen.setRowsetTag(context, 'ResourceDFFs');
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9847: DBMS_XMLGEN.setNullHandling(context, 2);
9848: l_res_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9849: dbms_xmlgen.closeContext(context);
9850: -- Write to lob only when some data exists.
9851: IF dbms_lob.getlength(l_res_dff_lob) > 0
9852: THEN
9845: dbms_xmlgen.setRowTag(context,null);
9846: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9847: DBMS_XMLGEN.setNullHandling(context, 2);
9848: l_res_dff_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9849: dbms_xmlgen.closeContext(context);
9850: -- Write to lob only when some data exists.
9851: IF dbms_lob.getlength(l_res_dff_lob) > 0
9852: THEN
9853: l_offset := dbms_lob.INSTR(l_res_dff_lob, '>');
9867: dbms_lob.write(l_merged_lob, length(''),length(l_merged_lob)+1, '');
9868:
9869: --Tools record
9870:
9871: context := dbms_xmlgen.newContext(l_tools_det);
9872: DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9873:
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9868:
9869: --Tools record
9870:
9871: context := dbms_xmlgen.newContext(l_tools_det);
9872: DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9873:
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9870:
9871: context := dbms_xmlgen.newContext(l_tools_det);
9872: DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9873:
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9877: DBMS_XMLGEN.setNullHandling(context, 2);
9878: l_tool_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9871: context := dbms_xmlgen.newContext(l_tools_det);
9872: DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9873:
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9877: DBMS_XMLGEN.setNullHandling(context, 2);
9878: l_tool_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9879: dbms_xmlgen.closeContext(context);
9872: DBMS_XMLGEN.setbindvalue (context, '1',l_workorder_id);
9873:
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9877: DBMS_XMLGEN.setNullHandling(context, 2);
9878: l_tool_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9879: dbms_xmlgen.closeContext(context);
9880: -- Write to lob only when some data exists.
9873:
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9877: DBMS_XMLGEN.setNullHandling(context, 2);
9878: l_tool_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9879: dbms_xmlgen.closeContext(context);
9880: -- Write to lob only when some data exists.
9881: IF dbms_lob.getlength(l_tool_det_lob) > 0
9874: dbms_xmlgen.setRowsetTag(context, 'Tools');
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9877: DBMS_XMLGEN.setNullHandling(context, 2);
9878: l_tool_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9879: dbms_xmlgen.closeContext(context);
9880: -- Write to lob only when some data exists.
9881: IF dbms_lob.getlength(l_tool_det_lob) > 0
9882: THEN
9875: dbms_xmlgen.setRowTag(context,'Tool');
9876: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9877: DBMS_XMLGEN.setNullHandling(context, 2);
9878: l_tool_det_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9879: dbms_xmlgen.closeContext(context);
9880: -- Write to lob only when some data exists.
9881: IF dbms_lob.getlength(l_tool_det_lob) > 0
9882: THEN
9883: l_offset := dbms_lob.INSTR(l_tool_det_lob, '>');
9886: dbms_lob.copy(l_merged_lob, l_tool_det_lob, dbms_lob.getlength(l_tool_det_lob), dbms_lob.getlength(l_merged_lob)+1, l_offset+ 1);
9887:
9888: END IF;
9889: /*
9890: context := dbms_xmlgen.newContext(l_inst_remove_det || l_workorder_id);
9891: dbms_xmlgen.setRowsetTag(context, 'ComponentRemovalInstalls');
9892: dbms_xmlgen.setRowTag(context,'ComponentRemovalInstall');
9893: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9894: l_inst_remove_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9887:
9888: END IF;
9889: /*
9890: context := dbms_xmlgen.newContext(l_inst_remove_det || l_workorder_id);
9891: dbms_xmlgen.setRowsetTag(context, 'ComponentRemovalInstalls');
9892: dbms_xmlgen.setRowTag(context,'ComponentRemovalInstall');
9893: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9894: l_inst_remove_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9895: dbms_xmlgen.closeContext(context);
9888: END IF;
9889: /*
9890: context := dbms_xmlgen.newContext(l_inst_remove_det || l_workorder_id);
9891: dbms_xmlgen.setRowsetTag(context, 'ComponentRemovalInstalls');
9892: dbms_xmlgen.setRowTag(context,'ComponentRemovalInstall');
9893: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9894: l_inst_remove_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9895: dbms_xmlgen.closeContext(context);
9896: -- Write to lob only when some data exists.
9889: /*
9890: context := dbms_xmlgen.newContext(l_inst_remove_det || l_workorder_id);
9891: dbms_xmlgen.setRowsetTag(context, 'ComponentRemovalInstalls');
9892: dbms_xmlgen.setRowTag(context,'ComponentRemovalInstall');
9893: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9894: l_inst_remove_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9895: dbms_xmlgen.closeContext(context);
9896: -- Write to lob only when some data exists.
9897: IF dbms_lob.getlength(l_inst_remove_lob) > 0
9890: context := dbms_xmlgen.newContext(l_inst_remove_det || l_workorder_id);
9891: dbms_xmlgen.setRowsetTag(context, 'ComponentRemovalInstalls');
9892: dbms_xmlgen.setRowTag(context,'ComponentRemovalInstall');
9893: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9894: l_inst_remove_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9895: dbms_xmlgen.closeContext(context);
9896: -- Write to lob only when some data exists.
9897: IF dbms_lob.getlength(l_inst_remove_lob) > 0
9898: THEN
9891: dbms_xmlgen.setRowsetTag(context, 'ComponentRemovalInstalls');
9892: dbms_xmlgen.setRowTag(context,'ComponentRemovalInstall');
9893: dbms_xmlgen.setConvertSpecialChars(context, TRUE);
9894: l_inst_remove_lob := dbms_xmlgen.getXML(context,DBMS_XMLGEN.NONE);
9895: dbms_xmlgen.closeContext(context);
9896: -- Write to lob only when some data exists.
9897: IF dbms_lob.getlength(l_inst_remove_lob) > 0
9898: THEN
9899: l_offset := dbms_lob.INSTR(l_inst_remove_lob, '>');