Editplus 570_4325_key

 

editplus 5.7 build 4352 :
Vovan
3AG46-JJ48E-CEACC-8E6EW-ECUAW

 

 

Editplus 570_4325_key:
username: shejidu
regcode: 8QCCW-CQYUJ-ENUUC-U2W8S-UCWCJ

 

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)

  

posted @ 2023-08-19 07:30  samrv  阅读(181)  评论(0编辑  收藏  举报