USE [GrpInsurance]
GO

/****** Object:  StoredProcedure [dbo].[proc_create_sertifikat_peserta]    Script Date: 26/07/2018 16:26:39 ******/
SET ANSI_NULLS ON
GO

SET QUOTED_IDENTIFIER ON
GO

ALTER PROCEDURE [dbo].[proc_create_sertifikat_peserta]
	@pi_no_polis varchar(11),
	--@pi_tgl_mulai datetime,
	--@pi_tgl_mulaiYa BIT
	@pi_no_ref VARCHAR(11)
As
INSERT INTO sertifikat_peserta 
(no_polis, no_ref, no_tertanggung, nama, tgl_lahir, jenis_asuransi, uang_pertanggungan, masa_auransi, tgl_terbit, kode_cabang, nama_cabang)
SELECT 
	pa.no_polis,
  ppd.no_ref,
	no_tertanggung=p.no_peserta,
	nama=p.nama,
	tgl_lahir=dbo.func_date_format('dd-mm-yyyy', p.tgl_lahir),
	jenis_asuransi='Asuransi Jiwa Berjangka',
	--jenis_kelamin=p.kelamin,
	uang_pertanggungan='Rp '+dbo.func_curr_format_ina(pp.uang_pertanggungan, 15, 2, 1),
	--uang_pertanggungan=dbo.func_format_valuta('X', pp.uang_pertanggungan, 15, 1),
	masa_auransi=dbo.func_date_format('dd-mm-yyyy', p.tgl_mulai) +' s.d '+dbo.func_date_format('dd-mm-yyyy', p.tgl_selesai),
	--tgl_terbit=getDate(),
	tgl_terbit=dbo.func_date_format('dd-mm-yyyy', GETDATE()),	-- modified by Pribadi Pamungkas. 2018-05-21
	p.cabang,
	cb.nama as nama_cabang
	--,no_ktp=p.Nik
	--,p.cabang
	--,keterangan=''
	--,ahli_waris1='Buwati'
	--,hubungan1='Istri''
	--,ahli_waris2='Budi'
	--,hubungan2='Anak'
	--,tgl_mulai=p.tgl_mulai
	--,tgl_akhir=p.tgl_mulai
	--into sertifikat_peserta 
FROM 
	Peserta_Produk_Detail AS ppd INNER JOIN
	peserta p ON ppd.No_Proposal=p.No_Proposal AND ppd.No_Peserta=p.No_Peserta inner join 
	polis_asuransi pa on p.no_proposal=pa.no_proposal inner join 
	cabang cb on cb.no_prs=pa.no_prs and cb.kode=p.cabang inner join 
	(select no_proposal, no_peserta, uang_pertanggungan=curr_santunan from peserta_produk where LEFT(Sub_Kelompok,3)='010') pp on pp.no_proposal=p.no_proposal and pp.no_peserta=p.no_peserta
	--select top 10 * from peserta_produk
WHERE --coalesce(nik,'')<>''
	pa.no_polis=@pi_no_polis
	--AND p.tgl_mulai=@pi_tgl_mulai
	AND ppd.no_ref+p.no_peserta not in (select ppd.no_ref+no_tertanggung from sertifikat_peserta where pa.no_polis=@pi_no_polis)
	AND LEFT(ppd.Sub_Kelompok,3)='010'
	AND ppd.No_Ref = @pi_no_ref



GO


