Create proc sp_check_data
As
Begin
Declare @ I int
Declare @ var_vkorg varchar (10), @ vkbur varchar (10), @ var_vtweg varchar (10), @ var_kunnr varchar (10 ),
@ Var_kunwe varchar (10), @ fee_code varchar (10), @ exp_code varchar (10), @ pay_type varchar (10)
Declare @ var_vkorg1 varchar (10), @ vkbur1 varchar (10), @ var_vtweg1 varchar (10), @ var_kunnr1 varchar (10 ),
@ Var_kunwe1 varchar (10), @ fee_code1 varchar (10), @ exp_code1 varchar (10), @ pay_type1 varchar (10)
Set @ I = 0
Set @ var_vkorg1 =''
Set @ vkbur1 =''
Set @ var_vtweg1 =''
Set @ var_kunnr1 =''
Set @ var_kunwe1 =''
Set @ fee_code1 =''
Set @ exp_code1 =''
Set @ pay_type1 =''
Declare salesman cursor
For
Select vkorg, vkbur, vtweg, kunnr, kunwe, fee_code, exp_code, pay_type
From tm_expense_rebate_rate
Order by vkorg, vkbur, vtweg, kunnr, kunwe, fee_code, exp_code, pay_type
Open salesman
Fetch salesman into @ var_vkorg, @ vkbur, @ var_vtweg, @ var_kunnr, @ var_kunwe, @ fee_code, @ exp_code, @ pay_type
While @ fetch_status = 0
Begin
If @ var_vkorg = @ var_vkorg1 and @ vkbur = @ vkbur1 and @ var_vtweg = @ var_vtweg1 and @ var_kunnr = @ var_kunnr1 and
@ Var_kunwe = @ var_kunwe1 and @ fee_code = @ fee_code1 and @ exp_code = @ exp_code1 and @ pay_type = @ pay_type1
Begin
Set @ I = @ I + 1
Set @ var_vkorg1 = @ var_vkorg
Set @ vkbur1 = @ vkbur
Set @ var_vtweg1 = @ var_vtweg
Set @ var_kunnr1 = @ var_kunnr
Set @ var_kunwe1 = @ var_kunwe
Set @ fee_code1 = @ fee_code
Set @ exp_code1 = @ exp_code
Set @ pay_type1 = @ pay_type
Update tm_expense_rebate_rate
Set flag = '1'
Where vkorg = @ var_vkorg
And vkbur = @ vkbur
And vtweg = @ var_vtweg
And kunnr = @ var_kunnr
And kunwe = @ var_kunwe
And fee_code = @ fee_code
And exp_code = @ exp_code
And pay_type = @ pay_type
End
Else
Begin
Set @ I = 1
Set @ var_vkorg1 = @ var_vkorg
Set @ vkbur1 = @ vkbur
Set @ var_vtweg1 = @ var_vtweg
Set @ var_kunnr1 = @ var_kunnr
Set @ var_kunwe1 = @ var_kunwe
Set @ fee_code1 = @ fee_code
Set @ exp_code1 = @ exp_code
Set @ pay_type1 = @ pay_type
End
Fetch salesman into @ var_vkorg, @ vkbur, @ var_vtweg, @ var_kunnr, @ var_kunwe, @ fee_code, @ exp_code, @ pay_type
End
Close salesman
Deallocate salesman
If @ error <> 0
Begin
Rollback tran
End
End
go