Editplus 570_4325_key

CREATE procedure [IA_CalDif]
@bBusiness bit,
@bDif bit,
@bRdFlag bit,
@PPrice float,
@RPrice float,
@Debit float=null output,
@Credit float=null output
 WITH ENCRYPTION as
    If @bRdFlag=1
    begin
            If @bBusiness=0
            begin
                    If @bDif=0
                begin
                            set @Debit = round(@RPrice - @PPrice,2)
                            set @Credit = Null
                End
                    Else
                begin
                            set @Credit = round(@PPrice - @RPrice,2)
                            set @Debit = Null
                            If Abs(@PPrice) < Abs(@RPrice)
                    begin
                                set @Debit = -1 * @Credit
                                set @Credit = Null
                            End
                End
            End
            Else
            begin
                    set @Credit = round(@PPrice - @RPrice,2)
                    set @Debit = Null
            End
    End
    Else
        If @bBusiness=0
            set @Credit = Round(@RPrice - @PPrice, 2)
        Else
            set @Debit = Round(@PPrice - @RPrice, 2)