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

.CHECK_USER
.CHECK_UPDATE
.GET_PROPS



.EXEC_ACTION(@sid,'DOG_DEALINGS_BAY_VBR','ACTION999')
.EXEC_ACTION(@sid,'DOG_DEALINGS_BAY_VBR','ACTION100')

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_BAY_VBR', 'create_direction_bay')
.EXEC_ACTION(@sid, 'DOG_DEALINGS_BAY_VBR', 'create_payment_bay')

.EXEC_ACTION(@sid,'DOG_DEALINGS_BAY_VBR','ACTION2')

.EXEC_ACTION(@sid, 'DOG_DEALINGS_BAY_VBR', 'ISP_DEALINGS_BAY')

.EXEC_ACTION(@sid, 'DOG_DEALINGS_BAY_VBR', 'OBLIG_CLOSE_BAY_VBR') --kashuba_av 25.11.05 (добавил закрытие обязательств по оплате)
  end
end
else
 begin
.EXEC_ACTION(@sid, 'DOG_DEALINGS_BAY_VBR', 'create_direction_bay')
.EXEC_ACTION(@sid, 'DOG_DEALINGS_BAY_VBR', 'create_payment_bay')

.EXEC_ACTION(@sid,'DOG_DEALINGS_BAY_VBR','ACTION2')

.EXEC_ACTION(@sid, 'DOG_DEALINGS_BAY_VBR', 'ISP_DEALINGS_BAY')

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

.UPDATE_STATE
.ACTION_HISTORY

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