1861: ------------------------------------------------------------------------
1862: -- PROCEDURE : display_error_messages
1863: -- DESCRIPTION: This procedure will parse a string of error message codes
1864: -- delimited of with a comma. It will lookup each code using
1865: -- fnd_messages routine.
1866: --
1867: -- 22-Feb-2007 Prabhakar o Created.
1868: ------------------------------------------------------------------------
1869:
1888: ELSE
1889: comma_loc := 0;
1890: END IF;
1891:
1892: fnd_message.clear;
1893:
1894: --
1895: -- loop will cycle thru each occurrence of delimted text
1896: -- and display message with its code..
1917:
1918: --
1919: -- Convert error message code to its 'user-friendly' message;
1920: --
1921: fnd_message.set_name ('PN', ind_message);
1922: --
1923: -- Display message to the output log
1924: --
1925: put_output ( '-->'
1922: --
1923: -- Display message to the output log
1924: --
1925: put_output ( '-->'
1926: || fnd_message.get
1927: || ' ('
1928: || ind_message
1929: || ')');
1930: --
2215: LOOP
2216: v_counter := v_counter + 1;
2217:
2218: put_output ('****************************************');
2219: fnd_message.set_name ('PN','PN_RICAL_PROC');
2220: put_output(fnd_message.get||'......');
2221: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2222: fnd_message.set_token ('NUM', opex_rec.agr_num);
2223: put_output(fnd_message.get);
2216: v_counter := v_counter + 1;
2217:
2218: put_output ('****************************************');
2219: fnd_message.set_name ('PN','PN_RICAL_PROC');
2220: put_output(fnd_message.get||'......');
2221: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2222: fnd_message.set_token ('NUM', opex_rec.agr_num);
2223: put_output(fnd_message.get);
2224: put_output ('****************************************');
2217:
2218: put_output ('****************************************');
2219: fnd_message.set_name ('PN','PN_RICAL_PROC');
2220: put_output(fnd_message.get||'......');
2221: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2222: fnd_message.set_token ('NUM', opex_rec.agr_num);
2223: put_output(fnd_message.get);
2224: put_output ('****************************************');
2225:
2218: put_output ('****************************************');
2219: fnd_message.set_name ('PN','PN_RICAL_PROC');
2220: put_output(fnd_message.get||'......');
2221: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2222: fnd_message.set_token ('NUM', opex_rec.agr_num);
2223: put_output(fnd_message.get);
2224: put_output ('****************************************');
2225:
2226: l_info := ' approving payment term ID: '||opex_rec.payment_term_id||' ';
2219: fnd_message.set_name ('PN','PN_RICAL_PROC');
2220: put_output(fnd_message.get||'......');
2221: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2222: fnd_message.set_token ('NUM', opex_rec.agr_num);
2223: put_output(fnd_message.get);
2224: put_output ('****************************************');
2225:
2226: l_info := ' approving payment term ID: '||opex_rec.payment_term_id||' ';
2227: approve_opex_pay_term (
2229: ,ip_opex_pay_term_id => opex_rec.payment_term_id
2230: ,op_msg => v_msg);
2231:
2232: l_message := NULL;
2233: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2234: l_message := ' '||fnd_message.get;
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2230: ,op_msg => v_msg);
2231:
2232: l_message := NULL;
2233: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2234: l_message := ' '||fnd_message.get;
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2231:
2232: l_message := NULL;
2233: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2234: l_message := ' '||fnd_message.get;
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2239: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2232: l_message := NULL;
2233: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2234: l_message := ' '||fnd_message.get;
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2239: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2240: l_message := l_message||' '||fnd_message.get;
2233: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2234: l_message := ' '||fnd_message.get;
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2239: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2240: l_message := l_message||' '||fnd_message.get;
2241: put_output(l_message);
2234: l_message := ' '||fnd_message.get;
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2239: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2240: l_message := l_message||' '||fnd_message.get;
2241: put_output(l_message);
2242:
2235: fnd_message.set_name ('PN','PN_RICAL_START');
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2239: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2240: l_message := l_message||' '||fnd_message.get;
2241: put_output(l_message);
2242:
2243: l_message := NULL;
2236: l_message := l_message||' '||fnd_message.get;
2237: fnd_message.set_name ('PN','PN_RICAL_END');
2238: l_message := l_message||' '||fnd_message.get;
2239: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2240: l_message := l_message||' '||fnd_message.get;
2241: put_output(l_message);
2242:
2243: l_message := NULL;
2244:
2241: put_output(l_message);
2242:
2243: l_message := NULL;
2244:
2245: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2246: l_message := ' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2242:
2243: l_message := NULL;
2244:
2245: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2246: l_message := ' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2243: l_message := NULL;
2244:
2245: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2246: l_message := ' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2244:
2245: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2246: l_message := ' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2245: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2246: l_message := ' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2246: l_message := ' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2247: fnd_message.set_name ('PN','PN_RICAL_DATE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2248: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2249: fnd_message.set_name ('PN','PN_RICAL_DATE');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2257: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2250: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2257: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2258: l_message := l_message||' '||fnd_message.get;
2251: fnd_message.set_name ('PN','PN_RICAL_AMT');
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2257: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2258: l_message := l_message||' '||fnd_message.get;
2259: put_output(l_message);
2252: l_message := l_message||' '||fnd_message.get;
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2257: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2258: l_message := l_message||' '||fnd_message.get;
2259: put_output(l_message);
2260:
2253: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2257: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2258: l_message := l_message||' '||fnd_message.get;
2259: put_output(l_message);
2260:
2261: put_output (
2254: l_message := l_message||' '||fnd_message.get;
2255: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2256: l_message := l_message||' '||fnd_message.get;
2257: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2258: l_message := l_message||' '||fnd_message.get;
2259: put_output(l_message);
2260:
2261: put_output (
2262: ' --------- ----------- ----------- ---------- ----------- ------------------ ----------'
2276:
2277: END LOOP;
2278:
2279: IF v_counter = 0 THEN
2280: fnd_message.set_name ('PN','PN_RICAL_MSG');
2281: put_output (fnd_message.get||' :');
2282: display_error_messages (ip_message_string => 'PN_INDEX_NO_PAYT_TO_APPROVE');
2283: END IF;
2284:
2277: END LOOP;
2278:
2279: IF v_counter = 0 THEN
2280: fnd_message.set_name ('PN','PN_RICAL_MSG');
2281: put_output (fnd_message.get||' :');
2282: display_error_messages (ip_message_string => 'PN_INDEX_NO_PAYT_TO_APPROVE');
2283: END IF;
2284:
2285: put_log('pn_opex_terms_pkg.approve_index_pay_term_batch (-) : ');