create procedure dbo.%PROC% @sid varchar(30) = null
as
.BEGIN('N')

.CHECK_USER
.CHECK_UPDATE
.GET_PROPS

begin tran

.EXEC_ACTION(@sid,'DOG_DEALINGS_SALE_VBR','ACTION888')
.EXEC_ACTION(@sid,'DOG_DEALINGS_SALE_VBR','ACTION900')

if rtrim(ltrim(.GET_CONST('CLIENT_CODE'))) = 'WEBINVEST'
begin
 if @fact_reg_date is not null and @fact_pay_date is not null
  begin
  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'create_direction_sale')
  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'create_payment_sale')

  .EXEC_ACTION(@sid,'DOG_DEALINGS_SALE_VBR','ACTION11')

  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'ISP_DEALING_SALE')

  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'OBLIG_CLOSE_SALE_VBR') -- kashuba_av 25.11.05 (добавил закрытие обязательств по оплате)
  end
end
else
begin
  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'create_direction_sale')
  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'create_payment_sale')

  .EXEC_ACTION(@sid,'DOG_DEALINGS_SALE_VBR','ACTION11')

  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'ISP_DEALING_SALE')

  .EXEC_ACTION(@sid, 'DOG_DEALINGS_SALE_VBR', 'OBLIG_CLOSE_SALE_VBR') -- kashuba_av 25.11.05 (добавил закрытие обязательств по оплате)
end

.UPDATE_STATE
.ACTION_HISTORY

/*-------Проводки ----------*/
commit tran
.END