6101: l_okl_eli_policies_csr okl_eli_policies_csr%ROWTYPE;
6102: BEGIN
6103:
6104: -- Bug 3742614 Formatted Output
6105: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6106: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation Start ---');
6107: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6108: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Request: '|| FND_GLOBAL.CONC_REQUEST_ID|| ' ---------Date: '||TO_CHAR(SYSDATE)||' ---');
6109: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6102: BEGIN
6103:
6104: -- Bug 3742614 Formatted Output
6105: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6106: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation Start ---');
6107: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6108: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Request: '|| FND_GLOBAL.CONC_REQUEST_ID|| ' ---------Date: '||TO_CHAR(SYSDATE)||' ---');
6109: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6110:
6103:
6104: -- Bug 3742614 Formatted Output
6105: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6106: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation Start ---');
6107: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6108: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Request: '|| FND_GLOBAL.CONC_REQUEST_ID|| ' ---------Date: '||TO_CHAR(SYSDATE)||' ---');
6109: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6110:
6111: -- Get values from system profile
6104: -- Bug 3742614 Formatted Output
6105: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6106: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation Start ---');
6107: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6108: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Request: '|| FND_GLOBAL.CONC_REQUEST_ID|| ' ---------Date: '||TO_CHAR(SYSDATE)||' ---');
6109: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6110:
6111: -- Get values from system profile
6112: l_afterlease_criteria := fnd_profile.value('OKLINDAYSFORACTIVATION');
6105: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6106: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation Start ---');
6107: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6108: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Request: '|| FND_GLOBAL.CONC_REQUEST_ID|| ' ---------Date: '||TO_CHAR(SYSDATE)||' ---');
6109: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6110:
6111: -- Get values from system profile
6112: l_afterlease_criteria := fnd_profile.value('OKLINDAYSFORACTIVATION');
6113: -- Bug 3742614 changed the profile name and output message
6113: -- Bug 3742614 changed the profile name and output message
6114: l_percentage_criteria := fnd_profile.value('OKLINPERCENTFORACTIVATION');
6115: -- Check for NULL values and return if either of these is null
6116: IF l_afterlease_criteria = Okc_Api.G_MISS_NUM OR l_afterlease_criteria IS NULL THEN
6117: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'SYSTEM PROFILE FOR OKLINDAYSFORACTIVATION IS NOT defined');
6118: RETURN;
6119: END IF;
6120: -- Check for NULL values and return if any of these is null
6121: IF l_percentage_criteria = Okc_Api.G_MISS_NUM OR l_percentage_criteria IS NULL THEN
6118: RETURN;
6119: END IF;
6120: -- Check for NULL values and return if any of these is null
6121: IF l_percentage_criteria = Okc_Api.G_MISS_NUM OR l_percentage_criteria IS NULL THEN
6122: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'SYSTEM PROFILE FOR OKLINPERCENTFORACTIVATION IS NOT defined');
6123: RETURN;
6124: END IF;
6125: OPEN okl_eli_policies_csr(l_afterlease_criteria ,l_percentage_criteria );
6126: LOOP
6143:
6144: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
6145: -- Bug 3742614 building the table for Formated output for activated and
6146: -- errored policies with reasons
6147: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Policy Number : ' ||l_policy_number|| ' Can not be Activated' );
6148: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Reason IS ----' );
6149: FOR i IN 1..l_msg_count
6150: LOOP
6151: JTF_PLSQL_API.get_messages(i,l_msg_data);
6144: IF (l_return_status = OKC_API.G_RET_STS_UNEXP_ERROR) THEN
6145: -- Bug 3742614 building the table for Formated output for activated and
6146: -- errored policies with reasons
6147: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Policy Number : ' ||l_policy_number|| ' Can not be Activated' );
6148: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Reason IS ----' );
6149: FOR i IN 1..l_msg_count
6150: LOOP
6151: JTF_PLSQL_API.get_messages(i,l_msg_data);
6152: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,l_msg_data );
6148: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Reason IS ----' );
6149: FOR i IN 1..l_msg_count
6150: LOOP
6151: JTF_PLSQL_API.get_messages(i,l_msg_data);
6152: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,l_msg_data );
6153: END LOOP;
6154: l_notactivated_counter := l_notactivated_counter + 1;
6155: nonactivated_pol_tbl(l_notactivated_counter).CONTRACT_NUMBER := l_khr_number;
6156: nonactivated_pol_tbl(l_notactivated_counter).POLICY_NUMBER := l_policy_number;
6156: nonactivated_pol_tbl(l_notactivated_counter).POLICY_NUMBER := l_policy_number;
6157: RETURN;
6158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR)
6159: THEN
6160: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Policy Number : ' ||l_policy_number || ' Can not be Activated' );
6161: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Reason is ----' );
6162: FOR i IN 1..l_msg_count
6163: LOOP
6164: JTF_PLSQL_API.get_messages(i,l_msg_data);
6157: RETURN;
6158: ELSIF (l_return_status = OKC_API.G_RET_STS_ERROR)
6159: THEN
6160: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Policy Number : ' ||l_policy_number || ' Can not be Activated' );
6161: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Reason is ----' );
6162: FOR i IN 1..l_msg_count
6163: LOOP
6164: JTF_PLSQL_API.get_messages(i,l_msg_data);
6165: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,l_msg_data );
6161: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--Reason is ----' );
6162: FOR i IN 1..l_msg_count
6163: LOOP
6164: JTF_PLSQL_API.get_messages(i,l_msg_data);
6165: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,l_msg_data );
6166: END LOOP;
6167: l_notactivated_counter:= l_notactivated_counter + 1 ;
6168: nonactivated_pol_tbl(l_notactivated_counter).CONTRACT_NUMBER := l_khr_number;
6169: nonactivated_pol_tbl(l_notactivated_counter).POLICY_NUMBER := l_policy_number;
6176: END LOOP ;
6177: CLOSE okl_eli_policies_csr ;
6178:
6179: -- Bug 3742614 Formated output
6180: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---------------------- Summary -----------------------------');
6181: IF (activated_pol_tbl.COUNT > 0)
6182: THEN
6183: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Activated -----');
6184: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6179: -- Bug 3742614 Formated output
6180: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---------------------- Summary -----------------------------');
6181: IF (activated_pol_tbl.COUNT > 0)
6182: THEN
6183: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Activated -----');
6184: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6185: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6186:
6187: FOR i IN activated_pol_tbl.first..activated_pol_tbl.last
6180: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---------------------- Summary -----------------------------');
6181: IF (activated_pol_tbl.COUNT > 0)
6182: THEN
6183: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Activated -----');
6184: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6185: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6186:
6187: FOR i IN activated_pol_tbl.first..activated_pol_tbl.last
6188: LOOP
6181: IF (activated_pol_tbl.COUNT > 0)
6182: THEN
6183: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Activated -----');
6184: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6185: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6186:
6187: FOR i IN activated_pol_tbl.first..activated_pol_tbl.last
6188: LOOP
6189: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||activated_pol_tbl(i).CONTRACT_NUMBER ||' ' ||activated_pol_tbl(i).POLICY_NUMBER );
6185: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6186:
6187: FOR i IN activated_pol_tbl.first..activated_pol_tbl.last
6188: LOOP
6189: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||activated_pol_tbl(i).CONTRACT_NUMBER ||' ' ||activated_pol_tbl(i).POLICY_NUMBER );
6190: END LOOP;
6191:
6192: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Total = ' || activated_pol_tbl.COUNT);
6193: END IF;
6188: LOOP
6189: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||activated_pol_tbl(i).CONTRACT_NUMBER ||' ' ||activated_pol_tbl(i).POLICY_NUMBER );
6190: END LOOP;
6191:
6192: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Total = ' || activated_pol_tbl.COUNT);
6193: END IF;
6194:
6195: IF (nonactivated_pol_tbl.COUNT > 0)
6196: THEN
6193: END IF;
6194:
6195: IF (nonactivated_pol_tbl.COUNT > 0)
6196: THEN
6197: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Not Activated -----');
6198: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6199: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6200:
6201: FOR n IN nonactivated_pol_tbl.first..nonactivated_pol_tbl.last
6194:
6195: IF (nonactivated_pol_tbl.COUNT > 0)
6196: THEN
6197: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Not Activated -----');
6198: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6199: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6200:
6201: FOR n IN nonactivated_pol_tbl.first..nonactivated_pol_tbl.last
6202: LOOP
6195: IF (nonactivated_pol_tbl.COUNT > 0)
6196: THEN
6197: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'---- Policies Not Activated -----');
6198: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'Contract Number Policy Number ' );
6199: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6200:
6201: FOR n IN nonactivated_pol_tbl.first..nonactivated_pol_tbl.last
6202: LOOP
6203: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||nonactivated_pol_tbl(n).CONTRACT_NUMBER ||' ' ||nonactivated_pol_tbl(n).POLICY_NUMBER );
6199: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||'--------------------------------' );
6200:
6201: FOR n IN nonactivated_pol_tbl.first..nonactivated_pol_tbl.last
6202: LOOP
6203: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||nonactivated_pol_tbl(n).CONTRACT_NUMBER ||' ' ||nonactivated_pol_tbl(n).POLICY_NUMBER );
6204: END LOOP;
6205:
6206: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Total = ' || nonactivated_pol_tbl.COUNT);
6207: END IF;
6202: LOOP
6203: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,' '||nonactivated_pol_tbl(n).CONTRACT_NUMBER ||' ' ||nonactivated_pol_tbl(n).POLICY_NUMBER );
6204: END LOOP;
6205:
6206: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Total = ' || nonactivated_pol_tbl.COUNT);
6207: END IF;
6208:
6209: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6210: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation End ---');
6205:
6206: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Total = ' || nonactivated_pol_tbl.COUNT);
6207: END IF;
6208:
6209: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6210: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation End ---');
6211: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6212:
6213: END activate_ins_streams ;
6206: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'Total = ' || nonactivated_pol_tbl.COUNT);
6207: END IF;
6208:
6209: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6210: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation End ---');
6211: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6212:
6213: END activate_ins_streams ;
6214: ---------------------------------------------------------------------------
6207: END IF;
6208:
6209: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6210: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'--- Automatic Insurance Activation End ---');
6211: Fnd_File.PUT_LINE(Fnd_File.OUTPUT,'-------------------------------------------------------------');
6212:
6213: END activate_ins_streams ;
6214: ---------------------------------------------------------------------------
6215: -- PROCEDURE activate_ins_stream