176: ,INCLUDE_CHARTS IN VARCHAR2
177: ) IS
178: l_api_name CONSTANT VARCHAR2(30) := 'PROCESS_PORTFOLIO_REPORT';
179: l_api_version CONSTANT NUMBER := 1.0;
180: ctx DBMS_XMLQUERY.ctxType;
181: result CLOB;
182: qryCtx DBMS_XMLGEN.ctxHandle;
183: l_result CLOB;
184: tempResult CLOB;
190: l_xml_header varchar2(3000);
191: l_xml_header_length number;
192: l_errNo NUMBER;
193: l_errMsg VARCHAR2(200);
194: queryCtx DBMS_XMLquery.ctxType;
195: l_xml_query VARCHAR2(32767);
196: TYPE ref_cur IS REF CURSOR;
197: l_xml_stmt ref_cur;
198: l_rows_processed NUMBER;
428: INTO l_loan_officer
429: FROM jtf_rs_resource_extns
430: WHERE resource_id = loan_assigned_to;
431: END IF;
432: ctx := DBMS_XMLQUERY.newContext(l_query);
433: -- Bind Mandatory Variables
434: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
435: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
436: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
430: WHERE resource_id = loan_assigned_to;
431: END IF;
432: ctx := DBMS_XMLQUERY.newContext(l_query);
433: -- Bind Mandatory Variables
434: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
435: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
436: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
437: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
438:
431: END IF;
432: ctx := DBMS_XMLQUERY.newContext(l_query);
433: -- Bind Mandatory Variables
434: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
435: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
436: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
437: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
438:
439: -- Bind Optional Variables if they are NOT NULL
432: ctx := DBMS_XMLQUERY.newContext(l_query);
433: -- Bind Mandatory Variables
434: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
435: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
436: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
437: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
438:
439: -- Bind Optional Variables if they are NOT NULL
440: IF borrower_id is NOT NULL
433: -- Bind Mandatory Variables
434: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
435: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
436: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
437: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
438:
439: -- Bind Optional Variables if they are NOT NULL
440: IF borrower_id is NOT NULL
441: THEN
438:
439: -- Bind Optional Variables if they are NOT NULL
440: IF borrower_id is NOT NULL
441: THEN
442: DBMS_XMLQuery.setBindValue(ctx, 'BORROWER_ID', borrower_id);
443: END IF;
444: IF loan_number is NOT NULL
445: THEN
446: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_NUMBER', loan_number);
442: DBMS_XMLQuery.setBindValue(ctx, 'BORROWER_ID', borrower_id);
443: END IF;
444: IF loan_number is NOT NULL
445: THEN
446: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_NUMBER', loan_number);
447: END IF;
448: IF cust_account_id is NOT NULL
449: THEN
450: DBMS_XMLQuery.setBindValue(ctx, 'CUST_ACCOUNT_ID', cust_account_id);
446: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_NUMBER', loan_number);
447: END IF;
448: IF cust_account_id is NOT NULL
449: THEN
450: DBMS_XMLQuery.setBindValue(ctx, 'CUST_ACCOUNT_ID', cust_account_id);
451: END IF;
452: IF legal_entity_id is NOT NULL
453: THEN
454: DBMS_XMLQuery.setBindValue(ctx, 'LEGAL_ENTITY_ID', legal_entity_id);
450: DBMS_XMLQuery.setBindValue(ctx, 'CUST_ACCOUNT_ID', cust_account_id);
451: END IF;
452: IF legal_entity_id is NOT NULL
453: THEN
454: DBMS_XMLQuery.setBindValue(ctx, 'LEGAL_ENTITY_ID', legal_entity_id);
455: END IF;
456: IF loan_assigned_to is NOT NULL
457: THEN
458: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_ASSIGNED_TO', loan_assigned_to);
454: DBMS_XMLQuery.setBindValue(ctx, 'LEGAL_ENTITY_ID', legal_entity_id);
455: END IF;
456: IF loan_assigned_to is NOT NULL
457: THEN
458: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_ASSIGNED_TO', loan_assigned_to);
459: END IF;
460: IF product_id is NOT NULL
461: THEN
462: DBMS_XMLQuery.setBindValue(ctx, 'PRODUCT_ID', product_id);
458: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_ASSIGNED_TO', loan_assigned_to);
459: END IF;
460: IF product_id is NOT NULL
461: THEN
462: DBMS_XMLQuery.setBindValue(ctx, 'PRODUCT_ID', product_id);
463: END IF;
464:
465: -- now get the result
466: BEGIN
463: END IF;
464:
465: -- now get the result
466: BEGIN
467: l_result := DBMS_XMLQUERY.getXML(ctx);
468: DBMS_XMLQuery.closeContext(ctx);
469: l_rows_processed := 1;
470: EXCEPTION
471: WHEN OTHERS THEN
464:
465: -- now get the result
466: BEGIN
467: l_result := DBMS_XMLQUERY.getXML(ctx);
468: DBMS_XMLQuery.closeContext(ctx);
469: l_rows_processed := 1;
470: EXCEPTION
471: WHEN OTHERS THEN
472: DBMS_XMLQuery.getExceptionContent(ctx,l_errNo,l_errMsg);
468: DBMS_XMLQuery.closeContext(ctx);
469: l_rows_processed := 1;
470: EXCEPTION
471: WHEN OTHERS THEN
472: DBMS_XMLQuery.getExceptionContent(ctx,l_errNo,l_errMsg);
473: IF l_errNo = 1403 THEN
474: l_rows_processed := 0;
475: END IF;
476: DBMS_XMLQuery.closeContext(ctx);
472: DBMS_XMLQuery.getExceptionContent(ctx,l_errNo,l_errMsg);
473: IF l_errNo = 1403 THEN
474: l_rows_processed := 0;
475: END IF;
476: DBMS_XMLQuery.closeContext(ctx);
477: END;
478: -- We are adding the LNSPORTFOLIO and PARAMETERS TAGs so we have
479: -- to offset the first line.
480: IF l_rows_processed <> 0 THEN
542: ,LOAN_ASSIGNED_TO IN NUMBER
543: ) IS
544: l_api_name CONSTANT VARCHAR2(30) := 'PROCESS_RECON_REPORT';
545: l_api_version CONSTANT NUMBER := 1.0;
546: ctx DBMS_XMLQUERY.ctxType;
547: result CLOB;
548: qryCtx DBMS_XMLGEN.ctxHandle;
549: l_result CLOB;
550: tempResult CLOB;
556: l_xml_header varchar2(3000);
557: l_xml_header_length number;
558: l_errNo NUMBER;
559: l_errMsg VARCHAR2(200);
560: queryCtx DBMS_XMLquery.ctxType;
561: l_xml_query VARCHAR2(32767);
562: TYPE ref_cur IS REF CURSOR;
563: l_xml_stmt ref_cur;
564: l_rows_processed NUMBER;
892: INTO l_loan_officer
893: FROM jtf_rs_resource_extns
894: WHERE resource_id = loan_assigned_to;
895: END IF;
896: ctx := DBMS_XMLQUERY.newContext(l_query);
897: DBMS_XMLQuery.setRaiseNoRowsException(ctx,TRUE);
898: -- Bind Mandatory Variables
899: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
900: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
893: FROM jtf_rs_resource_extns
894: WHERE resource_id = loan_assigned_to;
895: END IF;
896: ctx := DBMS_XMLQUERY.newContext(l_query);
897: DBMS_XMLQuery.setRaiseNoRowsException(ctx,TRUE);
898: -- Bind Mandatory Variables
899: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
900: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
901: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
895: END IF;
896: ctx := DBMS_XMLQUERY.newContext(l_query);
897: DBMS_XMLQuery.setRaiseNoRowsException(ctx,TRUE);
898: -- Bind Mandatory Variables
899: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
900: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
901: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
902: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
903:
896: ctx := DBMS_XMLQUERY.newContext(l_query);
897: DBMS_XMLQuery.setRaiseNoRowsException(ctx,TRUE);
898: -- Bind Mandatory Variables
899: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
900: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
901: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
902: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
903:
904: -- Bind Optional Variables if they are NOT NULL
897: DBMS_XMLQuery.setRaiseNoRowsException(ctx,TRUE);
898: -- Bind Mandatory Variables
899: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
900: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
901: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
902: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
903:
904: -- Bind Optional Variables if they are NOT NULL
905: IF borrower_id is NOT NULL
898: -- Bind Mandatory Variables
899: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_CLASS', loan_class);
900: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_TYPE_ID', loan_type_id);
901: DBMS_XMLQuery.setBindValue(ctx, 'CURRENCY_CODE', currency_code);
902: DBMS_XMLQuery.setBindValue(ctx, 'ORG_ID', l_org_id);
903:
904: -- Bind Optional Variables if they are NOT NULL
905: IF borrower_id is NOT NULL
906: THEN
903:
904: -- Bind Optional Variables if they are NOT NULL
905: IF borrower_id is NOT NULL
906: THEN
907: DBMS_XMLQuery.setBindValue(ctx, 'BORROWER_ID', borrower_id);
908: END IF;
909: IF loan_number is NOT NULL
910: THEN
911: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_NUMBER', loan_number);
907: DBMS_XMLQuery.setBindValue(ctx, 'BORROWER_ID', borrower_id);
908: END IF;
909: IF loan_number is NOT NULL
910: THEN
911: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_NUMBER', loan_number);
912: END IF;
913: IF cust_account_id is NOT NULL
914: THEN
915: DBMS_XMLQuery.setBindValue(ctx, 'CUST_ACCOUNT_ID', cust_account_id);
911: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_NUMBER', loan_number);
912: END IF;
913: IF cust_account_id is NOT NULL
914: THEN
915: DBMS_XMLQuery.setBindValue(ctx, 'CUST_ACCOUNT_ID', cust_account_id);
916: END IF;
917: IF legal_entity_id is NOT NULL
918: THEN
919: DBMS_XMLQuery.setBindValue(ctx, 'LEGAL_ENTITY_ID', legal_entity_id);
915: DBMS_XMLQuery.setBindValue(ctx, 'CUST_ACCOUNT_ID', cust_account_id);
916: END IF;
917: IF legal_entity_id is NOT NULL
918: THEN
919: DBMS_XMLQuery.setBindValue(ctx, 'LEGAL_ENTITY_ID', legal_entity_id);
920: END IF;
921: IF loan_assigned_to is NOT NULL
922: THEN
923: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_ASSIGNED_TO', loan_assigned_to);
919: DBMS_XMLQuery.setBindValue(ctx, 'LEGAL_ENTITY_ID', legal_entity_id);
920: END IF;
921: IF loan_assigned_to is NOT NULL
922: THEN
923: DBMS_XMLQuery.setBindValue(ctx, 'LOAN_ASSIGNED_TO', loan_assigned_to);
924: END IF;
925:
926: -- now get the result
927: BEGIN
924: END IF;
925:
926: -- now get the result
927: BEGIN
928: l_result := DBMS_XMLQUERY.getXML(ctx);
929: DBMS_XMLQuery.closeContext(ctx);
930: l_rows_processed := 1;
931: EXCEPTION
932: WHEN OTHERS THEN
925:
926: -- now get the result
927: BEGIN
928: l_result := DBMS_XMLQUERY.getXML(ctx);
929: DBMS_XMLQuery.closeContext(ctx);
930: l_rows_processed := 1;
931: EXCEPTION
932: WHEN OTHERS THEN
933: DBMS_XMLQuery.getExceptionContent(ctx,l_errNo,l_errMsg);
929: DBMS_XMLQuery.closeContext(ctx);
930: l_rows_processed := 1;
931: EXCEPTION
932: WHEN OTHERS THEN
933: DBMS_XMLQuery.getExceptionContent(ctx,l_errNo,l_errMsg);
934: IF l_errNo = 1403 THEN
935: l_rows_processed := 0;
936: END IF;
937: DBMS_XMLQuery.closeContext(ctx);
933: DBMS_XMLQuery.getExceptionContent(ctx,l_errNo,l_errMsg);
934: IF l_errNo = 1403 THEN
935: l_rows_processed := 0;
936: END IF;
937: DBMS_XMLQuery.closeContext(ctx);
938: END;
939: -- We are adding the LNSPORTFOLIO and PARAMETERS TAGs so we have
940: -- to offset the first line.
941: IF l_rows_processed <> 0 THEN
989: ,p_LOAN_ID IN NUMBER
990: ) IS
991: l_api_name CONSTANT VARCHAR2(30) := 'GEN_AGREEMENT_XML';
992: l_api_version CONSTANT NUMBER := 1.0;
993: ctx DBMS_XMLQUERY.ctxType;
994: result CLOB;
995: qryCtx DBMS_XMLGEN.ctxHandle;
996: l_result CLOB;
997: tempResult CLOB;
1004: l_xml_header_length number;
1005: l_close_tag VARCHAR2(100);
1006: l_errNo NUMBER;
1007: l_errMsg VARCHAR2(200);
1008: queryCtx DBMS_XMLquery.ctxType;
1009: l_xml_query VARCHAR2(32767);
1010: TYPE ref_cur IS REF CURSOR;
1011: l_xml_stmt ref_cur;
1012: l_rows_processed NUMBER;