1892: ------------------------------------------------------------------------
1893: -- PROCEDURE : display_error_messages
1894: -- DESCRIPTION: This procedure will parse a string of error message codes
1895: -- delimited of with a comma. It will lookup each code using
1896: -- fnd_messages routine.
1897: --
1898: -- 22-Feb-2007 Prabhakar o Created.
1899: ------------------------------------------------------------------------
1900:
1919: ELSE
1920: comma_loc := 0;
1921: END IF;
1922:
1923: fnd_message.clear;
1924:
1925: --
1926: -- loop will cycle thru each occurrence of delimted text
1927: -- and display message with its code..
1948:
1949: --
1950: -- Convert error message code to its 'user-friendly' message;
1951: --
1952: fnd_message.set_name ('PN', ind_message);
1953: --
1954: -- Display message to the output log
1955: --
1956: put_output ( '-->'
1953: --
1954: -- Display message to the output log
1955: --
1956: put_output ( '-->'
1957: || fnd_message.get
1958: || ' ('
1959: || ind_message
1960: || ')');
1961: --
2246: LOOP
2247: v_counter := v_counter + 1;
2248:
2249: put_output ('****************************************');
2250: fnd_message.set_name ('PN','PN_RICAL_PROC');
2251: put_output(fnd_message.get||'......');
2252: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2253: fnd_message.set_token ('NUM', opex_rec.agr_num);
2254: put_output(fnd_message.get);
2247: v_counter := v_counter + 1;
2248:
2249: put_output ('****************************************');
2250: fnd_message.set_name ('PN','PN_RICAL_PROC');
2251: put_output(fnd_message.get||'......');
2252: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2253: fnd_message.set_token ('NUM', opex_rec.agr_num);
2254: put_output(fnd_message.get);
2255: put_output ('****************************************');
2248:
2249: put_output ('****************************************');
2250: fnd_message.set_name ('PN','PN_RICAL_PROC');
2251: put_output(fnd_message.get||'......');
2252: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2253: fnd_message.set_token ('NUM', opex_rec.agr_num);
2254: put_output(fnd_message.get);
2255: put_output ('****************************************');
2256:
2249: put_output ('****************************************');
2250: fnd_message.set_name ('PN','PN_RICAL_PROC');
2251: put_output(fnd_message.get||'......');
2252: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2253: fnd_message.set_token ('NUM', opex_rec.agr_num);
2254: put_output(fnd_message.get);
2255: put_output ('****************************************');
2256:
2257: l_info := ' approving payment term ID: '||opex_rec.payment_term_id||' ';
2250: fnd_message.set_name ('PN','PN_RICAL_PROC');
2251: put_output(fnd_message.get||'......');
2252: fnd_message.set_name ('PN','PN_OPEX_CAL_AGR_NO');
2253: fnd_message.set_token ('NUM', opex_rec.agr_num);
2254: put_output(fnd_message.get);
2255: put_output ('****************************************');
2256:
2257: l_info := ' approving payment term ID: '||opex_rec.payment_term_id||' ';
2258: approve_opex_pay_term (
2260: ,ip_opex_pay_term_id => opex_rec.payment_term_id
2261: ,op_msg => v_msg);
2262:
2263: l_message := NULL;
2264: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2265: l_message := ' '||fnd_message.get;
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2261: ,op_msg => v_msg);
2262:
2263: l_message := NULL;
2264: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2265: l_message := ' '||fnd_message.get;
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2262:
2263: l_message := NULL;
2264: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2265: l_message := ' '||fnd_message.get;
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2270: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2263: l_message := NULL;
2264: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2265: l_message := ' '||fnd_message.get;
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2270: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2271: l_message := l_message||' '||fnd_message.get;
2264: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2265: l_message := ' '||fnd_message.get;
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2270: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2271: l_message := l_message||' '||fnd_message.get;
2272: put_output(l_message);
2265: l_message := ' '||fnd_message.get;
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2270: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2271: l_message := l_message||' '||fnd_message.get;
2272: put_output(l_message);
2273:
2266: fnd_message.set_name ('PN','PN_RICAL_START');
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2270: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2271: l_message := l_message||' '||fnd_message.get;
2272: put_output(l_message);
2273:
2274: l_message := NULL;
2267: l_message := l_message||' '||fnd_message.get;
2268: fnd_message.set_name ('PN','PN_RICAL_END');
2269: l_message := l_message||' '||fnd_message.get;
2270: fnd_message.set_name ('PN','PN_RICAL_PAYMENT');
2271: l_message := l_message||' '||fnd_message.get;
2272: put_output(l_message);
2273:
2274: l_message := NULL;
2275:
2272: put_output(l_message);
2273:
2274: l_message := NULL;
2275:
2276: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2277: l_message := ' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2273:
2274: l_message := NULL;
2275:
2276: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2277: l_message := ' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2274: l_message := NULL;
2275:
2276: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2277: l_message := ' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2275:
2276: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2277: l_message := ' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2276: fnd_message.set_name ('PN','PN_RICAL_FREQ');
2277: l_message := ' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2277: l_message := ' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2278: fnd_message.set_name ('PN','PN_RICAL_DATE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2279: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2280: fnd_message.set_name ('PN','PN_RICAL_DATE');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2288: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2281: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2288: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2289: l_message := l_message||' '||fnd_message.get;
2282: fnd_message.set_name ('PN','PN_RICAL_AMT');
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2288: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2289: l_message := l_message||' '||fnd_message.get;
2290: put_output(l_message);
2283: l_message := l_message||' '||fnd_message.get;
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2288: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2289: l_message := l_message||' '||fnd_message.get;
2290: put_output(l_message);
2291:
2284: fnd_message.set_name ('PN','PN_RICAL_STATUS');
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2288: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2289: l_message := l_message||' '||fnd_message.get;
2290: put_output(l_message);
2291:
2292: put_output (
2285: l_message := l_message||' '||fnd_message.get;
2286: fnd_message.set_name ('PN','PN_RICAL_PAYMENT_TYPE');
2287: l_message := l_message||' '||fnd_message.get;
2288: fnd_message.set_name ('PN','PN_RICAL_NORZ');
2289: l_message := l_message||' '||fnd_message.get;
2290: put_output(l_message);
2291:
2292: put_output (
2293: ' --------- ----------- ----------- ---------- ----------- ------------------ ----------'
2307:
2308: END LOOP;
2309:
2310: IF v_counter = 0 THEN
2311: fnd_message.set_name ('PN','PN_RICAL_MSG');
2312: put_output (fnd_message.get||' :');
2313: display_error_messages (ip_message_string => 'PN_INDEX_NO_PAYT_TO_APPROVE');
2314: END IF;
2315:
2308: END LOOP;
2309:
2310: IF v_counter = 0 THEN
2311: fnd_message.set_name ('PN','PN_RICAL_MSG');
2312: put_output (fnd_message.get||' :');
2313: display_error_messages (ip_message_string => 'PN_INDEX_NO_PAYT_TO_APPROVE');
2314: END IF;
2315:
2316: put_log('pn_opex_terms_pkg.approve_index_pay_term_batch (-) : ');