1446: END IF;
1447:
1448:
1449: -- Create report header
1450: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER'));
1451: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER_LINE'));
1452: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1453: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_SOB_TITLE')
1454: ||' '||RPAD(l_sob_name, 65)
1447:
1448:
1449: -- Create report header
1450: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER'));
1451: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER_LINE'));
1452: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1453: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_SOB_TITLE')
1454: ||' '||RPAD(l_sob_name, 65)
1455: ||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_OU_TITLE')
1449: -- Create report header
1450: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER'));
1451: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER_LINE'));
1452: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1453: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_SOB_TITLE')
1454: ||' '||RPAD(l_sob_name, 65)
1455: ||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_OU_TITLE')
1456: ||' '||l_org_name);
1457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROG_DATE_TITLE')
1451: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,' '||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_HEADER_LINE'));
1452: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1453: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_SOB_TITLE')
1454: ||' '||RPAD(l_sob_name, 65)
1455: ||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_OU_TITLE')
1456: ||' '||l_org_name);
1457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROG_DATE_TITLE')
1458: ||' '||RPAD(l_sysdate, 61)||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROV_DATE_TITLE')
1459: ||' '||l_entry_date);
1453: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_SOB_TITLE')
1454: ||' '||RPAD(l_sob_name, 65)
1455: ||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_OU_TITLE')
1456: ||' '||l_org_name);
1457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROG_DATE_TITLE')
1458: ||' '||RPAD(l_sysdate, 61)||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROV_DATE_TITLE')
1459: ||' '||l_entry_date);
1460: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CURR_TITLE')
1461: ||' '||RPAD(l_func_currency_code,65));
1454: ||' '||RPAD(l_sob_name, 65)
1455: ||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_OU_TITLE')
1456: ||' '||l_org_name);
1457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROG_DATE_TITLE')
1458: ||' '||RPAD(l_sysdate, 61)||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROV_DATE_TITLE')
1459: ||' '||l_entry_date);
1460: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CURR_TITLE')
1461: ||' '||RPAD(l_func_currency_code,65));
1462: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1456: ||' '||l_org_name);
1457: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROG_DATE_TITLE')
1458: ||' '||RPAD(l_sysdate, 61)||FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROV_DATE_TITLE')
1459: ||' '||l_entry_date);
1460: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CURR_TITLE')
1461: ||' '||RPAD(l_func_currency_code,65));
1462: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1463:
1464: -- Create Report Content
1461: ||' '||RPAD(l_func_currency_code,65));
1462: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1463:
1464: -- Create Report Content
1465: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROD_TITLE')||' '||l_product_name);
1466: --FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_STY_TITLE')||' '||l_sty_name);
1467: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1468:
1469: IF l_product_subclass = 'LEASE' THEN
1462: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1463:
1464: -- Create Report Content
1465: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_PROD_TITLE')||' '||l_product_name);
1466: --FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_STY_TITLE')||' '||l_sty_name);
1467: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1468:
1469: IF l_product_subclass = 'LEASE' THEN
1470: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_NUM_TITLE'),28)
1466: --FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_STY_TITLE')||' '||l_sty_name);
1467: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1468:
1469: IF l_product_subclass = 'LEASE' THEN
1470: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_NUM_TITLE'),28)
1471: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1472: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1467: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
1468:
1469: IF l_product_subclass = 'LEASE' THEN
1470: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_NUM_TITLE'),28)
1471: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1472: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1468:
1469: IF l_product_subclass = 'LEASE' THEN
1470: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_NUM_TITLE'),28)
1471: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1472: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1469: IF l_product_subclass = 'LEASE' THEN
1470: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_NUM_TITLE'),28)
1471: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1472: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1470: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_NUM_TITLE'),28)
1471: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1472: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1471: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1472: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1473: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1480: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1474: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1480: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1475: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1480: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1483: END IF;
1476: ELSE
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1480: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1483: END IF;
1484:
1477: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_NUM_TITLE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1480: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1483: END IF;
1484:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1478: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_NUM_TITLE'),22)
1479: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_TITLE'),23)
1480: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_TITLE'),26)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1483: END IF;
1484:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1481: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURRENCY'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1483: END IF;
1484:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1487: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_LINE'),23)
1488: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_LINE'),26)
1489: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURR_UNDERLINE'),9)
1482: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_TITLE'),17));
1483: END IF;
1484:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1487: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_LINE'),23)
1488: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_LINE'),26)
1489: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURR_UNDERLINE'),9)
1490: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_LINE'),17));
1483: END IF;
1484:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1487: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_LINE'),23)
1488: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_LINE'),26)
1489: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURR_UNDERLINE'),9)
1490: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_LINE'),17));
1491:
1484:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1487: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_LINE'),23)
1488: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_LINE'),26)
1489: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURR_UNDERLINE'),9)
1490: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_LINE'),17));
1491:
1492:
1485: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_CTR_LINE'),28)
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1487: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_LINE'),23)
1488: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_LINE'),26)
1489: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURR_UNDERLINE'),9)
1490: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_LINE'),17));
1491:
1492:
1493: IF l_pdt_contracts_tbl.COUNT > 0 THEN
1486: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TRX_LINE'),22)
1487: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXLOCAL_LINE'),23)
1488: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_TAXCORP_LINE'),26)
1489: ||RPAD(FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CURR_UNDERLINE'),9)
1490: ||LPAD(FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AMT_LINE'),17));
1491:
1492:
1493: IF l_pdt_contracts_tbl.COUNT > 0 THEN
1494: -- Bug# 3020763 Processing within a pl/sql tbl instead of within the cursor itself.
2187:
2188: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
2189: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
2190: IF l_product_subclass = 'LEASE' THEN
2191: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CNTRCT_ERROR_TITLE'));
2192: ELSE
2193: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_ERROR_TITLE'));
2194: END IF;
2195: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CNT_ERR_UNDERLINE'));
2189: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
2190: IF l_product_subclass = 'LEASE' THEN
2191: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CNTRCT_ERROR_TITLE'));
2192: ELSE
2193: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_ERROR_TITLE'));
2194: END IF;
2195: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CNT_ERR_UNDERLINE'));
2196: IF l_contract_error_tbl.COUNT > 0 THEN
2197: FOR x IN l_contract_error_tbl.FIRST..l_contract_error_tbl.LAST
2191: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CNTRCT_ERROR_TITLE'));
2192: ELSE
2193: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_GLP_RPT_AGR_ERROR_TITLE'));
2194: END IF;
2195: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_CNT_ERR_UNDERLINE'));
2196: IF l_contract_error_tbl.COUNT > 0 THEN
2197: FOR x IN l_contract_error_tbl.FIRST..l_contract_error_tbl.LAST
2198: LOOP
2199: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,l_contract_error_tbl(x));
2198: LOOP
2199: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,l_contract_error_tbl(x));
2200: END LOOP;
2201: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,'');
2202: FND_FILE.PUT_LINE(FND_FILE.OUTPUT,FND_MESSAGE.GET_STRING('OKL','OKL_AGN_RPT_ADD_INFO'));
2203: END IF;
2204: retcode := 0;
2205:
2206: EXCEPTION