[Home] [Help]
312: End;
313:
314: PROCEDURE IB_New(
315: P_instance_rec Instance_rec_type,
316: x_inst_dtls_tbl OUT NOCOPY OKS_IHD_PVT.ihdv_tbl_type,
317: x_return_status OUT NoCopy Varchar2,
318: x_msg_count OUT NOCOPY Number,
319: x_msg_data OUT NOCOPY VARCHAR2
320: )
497: p_contact_tbl OKS_EXTWARPRGM_PVT .contact_tbl;
498: l_SalesCredit_tbl OKS_EXTWARPRGM_PVT.SalesCredit_tbl;
499: l_SalesCredit_tbl_hdr OKS_EXTWARPRGM_PVT.SalesCredit_tbl; --mmadhavi bug 4174921
500: l_pricing_attributes_in OKS_EXTWARPRGM_PVT.Pricing_attributes_Type;
501: l_inst_dtls_tbl OKS_IHD_PVT.ihdv_tbl_type ;
502: l_insthist_rec OKS_INS_PVT.insv_rec_type;
503:
504:
505:
2056: k_upd_tbl OKS_EXTWARPRGM_PVT.Contract_tbl;
2057:
2058:
2059: l_return_status Varchar2(1):= OKC_API.G_RET_STS_SUCCESS;
2060: l_inst_dtls_tbl OKS_IHD_PVT.ihdv_tbl_type ;
2061: l_subscr_instance Varchar2(1);
2062: l_ref_num Varchar2(30);
2063: l_temp Number;
2064: l_parameters Varchar2(2000);
2064: l_parameters Varchar2(2000);
2065: l_insthist_rec OKS_INS_PVT.insv_rec_type;
2066: x_insthist_rec OKS_INS_PVT.insv_rec_type;
2067: l_instparent_id Number;
2068: x_inst_dtls_tbl OKS_IHD_PVT.ihdv_tbl_type ;
2069:
2070: l_access_mode Varchar2(10);
2071: l_org_id Number;
2072: l_process_status Varchar2(1);
2249: l_inst_dtls_tbl(l_ctr).ins_id := l_instparent_id;
2250: End loop;
2251:
2252: --oks_inst_history_details
2253: OKS_IHD_PVT.insert_row(
2254: p_api_version => 1.0 ,
2255: p_init_msg_list => 'T',
2256: x_return_status => l_return_status,
2257: x_msg_count => x_msg_count,
2260: x_ihdv_tbl => x_inst_dtls_tbl
2261: );
2262: IF (FND_LOG.LEVEL_EVENT >= FND_LOG.G_CURRENT_RUNTIME_LEVEL) THEN
2263: fnd_log.string(FND_LOG.LEVEL_EVENT,G_MODULE_CURRENT||'.IB_INTERFACE.instance history details',
2264: 'oks_ihd_pvt.insert_row(Return status = '||l_return_status ||')' );
2265: End If;
2266: x_return_status := l_return_status;
2267: If not l_return_status = OKC_API.G_RET_STS_SUCCESS Then
2268: x_return_status := l_return_status;