# Date: 11/09/06
# Version: 105

$DOC(MONEY_REDEMPTION)
 name=Групповые операции с ДС
 class=1
 product=ALD_SECUR
 name_formula=$TEXT(16411571)
.TYPE_NAME(@type_id) + ' на ' + 

.DATE_TO_STR(@date_b)
 $ENDTEXT(16411571)
 remark_formula=.DATE_TO_STR(@date_b)

 $STATE(BEG)
  name=Начальный
  class=1
 $ENDSTATE

 $STATE(CRT)
  name=Исполнено
  class=0
 $ENDSTATE

 $STATE(DEL)
  name=Удален
  class=2
 $ENDSTATE

 $STATE(ED)
  name=В обработке
  class=0
 $ENDSTATE

 $STATE(ISP)
  name=На исполнении
  class=0
 $ENDSTATE

 $STATE(WAIT_ISP)
  name=Ожидает исполнения
  class=0
 $ENDSTATE

 $PROP(OUT_DATE)
  name=Внешняя дата корреспондента
  field_name=out_date
  table_name=td_depo_docs
  field_type=datetime
  field_length=8
  field_scale=3
  field_prec=23
  page=1
  order=1
  init_class=null
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(IN_DATE)
  name=Дата документа
  field_name=in_date
  table_name=td_depo_docs
  field_type=datetime
  field_length=8
  field_scale=3
  field_prec=23
  page=1
  order=2
  init_class=1
  init_formula=.OPERDAY
  unique_index=1
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(WHO_GET)
  name=Кто принял
  field_name=who_get
  table_name=td_depo_docs
  field_type=varchar
  field_length=100
  field_scale=null
  field_prec=100
  page=1
  order=3
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(WHO_PUT)
  name=Кто отправил
  field_name=who_put
  table_name=td_depo_docs
  field_type=varchar
  field_length=100
  field_scale=null
  field_prec=100
  page=1
  order=4
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(OUT_NO)
  name=Внешний номер
  field_name=out_no
  table_name=td_depo_docs
  field_type=varchar
  field_length=50
  field_scale=null
  field_prec=50
  page=1
  order=5
  init_class=null
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(IN_NO)
  name=Номер документа
  field_name=in_no
  table_name=td_depo_docs
  field_type=varchar
  field_length=50
  field_scale=null
  field_prec=50
  page=1
  order=6
  init_class=0
  init_formula=null
  unique_index=1
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(CORRESPONDENT_ID)
  name=Корреспондент
  field_name=correspondent_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=7
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(PAYER_ID)
  name=Плательщик
  field_name=payer_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=8
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(PAY_SUM)
  name=Сумма
  field_name=pay_sum
  table_name=td_depo_docs
  field_type=money
  field_length=8
  field_scale=4
  field_prec=19
  page=1
  order=9
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(INITIATOR_ID)
  name=Инициатор
  field_name=initiator_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=10
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(DOCUMENT_FORM_ID)
  name=Форма документа
  field_name=document_form_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=11
  init_class=1
  init_formula=1
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(DEPO_DOC_TYPE)
  name=Входящий исходящий или внутр
  field_name=depo_doc_type
  table_name=td_depo_docs
  field_type=int
  field_length=4
  field_scale=0
  field_prec=10
  page=1
  order=12
  init_class=1
  init_formula=1
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(FOLDER_ID)
  name=Депозитарная папка
  field_name=folder_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=13
  init_class=0
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(SUM_CUR_ID)
  name=Валюта суммы
  field_name=sum_cur_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=14
  init_class=1
  init_formula=.CUR("RUR")
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(DOC_COMMENT)
  name=Комментарий
  field_name=doc_comment
  table_name=td_depo_docs
  field_type=varchar
  field_length=255
  field_scale=null
  field_prec=255
  page=1
  order=15
  init_class=null
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(OWNER_ID)
  name=Организация
  field_name=owner_id
  table_name=td_depo_docs
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=1
  order=17
  init_class=1
  init_formula=.ORGANIZATION
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(DATE_B)
  name=Дата начала расчёта
  field_name=date_b
  table_name=td_queries
  field_type=datetime
  field_length=8
  field_scale=3
  field_prec=23
  page=2
  order=16
  init_class=1
  init_formula=.OPERDAY
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(CONTRACT_ID)
  name=Договор
  field_name=contract_id
  table_name=td_queries
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=2
  order=18
  init_class=null
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(IS_DOGOVOR)
  name=Опция выбора клиентского договора
  field_name=is_dogovor
  table_name=td_queries
  field_type=int
  field_length=4
  field_scale=0
  field_prec=10
  page=2
  order=19
  init_class=1
  init_formula=1
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $PROP(PURPOSE_ID)
  name=Целевое назначение
  field_name=purpose_id
  table_name=td_queries
  field_type=numeric
  field_length=9
  field_scale=0
  field_prec=18
  page=2
  order=20
  init_class=null
  init_formula=null
  unique_index=null
  numerator=null
  import_type=null
  import_table=null
  import_field=null
  import_where=null
  ref_table=null
  ref_key=null
  ref_display=null
  ref_alias=null
  ref_where=null
 $ENDPROP

 $RELATION(REL1)
  class=1
  type=T_OPERATIONS
  form=ITEM_OPERS_LIST
  prop=null
  idname=item_id_s
  order=1000
 $ENDRELATION

 $RELATION(REL2)
  class=0
  type=CUR
  form=null
  prop=SUM_CUR_ID
  idname=null
  order=null
 $ENDRELATION

 $RELATION(REL3)
  class=0
  type=D_DEPO_FOLDERS
  form=null
  prop=FOLDER_ID
  idname=null
  order=null
 $ENDRELATION

 $RELATION(REL4)
  class=0
  type=PARTNERS
  form=null
  prop=CORRESPONDENT_ID
  idname=null
  order=null
 $ENDRELATION

 $RELATION(REL5)
  class=0
  type=PARTNERS
  form=null
  prop=INITIATOR_ID
  idname=null
  order=null
 $ENDRELATION

 $RELATION(REL6)
  class=0
  type=PARTNERS
  form=null
  prop=PAYER_ID
  idname=null
  order=null
 $ENDRELATION

 $RELATION(REL7)
  class=0
  type=ITEMS
  form=null
  prop=CONTRACT_ID
  idname=null
  order=3
 $ENDRELATION

 $RELATION(REL8)
  class=0
  type=PARTNERS_JUR
  form=null
  prop=OWNER_ID
  idname=null
  order=99
 $ENDRELATION

 $RELATION(REL9)
  class=1
  type=ACTIONS_HISTORY
  form=UO_ACTIONS_HISTORY_LIST
  prop=null
  idname=null
  order=999
 $ENDRELATION

 $RELATION(REL10)
  class=0
  type=TARGET_PURPOSES
  form=null
  prop=PURPOSE_ID
  idname=null
  order=10
 $ENDRELATION

 $RELATION(REL11)
  class=1
  type=REAL_PAYMENT_GR
  form=FORM_OPER_DS
  prop=null
  idname=foundation_id_s
  order=800
 $ENDRELATION

 $FORM(D_MONEY_REDEMPTION_EDIT)
  name=Данные
  class=5
  filter=null
  target_state=
  uo=uo_edit
  dw=d_money_redemption_edit
  procedure=ap_21535000000558394
  patterns=GENERIC_VIEW_ITEM_P2
  user_define=1
  isvisible=1
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411573)
create procedure dbo.%PROC%
  @sid varchar(30) = null
as
declare
        @id numeric,
        @action_id numeric,
        @user_id numeric,
        @state_id numeric,
        @type_id numeric,
        @new_state_id numeric

begin

  select @id = convert(numeric, @sid)
  select @action_id = %ACTION_ID%

.CHECK_USER
.CHECK_VIEW_ITEM

.VIEW_ITEM(ALL,2)

end
  $ENDTEXT(16411573)

  $ACTION2RELATION(REL7.ITEM_NAME)
   relation=REL7
   where=null
   prop=ITEM_NAME
   order=null
   alias=contract_name
  $ENDACTION2RELATION

  $ACTION2RELATION(REL10.NAME)
   relation=REL10
   where=null
   prop=NAME
   order=2
   alias=purpose_name
  $ENDACTION2RELATION

  $CALC(ORGANISATION_ID_S)
   class=1
   type=varchar
   calc_lenght=30
   calc_prec=null
   calc_scale=null
   formula=(select owner_id from td_depo_docs where id=@id)
   label=null
   order=1
  $ENDCALC
 $ENDFORM

 $FORM(D_MONEY_REDEMPTION_FILTER)
  name=Фильтр
  class=6
  filter=null
  target_state=
  uo=uo_filter
  dw=d_money_redemption_filter
  procedure=ap_money_redemption_filter
  patterns=GENERIC_VIEW_ITEM
  user_define=1
  isvisible=0
  istab=0
  posx=0
  posy=0
  width=1824
  height=1244
  proc_text=$TEXT(16411575)
CREATE PROCEDURE dbo.%PROC% AS

DECLARE @action_id NUMERIC(18, 0), @type_id NUMERIC(18, 0), @org_id NUMERIC(18,0);

SET @action_id = %ACTION_ID%;
SET @type_id = (SELECT type_id FROM t_actions WHERE id = @action_id);
SET @org_id = .ORGANIZATION;

SELECT
  CONVERT(VARCHAR(30), NULL) sid,
  CONVERT(VARCHAR(30), NULL) state_sid,
  CONVERT(VARCHAR(30), @type_id) type_sid,
  CONVERT(VARCHAR(255), NULL) item_name,
  CONVERT(VARCHAR(255), NULL) state_name,
  CONVERT(VARCHAR(255), NULL) type_name,
  CONVERT(VARCHAR(30), NULL) contract_id_s,
  CONVERT(VARCHAR(30), NULL) is_dogovor,
  CONVERT(VARCHAR(255), NULL) purpose_id_s,
  CONVERT(VARCHAR(255), NULL) contract_name,
  CONVERT(VARCHAR(255), NULL) purpose_name,
  CONVERT(VARCHAR(30), @org_id) organisation_id_s,
  CONVERT(VARCHAR(30), NULL) date_b_db,
  CONVERT(VARCHAR(30), NULL) date_b_de,
  CONVERT(VARCHAR(30), NULL) out_date_db,
  CONVERT(VARCHAR(30), NULL) out_date_de,
  CONVERT(VARCHAR(30), NULL) in_date_db,
  CONVERT(VARCHAR(30), NULL) in_date_de,
  CONVERT(VARCHAR(30), NULL) out_date_db,
  CONVERT(VARCHAR(30), NULL) out_date_de,
  CONVERT(VARCHAR(100), NULL) who_get,
  CONVERT(VARCHAR(100), NULL) who_put,
  CONVERT(VARCHAR(30), NULL) owner_id_s,
  CONVERT(VARCHAR(255), NULL) owner_name,
  CONVERT(VARCHAR(30), NULL) folder_id_s
  $ENDTEXT(16411575)

  $FILTER(DATE_B)
   type=2
   label=null
   prop=DATE_B
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(CONTRACT_ID)
   type=1
   label=null
   prop=CONTRACT_ID
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(IN_NO)
   type=3
   label=null
   prop=IN_NO
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(IN_DATE)
   type=2
   label=null
   prop=IN_DATE
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(OUT_NO)
   type=3
   label=null
   prop=OUT_NO
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(WHO_GET)
   type=3
   label=null
   prop=WHO_GET
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(WHO_PUT)
   type=3
   label=null
   prop=WHO_PUT
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(PURPOSE_ID)
   type=1
   label=null
   prop=PURPOSE_ID
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(OUT_DATE)
   type=2
   label=null
   prop=OUT_DATE
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(OWNER_ID)
   type=1
   label=null
   prop=OWNER_ID
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER

  $FILTER(FOLDER_ID)
   type=1
   label=null
   prop=FOLDER_ID
   arg_code=null
   arg_type=null
   arg_length=null
   arg_prec=null
   arg_scale=null
  $ENDFILTER
 $ENDFORM

 $FORM(FORM_VIEW)
  name=Просмотр
  class=5
  filter=null
  target_state=
  uo=uo_depooper_edit
  dw=d_brok_depooper_p1
  procedure=ap_21535000000558404
  patterns=GENERIC_VIEW_ITEM_P1
  user_define=1
  isvisible=0
  istab=1
  posx=0
  posy=0
  width=2697
  height=1420
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC%
  @sid varchar(30) = null
as
declare
        @id numeric,
        @action_id numeric,
        @user_id numeric,
        @state_id numeric,
        @type_id numeric,
        @type_id_s varchar(30),
        @new_state_id numeric,
        @state_name_id_s varchar(30)

begin

  select @id = convert(numeric, @sid)
  select @action_id = %ACTION_ID%
 select @type_id_s = NULL
select  @state_name_id_s = NULL

.CHECK_USER
.CHECK_VIEW_ITEM

if @id = -1
begin
begin tran
.GET_PROPS
.CHECK_INSERT
.INIT_VARS(B)
.INSERT_ITEMS
.INSERT
commit tran
end
.VIEW_ITEM(ALL,1)
/*
.ACTION_HISTORY
*/
end
  $ENDTEXT(16411575)

  $ACTION2RELATION(REL5.PARTNER_CODE)
   relation=REL5
   where=null
   prop=PARTNER_CODE
   order=null
   alias=initiator_code
  $ENDACTION2RELATION

  $ACTION2RELATION(REL5.PARTNER_SHORT_NAME)
   relation=REL5
   where=null
   prop=PARTNER_SHORT_NAME
   order=null
   alias=initiator_short_name
  $ENDACTION2RELATION

  $ACTION2RELATION(REL4.PARTNER_CODE)
   relation=REL4
   where=null
   prop=PARTNER_CODE
   order=null
   alias=corr_code
  $ENDACTION2RELATION

  $ACTION2RELATION(REL4.PARTNER_SHORT_NAME)
   relation=REL4
   where=null
   prop=PARTNER_SHORT_NAME
   order=null
   alias=corr_short_name
  $ENDACTION2RELATION

  $ACTION2RELATION(REL6.PARTNER_CODE)
   relation=REL6
   where=null
   prop=PARTNER_CODE
   order=null
   alias=payer_code
  $ENDACTION2RELATION

  $ACTION2RELATION(REL6.PARTNER_SHORT_NAME)
   relation=REL6
   where=null
   prop=PARTNER_SHORT_NAME
   order=null
   alias=payer_short_name
  $ENDACTION2RELATION

  $ACTION2RELATION(REL8.PARTNER_CODE)
   relation=REL8
   where=null
   prop=PARTNER_CODE
   order=null
   alias=brok_code
  $ENDACTION2RELATION

  $ACTION2RELATION(REL8.PARTNER_SHORT_NAME)
   relation=REL8
   where=null
   prop=PARTNER_SHORT_NAME
   order=null
   alias=brok_name
  $ENDACTION2RELATION

  $BIND(BIND1)
   type=MONEY_REDEMPTION
   action=D_MONEY_REDEMPTION_EDIT
   class=1
   order=1
   idname=null
  $ENDBIND

  $BIND(BIND2)
   type=ARH_EDIT
   action=D_PEREVODARCHIV_P3
   class=1
   order=2
   idname=sid
  $ENDBIND

  $BIND(BIND3)
   type=LIST_FOR_MONEY_REDEMPTION
   action=D_LIST2MONEY_REDEMPTION_LIST
   class=1
   order=3
   idname=item_id_s
  $ENDBIND
 $ENDFORM

 $FORM(REDEMPTION2PURPOSE2MONEY)
  name=Список
  class=4
  filter=D_MONEY_REDEMPTION_FILTER
  target_state=
  uo=uo_list
  dw=d_money_redemption_list
  procedure=ap_21535000000558393
  patterns=GENERIC_VIEW_LIST
  user_define=0
  isvisible=1
  istab=0
  posx=0
  posy=0
  width=3205
  height=1440
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null
   .ARGLIST_FILTER
as
.BEGIN('N')

.CHECK_USER
.CHECK_VIEW_LIST

.ARGCONVERT_FILTER

.VIEW_LIST

.END
  $ENDTEXT(16411575)

  $ACTION2RELATION(REL10.NAME)
   relation=REL10
   where=null
   prop=NAME
   order=2
   alias=purpose_name
  $ENDACTION2RELATION
 $ENDFORM

 $ACTION(ACTION_DELETE)
  name=Удалить
  class=3
  form=FORM_VIEW
  target_state=DEL
  procedure=ap_21535000000558395
  patterns=GENERIC_MOVE
  user_define=0
  isvisible=0
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null
as
declare @action_id numeric,
        @id numeric,
        @user_id numeric,
        @state_id numeric,
        @new_state_id numeric,
        @type_id numeric
begin tran

  select @action_id = %ACTION_ID%
   select @id = convert(numeric, @sid)

.CHECK_USER
.CHECK_UPDATE

.UPDATE_STATE
.ACTION_HISTORY

/*-------Проводки ----------
.GET_PROPS
 if @class_id=1
begin
.MAIN_MOVE(L,'DEL',N)
end
else
begin
.MAIN_MOVE(L,'CRT',N)
end
*/

commit tran
  $ENDTEXT(16411575)

  $BIND(BIND1)
   type=MONEY_REDEMPTION
   action=D_MONEY_REDEMPTION_EDIT
   class=1
   order=1
   idname=null
  $ENDBIND
 $ENDACTION

 $ACTION(ACTION_EXEC_BY_ONE)
  name=Исполнить по одному
  class=9
  form=null
  target_state=null
  procedure=ap_group_money_accept_one
  patterns=GENERIC_MOVE
  user_define=1
  isvisible=1
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
CREATE PROCEDURE dbo.%PROC% (@sid VARCHAR(30) = NULL, @client_contract_in_id NUMERIC = NULL, @stock_in_id NUMERIC = NULL,
  @portfolio_in_id NUMERIC = NULL) AS

.BEGIN('N')

.CHECK_USER
.GET_PROPS
.ACTION_HISTORY

--DECLARE @action_id NUMERIC, @id NUMERIC, @user_id NUMERIC, @state_id NUMERIC, @new_state_id NUMERIC, @type_id NUMERIC;

BEGIN TRAN

.TRANSACTION_SAVE

DECLARE @subc_eff_num2find VARCHAR(255)

SELECT @subc_eff_num2find = '%'

IF @client_contract_in_id IS NOT NULL BEGIN
  .SUBC_STR_ADD(@subc_eff_num2find, 'INVESTORS', @client_contract_in_id, Y)
END

IF @stock_in_id IS NOT NULL BEGIN
  .SUBC_STR_ADD(@subc_eff_num2find, 'STOCK_EMIS', @stock_in_id, Y)
END

IF @portfolio_in_id IS NOT NULL BEGIN
  .SUBC_STR_ADD(@subc_eff_num2find, 'INVESTOR2PORTFOLIO', @portfolio_in_id, Y)
END

SELECT @subc_eff_num2find = @subc_eff_num2find + '%'

/*
Не понял я этого места, нужно уточнить у Жени

DECLARE @no_action TINYINT

SELECT @no_action = 1

IF (@subc_eff_num2find <> '%%') AND NOT EXISTS (
  SELECT
    t_operations.id
  FROM
    t_operations
  WHERE
    t_operations.item_id = @sid
    AND EXISTS (
      SELECT
        1
      FROM
        t_oper_list
      WHERE
        t_operations.id = t_oper_list.head_id
        AND t_oper_list.subc_eff_num LIKE @subc_eff_num2find
    )
)
  SELECT @no_action = 0

IF (@subc_eff_num2find = '%%') AND NOT EXISTS (
  SELECT
    t_operations.id
  FROM
    t_operations
  WHERE
    t_operations.item_id = @sid
)
  SELECT @no_action = 0

IF @no_action = 1 BEGIN
*/

DECLARE @mess VARCHAR(255)
DECLARE @subc_str VARCHAR(255)
DECLARE @plan_secur_id NUMERIC
DECLARE @plan_money_id NUMERIC
DECLARE @out_method NUMERIC
DECLARE @is_realiz INT
DECLARE @is_p2l_comis INT
DECLARE @is_com_in INT
DECLARE @is_allow_short4stocks INT
DECLARE @is_allow_short4money INT
DECLARE @asset4pereoc_type_id NUMERIC
DECLARE @deb_acc_id NUMERIC
DECLARE @cred_acc_id NUMERIC
DECLARE @cur2dep_id NUMERIC
DECLARE @profit2loss_acc_id NUMERIC
DECLARE @fin_result_id NUMERIC
DECLARE @money_plan_cur_id NUMERIC
DECLARE @perpose_name VARCHAR(255)
DECLARE @organisation_id NUMERIC
DECLARE @dog_depozit_id NUMERIC

SELECT @perpose_name = .ITEM_NAME(@purpose_id)
.BACK_GET_ORG_PARMS(@owner_id, @organisation_id, @plan_money_id, @plan_secur_id, @out_method, @is_realiz, @is_p2l_comis, @is_com_in, @is_allow_short4stocks, @is_allow_short4money, @asset4pereoc_type_id)

SELECT @money_plan_cur_id = .CUR2PLAN(@plan_money_id)

.ACCID_FROM_CONST2PLAN(@deb_acc_id, 'BACK_ACC_DEPOZIT', @plan_money_id, 2, 1, 'Обязательства по депозиту', @mess)
.ACCID_FROM_CONST2PLAN(@profit2loss_acc_id, 'BACK_ACC_PROFIT_OTHER', @plan_money_id, 1, 1, 'Прибыль', @mess)

DECLARE cur1 CURSOR FOR
  SELECT
    id
  FROM
    tb_list2money_oper
  WHERE
    tb_list2money_oper.item_id = @id
    AND (
      (tb_list2money_oper.contract_id = @client_contract_in_id) OR
      (@client_contract_in_id IS NULL)
    )
    AND (
      (tb_list2money_oper.portfolio_sub_id = @portfolio_in_id) OR
      (@portfolio_in_id IS NULL)
    )
  FOR READ ONLY

OPEN cur1

FETCH cur1 INTO @cur2dep_id

BEGIN TRAN

WHILE .CURSOR_STATE = 0 BEGIN
  .TYPE_GET('LIST_FOR_MONEY_REDEMPTION', @cur2dep_id)

  IF EXISTS(SELECT 1 FROM tb_contracts WHERE id = @contract_id1) BEGIN
    SELECT @fin_result_id = fin_result FROM tb_contracts WHERE id = @contract_id1

    .ACCID_FROM_CONST2PLAN(@cred_acc_id, 'BACK_ACC_FUND_MONEY', @plan_money_id, 1, 3, 'Клиентские фонды ДС', @mess)
  END
  ELSE BEGIN
    SELECT @fin_result_id = 1

    .ACCID_FROM_CONST2PLAN(@cred_acc_id, 'BACK_ACC_FUND_MONEY', @plan_money_id, 1, 2, 'Собственные фонды ДС', @mess)
  END

  .SUBC_STR_ADD(@subc_str, 'ASSET_PLACES', @asset_place_id1)
  .SUBC_STR_ADD(@subc_str, 'DOC_SEC', @id)
  .SUBC_STR_ADD(@subc_str, 'INVESTORS', @contract_id1)
  .SUBC_STR_ADD(@subc_str, 'INVESTOR2PORTFOLIO', @portfolio_sub_id1)
  .SUBC_STR_ADD(@subc_str, 'PORTFOLIO', @portfolio_id1)
  .SUBC_STR_ADD(@subc_str, 'CONTRAGENTS', @contragent_id1)

  IF @fin_result_id = 1 BEGIN
    .OPERATION_SBC(@owner_id, @plan_money_id, @in_date, @deb_acc_id, @profit2loss_acc_id, @list_sum1, @money_plan_cur_id, @in_date, 0, 0, @perpose_name, Y,
      @operation_id, NULL, NULL, @action_history_id, NULL, NULL, @subc_str, @subc_str)

    .OPERATION_SBC(@owner_id, @plan_money_id, @in_date, @profit2loss_acc_id, @cred_acc_id, @list_sum1, @money_plan_cur_id, @in_date, 0, 0, @perpose_name, Y,
      @operation_id, NULL, NULL, @action_history_id, NULL, NULL, @subc_str, @subc_str)
  END
  ELSE BEGIN
    .OPERATION_SBC(@owner_id, @plan_money_id, @in_date, @deb_acc_id, @cred_acc_id, @list_sum1, @money_plan_cur_id, @in_date, 0, 0, @perpose_name, Y,
      @operation_id, NULL, NULL, @action_history_id, NULL, NULL, @subc_str, @subc_str)
  END

  SELECT
    @dog_depozit_id = ext_broker_deal
  FROM
    tb_broker2exchange
  WHERE
    id = @asset_place_id1

#ifdef ALD_UKPIF
  IF .TEST_PIF_CLIENT(@contract_id1) BEGIN

    BEGIN TRAN

    .ID_VAR(@plan_id)
    .ID_VAR(@fund_id)
    .ID_VAR(@cur_id)
    .ID_VAR(@d_acc_id)
    .ID_VAR(@c_acc_id)
    .ID_VAR(@bank_id)
    .INT_VAR(@out_method_id)
    .NAME_VAR(@opmess)
    .NAME_VAR(@d_subc_str)
    .NAME_VAR(@c_subc_str)

    DECLARE @acc_comis_id NUMERIC,
      @id1 NUMERIC, @id2 NUMERIC, @id3 NUMERIC, @id4 NUMERIC, @int1 INT, @int2 INT,
      @int3 INT, @int4 INT, @int5 INT

    SELECT @cur_id = .CUR('RUR')

    .BACK_GET_PIF_PARMS(@contract_id1, @fund_id, @plan_id, @out_method_id)

    SELECT
      @bank_id = client_id
    FROM
      tb_contracts
    WHERE
      id = @dog_depozit_id

    SELECT @owner_id = .ORGANIZATION
    .BACK_GET_ORG_PARMS(@owner_id, @id1, @id2, @id3, @int1, @int2, @int3, @is_com_in, @int4, @int5, @id4)

    SELECT @d_acc_id = .SD_ACCID_FROM_EFFNO(@plan_id, '76.10')
    SELECT @c_acc_id = .SD_ACCID_FROM_EFFNO(@plan_id, '91.3')

    .SUBC_STR_ADD(@d_subc_str, 'PARTNERS', @bank_id)

    SELECT @opmess = 'Начисление % по депозиту'

    .OPERATION_SBC(@fund_id, @plan_id, @in_date, @d_acc_id, @c_acc_id, @list_sum1, @cur_id, @in_date, NULL, NULL, @opmess, Y,
      @operation_id, @id, @action_id, @action_history_id, @list_sum1, @list_sum1, @d_subc_str,@c_subc_str)

    IF @@ERROR != 0 BEGIN
      IF @@TRANCOUNT <> 0
        ROLLBACK TRAN
        RETURN
    END
    COMMIT TRAN

  END
#endif

  FETCH cur1 INTO @cur2dep_id
END

CLOSE cur1

.DEALLOCATE cur1

--END;

COMMIT TRAN

COMMIT TRAN

.END
  $ENDTEXT(16411575)
 $ENDACTION

 $ACTION(ACTION_INSERT)
  name=Добавить
  class=1
  form=FORM_VIEW
  target_state=ED
  procedure=ap_21535000000558396
  patterns=GENERIC_INSERT_P1
  user_define=0
  isvisible=0
  istab=1
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null,
.ARGLIST(ALL,1)
as
declare @action_id numeric,
        @id numeric,
        @user_id numeric,
        @state_id numeric,
        @type_id numeric,
        @item_name varchar(100),
        @new_state_id numeric
begin

  select @action_id = %ACTION_ID%
   select @id = convert(numeric, @sid)

.CHECK_USER
.CHECK_UPDATE

.ARGCONVERT(ALL,1)

.INIT_VARS(AFTER,ALL,1)

--.DEPO_GEN_NO(@in_no,@depo_doc_type)
.BACK_GEN_NO(@in_no,@depo_doc_type,@in_date)
begin tran

.UPDATE(ALL,1)

.RELGEN
.UPDATE_STATE
.ACTION_HISTORY
commit tran

select @sid = convert(varchar,@id)
select @sid
end
  $ENDTEXT(16411575)

  $BIND(BIND1)
   type=MONEY_REDEMPTION
   action=ACTION_UPDATE
   class=1
   order=1
   idname=null
  $ENDBIND
 $ENDACTION

 $ACTION(ACTION_MOVE)
  name=Отобрать договора и начислить %
  class=9
  form=null
  target_state=WAIT_ISP
  procedure=ap_21535000000572273
  patterns=GENERIC_MOVE
  user_define=1
  isvisible=0
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null
as
.BEGIN('N')

.CHECK_USER
.CHECK_UPDATE
.GET_PROPS

declare @org_id numeric,
@plan_money_id numeric,
@plan_securs_id numeric,
@out_method_id numeric,
@is_realiz int,
@is_p2l int,
@is_com_in int,
@is_allow_short4stocks int,
@is_allow_short4money int,
@asset4pereoc_type_id int,
@purpose_code int,
@dep_acc_id numeric,  /*Счет депозита на плане ДС*/
@mess_res varchar(255),
@subc_str varchar(255),
@curs_id numeric,
@curs_date datetime,
@cur_plan_id numeric,
@cur_com_sum money,
@contragent_id numeric,
@plan2partner_id numeric,
@acc2proc2depozit_id numeric,
@subc_str2proc varchar(255),
@money_acc_id numeric

.BACK_GET_ORG_PARMS(@owner_id,@org_id,@plan_money_id,@plan_securs_id,@out_method_id,@is_realiz,@is_p2l,@is_com_in,@is_allow_short4stocks,@is_allow_short4money,@asset4pereoc_type_id)

select @cur_plan_id=.CUR2PLAN(@plan_money_id)

select @plan2partner_id=.PLAN2PARTNER_ID(@owner_id,@plan_money_id)
.ACCID_FROM_OBJ2PLAN(@acc2proc2depozit_id,@purpose_id,@plan_money_id,1,1,'Счет начисленных процентов по депозиту',@mess_res)
.ACCID_FROM_CONST2PLAN(@dep_acc_id,'BACK_ACC_DEPOZIT',@plan_money_id,1,1,'Счет депозита',@mess_res)

select @subc_str=''

.SUBC_STR_ADD(@subc_str,'INVESTORS',null,Y)
.SUBC_STR_ADD(@subc_str,'ASSET_PLACES',null,Y)
.SUBC_STR_ADD(@subc_str,'BANK_ACCOUNT',null,Y)
.SUBC_STR_ADD(@subc_str,'INVESTOR2PORTFOLIO',null,Y)
.SUBC_STR_ADD(@subc_str,'PORTFOLIO',null,Y)

declare @date_bb datetime

select @date_bb=dateadd(yy,-10,@date_b)

---.TOTALS_QUERY(@owner_id,@plan_money_id,@date_b,N,@dep_acc_id,@subc_str,L,N,Y)
.TOTALS_QUERY(@owner_id,@plan_money_id,@date_bb,@date_b,@dep_acc_id,@subc_str,L,N,Y,D,D)

---.EXIT_MESSAGE_PARM('',@com_sum)

begin tran
.UPDATE_STATE
.ACTION_HISTORY

.TRANSACTION_SAVE

create table #dog_for_calc(
asset_place_id numeric,
dog_date datetime
)

create table #sum2inv(
contract_id numeric,
portfolio_id numeric,
portfolio_sub_id numeric,
contragent_id numeric,
list_sum money,
asset_place_id numeric)

select @purpose_code=.PURPOSE_CODE(@purpose_id)

if @purpose_code=120
begin

if @is_dogovor=1
begin
insert #dog_for_calc
select tb_broker2exchange.id,dogexec_begin_date
from tb_contracts c,tb_broker2exchange
where c.id=@contract_id
and tb_broker2exchange.ext_broker_deal=c.id
and .ITEMS_EXISTS_BY_TYPE(tb_broker2exchange.id,'BROKER2EXCHANGE')
end
else
begin
insert #dog_for_calc
select tb_broker2exchange.id,dogexec_begin_date
from tb_contracts,tb_broker2exchange
where tb_contracts.dogexec_begin_date<=@date_b and tb_contracts.dogexec_end_date>=@date_b
and tb_contracts.dog_type_id=8
and tb_broker2exchange.ext_broker_deal=tb_contracts.id
and .ITEMS_EXISTS_BY_TYPE(tb_broker2exchange.id,'BROKER2EXCHANGE')
and .ITEMS_EXISTS_BY_TYPE_STATE(tb_contracts.id,'ORGANIZATION_CONTRACTS','SIGN')
end
end

declare @inv_sum money,
@com_sum money,
@inv_id numeric,
@asset_id numeric,
@contr_date datetime,
@dogovor_id numeric,
@portf_id numeric,
@portf_sub_id numeric,
@bank_acc_id numeric,
@oper_date datetime,
@qty_day_yy int,
@qty_day int,
@proc_sum money,
@p_q money,
@p_a_s money

select @subc_str2proc=''

declare cur2calc cursor for
select s1_id,s2_id,s3_id,s5_id,saldo_de,op_date
from #tmp_osv
for read only

open cur2calc

fetch cur2calc into @inv_id,@portf_id,@portf_sub_id,@asset_id,@inv_sum,@oper_date

while .CURSOR_STATE=0
begin

select @dogovor_id=(select ext_broker_deal from tb_broker2exchange where id=@asset_id)

select @money_acc_id = (select money_acc_id from tb_contracts where id = @dogovor_id)
select @qty_day_yy=qty_day_yy,
       @oper_date=dogexec_begin_date,
       @contragent_id=client_id
    from tb_contracts where id=@dogovor_id
select @qty_day=DATEDIFF(day,@oper_date, @date_b)

if exists(select 1 from #dog_for_calc where asset_place_id=@asset_id)
begin

select @contr_date=(select dog_date from #dog_for_calc where asset_place_id=@asset_id)

.CALC_COMIS(@inv_sum,@dogovor_id,@date_b,@cur_plan_id,@com_sum,@id,@cur_com_sum,@cur_plan_id,@plan_money_id)

select @com_sum=round(@com_sum*@qty_day/@qty_day_yy,2)

-- 26/07/2005 Богаковский добавил еще аналитики "Расч. сч." и "Места нахождения"
-- для того, чтобы корректно работали пополняемые депозиты. Закомментарил аналитику "Договор",
-- поскольку вместо нее теперь аналитика "Места нахождения"
.SUBC_STR_ADD(@subc_str2proc,'INVESTOR2PORTFOLIO',@portf_sub_id,Y)
.SUBC_STR_ADD(@subc_str2proc,'INVESTORS',@inv_id,Y)
.SUBC_STR_ADD(@subc_str2proc,'PORTFOLIO',@portf_id,Y)
.SUBC_STR_ADD(@subc_str2proc,'BANK_ACCOUNT',@money_acc_id,Y)
.SUBC_STR_ADD(@subc_str2proc,'CONTRAGENTS',@contragent_id,Y)
.SUBC_STR_ADD(@subc_str2proc,'ASSET_PLACES',@asset_id,Y)

-- 26/07/2005 Богаковский .SALDO_NOW_SUM не позволяет начислять проценты задним числом, поэтому заменил на SALDO,
-- а также добавил обнуление @proc_sum для правильной работы шаблона SALDO в цикле курсора.
--.SALDO_NOW_SUM(@plan2partner_id,@acc2proc2depozit_id,@subc_str2proc,1,@proc_sum,@p_q,@p_a_s)
select @proc_sum = 0
.SALDO(@owner_id, @plan_money_id, @date_b, @acc2proc2depozit_id, @subc_str2proc, N, D, @proc_sum, @p_q, @p_a_s)

select @com_sum = @com_sum - @proc_sum

if isnull(@com_sum,0)<>0
begin

insert #sum2inv
select
@inv_id,
@portf_id,
@portf_sub_id,
@contragent_id,
@com_sum,
@asset_id

end

end

fetch cur2calc into @inv_id,@portf_id,@portf_sub_id,@asset_id,@inv_sum,@oper_date
end

close cur2calc

.DEALLOCATE cur2calc

select @inv_id=null,
@portf_id=null,
@portf_sub_id=null,
@asset_id=null,
@inv_sum=null,
@contragent_id=null

declare cur3calc cursor for
select contract_id,portfolio_id,portfolio_sub_id,
asset_place_id,sum(list_sum),contragent_id
from #sum2inv
group by contract_id,portfolio_id,portfolio_sub_id,asset_place_id,contragent_id
for read only

open cur3calc

fetch cur3calc into @inv_id,@portf_id,@portf_sub_id,@asset_id,@inv_sum,@contragent_id

while .CURSOR_STATE=0
begin

.TYPE_INIT('LIST_FOR_MONEY_REDEMPTION',1,N)
.TYPE_ASSIGN(contract_id,@inv_id)
.TYPE_ASSIGN(item_id,@id)
.TYPE_ASSIGN(portfolio_id,@portf_id)
.TYPE_ASSIGN(portfolio_sub_id,@portf_sub_id)
.TYPE_ASSIGN(contragent_id,@contragent_id)
.TYPE_ASSIGN(list_sum,@inv_sum)
.TYPE_ASSIGN(asset_place_id,@asset_id)
.TYPE_INSERT('LIST_FOR_MONEY_REDEMPTION','CRT',1,N)

fetch cur3calc into @inv_id,@portf_id,@portf_sub_id,@asset_id,@inv_sum,@contragent_id
end

close cur3calc

.DEALLOCATE cur3calc

drop table #sum2inv

drop table #dog_for_calc

.TRANSACTION_RESTORE

/*-------Проводки ----------*/
commit tran
.END
  $ENDTEXT(16411575)
 $ENDACTION

 $ACTION(ACTION_MOVE1)
  name=Исполнить
  class=9
  form=null
  target_state=ISP
  procedure=ap_21535000000558406
  patterns=GENERIC_MOVE
  user_define=1
  isvisible=0
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null
as
.BEGIN('N')

.CHECK_USER
.CHECK_UPDATE
.GET_PROPS

begin tran

if .PURPOSE_CODE(@purpose_id)=120
begin
.EXEC_ACTION(@sid,'MONEY_REDEMPTION','PROC2DEPOZIT')
end


.UPDATE_STATE
.ACTION_HISTORY

/*-------Проводки ----------*/
commit tran
.END
  $ENDTEXT(16411575)
 $ENDACTION

 $ACTION(ACTION_MOVE2)
  name=На уточнение
  class=9
  form=null
  target_state=ED
  procedure=ap_21535000000558398
  patterns=GENERIC_MOVE
  user_define=1
  isvisible=0
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null
as
.BEGIN('N')

.CHECK_USER
.CHECK_UPDATE

begin tran
---.UPDATE_STATE
.ACTION_HISTORY

declare @state_code varchar(100)
select @state_code=.STATE_CODE(@type_id,@state_id)

if @state_code='ISP'
begin
.OPERS_ROLL
.ITEM_MOVE_STATE(@id,'WAIT_ISP')
end else
begin

delete t_items
from tb_list2money_oper
where tb_list2money_oper.item_id=@id
and t_items.id=tb_list2money_oper.id


delete tb_list2money_oper
where tb_list2money_oper.item_id=@id

.ITEM_MOVE_STATE(@id,'ED')

end


/*-------Проводки ----------*/
commit tran
.END
  $ENDTEXT(16411575)
 $ENDACTION

 $ACTION(ACTION_UPDATE)
  name=Данные (изм.)
  class=2
  form=D_MONEY_REDEMPTION_EDIT
  target_state=null
  procedure=ap_21535000000558397
  patterns=GENERIC_UPDATE_P2
  user_define=1
  isvisible=1
  istab=1
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null,
.ARGLIST(ALL, 2)
as
declare @action_id numeric,
        @id numeric,
        @user_id numeric,
        @state_id numeric,
        @type_id numeric,
        @item_name varchar(100),
        @new_state_id numeric
begin tran

  select @action_id = %ACTION_ID%
   select @id = convert(numeric, @sid)

.CHECK_USER
.CHECK_UPDATE

.ARGCONVERT(ALL, 2)

if @is_dogovor=0
   select @contract_id=null

.TEST_UNIQUE(ALL, 2)


.GET_PROPS(ALL,1)
.UPDATE_ITEMS

.UPDATE(ALL,2)

.RELGEN
.UPDATE_STATE
.ACTION_HISTORY

commit tran
  $ENDTEXT(16411575)
 $ENDACTION

 $ACTION(ACTION_UPDATE1)
  name=Изменить
  class=2
  form=FORM_VIEW
  target_state=null
  procedure=ap_21535000000558401
  patterns=GENERIC_UPDATE_P1
  user_define=0
  isvisible=0
  istab=1
  posx=0
  posy=0
  width=2203
  height=1372
  proc_text=$TEXT(16411575)
create procedure dbo.%PROC% @sid varchar(30) = null,
.ARGLIST(ALL,1)
as
declare @action_id numeric,
        @id numeric,
        @user_id numeric,
        @state_id numeric,
        @type_id numeric,
        @item_name varchar(100),
        @new_state_id numeric
begin tran

select @action_id = %ACTION_ID%
   select @id = convert(numeric, @sid)

.CHECK_USER
.CHECK_UPDATE

.ARGCONVERT(ALL,1)

---.DEPO_CHK_NO(@id,@in_no,@depo_doc_type)

.UPDATE(ALL,1)

.RELGEN
.UPDATE_STATE
.ACTION_HISTORY

commit tran
select sid = convert(varchar, @id)
  $ENDTEXT(16411575)

  $BIND(BIND1)
   type=MONEY_REDEMPTION
   action=ACTION_UPDATE
   class=1
   order=1
   idname=null
  $ENDBIND
 $ENDACTION

 $ACTION(NOT_USE_ACTION_MOVE1EXP)
  name=Исполнить EXP (старый вариант)
  class=9
  form=null
  target_state=ISP
  procedure=ap_21535000001982563
  patterns=GENERIC_MOVE
  user_define=1
  isvisible=0
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411576)
create procedure dbo.%PROC% @sid varchar(30) = null
as
.BEGIN('N')

.CHECK_USER
.CHECK_UPDATE
--.GET_PROPS

begin tran


declare cur1 cursor static for
select id from tb_list2money_oper
where tb_list2money_oper.item_id=@id
for read only

open cur1
declare @cur2dep_id numeric
fetch cur1 into @cur2dep_id



while .CURSOR_STATE=0
begin
exec ap_calc_per_cent_block @cur2dep_id,@id
fetch cur1 into @cur2dep_id
end
close cur1

.DEALLOCATE cur1
.UPDATE_STATE
.ACTION_HISTORY

/*-------Проводки ----------*/
commit tran
.END
  $ENDTEXT(16411576)
 $ENDACTION

 $ACTION(PROC2DEPOZIT)
  name=Начисление % по депозиту
  class=9
  form=null
  target_state=null
  procedure=ap_21535000000607978
  patterns=GENERIC_MOVE
  user_define=1
  isvisible=1
  istab=0
  posx=null
  posy=null
  width=null
  height=null
  proc_text=$TEXT(16411576)
create procedure dbo.%PROC% @sid varchar(30) = null
as
.BEGIN('N')

.CHECK_USER

.GET_PROPS
.ACTION_HISTORY

declare @mess varchar(255)
declare @subc_str varchar(255)
declare @plan_secur_id numeric
declare @plan_money_id numeric
declare @out_method numeric
declare @is_realiz int
declare @is_p2l_comis int
declare @is_com_in int
declare @is_allow_short4stocks int
declare @is_allow_short4money int
declare @asset4pereoc_type_id numeric
declare @deb_acc_id numeric
declare @cred_acc_id numeric
declare @cur2dep_id numeric
declare @profit2loss_acc_id numeric
declare @fin_result_id numeric
declare @money_plan_cur_id numeric
declare @perpose_name varchar(255)
declare @organisation_id numeric
declare @dog_depozit_id numeric
declare @money_acc_id numeric

select @perpose_name = .ITEM_NAME(@purpose_id)
.BACK_GET_ORG_PARMS(@owner_id, @organisation_id, @plan_money_id, @plan_secur_id, @out_method,@is_realiz,@is_p2l_comis,@is_com_in,@is_allow_short4stocks,@is_allow_short4money,@asset4pereoc_type_id)

select @money_plan_cur_id=.CUR2PLAN(@plan_money_id)

.ACCID_FROM_CONST2PLAN(@deb_acc_id,'BACK_ACC_DEPOZIT',@plan_money_id,2,1,'Обязательства по депозиту',@mess)

.ACCID_FROM_CONST2PLAN(@profit2loss_acc_id,'BACK_ACC_PROFIT_OTHER',@plan_money_id,1,1,'Прибыль',@mess)

declare cur1 cursor for
select id from tb_list2money_oper
where tb_list2money_oper.item_id=@id
for read only

open cur1

fetch cur1 into @cur2dep_id

begin tran

while .CURSOR_STATE=0
begin

.TYPE_GET('LIST_FOR_MONEY_REDEMPTION',@cur2dep_id)

if exists(select 1 from tb_contracts where id=@contract_id1)
begin
select @fin_result_id=fin_result from tb_contracts where id=@contract_id1

.ACCID_FROM_CONST2PLAN(@cred_acc_id,'BACK_ACC_FUND_MONEY',@plan_money_id,1,3,'Клиентские фонды ДС',@mess)
end else
begin
select @fin_result_id=1

.ACCID_FROM_CONST2PLAN(@cred_acc_id,'BACK_ACC_FUND_MONEY',@plan_money_id,1,2,'Собственные фонды ДС',@mess)
end

select @dog_depozit_id=(select ext_broker_deal from tb_broker2exchange where id=@asset_place_id1)
select @money_acc_id = (select money_acc_id from tb_contracts where id = @dog_depozit_id)

-- 26/07/2005 Богаковский добавил аналитику "BANK_ACCOUNT" (р/с) для того, чтобы корректно работали пополняемые депозиты
-- и удалил (закомментарил) аналитику "Сделки с ЦБ" ('DOC_SEC')
.SUBC_STR_ADD(@subc_str,'BANK_ACCOUNT',@money_acc_id,Y)

.SUBC_STR_ADD(@subc_str,'ASSET_PLACES',@asset_place_id1)
--.SUBC_STR_ADD(@subc_str,'DOC_SEC',@id)
.SUBC_STR_ADD(@subc_str,'investors',@contract_id1)
.SUBC_STR_ADD(@subc_str,'investor2portfolio',@portfolio_sub_id1)
.SUBC_STR_ADD(@subc_str,'portfolio',@portfolio_id1)
.SUBC_STR_ADD(@subc_str,'contragents',@contragent_id1)


---@@@
--.EXIT_MESSAGE_PARM('@subc_str', @subc_str)
---@@@



if @list_sum1<0
  .EXIT_MESSAGE('Провести невозможно, поскольку во вкладке "Рассчитанные суммы" обнаружены отрицательные значения.')

if @fin_result_id=1
begin

.OPERATION_SBC(@owner_id,@plan_money_id,@in_date,@deb_acc_id,@profit2loss_acc_id,@list_sum1,@money_plan_cur_id,@in_date,0,0,@perpose_name,Y,
@operation_id,null,null,@action_history_id,null,null,@subc_str,@subc_str)

.OPERATION_SBC(@owner_id,@plan_money_id,@in_date,@profit2loss_acc_id,@cred_acc_id,@list_sum1,@money_plan_cur_id,@in_date,0,0,@perpose_name,Y,
@operation_id,null,null,@action_history_id,null,null,@subc_str,@subc_str)

end else
begin

.OPERATION_SBC(@owner_id,@plan_money_id,@in_date,@deb_acc_id,@cred_acc_id,@list_sum1,@money_plan_cur_id,@in_date,0,0,@perpose_name,Y,
@operation_id,null,null,@action_history_id,null,null,@subc_str,@subc_str)


end
/* Богаковский 26/07/2005 закомментарил и перенес эти вычисления выше
select @dog_depozit_id=(select ext_broker_deal from tb_broker2exchange)
where id=@asset_place_id1
select @money_acc_id = (select money_acc_id from tb_contracts where id = @dog_depozit_id)
*/
#ifdef ALD_UKPIF

if .TEST_PIF_CLIENT(@contract_id1)
begin

execute ap_exec_pif2depozit @id,
@action_id,
@action_history_id,
@contract_id1,
@in_date,
@list_sum1,
@dog_depozit_id

 if @@error != 0
 begin
  if @@trancount<>0 rollback tran
  return
 end

end

#endif

fetch cur1 into @cur2dep_id
end


close cur1

.DEALLOCATE cur1
/*-------Проводки ----------*/
commit tran
.END
  $ENDTEXT(16411576)
 $ENDACTION

 $STATE2ACTION(BEG.ACTION_DELETE)
  state=BEG
  action=ACTION_DELETE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_EXEC_BY_ONE)
  state=BEG
  action=ACTION_EXEC_BY_ONE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_INSERT)
  state=BEG
  action=ACTION_INSERT
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_MOVE)
  state=BEG
  action=ACTION_MOVE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_MOVE1)
  state=BEG
  action=ACTION_MOVE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_MOVE2)
  state=BEG
  action=ACTION_MOVE2
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_UPDATE)
  state=BEG
  action=ACTION_UPDATE
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.ACTION_UPDATE1)
  state=BEG
  action=ACTION_UPDATE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.D_MONEY_REDEMPTION_EDIT)
  state=BEG
  action=D_MONEY_REDEMPTION_EDIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.D_MONEY_REDEMPTION_FILTER)
  state=BEG
  action=D_MONEY_REDEMPTION_FILTER
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.FORM_VIEW)
  state=BEG
  action=FORM_VIEW
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.NOT_USE_ACTION_MOVE1EXP)
  state=BEG
  action=NOT_USE_ACTION_MOVE1EXP
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.PROC2DEPOZIT)
  state=BEG
  action=PROC2DEPOZIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(BEG.REDEMPTION2PURPOSE2MONEY)
  state=BEG
  action=REDEMPTION2PURPOSE2MONEY
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_DELETE)
  state=CRT
  action=ACTION_DELETE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_EXEC_BY_ONE)
  state=CRT
  action=ACTION_EXEC_BY_ONE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_INSERT)
  state=CRT
  action=ACTION_INSERT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_MOVE)
  state=CRT
  action=ACTION_MOVE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_MOVE1)
  state=CRT
  action=ACTION_MOVE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_MOVE2)
  state=CRT
  action=ACTION_MOVE2
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_UPDATE)
  state=CRT
  action=ACTION_UPDATE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.ACTION_UPDATE1)
  state=CRT
  action=ACTION_UPDATE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.D_MONEY_REDEMPTION_EDIT)
  state=CRT
  action=D_MONEY_REDEMPTION_EDIT
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.D_MONEY_REDEMPTION_FILTER)
  state=CRT
  action=D_MONEY_REDEMPTION_FILTER
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.FORM_VIEW)
  state=CRT
  action=FORM_VIEW
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.NOT_USE_ACTION_MOVE1EXP)
  state=CRT
  action=NOT_USE_ACTION_MOVE1EXP
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.PROC2DEPOZIT)
  state=CRT
  action=PROC2DEPOZIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(CRT.REDEMPTION2PURPOSE2MONEY)
  state=CRT
  action=REDEMPTION2PURPOSE2MONEY
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_DELETE)
  state=DEL
  action=ACTION_DELETE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_EXEC_BY_ONE)
  state=DEL
  action=ACTION_EXEC_BY_ONE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_INSERT)
  state=DEL
  action=ACTION_INSERT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_MOVE)
  state=DEL
  action=ACTION_MOVE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_MOVE1)
  state=DEL
  action=ACTION_MOVE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_MOVE2)
  state=DEL
  action=ACTION_MOVE2
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_UPDATE)
  state=DEL
  action=ACTION_UPDATE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.ACTION_UPDATE1)
  state=DEL
  action=ACTION_UPDATE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.D_MONEY_REDEMPTION_EDIT)
  state=DEL
  action=D_MONEY_REDEMPTION_EDIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.D_MONEY_REDEMPTION_FILTER)
  state=DEL
  action=D_MONEY_REDEMPTION_FILTER
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.FORM_VIEW)
  state=DEL
  action=FORM_VIEW
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.NOT_USE_ACTION_MOVE1EXP)
  state=DEL
  action=NOT_USE_ACTION_MOVE1EXP
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.PROC2DEPOZIT)
  state=DEL
  action=PROC2DEPOZIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(DEL.REDEMPTION2PURPOSE2MONEY)
  state=DEL
  action=REDEMPTION2PURPOSE2MONEY
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_DELETE)
  state=ED
  action=ACTION_DELETE
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_EXEC_BY_ONE)
  state=ED
  action=ACTION_EXEC_BY_ONE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_INSERT)
  state=ED
  action=ACTION_INSERT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_MOVE)
  state=ED
  action=ACTION_MOVE
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_MOVE1)
  state=ED
  action=ACTION_MOVE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_MOVE2)
  state=ED
  action=ACTION_MOVE2
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_UPDATE)
  state=ED
  action=ACTION_UPDATE
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.ACTION_UPDATE1)
  state=ED
  action=ACTION_UPDATE1
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.D_MONEY_REDEMPTION_EDIT)
  state=ED
  action=D_MONEY_REDEMPTION_EDIT
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.D_MONEY_REDEMPTION_FILTER)
  state=ED
  action=D_MONEY_REDEMPTION_FILTER
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.FORM_VIEW)
  state=ED
  action=FORM_VIEW
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.NOT_USE_ACTION_MOVE1EXP)
  state=ED
  action=NOT_USE_ACTION_MOVE1EXP
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.PROC2DEPOZIT)
  state=ED
  action=PROC2DEPOZIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ED.REDEMPTION2PURPOSE2MONEY)
  state=ED
  action=REDEMPTION2PURPOSE2MONEY
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_DELETE)
  state=ISP
  action=ACTION_DELETE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_EXEC_BY_ONE)
  state=ISP
  action=ACTION_EXEC_BY_ONE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_INSERT)
  state=ISP
  action=ACTION_INSERT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_MOVE)
  state=ISP
  action=ACTION_MOVE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_MOVE1)
  state=ISP
  action=ACTION_MOVE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_MOVE2)
  state=ISP
  action=ACTION_MOVE2
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_UPDATE)
  state=ISP
  action=ACTION_UPDATE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.ACTION_UPDATE1)
  state=ISP
  action=ACTION_UPDATE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.D_MONEY_REDEMPTION_EDIT)
  state=ISP
  action=D_MONEY_REDEMPTION_EDIT
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.D_MONEY_REDEMPTION_FILTER)
  state=ISP
  action=D_MONEY_REDEMPTION_FILTER
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.FORM_VIEW)
  state=ISP
  action=FORM_VIEW
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.NOT_USE_ACTION_MOVE1EXP)
  state=ISP
  action=NOT_USE_ACTION_MOVE1EXP
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.PROC2DEPOZIT)
  state=ISP
  action=PROC2DEPOZIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(ISP.REDEMPTION2PURPOSE2MONEY)
  state=ISP
  action=REDEMPTION2PURPOSE2MONEY
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_DELETE)
  state=WAIT_ISP
  action=ACTION_DELETE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_EXEC_BY_ONE)
  state=WAIT_ISP
  action=ACTION_EXEC_BY_ONE
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_INSERT)
  state=WAIT_ISP
  action=ACTION_INSERT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_MOVE)
  state=WAIT_ISP
  action=ACTION_MOVE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_MOVE1)
  state=WAIT_ISP
  action=ACTION_MOVE1
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_MOVE2)
  state=WAIT_ISP
  action=ACTION_MOVE2
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_UPDATE)
  state=WAIT_ISP
  action=ACTION_UPDATE
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.ACTION_UPDATE1)
  state=WAIT_ISP
  action=ACTION_UPDATE1
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.D_MONEY_REDEMPTION_EDIT)
  state=WAIT_ISP
  action=D_MONEY_REDEMPTION_EDIT
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.D_MONEY_REDEMPTION_FILTER)
  state=WAIT_ISP
  action=D_MONEY_REDEMPTION_FILTER
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.FORM_VIEW)
  state=WAIT_ISP
  action=FORM_VIEW
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.NOT_USE_ACTION_MOVE1EXP)
  state=WAIT_ISP
  action=NOT_USE_ACTION_MOVE1EXP
  is_available=1
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.PROC2DEPOZIT)
  state=WAIT_ISP
  action=PROC2DEPOZIT
  is_available=0
 $ENDSTATE2ACTION

 $STATE2ACTION(WAIT_ISP.REDEMPTION2PURPOSE2MONEY)
  state=WAIT_ISP
  action=REDEMPTION2PURPOSE2MONEY
  is_available=1
 $ENDSTATE2ACTION

 $STATE2PROP(BEG.CONTRACT_ID)
  state=BEG
  prop=CONTRACT_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.CORRESPONDENT_ID)
  state=BEG
  prop=CORRESPONDENT_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.DATE_B)
  state=BEG
  prop=DATE_B
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.DEPO_DOC_TYPE)
  state=BEG
  prop=DEPO_DOC_TYPE
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.DOCUMENT_FORM_ID)
  state=BEG
  prop=DOCUMENT_FORM_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.DOC_COMMENT)
  state=BEG
  prop=DOC_COMMENT
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.FOLDER_ID)
  state=BEG
  prop=FOLDER_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.INITIATOR_ID)
  state=BEG
  prop=INITIATOR_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.IN_DATE)
  state=BEG
  prop=IN_DATE
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.IN_NO)
  state=BEG
  prop=IN_NO
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.IS_DOGOVOR)
  state=BEG
  prop=IS_DOGOVOR
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.OUT_DATE)
  state=BEG
  prop=OUT_DATE
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.OUT_NO)
  state=BEG
  prop=OUT_NO
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.OWNER_ID)
  state=BEG
  prop=OWNER_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.PAYER_ID)
  state=BEG
  prop=PAYER_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.PAY_SUM)
  state=BEG
  prop=PAY_SUM
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.PURPOSE_ID)
  state=BEG
  prop=PURPOSE_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.SUM_CUR_ID)
  state=BEG
  prop=SUM_CUR_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.WHO_GET)
  state=BEG
  prop=WHO_GET
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(BEG.WHO_PUT)
  state=BEG
  prop=WHO_PUT
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(CRT.CONTRACT_ID)
  state=CRT
  prop=CONTRACT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.CORRESPONDENT_ID)
  state=CRT
  prop=CORRESPONDENT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.DATE_B)
  state=CRT
  prop=DATE_B
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.DEPO_DOC_TYPE)
  state=CRT
  prop=DEPO_DOC_TYPE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.DOCUMENT_FORM_ID)
  state=CRT
  prop=DOCUMENT_FORM_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.DOC_COMMENT)
  state=CRT
  prop=DOC_COMMENT
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(CRT.FOLDER_ID)
  state=CRT
  prop=FOLDER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.INITIATOR_ID)
  state=CRT
  prop=INITIATOR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.IN_DATE)
  state=CRT
  prop=IN_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.IN_NO)
  state=CRT
  prop=IN_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.IS_DOGOVOR)
  state=CRT
  prop=IS_DOGOVOR
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.OUT_DATE)
  state=CRT
  prop=OUT_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.OUT_NO)
  state=CRT
  prop=OUT_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.OWNER_ID)
  state=CRT
  prop=OWNER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.PAYER_ID)
  state=CRT
  prop=PAYER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.PAY_SUM)
  state=CRT
  prop=PAY_SUM
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.PURPOSE_ID)
  state=CRT
  prop=PURPOSE_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.SUM_CUR_ID)
  state=CRT
  prop=SUM_CUR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.WHO_GET)
  state=CRT
  prop=WHO_GET
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(CRT.WHO_PUT)
  state=CRT
  prop=WHO_PUT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.CONTRACT_ID)
  state=DEL
  prop=CONTRACT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.CORRESPONDENT_ID)
  state=DEL
  prop=CORRESPONDENT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.DATE_B)
  state=DEL
  prop=DATE_B
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.DEPO_DOC_TYPE)
  state=DEL
  prop=DEPO_DOC_TYPE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.DOCUMENT_FORM_ID)
  state=DEL
  prop=DOCUMENT_FORM_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.DOC_COMMENT)
  state=DEL
  prop=DOC_COMMENT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.FOLDER_ID)
  state=DEL
  prop=FOLDER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.INITIATOR_ID)
  state=DEL
  prop=INITIATOR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.IN_DATE)
  state=DEL
  prop=IN_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.IN_NO)
  state=DEL
  prop=IN_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.IS_DOGOVOR)
  state=DEL
  prop=IS_DOGOVOR
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.OUT_DATE)
  state=DEL
  prop=OUT_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.OUT_NO)
  state=DEL
  prop=OUT_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.OWNER_ID)
  state=DEL
  prop=OWNER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.PAYER_ID)
  state=DEL
  prop=PAYER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.PAY_SUM)
  state=DEL
  prop=PAY_SUM
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.PURPOSE_ID)
  state=DEL
  prop=PURPOSE_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.SUM_CUR_ID)
  state=DEL
  prop=SUM_CUR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.WHO_GET)
  state=DEL
  prop=WHO_GET
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(DEL.WHO_PUT)
  state=DEL
  prop=WHO_PUT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ED.CONTRACT_ID)
  state=ED
  prop=CONTRACT_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.CORRESPONDENT_ID)
  state=ED
  prop=CORRESPONDENT_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.DATE_B)
  state=ED
  prop=DATE_B
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.DEPO_DOC_TYPE)
  state=ED
  prop=DEPO_DOC_TYPE
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.DOCUMENT_FORM_ID)
  state=ED
  prop=DOCUMENT_FORM_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.DOC_COMMENT)
  state=ED
  prop=DOC_COMMENT
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.FOLDER_ID)
  state=ED
  prop=FOLDER_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.INITIATOR_ID)
  state=ED
  prop=INITIATOR_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.IN_DATE)
  state=ED
  prop=IN_DATE
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.IN_NO)
  state=ED
  prop=IN_NO
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.IS_DOGOVOR)
  state=ED
  prop=IS_DOGOVOR
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.OUT_DATE)
  state=ED
  prop=OUT_DATE
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.OUT_NO)
  state=ED
  prop=OUT_NO
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.OWNER_ID)
  state=ED
  prop=OWNER_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.PAYER_ID)
  state=ED
  prop=PAYER_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.PAY_SUM)
  state=ED
  prop=PAY_SUM
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.PURPOSE_ID)
  state=ED
  prop=PURPOSE_ID
  enable=1
  mandatory=1
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.SUM_CUR_ID)
  state=ED
  prop=SUM_CUR_ID
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.WHO_GET)
  state=ED
  prop=WHO_GET
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ED.WHO_PUT)
  state=ED
  prop=WHO_PUT
  enable=1
  mandatory=0
  visible=1
 $ENDSTATE2PROP

 $STATE2PROP(ISP.CONTRACT_ID)
  state=ISP
  prop=CONTRACT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.CORRESPONDENT_ID)
  state=ISP
  prop=CORRESPONDENT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.DATE_B)
  state=ISP
  prop=DATE_B
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.DEPO_DOC_TYPE)
  state=ISP
  prop=DEPO_DOC_TYPE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.DOCUMENT_FORM_ID)
  state=ISP
  prop=DOCUMENT_FORM_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.DOC_COMMENT)
  state=ISP
  prop=DOC_COMMENT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.FOLDER_ID)
  state=ISP
  prop=FOLDER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.INITIATOR_ID)
  state=ISP
  prop=INITIATOR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.IN_DATE)
  state=ISP
  prop=IN_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.IN_NO)
  state=ISP
  prop=IN_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.IS_DOGOVOR)
  state=ISP
  prop=IS_DOGOVOR
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.OUT_DATE)
  state=ISP
  prop=OUT_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.OUT_NO)
  state=ISP
  prop=OUT_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.OWNER_ID)
  state=ISP
  prop=OWNER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.PAYER_ID)
  state=ISP
  prop=PAYER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.PAY_SUM)
  state=ISP
  prop=PAY_SUM
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.PURPOSE_ID)
  state=ISP
  prop=PURPOSE_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.SUM_CUR_ID)
  state=ISP
  prop=SUM_CUR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.WHO_GET)
  state=ISP
  prop=WHO_GET
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(ISP.WHO_PUT)
  state=ISP
  prop=WHO_PUT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.CONTRACT_ID)
  state=WAIT_ISP
  prop=CONTRACT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.CORRESPONDENT_ID)
  state=WAIT_ISP
  prop=CORRESPONDENT_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.DATE_B)
  state=WAIT_ISP
  prop=DATE_B
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.DEPO_DOC_TYPE)
  state=WAIT_ISP
  prop=DEPO_DOC_TYPE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.DOCUMENT_FORM_ID)
  state=WAIT_ISP
  prop=DOCUMENT_FORM_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.DOC_COMMENT)
  state=WAIT_ISP
  prop=DOC_COMMENT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.FOLDER_ID)
  state=WAIT_ISP
  prop=FOLDER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.INITIATOR_ID)
  state=WAIT_ISP
  prop=INITIATOR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.IN_DATE)
  state=WAIT_ISP
  prop=IN_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.IN_NO)
  state=WAIT_ISP
  prop=IN_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.IS_DOGOVOR)
  state=WAIT_ISP
  prop=IS_DOGOVOR
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.OUT_DATE)
  state=WAIT_ISP
  prop=OUT_DATE
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.OUT_NO)
  state=WAIT_ISP
  prop=OUT_NO
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.OWNER_ID)
  state=WAIT_ISP
  prop=OWNER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.PAYER_ID)
  state=WAIT_ISP
  prop=PAYER_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.PAY_SUM)
  state=WAIT_ISP
  prop=PAY_SUM
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.PURPOSE_ID)
  state=WAIT_ISP
  prop=PURPOSE_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.SUM_CUR_ID)
  state=WAIT_ISP
  prop=SUM_CUR_ID
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.WHO_GET)
  state=WAIT_ISP
  prop=WHO_GET
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP

 $STATE2PROP(WAIT_ISP.WHO_PUT)
  state=WAIT_ISP
  prop=WHO_PUT
  enable=0
  mandatory=0
  visible=0
 $ENDSTATE2PROP
$ENDDOC