3135: CLOSE get_location_type_csr;
3136:
3137: IF Locked_Area_Expense_Class(l_tenancy_Id, l_tenancy_str_date, l_tenancy_end_date) THEN
3138: pnp_debug_pkg.put_log_msg('********************************************************************************');
3139: fnd_message.set_name ('PN','PN_SCHIT_LOCK_DEL');
3140: fnd_message.set_token ('LOC_CODE', l_location_code);
3141: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3142: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3143: pnp_debug_pkg.put_log_msg(fnd_message.get);
3136:
3137: IF Locked_Area_Expense_Class(l_tenancy_Id, l_tenancy_str_date, l_tenancy_end_date) THEN
3138: pnp_debug_pkg.put_log_msg('********************************************************************************');
3139: fnd_message.set_name ('PN','PN_SCHIT_LOCK_DEL');
3140: fnd_message.set_token ('LOC_CODE', l_location_code);
3141: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3142: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3143: pnp_debug_pkg.put_log_msg(fnd_message.get);
3144: pnp_debug_pkg.put_log_msg('********************************************************************************');
3137: IF Locked_Area_Expense_Class(l_tenancy_Id, l_tenancy_str_date, l_tenancy_end_date) THEN
3138: pnp_debug_pkg.put_log_msg('********************************************************************************');
3139: fnd_message.set_name ('PN','PN_SCHIT_LOCK_DEL');
3140: fnd_message.set_token ('LOC_CODE', l_location_code);
3141: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3142: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3143: pnp_debug_pkg.put_log_msg(fnd_message.get);
3144: pnp_debug_pkg.put_log_msg('********************************************************************************');
3145: ELSE
3138: pnp_debug_pkg.put_log_msg('********************************************************************************');
3139: fnd_message.set_name ('PN','PN_SCHIT_LOCK_DEL');
3140: fnd_message.set_token ('LOC_CODE', l_location_code);
3141: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3142: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3143: pnp_debug_pkg.put_log_msg(fnd_message.get);
3144: pnp_debug_pkg.put_log_msg('********************************************************************************');
3145: ELSE
3146:
3139: fnd_message.set_name ('PN','PN_SCHIT_LOCK_DEL');
3140: fnd_message.set_token ('LOC_CODE', l_location_code);
3141: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3142: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3143: pnp_debug_pkg.put_log_msg(fnd_message.get);
3144: pnp_debug_pkg.put_log_msg('********************************************************************************');
3145: ELSE
3146:
3147: pn_tenancies_pkg.delete_row(
3159:
3160: IF l_action = 'R' THEN --Regenerate
3161:
3162: pnp_debug_pkg.put_log_msg('********************************************************************************');
3163: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3164: fnd_message.set_token ('LOC_CODE', l_location_code);
3165: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3166: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3167: pnp_debug_pkg.put_log_msg(fnd_message.get);
3160: IF l_action = 'R' THEN --Regenerate
3161:
3162: pnp_debug_pkg.put_log_msg('********************************************************************************');
3163: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3164: fnd_message.set_token ('LOC_CODE', l_location_code);
3165: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3166: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3167: pnp_debug_pkg.put_log_msg(fnd_message.get);
3168: pnp_debug_pkg.put_log_msg('********************************************************************************');
3161:
3162: pnp_debug_pkg.put_log_msg('********************************************************************************');
3163: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3164: fnd_message.set_token ('LOC_CODE', l_location_code);
3165: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3166: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3167: pnp_debug_pkg.put_log_msg(fnd_message.get);
3168: pnp_debug_pkg.put_log_msg('********************************************************************************');
3169:
3162: pnp_debug_pkg.put_log_msg('********************************************************************************');
3163: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3164: fnd_message.set_token ('LOC_CODE', l_location_code);
3165: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3166: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3167: pnp_debug_pkg.put_log_msg(fnd_message.get);
3168: pnp_debug_pkg.put_log_msg('********************************************************************************');
3169:
3170: END IF;
3163: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3164: fnd_message.set_token ('LOC_CODE', l_location_code);
3165: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3166: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3167: pnp_debug_pkg.put_log_msg(fnd_message.get);
3168: pnp_debug_pkg.put_log_msg('********************************************************************************');
3169:
3170: END IF;
3171: END IF;
3221: FETCH get_location_type_csr INTO l_location_code, l_loc_type_code;
3222: CLOSE get_location_type_csr;
3223:
3224: pnp_debug_pkg.put_log_msg('********************************************************************************');
3225: fnd_message.set_name ('PN','PN_SCHIT_LOCK_UPD');
3226: fnd_message.set_token ('LOC_CODE', l_location_code);
3227: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3228: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3229: pnp_debug_pkg.put_log_msg(fnd_message.get);
3222: CLOSE get_location_type_csr;
3223:
3224: pnp_debug_pkg.put_log_msg('********************************************************************************');
3225: fnd_message.set_name ('PN','PN_SCHIT_LOCK_UPD');
3226: fnd_message.set_token ('LOC_CODE', l_location_code);
3227: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3228: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3229: pnp_debug_pkg.put_log_msg(fnd_message.get);
3230: pnp_debug_pkg.put_log_msg('********************************************************************************');
3223:
3224: pnp_debug_pkg.put_log_msg('********************************************************************************');
3225: fnd_message.set_name ('PN','PN_SCHIT_LOCK_UPD');
3226: fnd_message.set_token ('LOC_CODE', l_location_code);
3227: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3228: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3229: pnp_debug_pkg.put_log_msg(fnd_message.get);
3230: pnp_debug_pkg.put_log_msg('********************************************************************************');
3231: ELSE
3224: pnp_debug_pkg.put_log_msg('********************************************************************************');
3225: fnd_message.set_name ('PN','PN_SCHIT_LOCK_UPD');
3226: fnd_message.set_token ('LOC_CODE', l_location_code);
3227: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3228: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3229: pnp_debug_pkg.put_log_msg(fnd_message.get);
3230: pnp_debug_pkg.put_log_msg('********************************************************************************');
3231: ELSE
3232:
3225: fnd_message.set_name ('PN','PN_SCHIT_LOCK_UPD');
3226: fnd_message.set_token ('LOC_CODE', l_location_code);
3227: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3228: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3229: pnp_debug_pkg.put_log_msg(fnd_message.get);
3230: pnp_debug_pkg.put_log_msg('********************************************************************************');
3231: ELSE
3232:
3233: UPDATE pn_tenancies_all
3245: FETCH get_location_type_csr INTO l_location_code, l_loc_type_code;
3246: CLOSE get_location_type_csr;
3247:
3248: pnp_debug_pkg.put_log_msg('********************************************************************************');
3249: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3250: fnd_message.set_token ('LOC_CODE', l_location_code);
3251: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3252: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3253: pnp_debug_pkg.put_log_msg(fnd_message.get);
3246: CLOSE get_location_type_csr;
3247:
3248: pnp_debug_pkg.put_log_msg('********************************************************************************');
3249: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3250: fnd_message.set_token ('LOC_CODE', l_location_code);
3251: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3252: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3253: pnp_debug_pkg.put_log_msg(fnd_message.get);
3254: pnp_debug_pkg.put_log_msg('********************************************************************************');
3247:
3248: pnp_debug_pkg.put_log_msg('********************************************************************************');
3249: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3250: fnd_message.set_token ('LOC_CODE', l_location_code);
3251: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3252: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3253: pnp_debug_pkg.put_log_msg(fnd_message.get);
3254: pnp_debug_pkg.put_log_msg('********************************************************************************');
3255: END IF;
3248: pnp_debug_pkg.put_log_msg('********************************************************************************');
3249: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3250: fnd_message.set_token ('LOC_CODE', l_location_code);
3251: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3252: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3253: pnp_debug_pkg.put_log_msg(fnd_message.get);
3254: pnp_debug_pkg.put_log_msg('********************************************************************************');
3255: END IF;
3256: END IF;
3249: fnd_message.set_name ('PN','PN_SCHIT_CUST');
3250: fnd_message.set_token ('LOC_CODE', l_location_code);
3251: fnd_message.set_token ('ODATE', l_tenancy_str_date);
3252: fnd_message.set_token ('EDATE', l_tenancy_end_date);
3253: pnp_debug_pkg.put_log_msg(fnd_message.get);
3254: pnp_debug_pkg.put_log_msg('********************************************************************************');
3255: END IF;
3256: END IF;
3257: END LOOP;
5515:
5516: WHEN OTHERS THEN
5517: x_return_status := FND_API.G_RET_STS_ERROR;
5518: pnp_debug_pkg.log('CREATE_PAYMENT_TERM - Others error ..' || sqlerrm);
5519: fnd_message.set_name('PN','PN_OTHERS_EXCEPTION');
5520:
5521: END Create_Payment_Term;
5522:
5523:
5990:
5991: BEGIN
5992:
5993:
5994: fnd_message.set_name ('PN','PN_SCHIT_DTLS');
5995: fnd_message.set_token ('ID', g_Lease_Id);
5996: fnd_message.set_token ('NUM', g_lease_num);
5997: fnd_message.set_token ('NAME', g_lease_name);
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5991: BEGIN
5992:
5993:
5994: fnd_message.set_name ('PN','PN_SCHIT_DTLS');
5995: fnd_message.set_token ('ID', g_Lease_Id);
5996: fnd_message.set_token ('NUM', g_lease_num);
5997: fnd_message.set_token ('NAME', g_lease_name);
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
5992:
5993:
5994: fnd_message.set_name ('PN','PN_SCHIT_DTLS');
5995: fnd_message.set_token ('ID', g_Lease_Id);
5996: fnd_message.set_token ('NUM', g_lease_num);
5997: fnd_message.set_token ('NAME', g_lease_name);
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
6000: pnp_debug_pkg.put_log_msg('');
5993:
5994: fnd_message.set_name ('PN','PN_SCHIT_DTLS');
5995: fnd_message.set_token ('ID', g_Lease_Id);
5996: fnd_message.set_token ('NUM', g_lease_num);
5997: fnd_message.set_token ('NAME', g_lease_name);
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
6000: pnp_debug_pkg.put_log_msg('');
6001:
5994: fnd_message.set_name ('PN','PN_SCHIT_DTLS');
5995: fnd_message.set_token ('ID', g_Lease_Id);
5996: fnd_message.set_token ('NUM', g_lease_num);
5997: fnd_message.set_token ('NAME', g_lease_name);
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
6000: pnp_debug_pkg.put_log_msg('');
6001:
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
5995: fnd_message.set_token ('ID', g_Lease_Id);
5996: fnd_message.set_token ('NUM', g_lease_num);
5997: fnd_message.set_token ('NAME', g_lease_name);
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
6000: pnp_debug_pkg.put_log_msg('');
6001:
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
6003: l_message := ' '||fnd_message.get||' ';
5998: fnd_message.set_token ('CONTXT', p_lease_context);
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
6000: pnp_debug_pkg.put_log_msg('');
6001:
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
6003: l_message := ' '||fnd_message.get||' ';
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
5999: pnp_debug_pkg.put_log_msg(fnd_message.get);
6000: pnp_debug_pkg.put_log_msg('');
6001:
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
6003: l_message := ' '||fnd_message.get||' ';
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6000: pnp_debug_pkg.put_log_msg('');
6001:
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
6003: l_message := ' '||fnd_message.get||' ';
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6001:
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
6003: l_message := ' '||fnd_message.get||' ';
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6002: fnd_message.set_name ('PN','PN_SCHIT_CUR');
6003: l_message := ' '||fnd_message.get||' ';
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6010: fnd_message.set_name ('PN','PN_SCHIT_ACR');
6003: l_message := ' '||fnd_message.get||' ';
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6010: fnd_message.set_name ('PN','PN_SCHIT_ACR');
6011: l_message := l_message||fnd_message.get;
6004: fnd_message.set_name ('PN','PN_SCHIT_TOT');
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6010: fnd_message.set_name ('PN','PN_SCHIT_ACR');
6011: l_message := l_message||fnd_message.get;
6012: pnp_debug_pkg.put_log_msg(l_message);
6005: l_message := l_message||fnd_message.get||' ';
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6010: fnd_message.set_name ('PN','PN_SCHIT_ACR');
6011: l_message := l_message||fnd_message.get;
6012: pnp_debug_pkg.put_log_msg(l_message);
6013:
6006: fnd_message.set_name ('PN','PN_SCHIT_NORM');
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6010: fnd_message.set_name ('PN','PN_SCHIT_ACR');
6011: l_message := l_message||fnd_message.get;
6012: pnp_debug_pkg.put_log_msg(l_message);
6013:
6014: IF g_lease_class_code = 'DIRECT' THEN
6007: l_message := l_message||fnd_message.get||' ';
6008: fnd_message.set_name ('PN','PN_SCHIT_ACC');
6009: l_message := l_message||fnd_message.get||' ';
6010: fnd_message.set_name ('PN','PN_SCHIT_ACR');
6011: l_message := l_message||fnd_message.get;
6012: pnp_debug_pkg.put_log_msg(l_message);
6013:
6014: IF g_lease_class_code = 'DIRECT' THEN
6015: fnd_message.set_name ('PN','PN_RICAL_DATE');
6011: l_message := l_message||fnd_message.get;
6012: pnp_debug_pkg.put_log_msg(l_message);
6013:
6014: IF g_lease_class_code = 'DIRECT' THEN
6015: fnd_message.set_name ('PN','PN_RICAL_DATE');
6016: l_message := fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6012: pnp_debug_pkg.put_log_msg(l_message);
6013:
6014: IF g_lease_class_code = 'DIRECT' THEN
6015: fnd_message.set_name ('PN','PN_RICAL_DATE');
6016: l_message := fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6013:
6014: IF g_lease_class_code = 'DIRECT' THEN
6015: fnd_message.set_name ('PN','PN_RICAL_DATE');
6016: l_message := fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6014: IF g_lease_class_code = 'DIRECT' THEN
6015: fnd_message.set_name ('PN','PN_RICAL_DATE');
6016: l_message := fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6015: fnd_message.set_name ('PN','PN_RICAL_DATE');
6016: l_message := fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6016: l_message := fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6017: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6018: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6019: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6027: fnd_message.set_name ('PN','PN_SCHIT_LIA');
6020: l_message := l_message||fnd_message.get||' ';
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6027: fnd_message.set_name ('PN','PN_SCHIT_LIA');
6028: l_message := l_message||fnd_message.get;
6021: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6027: fnd_message.set_name ('PN','PN_SCHIT_LIA');
6028: l_message := l_message||fnd_message.get;
6029: pnp_debug_pkg.put_log_msg(l_message);
6022: l_message := l_message||fnd_message.get||' ';
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6027: fnd_message.set_name ('PN','PN_SCHIT_LIA');
6028: l_message := l_message||fnd_message.get;
6029: pnp_debug_pkg.put_log_msg(l_message);
6030:
6023: fnd_message.set_name ('PN','PN_SCHIT_EXP');
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6027: fnd_message.set_name ('PN','PN_SCHIT_LIA');
6028: l_message := l_message||fnd_message.get;
6029: pnp_debug_pkg.put_log_msg(l_message);
6030:
6031: ELSE
6024: l_message := l_message||fnd_message.get||' ';
6025: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6026: l_message := l_message||fnd_message.get||' ';
6027: fnd_message.set_name ('PN','PN_SCHIT_LIA');
6028: l_message := l_message||fnd_message.get;
6029: pnp_debug_pkg.put_log_msg(l_message);
6030:
6031: ELSE
6032: fnd_message.set_name ('PN','PN_RICAL_DATE');
6028: l_message := l_message||fnd_message.get;
6029: pnp_debug_pkg.put_log_msg(l_message);
6030:
6031: ELSE
6032: fnd_message.set_name ('PN','PN_RICAL_DATE');
6033: l_message := fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6029: pnp_debug_pkg.put_log_msg(l_message);
6030:
6031: ELSE
6032: fnd_message.set_name ('PN','PN_RICAL_DATE');
6033: l_message := fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6030:
6031: ELSE
6032: fnd_message.set_name ('PN','PN_RICAL_DATE');
6033: l_message := fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6031: ELSE
6032: fnd_message.set_name ('PN','PN_RICAL_DATE');
6033: l_message := fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6032: fnd_message.set_name ('PN','PN_RICAL_DATE');
6033: l_message := fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6033: l_message := fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6034: fnd_message.set_name ('PN','PN_SCHIT_CODE');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6035: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6036: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6044: fnd_message.set_name ('PN','PN_SCHIT_AST');
6037: l_message := l_message||fnd_message.get||' ';
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6044: fnd_message.set_name ('PN','PN_SCHIT_AST');
6045: l_message := l_message||fnd_message.get;
6038: fnd_message.set_name ('PN','PN_SCHIT_CASH');
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6044: fnd_message.set_name ('PN','PN_SCHIT_AST');
6045: l_message := l_message||fnd_message.get;
6046: pnp_debug_pkg.put_log_msg(l_message);
6039: l_message := l_message||fnd_message.get||' ';
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6044: fnd_message.set_name ('PN','PN_SCHIT_AST');
6045: l_message := l_message||fnd_message.get;
6046: pnp_debug_pkg.put_log_msg(l_message);
6047: END IF;
6040: fnd_message.set_name ('PN','PN_SCHIT_REV');
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6044: fnd_message.set_name ('PN','PN_SCHIT_AST');
6045: l_message := l_message||fnd_message.get;
6046: pnp_debug_pkg.put_log_msg(l_message);
6047: END IF;
6048:
6041: l_message := l_message||fnd_message.get||' ';
6042: fnd_message.set_name ('PN','PN_SCHIT_ADJ');
6043: l_message := l_message||fnd_message.get||' ';
6044: fnd_message.set_name ('PN','PN_SCHIT_AST');
6045: l_message := l_message||fnd_message.get;
6046: pnp_debug_pkg.put_log_msg(l_message);
6047: END IF;
6048:
6049: pnp_debug_pkg.put_log_msg
6119:
6120: IF term_id_tab.count > 0 THEN
6121: pnp_debug_pkg.put_log_msg
6122: ('===========================================================================');
6123: fnd_message.set_name('PN', 'PN_RETRO_RECAGR_REPORT');
6124: pnp_debug_pkg.put_log_msg(fnd_message.get);
6125: pnp_debug_pkg.put_log_msg('');
6126:
6127: FOR i in 1..term_id_tab.count LOOP
6120: IF term_id_tab.count > 0 THEN
6121: pnp_debug_pkg.put_log_msg
6122: ('===========================================================================');
6123: fnd_message.set_name('PN', 'PN_RETRO_RECAGR_REPORT');
6124: pnp_debug_pkg.put_log_msg(fnd_message.get);
6125: pnp_debug_pkg.put_log_msg('');
6126:
6127: FOR i in 1..term_id_tab.count LOOP
6128: FOR rec IN get_agreements_cur(term_id_tab(i)) LOOP
6126:
6127: FOR i in 1..term_id_tab.count LOOP
6128: FOR rec IN get_agreements_cur(term_id_tab(i)) LOOP
6129:
6130: fnd_message.set_name('PN', 'PN_RECAGR_NAME_NUM');
6131: fnd_message.set_token('REC_AGR_NAME', rec.rec_agreement_name);
6132: fnd_message.set_token('REC_AGR_NUM', rec.rec_agreement_num);
6133:
6134: pnp_debug_pkg.put_log_msg(fnd_message.get);
6127: FOR i in 1..term_id_tab.count LOOP
6128: FOR rec IN get_agreements_cur(term_id_tab(i)) LOOP
6129:
6130: fnd_message.set_name('PN', 'PN_RECAGR_NAME_NUM');
6131: fnd_message.set_token('REC_AGR_NAME', rec.rec_agreement_name);
6132: fnd_message.set_token('REC_AGR_NUM', rec.rec_agreement_num);
6133:
6134: pnp_debug_pkg.put_log_msg(fnd_message.get);
6135: pnp_debug_pkg.put_log_msg('');
6128: FOR rec IN get_agreements_cur(term_id_tab(i)) LOOP
6129:
6130: fnd_message.set_name('PN', 'PN_RECAGR_NAME_NUM');
6131: fnd_message.set_token('REC_AGR_NAME', rec.rec_agreement_name);
6132: fnd_message.set_token('REC_AGR_NUM', rec.rec_agreement_num);
6133:
6134: pnp_debug_pkg.put_log_msg(fnd_message.get);
6135: pnp_debug_pkg.put_log_msg('');
6136:
6130: fnd_message.set_name('PN', 'PN_RECAGR_NAME_NUM');
6131: fnd_message.set_token('REC_AGR_NAME', rec.rec_agreement_name);
6132: fnd_message.set_token('REC_AGR_NUM', rec.rec_agreement_num);
6133:
6134: pnp_debug_pkg.put_log_msg(fnd_message.get);
6135: pnp_debug_pkg.put_log_msg('');
6136:
6137: END LOOP;
6138: END LOOP;
6184:
6185: IF term_id_tab.count > 0 THEN
6186: pnp_debug_pkg.put_log_msg
6187: ('===========================================================================');
6188: fnd_message.set_name('PN', 'PN_RETRO_VARENT_REPORT');
6189: pnp_debug_pkg.put_log_msg(fnd_message.get);
6190: pnp_debug_pkg.put_log_msg('');
6191:
6192: FOR i in 1..term_id_tab.count LOOP
6185: IF term_id_tab.count > 0 THEN
6186: pnp_debug_pkg.put_log_msg
6187: ('===========================================================================');
6188: fnd_message.set_name('PN', 'PN_RETRO_VARENT_REPORT');
6189: pnp_debug_pkg.put_log_msg(fnd_message.get);
6190: pnp_debug_pkg.put_log_msg('');
6191:
6192: FOR i in 1..term_id_tab.count LOOP
6193: FOR vr IN get_vr_cur(term_id_tab(i)) LOOP
6191:
6192: FOR i in 1..term_id_tab.count LOOP
6193: FOR vr IN get_vr_cur(term_id_tab(i)) LOOP
6194:
6195: fnd_message.set_name('PN', 'PN_VARENT_NUM');
6196: fnd_message.set_token('VAR_RENT_NUM', vr.rent_num);
6197:
6198: pnp_debug_pkg.put_log_msg(fnd_message.get);
6199: pnp_debug_pkg.put_log_msg('');
6192: FOR i in 1..term_id_tab.count LOOP
6193: FOR vr IN get_vr_cur(term_id_tab(i)) LOOP
6194:
6195: fnd_message.set_name('PN', 'PN_VARENT_NUM');
6196: fnd_message.set_token('VAR_RENT_NUM', vr.rent_num);
6197:
6198: pnp_debug_pkg.put_log_msg(fnd_message.get);
6199: pnp_debug_pkg.put_log_msg('');
6200:
6194:
6195: fnd_message.set_name('PN', 'PN_VARENT_NUM');
6196: fnd_message.set_token('VAR_RENT_NUM', vr.rent_num);
6197:
6198: pnp_debug_pkg.put_log_msg(fnd_message.get);
6199: pnp_debug_pkg.put_log_msg('');
6200:
6201: END LOOP;
6202: END LOOP;
7394: IF (l_requestId = 0 ) THEN
7395: pnp_debug_pkg.log(' ');
7396: pnp_debug_pkg.log('Could not submit Concurrent Request PNCALNDX'
7397: ||' (PN - Calculate Index Rent)');
7398: fnd_message.set_name('PN', 'PN_SCHIT_CONC_FAIL');
7399: pnp_debug_pkg.put_log_msg(fnd_message.get);
7400:
7401: ELSE -- Got a request Id
7402: pnp_debug_pkg.log(' ');
7395: pnp_debug_pkg.log(' ');
7396: pnp_debug_pkg.log('Could not submit Concurrent Request PNCALNDX'
7397: ||' (PN - Calculate Index Rent)');
7398: fnd_message.set_name('PN', 'PN_SCHIT_CONC_FAIL');
7399: pnp_debug_pkg.put_log_msg(fnd_message.get);
7400:
7401: ELSE -- Got a request Id
7402: pnp_debug_pkg.log(' ');
7403: pnp_debug_pkg.log('Concurrent Request '||TO_CHAR(l_requestId)
7401: ELSE -- Got a request Id
7402: pnp_debug_pkg.log(' ');
7403: pnp_debug_pkg.log('Concurrent Request '||TO_CHAR(l_requestId)
7404: ||' has been submitted for: PN - Calculate Index Rent');
7405: fnd_message.set_name('PN', 'PN_SCHIT_CONC_SUCC');
7406: pnp_debug_pkg.put_log_msg(fnd_message.get);
7407: END IF;
7408: END IF;
7409:
7402: pnp_debug_pkg.log(' ');
7403: pnp_debug_pkg.log('Concurrent Request '||TO_CHAR(l_requestId)
7404: ||' has been submitted for: PN - Calculate Index Rent');
7405: fnd_message.set_name('PN', 'PN_SCHIT_CONC_SUCC');
7406: pnp_debug_pkg.put_log_msg(fnd_message.get);
7407: END IF;
7408: END IF;
7409:
7410: pnp_debug_pkg.log('');
7412: pnp_debug_pkg.log('pn_schedules_items.schedule_items -End- (-)');
7413:
7414: EXCEPTION
7415: WHEN RETRO_NOT_ENABLED_EXCEPTION THEN
7416: fnd_message.set_name ('PN', 'PN_RETRO_NOT_ENABLED');
7417: errbuf := fnd_message.get;
7418: pnp_debug_pkg.put_log_msg(errbuf);
7419: retcode := 2;
7420: RAISE;
7413:
7414: EXCEPTION
7415: WHEN RETRO_NOT_ENABLED_EXCEPTION THEN
7416: fnd_message.set_name ('PN', 'PN_RETRO_NOT_ENABLED');
7417: errbuf := fnd_message.get;
7418: pnp_debug_pkg.put_log_msg(errbuf);
7419: retcode := 2;
7420: RAISE;
7421: