frmCnCtgRee.PRG                                                       4386object frmCnCtgRee: TfrmCnCtgRee
  Left = 25
  Top = 25
  Width = 510
  Height = 365
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1072#1084#1080' - '#1050#1072#1090#1077#1075#1086#1088#1080#1080' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    502
    331)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 8
    Top = 36
    Width = 486
    Height = 265
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{F90F91B4-E03B-4016-ABF0-981ACC2BFFBA}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Code'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1050#1086#1076
        Width = 90
      end
      item
        EditButtons = <>
        FieldName = 'Title'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 250
      end
      item
        EditButtons = <>
        FieldName = 'IS_BUDGET'
        Footers = <>
        Title.Caption = #1041#1102#1076#1078#1077#1090#1085#1072#1103
      end
      item
        EditButtons = <>
        FieldName = 'is_system'
        Footers = <>
        ReadOnly = True
        Title.Caption = #1057#1080#1089#1090#1077#1084#1085#1072#1103
      end>
  end
  object cLBrg: xbLabelCombo
    Left = 8
    Top = 8
    Width = 261
    Height = 21
    ParentBackGround = True
    Caption = #1042#1080#1076' '#1089#1076#1077#1083#1082#1080
    TabOrder = 2
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Sorted = False
    EditColor = clWindow
    DisabledColor = clBlack
    DisabledFontColor = clBlack
    BorderColor = clBlack
    AutoComplete = False
    Style = csDropDownList
    CharCase = ecNormal
    DropDownCount = 0
    ItemHeight = 0
    MaxLength = 0
    Items.Strings = (
      #1047#1072#1082#1091#1087#1082#1080
      #1055#1088#1086#1076#1072#1078#1072)
    ItemIndex = -1
    UseStandartHint = True
    OnSelect = cLBrg_Select
  end
  object bButton1: xbButton
    Left = 419
    Top = 308
    Width = 75
    Height = 21
    Caption = #1056#1077#1082#1074#1080#1079#1080#1090#1099
    RoundedButton = True
    TabOrder = 1
    OnClick = bButton1_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupButton1: xbPopupButton
    Left = 338
    Top = 308
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPopupMenu1
    RoundedButton = True
    TabOrder = 3
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCnCtg'
    Active = False
    Left = 31
    Top = 214
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 75
    Top = 212
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 137
    Top = 203
  end
  object bPopupMenu1: xbPopupMenu
    Left = 244
    Top = 152
    object N14: TMenuItem
      Caption = #1042#1074#1086#1076'/'#1041#1099#1089#1090#1088#1099#1081' '#1087#1086#1080#1089#1082
      ShortCut = 8310
    end
  end
end
frmSet_Add.PRG                                                       17051object frmSet_Add: TfrmSet_Add
  Left = 25
  Top = 25
  Width = 516
  Height = 372
  Anchors = []
  Caption = #1044#1086#1087#1086#1083#1085#1080#1090#1077#1083#1100#1085#1099#1077' '#1088#1077#1082#1074#1080#1079#1080#1090#1099
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    508
    338)
  PixelsPerInch = 96
  TextHeight = 13
  object btnCancel: xbButton
    Left = 424
    Top = 315
    Width = 75
    Height = 21
    Hint = #1042#1099#1093#1086#1076' '#1080#1079' '#1092#1086#1088#1084#1099' (Esc)'
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 2
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnOk: xbButton
    Left = 341
    Top = 315
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1077#1085#1080#1077'  '#1076#1086#1082#1091#1084#1077#1085#1090#1072' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPageControl1: xbPageControl
    Left = 7
    Top = 10
    Width = 490
    Height = 297
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      object blCode: xbLabelEdit
        Left = 7
        Top = 7
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1087#1086#1083#1103
        CaptionAlignment = taLeftJustify
        DataField = 'Code'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object blName: xbLabelEdit
        Left = 7
        Top = 32
        Width = 450
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Name'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLType: xbLabelCombo
        Left = 7
        Top = 106
        Width = 250
        Height = 21
        ParentBackGround = True
        Caption = #1058#1080#1087' '#1076#1072#1085#1085#1099#1093
        TabOrder = 5
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        Items.Strings = (
          #1058#1077#1082#1089#1090
          #1063#1080#1089#1083#1086
          #1044#1072#1090#1072)
        ItemIndex = -1
        UseStandartHint = True
        OnSelect = bLType_Select
      end
      object blLenght: xbLabelEdit
        Left = 7
        Top = 130
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1083#1080#1085#1072' '#1087#1086#1083#1103
        CaptionAlignment = taLeftJustify
        DataField = 'Lenght'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 6
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        OnExit = blLenght_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLDEC: xbLabelEdit
        Left = 7
        Top = 155
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1058#1086#1095#1085#1086#1089#1090#1100
        CaptionAlignment = taLeftJustify
        DataField = 'DEC'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 7
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        OnExit = bLDEC_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bCDemand: xbCheckBox
        Left = 7
        Top = 178
        Width = 250
        Height = 18
        Caption = #1054#1073#1103#1079#1072#1090#1077#1083#1100#1085#1099#1081' '#1074#1074#1086#1076
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 8
        TabStop = True
        ValueChecked = '1'
        ValueUnchecked = '0'
        DataField = 'Demand'
        DataSource = DSR
      end
      object bCISVISIBLE: xbCheckBox
        Left = 7
        Top = 226
        Width = 250
        Height = 21
        Caption = #1054#1090#1086#1073#1088#1072#1078#1072#1090#1100' '#1085#1072' '#1101#1082#1088#1072#1085#1077'?'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        TabStop = True
        ValueChecked = '1'
        ValueUnchecked = '0'
        DataField = 'IS_VISIBLE'
        DataSource = DSR
      end
      object bCISEDIT: xbCheckBox
        Left = 7
        Top = 250
        Width = 250
        Height = 18
        Caption = #1048#1079#1084#1077#1085#1103#1090#1100' '#1079#1085#1072#1095#1077#1085#1080#1077'?'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 15
        TabStop = True
        ValueChecked = '1'
        ValueUnchecked = '0'
        DataField = 'IS_EDIT'
        DataSource = DSR
      end
      object bLDefault: xbLabelEdit
        Left = 7
        Top = 202
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Default'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 9
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '      '
        OnEnter = bLDefault_Enter
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLSpr: xbLabelEditRefer
        Left = 7
        Top = 82
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082
        CaptionAlignment = taLeftJustify
        DataField = 'Spr'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'Id_Spr'
        OnClearButtonClick = bLSpr_ClearButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'NAME;-1;25;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSSPR
        OutFieldsArray = 'Id_Spr,type,lenght,dec'
        PutFieldsArray = 'Id_Spr,type,lenght,dec'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082#1080
        TypeFindFieldName = 'Name'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLSpr_Select
      end
      object blRefDefault: xbLabelEditRefer
        Left = 7
        Top = 202
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'DEFAULT'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 10
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = blRefDefault_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'VALUE;-1;120;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSADD
        OutFieldsArray = 'value'
        PutFieldsArray = 'Default'
        ReferCaption = #1047#1085#1072#1095#1077#1085#1080#1077
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLDefaultCalc: xbLabelEditCalc
        Left = 7
        Top = 202
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'DefaultN'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 11
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLDefaultCalend: xbLabelEditCalend
        Left = 7
        Top = 202
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'DefaultD'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 12
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLDimType: xbLabelCombo
        Left = 7
        Top = 57
        Width = 250
        Height = 21
        ParentBackGround = True
        Caption = #1042#1080#1076' '#1089#1087#1088#1072#1074#1086#1095#1085#1080#1082#1072
        TabOrder = 2
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        Items.Strings = (
          #1042#1085#1091#1090#1088#1077#1085#1085#1080#1081
          #1048#1079#1084#1077#1088#1077#1085#1080#1077)
        ItemIndex = -1
        UseStandartHint = True
        OnSelect = bLDimType_Select
      end
      object bDimAnl: xbLabelEditRefer
        Left = 7
        Top = 82
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1048#1079#1084#1077#1088#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Spr'
        DataSource = DSR
        ButtonsColor = clBtnFace
        EnabledColor = clWhite
        TabOrder = 4
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;100;1;0;'#1050#1086#1076'|NAME;-1;350;1;0;'#1053#1072#1079#1074#1072#1085#1080#1077
        FindFieldName = 'CODE'
        FindFieldType = tfCharacterString
        ListDataSet = DSDIM
        OutFieldsArray = 'DIM_ID'
        PutFieldsArray = 'DIM_ID'
        ReferCaption = #1057#1087#1080#1089#1086#1082
        ReferHeight = 300
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bDimAnl_Select
      end
      object bARef: xbLabelEditAnalitRefer
        Left = 7
        Top = 202
        Width = 456
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'DEFAULT'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 13
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'DEFAULT'
        EnabledEdit = False
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
        MakeChecking = True
      end
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSet_Add'
    Active = False
    Left = 339
    Top = 67
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 390
    Top = 31
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 301
    Top = 63
  end
  object bPopupMenu1: xbPopupMenu
    Left = 334
    Top = 262
    object ItemInf: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = ItemInf_Click
    end
  end
  object BOSPR: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSet_Spr'
    Active = False
    Left = 437
    Top = 58
  end
  object DSSPR: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOSPR
    FieldDefs = <>
    OEMTranslate = False
    Left = 452
    Top = 125
  end
  object BOADD: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSpr_Add'
    Active = False
    Left = 301
    Top = 167
  end
  object DSADD: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOADD
    FieldDefs = <>
    OEMTranslate = False
    Left = 360
    Top = 185
  end
  object DSDIM: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    TableName = 'dim_anl'
    OEMTranslate = False
    Left = 416
    Top = 177
  end
end
frmSet_AddRee.PRG                                                     4923object frmSet_AddRee: TfrmSet_AddRee
  Left = -202
  Top = 25
  Width = 725
  Height = 365
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1072#1084#1080' - '#1044#1086#1087#1086#1083#1085#1080#1090#1077#1083#1100#1085#1099#1077' '#1088#1077#1082#1074#1080#1079#1080#1090#1099' '
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    717
    338)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 7
    Top = 10
    Width = 702
    Height = 292
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = bGrid1_DblClick
    OnKeyPress = bGrid1_KeyPress
    IdGrid = '{CB727455-C537-41C5-88C2-7C9158B20F5E}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Code'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1050#1086#1076
        Width = 95
      end
      item
        EditButtons = <>
        FieldName = 'Name'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 185
      end
      item
        EditButtons = <>
        FieldName = 'Type'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1058#1080#1087
        Width = 24
      end
      item
        EditButtons = <>
        FieldName = 'Lenght'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1044#1083#1080#1085#1072
        Width = 54
      end
      item
        EditButtons = <>
        FieldName = 'DEC'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1058#1086#1095#1085#1086#1089#1090#1100
        Width = 52
      end
      item
        EditButtons = <>
        FieldName = 'Spr'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082
        Width = 153
      end
      item
        EditButtons = <>
        FieldName = 'Default'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        Width = 117
      end>
  end
  object bPopupButton2: xbPopupButton
    Left = 635
    Top = 309
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPM
    RoundedButton = True
    TabOrder = 2
    OnClick = bPopupButton2_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bButton1: xbButton
    Left = 551
    Top = 309
    Width = 75
    Height = 21
    Caption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082#1080
    RoundedButton = True
    TabOrder = 1
    OnClick = bButton1_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSet_Add'
    Active = False
    Left = 53
    Top = 142
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 183
    Top = 148
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 78
    Top = 223
  end
  object bPopupMenu1: xbPopupMenu
    Left = 451
    Top = 180
    object ItemInf: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = ItemInf_Click
    end
  end
  object bPM: xbPopupMenu
    Left = 348
    Top = 170
    object mBottom: TMenuItem
      Caption = #1055#1077#1088#1077#1084#1077#1089#1090#1080#1090#1100' '#1074#1085#1080#1079
      ShortCut = 16424
      OnClick = mBottom_Click
    end
    object mTop: TMenuItem
      Caption = #1055#1077#1088#1077#1084#1077#1089#1090#1080#1090#1100' '#1074#1074#1077#1088#1093
      ShortCut = 16422
      OnClick = mTop_Click
    end
  end
end
frmSet_Spr.PRG                                                        7133object frmSet_Spr: TfrmSet_Spr
  Left = 25
  Top = 25
  Width = 537
  Height = 224
  ActiveControl = bLName
  Anchors = []
  Caption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1088#1077#1082#1074#1080#1079#1080#1090#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    529
    197)
  PixelsPerInch = 96
  TextHeight = 13
  object btnCancel: xbButton
    Left = 449
    Top = 169
    Width = 75
    Height = 21
    Hint = #1042#1099#1093#1086#1076' '#1080#1079' '#1092#1086#1088#1084#1099' (Esc)'
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 1
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnOk: xbButton
    Left = 365
    Top = 169
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1077#1085#1080#1077' '#1076#1086#1082#1091#1084#1077#1085#1090#1072' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 0
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPageControl1: xbPageControl
    Left = 8
    Top = 9
    Width = 516
    Height = 154
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 2
    OnChange = bPageControl1_Change
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        514
        132)
      object bLName: xbLabelEdit
        Left = 7
        Top = 6
        Width = 500
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Name'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 140
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
      end
      object bLType: xbLabelCombo
        Left = 7
        Top = 30
        Width = 250
        Height = 21
        ParentBackGround = True
        Caption = #1058#1080#1087' '#1087#1086#1083#1103
        TabOrder = 1
        LabelWidth = 140
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        Items.Strings = (
          #1057#1080#1084#1074#1086#1083#1100#1085#1086#1077
          #1063#1080#1089#1083#1086#1074#1086#1077
          #1044#1072#1090#1072)
        ItemIndex = -1
        OnSelect = bLType_Select
      end
      object bLLenght: xbLabelEdit
        Left = 7
        Top = 54
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1083#1080#1085#1072' '#1087#1086#1083#1103
        CaptionAlignment = taLeftJustify
        DataField = 'Lenght'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 2
        LabelWidth = 140
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
      end
      object bLDec: xbLabelEdit
        Left = 7
        Top = 78
        Width = 250
        Height = 21
        BorderColor = clWindowText
        Caption = #1058#1086#1095#1085#1086#1089#1090#1100' '#1087#1088#1077#1076#1089#1090#1072#1074#1083#1077#1085#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'Dec'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 140
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
      end
    end
    object TabSheet2: TTabSheet
      Caption = #1047#1085#1072#1095#1077#1085#1080#1077
      DesignSize = (
        514
        132)
      object bGrid1: xbGrid
        Left = 7
        Top = 5
        Width = 498
        Height = 119
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = dsrspr
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = bGrid1_DblClick
        OnKeyPress = bGrid1_KeyPress
        IdGrid = '{D586D472-7829-416C-9DD3-4B8CBC0D3EE9}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'Value'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1047#1085#1072#1095#1077#1085#1080#1077
            Width = 483
          end>
      end
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSet_Spr'
    Active = False
    Left = 303
    Top = 70
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 361
    Top = 77
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 400
    Top = 70
  end
  object bPopupMenu1: xbPopupMenu
    Left = 439
    Top = 70
    object ItemInf: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = ItemInf_Click
    end
  end
  object BOSPR: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSpr_Add'
    Active = False
    Left = 140
    Top = 98
  end
  object dsspr: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOSPR
    FieldDefs = <>
    OEMTranslate = False
    Left = 205
    Top = 95
  end
  object dsrspr: xbADSDataSource
    DataSet = dsspr
    Left = 82
    Top = 91
  end
end
frmSet_SprRee.PRG                                                     2639object xbFrm_15: TxbFrm_15
  Left = 25
  Top = 25
  Width = 516
  Height = 360
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1057#1087#1088#1072#1074#1086#1095#1085#1080#1082#1080' '#1088#1077#1082#1074#1080#1079#1080#1090#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    508
    333)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 8
    Top = 12
    Width = 490
    Height = 294
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = bGrid1_DblClick
    OnKeyPress = bGrid1_KeyPress
    IdGrid = '{7A9C28CC-D01B-400E-89E6-42DDBFCCF8DC}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Name'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1089#1087#1088#1072#1074#1086#1095#1085#1080#1082#1072
        Width = 410
      end
      item
        EditButtons = <>
        FieldName = 'IS_SYST'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1057#1080#1089#1090#1077#1084#1085#1072#1103
      end>
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSET_SPR'
    Active = False
    Left = 43
    Top = 113
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 43
    Top = 162
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 43
    Top = 208
  end
  object bPopupMenu1: xbPopupMenu
    Left = 294
    Top = 252
    object ItemInf: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = ItemInf_Click
    end
  end
end
frmSet_SprAdd.PRG                                                     4327object xbFrm_1: TxbFrm_1
  Left = 25
  Top = 25
  Width = 407
  Height = 151
  Anchors = []
  Caption = #1047#1085#1072#1095#1077#1085#1080#1077
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    399
    124)
  PixelsPerInch = 96
  TextHeight = 13
  object btnCancel: xbButton
    Left = 317
    Top = 96
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 1
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnOk: xbButton
    Left = 236
    Top = 96
    Width = 75
    Height = 21
    Hint = 'C'#1086#1093#1088#1072#1085#1080#1090#1100' '#1089#1090#1088#1086#1082#1091' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 0
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPageControl1: xbPageControl
    Left = 7
    Top = 5
    Width = 385
    Height = 85
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 2
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        383
        63)
      object blZnachT: xbLabelEdit
        Left = 7
        Top = 10
        Width = 360
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Value'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 2
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
      end
      object bLZnachN: xbLabelEditCalc
        Left = 7
        Top = 10
        Width = 360
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'ValueN'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '          '
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLZnachD: xbLabelEditCalend
        Left = 7
        Top = 10
        Width = 360
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'ValueD'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 0
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  .  .    '
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSpr_Add'
    Active = False
    Left = 15
    Top = 57
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 48
    Top = 58
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 78
    Top = 59
  end
  object bPopupMenu1: xbPopupMenu
    Left = 116
    Top = 58
    object pMenu: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMenu_Click
    end
  end
end
frmCnTypeRee.PRG                                                      5099object xbFrm: TxbFrm
  Left = 25
  Top = 25
  Width = 514
  Height = 339
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1072#1084#1080'-'#1042#1080#1076#1099' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    506
    305)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 7
    Top = 33
    Width = 491
    Height = 255
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = bGrid1_DblClick
    OnKeyPress = bGrid1_KeyPress
    IdGrid = '{1A010C90-3DB6-4792-AF27-FC2B0B2D8C89}'
    SearchMenuNameVar = 'oSm'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Code'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1050#1086#1076
        Width = 88
      end
      item
        EditButtons = <>
        FieldName = 'Title'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 322
      end
      item
        EditButtons = <>
        FieldName = 'IS_CLOSED'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1047#1072#1082#1088#1099#1090
      end>
  end
  object blRefCtg: xbLabelEditRefer
    Left = 269
    Top = 4
    Width = 217
    Height = 21
    BorderColor = clWindowText
    Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 1
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Required = True
    Visible = False
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2'
    BeforeButtonClick = blRefCtg_BeforeButtonClick
    VisibleButton = False
    UseStandartHint = True
    ColumnsTune = 'CODE;-1;4;1;0;'#1050#1086#1076'|Title;-1;20;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
    FindFieldType = tfCharacterString
    ListDataSet = DSCTG
    ReferCaption = #1050#1072#1090#1077#1075#1086#1088#1080#1103
    ReferHeight = 180
    ReferWidth = 240
    xReferId = 0
    IsHarbourRefer = True
    OnSelect = blRefCtg_Select
    OnCancel = blRefCtg_Cancel
  end
  object ComboCtg: xbLabelCombo
    Left = 7
    Top = 6
    Width = 278
    Height = 21
    ParentBackGround = True
    Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
    TabOrder = 2
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Sorted = False
    EditColor = clWindow
    DisabledColor = clBlack
    DisabledFontColor = clBlack
    BorderColor = clBlack
    AutoComplete = False
    Style = csDropDownList
    CharCase = ecNormal
    DropDownCount = 0
    ItemHeight = 0
    MaxLength = 0
    ItemIndex = -1
    UseStandartHint = True
    OnSelect = ComboCtg_Select
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntype'
    Active = False
    Left = 63
    Top = 113
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 119
    Top = 133
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 177
    Top = 171
  end
  object bPopupMenu1: xbPopupMenu
    Left = 272
    Top = 181
    object pMenu: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMenu_Click
    end
  end
  object BOCTG: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCnCTG'
    Active = False
    Left = 232
    Top = 78
  end
  object DSCTG: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOCTG
    FieldDefs = <>
    OEMTranslate = False
    Left = 295
    Top = 102
  end
  object PopupM: xbPopupMenu
    Left = 383
    Top = 89
  end
end
frmCnType.PRG                                                        13135object frmCnType: TfrmCnType
  Left = 25
  Top = 25
  Width = 509
  Height = 310
  ActiveControl = bLCode
  Anchors = []
  Caption = #1042#1080#1076#1099' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnCreate = Form_Create
  OnInnerEvent = Form_InnerEvent
  DesignSize = (
    501
    276)
  PixelsPerInch = 96
  TextHeight = 13
  object btnCancel: xbButton
    Left = 419
    Top = 253
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 2
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnOk: xbButton
    Left = 339
    Top = 253
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100' '#1076#1086#1082#1091#1084#1077#1085#1090' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPage1: xbPageControl
    Left = 7
    Top = 10
    Width = 486
    Height = 235
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        484
        213)
      object bLCode: xbLabelEdit
        Left = 7
        Top = 9
        Width = 269
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1074#1080#1076#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLTitle: xbLabelEdit
        Left = 7
        Top = 33
        Width = 445
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1053#1072#1079#1074#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Title'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 2
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLNote: xbLabelEdit
        Left = 7
        Top = 57
        Width = 445
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1054#1087#1080#1089#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Note'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bCIsClosed: xbCheckBox
        Left = 342
        Top = 9
        Width = 110
        Height = 18
        Caption = #1053#1077' '#1080#1089#1087#1086#1083#1100#1079#1086#1074#1072#1090#1100
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 1
        TabStop = True
        Anchors = [akTop, akRight]
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'IS_CLOSED'
        DataSource = DSR
      end
      object bMemo: xbMemo
        Left = 361
        Top = 116
        Width = 114
        Height = 84
        ColorFlat = clBtnFace
        ParentColor = True
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 5
        Visible = False
        Lines.Strings = (
          'N - '#1094#1080#1092#1088#1099' '#1085#1086#1084#1077#1088#1072' '
          #1076#1086#1075#1086#1074#1086#1088#1072'                     '
          '          Y - '#1094#1080#1092#1088#1099' '
          #1085#1086#1084#1077#1088#1072' '#1075#1086#1076#1072'    '
          'M - '#1094#1080#1092#1088#1099' '#1085#1086#1084#1077#1088#1072' '
          #1084#1077#1089#1103#1094#1072'                        '
          '         D - '#1094#1080#1092#1088#1099' '
          #1085#1086#1084#1077#1088#1072' '#1076#1085#1103'  '
          #1055#1088#1080#1084#1077#1088' '#1085#1072#1087#1080#1089#1072#1085#1080#1103' '
          #1096#1072#1073#1083#1086#1085#1072':'
          'NNNN -DDMMYYYY  '
          '- 0001-12122006 ;   '
          #1044#1043'NNNN  - '#1044#1043'0001;'
          'YY/NNNN                  - '
          '06/0001;                '
          'NNNN'#1044#1043'  - 0001'#1044#1043'.')
        Anchors = [akLeft, akTop, akRight, akBottom]
        BorderStyle = bsNone
        Color = clWhite
        DisabledColor = clInactiveBorder
        DisabledFontColor = 7368816
      end
      object blPrint: xbLabelEditRefer
        Left = 7
        Top = 81
        Width = 444
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1087#1077#1095#1072#1090#1085#1099#1093' '#1092#1086#1088#1084
        CaptionAlignment = taLeftJustify
        DataField = 'Name_rep'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 4
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        BeforeButtonClick = blPrint_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
      end
      object bFrame1: xbFrame
        Left = 6
        Top = 105
        Width = 279
        Height = 90
        Caption = #1070#1088#1080#1076#1080#1095#1077#1089#1082#1080#1081' '#1085#1086#1084#1077#1088
        TabOrder = 6
        DesignSize = (
          279
          90)
        object bLCurrente: xbLabelEdit
          Left = 7
          Top = 61
          Width = 263
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          BorderColor = clWindowText
          Caption = #1058#1077#1082#1091#1097#1080#1081' '#1085#1086#1084#1077#1088
          CaptionAlignment = taLeftJustify
          DataField = 'Current_E'
          DataSource = DSR
          ButtonsColor = clBlack
          EnabledColor = clWhite
          TabOrder = 2
          LabelWidth = 145
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
        object bLPattern: xbLabelEdit
          Left = 7
          Top = 37
          Width = 263
          Height = 21
          Anchors = [akLeft, akTop, akRight]
          BorderColor = clWindowText
          Caption = #1064#1072#1073#1083#1086#1085' '#1085#1086#1084#1077#1088#1072
          CaptionAlignment = taLeftJustify
          DataField = 'PATTERN'
          DataSource = DSR
          ButtonsColor = clBlack
          EnabledColor = clWhite
          TabOrder = 1
          LabelWidth = 145
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          OnEnter = bLPattern_Enter
          OnExit = bLPattern_Exit
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
        object bCIsAuto: xbCheckBox
          Left = 7
          Top = 16
          Width = 160
          Height = 18
          Caption = #1040#1074#1090#1086#1085#1091#1084#1077#1088#1072#1094#1080#1103
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clWindowText
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = []
          ParentFont = False
          TabOrder = 0
          TabStop = True
          OnClick = bCIsAuto_Click
          Anchors = [akLeft, akTop, akRight]
          ValueChecked = 'True'
          ValueUnchecked = 'False'
          DataField = 'IS_AUTO'
          DataSource = DSR
        end
      end
    end
    object TabSheet2: TTabSheet
      Caption = #1040#1085#1072#1083#1080#1090#1080#1082#1072' '#1086#1087#1083#1072#1090#1099
      DesignSize = (
        484
        213)
      object GridDimTune: xbGrid
        Left = 7
        Top = 9
        Width = 471
        Height = 195
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSRDim
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        Options = [dgEditing, dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        OnDblClick = GridDimTune_DblClick
        OnKeyPress = GridDimTune_KeyPress
        IdGrid = '{F7750EE4-4F0F-4342-ACFC-EFDD2D60FD07}'#39
        Columns = <
          item
            EditButtons = <>
            FieldName = 'DIM_NAME'
            Footers = <>
            Title.Caption = #1048#1079#1084#1077#1088#1077#1085#1080#1077
            Width = 218
          end
          item
            Alignment = taRightJustify
            EditButtons = <>
            FieldName = 'ORDER'
            Footers = <>
            Title.Caption = #1053#1086#1084#1077#1088' '#1089#1077#1075#1084#1077#1085#1090#1072
            Width = 62
          end
          item
            Alignment = taCenter
            EditButtons = <>
            FieldName = 'SYMBOL'
            Footers = <>
            Title.Caption = #1056#1072#1079#1076#1077#1083#1080#1090#1077#1083#1100
            Width = 81
          end
          item
            EditButtons = <>
            FieldName = 'ISINPUT'
            Footers = <>
            Title.Caption = #1054#1073#1103#1079#1072#1090#1077#1083#1100#1085#1099#1081' '#1074#1074#1086#1076
            Width = 92
          end>
      end
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntype'
    Active = False
    Left = 265
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 318
    Top = 2
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 366
    Top = 2
  end
  object bPopupMenu1: xbPopupMenu
    Left = 333
    Top = 98
    object pMenu: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMenu_Click
    end
  end
  object DSREF: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    TableName = 'dim_anl.dbf'
    OEMTranslate = False
    Left = 66
    Top = 240
  end
  object DSDim: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'CntrDim'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 148
    Top = 228
  end
  object DSRDim: xbADSDataSource
    DataSet = DSDim
    Left = 246
    Top = 226
  end
end
frmSpr_AddRee.PRG                                                     3773object frmSpr_AddRee: TfrmSpr_AddRee
  Left = 25
  Top = 25
  Width = 510
  Height = 365
  ActiveControl = bGrid1
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1086#1084' - '#1058#1080#1087#1086#1074#1099#1077' '#1089#1086#1076#1077#1088#1078#1072#1085#1080#1103' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    502
    331)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 8
    Top = 34
    Width = 486
    Height = 268
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{6B9767CD-42C5-436A-931E-7FFA33FD0CF0}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Value'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        Width = 471
      end>
  end
  object bPopupButton1: xbPopupButton
    Left = 421
    Top = 307
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPopupMenu1
    RoundedButton = True
    TabOrder = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object cLBrg: xbLabelCombo
    Left = 8
    Top = 8
    Width = 261
    Height = 21
    ParentBackGround = True
    Caption = #1042#1080#1076' '#1089#1076#1077#1083#1082#1080
    TabOrder = 2
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Sorted = False
    EditColor = clWindow
    DisabledColor = clBlack
    DisabledFontColor = clBlack
    BorderColor = clBlack
    AutoComplete = False
    Style = csDropDownList
    CharCase = ecNormal
    DropDownCount = 0
    ItemHeight = 0
    MaxLength = 0
    Items.Strings = (
      #1047#1072#1082#1091#1087#1082#1080
      #1055#1088#1086#1076#1072#1078#1072)
    ItemIndex = -1
    UseStandartHint = True
    OnSelect = cLBrg_Select
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSpr_Add'
    Active = False
    Left = 237
    Top = 69
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 296
    Top = 82
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 392
    Top = 82
  end
  object bPopupMenu1: xbPopupMenu
    Left = 361
    Top = 220
    object ItemInf: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = ItemInf_Click
    end
  end
  object bPopupMenu2: xbPopupMenu
    Left = 82
    Top = 199
    object N14: TMenuItem
      Caption = #1042#1074#1086#1076'/'#1041#1099#1089#1090#1088#1099#1081' '#1087#1086#1080#1089#1082
      ShortCut = 8310
    end
  end
end
frmContractRee.PRG                                                   20594object frmContractRee: TfrmContractRee
  Left = -4
  Top = 25
  Width = 675
  Height = 440
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1050#1072#1088#1090#1086#1090#1077#1082#1072' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnCreate = Form_Create
  DesignSize = (
    667
    406)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 9
    Top = 41
    Width = 651
    Height = 234
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    UseMultiTitle = True
    OnCellClick = bGrid1_CellClick
    OnDblClick = bGrid1_DblClick
    OnKeyPress = bGrid1_KeyPress
    IdGrid = '{B46D0326-EC43-4BBF-A1F2-EC740FE87917}'
    Styles.Style1.FieldName = 'YesVyp'
    Styles.Style1.Value = '1'
    Styles.Style1.TextColor = clGreen
    Styles.Style2.FieldName = 'NoVyp'
    Styles.Style2.Value = '1'
    Styles.Style2.TextColor = clRed
    Styles.Style3.Value = '0'
    Styles.Style3.TextColor = clYellow
    Styles.Style5.Value = '0'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'IsChecked'
        Footers = <>
        Visible = False
        Width = 17
      end
      item
        EditButtons = <>
        FieldName = 'STATUS'
        Footers = <>
        Title.Caption = ' '
        Width = 26
      end
      item
        EditButtons = <>
        FieldName = 'NUMREG'
        Footers = <>
        Title.Caption = #1056#1077#1075#1080#1089#1090#1088#1072#1094#1080#1103' | '#1053#1086#1084#1077#1088
        Width = 55
      end
      item
        EditButtons = <>
        FieldName = 'DATE'
        Footers = <>
        Title.Caption = #1056#1077#1075#1080#1089#1090#1088#1072#1094#1080#1103' | '#1044#1072#1090#1072
        Width = 66
      end
      item
        EditButtons = <>
        FieldName = 'NUMDOC_E'
        Footers = <>
        Title.Caption = #1050#1086#1085#1090#1088#1072#1082#1090' ('#1076#1086#1075#1086#1074#1086#1088') | '#1053#1086#1084#1077#1088
        Width = 87
      end
      item
        EditButtons = <>
        FieldName = 'CNT_DATE'
        Footers = <>
        Title.Caption = #1050#1086#1085#1090#1088#1072#1082#1090' ('#1076#1086#1075#1086#1074#1086#1088') | '#1044#1072#1090#1072
        Width = 63
      end
      item
        EditButtons = <>
        FieldName = 'NAMEAGENT'
        Footers = <>
        Title.Caption = #1055#1086#1089#1090#1072#1074#1097#1080#1082', '#1087#1086#1076#1088#1103#1076#1095#1080#1082
        Width = 136
      end
      item
        EditButtons = <>
        FieldName = 'ObjReckoning'
        Footers = <>
        Title.Caption = #1056#1072#1089#1095#1077#1090#1099
        Width = 78
      end
      item
        EditButtons = <>
        FieldName = 'PSUM'
        Footers = <>
        Title.Caption = #1057#1091#1084#1084#1072
        Width = 70
      end
      item
        EditButtons = <>
        FieldName = 'CODEVAL'
        Footers = <>
        Title.Caption = #1042#1072#1083#1102#1090#1072
        Width = 47
      end
      item
        EditButtons = <>
        FieldName = 'YesVyp'
        Footers = <>
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'NoVyp'
        Footers = <>
        Visible = False
      end
      item
        EditButtons = <>
        FieldName = 'manager'
        Footers = <>
        Title.Caption = #1052#1077#1085#1077#1076#1078#1077#1088
        Visible = False
      end>
  end
  object bLRefCtg: xbLabelEditRefer
    Left = 420
    Top = 4
    Width = 237
    Height = 21
    BorderColor = clWindowText
    Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 5
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Visible = False
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2'
    BeforeButtonClick = bLRefCtg_BeforeButtonClick
    VisibleButton = False
    UseStandartHint = True
    ColumnsTune = 'CODE;-1;4;1;0;'#1050#1086#1076'|Title;-1;20;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
    FindFieldType = tfCharacterString
    ListDataSet = DSCTG
    ReferCaption = #1050#1072#1090#1077#1075#1086#1088#1080#1103
    ReferHeight = 180
    ReferWidth = 240
    xReferId = 0
    IsHarbourRefer = True
    OnSelect = bLRefCtg_Select
    OnCancel = bLRefCtg_Cancel
  end
  object bPBOper: xbPopupButton
    Left = 584
    Top = 384
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = Menu3
    RoundedButton = True
    TabOrder = 3
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPBSprav: xbPopupButton
    Left = 502
    Top = 384
    Width = 75
    Height = 21
    Caption = #1057#1087#1088#1072#1074#1082#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPopupMenu2
    RoundedButton = True
    TabOrder = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPBDog: xbPopupButton
    Left = 421
    Top = 384
    Width = 75
    Height = 21
    Caption = #1044#1086#1075#1086#1074#1086#1088
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPMenu2
    RoundedButton = True
    TabOrder = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bLVid: xbLabelEdit
    Left = 10
    Top = 284
    Width = 145
    Height = 21
    Anchors = [akLeft, akBottom]
    BorderColor = clWindowText
    Caption = #1042#1080#1076
    CaptionAlignment = taLeftJustify
    DataField = 'Vid'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    DisabledColor = clWhite
    Enabled = False
    TabOrder = 6
    LabelWidth = 80
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLMen: xbLabelEdit
    Left = 10
    Top = 310
    Width = 300
    Height = 21
    Anchors = [akLeft, akBottom]
    BorderColor = clWindowText
    Caption = #1052#1077#1085#1077#1076#1078#1077#1088
    CaptionAlignment = taLeftJustify
    DataField = 'NamManager'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    DisabledColor = clWhite
    Enabled = False
    TabOrder = 7
    LabelWidth = 80
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLPrim: xbLabelEdit
    Left = 10
    Top = 335
    Width = 300
    Height = 21
    Anchors = [akLeft, akBottom]
    BorderColor = clWindowText
    Caption = #1057#1086#1076#1077#1088#1078#1072#1085#1080#1077
    CaptionAlignment = taLeftJustify
    DataField = 'Prim'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 8
    LabelWidth = 80
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLDateBeg: xbLabelEdit
    Left = 9
    Top = 359
    Width = 155
    Height = 20
    Anchors = [akLeft, akBottom]
    BorderColor = clWindowText
    Caption = #1055#1077#1088#1080#1086#1076'         '#1089':'
    CaptionAlignment = taLeftJustify
    DataField = 'DATE'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 9
    LabelWidth = 81
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLV: xbLabelEdit
    Left = 380
    Top = 284
    Width = 270
    Height = 21
    Anchors = [akRight, akBottom]
    BorderColor = clWindowText
    Caption = #1042#1099#1087#1086#1083#1085#1077#1085#1086
    CaptionAlignment = taLeftJustify
    DataField = 'SUMINCARD'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 10
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLOpl: xbLabelEdit
    Left = 380
    Top = 309
    Width = 270
    Height = 21
    Anchors = [akRight, akBottom]
    BorderColor = clWindowText
    Caption = #1054#1087#1083#1072#1095#1077#1085#1086
    CaptionAlignment = taLeftJustify
    DataField = 'SUMOUTCARD'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 11
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLDolg: xbLabelEdit
    Left = 379
    Top = 335
    Width = 270
    Height = 21
    Anchors = [akRight, akBottom]
    BorderColor = clWindowText
    Caption = #1044#1086#1083#1075'  '#1087#1072#1088#1090#1085#1077#1088#1072
    CaptionAlignment = taLeftJustify
    DataField = 'DeltaSumCard'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 12
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bLDateEnd: xbLabelEdit
    Left = 179
    Top = 359
    Width = 130
    Height = 20
    Anchors = [akLeft, akBottom]
    BorderColor = clWindowText
    Caption = #1087#1086':'
    CaptionAlignment = taLeftJustify
    DataField = 'Date_s'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 13
    LabelWidth = 50
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object ComboCtg: xbLabelCombo
    Left = 7
    Top = 7
    Width = 296
    Height = 21
    ParentBackGround = True
    Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103' '#1076#1086#1075#1086#1074#1086#1088#1072
    TabOrder = 4
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Sorted = False
    EditColor = clWindow
    DisabledColor = clBlack
    DisabledFontColor = clBlack
    BorderColor = clBlack
    AutoComplete = False
    Style = csDropDownList
    CharCase = ecNormal
    DropDownCount = 0
    ItemHeight = 0
    MaxLength = 0
    ItemIndex = -1
    UseStandartHint = True
    OnSelect = ComboCtg_Select
  end
  object bLate: xbEdit
    Left = 380
    Top = 359
    Width = 269
    Height = 20
    AutoSize = False
    BorderStyle = bsNone
    Color = clWhite
    Enabled = False
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    ShowHint = True
    TabOrder = 14
    Text = 'bLate'
    Anchors = [akRight, akBottom]
    EnabledColor = clWhite
    DataField = 'NameLate'
    DataSource = DSR
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bPDOCDIM: xbPopupButton
    Left = 260
    Top = 384
    Width = 75
    Height = 21
    Caption = #1048#1079#1084#1077#1088#1077#1085#1080#1103
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPopupMenu4
    RoundedButton = True
    TabOrder = 15
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bFrame: xbFrame
    Left = 7
    Top = 317
    Width = 653
    Height = 62
    Caption = #1048#1079#1084#1077#1088#1077#1085#1080#1103
    Visible = False
    TabOrder = 16
    Anchors = [akLeft, akRight, akBottom]
    DesignSize = (
      653
      62)
    object bMemDim: xbMemo
      Left = 3
      Top = 12
      Width = 645
      Height = 46
      ColorFlat = clBtnFace
      ParentColor = True
      Enabled = False
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'MS Sans Serif'
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 0
      Lines.Strings = (
        'bMemDim')
      Anchors = [akLeft, akTop, akRight, akBottom]
      BorderStyle = bsNone
      Color = clWhite
      DisabledColor = clInactiveBorder
      DisabledFontColor = 7368816
    end
  end
  object bBalance: xbButton
    Left = 341
    Top = 384
    Width = 75
    Height = 21
    Hint = #1041#1072#1083#1072#1085#1089' '#1088#1072#1089#1095#1077#1090#1086#1074' (Ctrl-B)'
    Caption = #1041#1072#1083#1072#1085#1089
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 17
    OnClick = bBalance_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bCNCTG: xbLabelEdit
    Left = 178
    Top = 283
    Width = 132
    Height = 21
    Anchors = [akLeft, akBottom]
    BorderColor = clWindowText
    Caption = #1050#1072#1090#1077#1075#1086#1088#1080#1103
    CaptionAlignment = taLeftJustify
    DataField = 'CNCTG'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 18
    LabelWidth = 80
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsContract'
    Active = False
    Left = 31
    Top = 206
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    AfterScroll = DS_AfterScroll
    Left = 67
    Top = 209
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 114
    Top = 204
  end
  object BOCTG: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCNCTG'
    Active = False
    Left = 418
    Top = 136
  end
  object DSCTG: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOCTG
    FieldDefs = <>
    OEMTranslate = False
    Left = 446
    Top = 93
  end
  object bPMenu2: xbPopupMenu
    Left = 510
    Top = 168
    object pComm: TMenuItem
      Caption = #1054#1087#1080#1089#1072#1085#1080#1077' '#1076#1086#1075#1086#1074#1086#1088#1072
      ShortCut = 32833
      OnClick = pComm_Click
    end
    object pContAdd: TMenuItem
      Caption = #1044#1086#1087#1086#1083#1085'. '#1088#1077#1082#1074#1080#1079#1080#1090#1099
      ShortCut = 32884
      OnClick = pContAdd_Click
    end
    object pRuk: TMenuItem
      Caption = #1055#1086#1076#1087#1080#1089#1080' '#1082' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = pRuk_Click
    end
    object pCntNote: TMenuItem
      Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1103' '#1082' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = pCntNote_Click
    end
    object MyReq: TMenuItem
      Caption = #1056#1077#1082#1074#1080#1079#1080#1090#1099' '#1082#1086#1084#1087#1072#1085#1080#1080
      ShortCut = 116
      OnClick = MyReq_Click
    end
  end
  object Menu3: xbPopupMenu
    Left = 279
    Top = 142
    object KontrIs: TMenuItem
      Caption = #1050#1086#1085#1090#1088#1086#1083#1100' '#1080#1089#1087#1086#1083#1085#1077#1085#1080#1103
      ShortCut = 16466
      OnClick = KontrIs_Click
    end
    object ChangeStatus: TMenuItem
      Caption = #1048#1079#1084#1077#1085#1080#1090#1100' '#1089#1090#1072#1090#1091#1089
      RadioItem = True
      ShortCut = 32851
      OnClick = ChangeStatus_Click
    end
    object pCheck: TMenuItem
      Caption = #1054#1090#1084#1077#1090#1080#1090#1100
      Visible = False
      OnClick = pCheck_Click
    end
    object pUnCheck: TMenuItem
      Caption = #1054#1090#1084#1077#1085#1080#1090#1100' '#1086#1090#1084#1077#1090#1082#1091
      Visible = False
      OnClick = pUnCheck_Click
    end
    object pCheckAll: TMenuItem
      Caption = #1054#1090#1084#1077#1090#1080#1090#1100' '#1074#1089#1077
      Visible = False
      OnClick = pCheckAll_Click
    end
    object pUnCheckAll: TMenuItem
      Caption = #1057#1085#1103#1090#1100' '#1074#1089#1077' '#1086#1090#1084#1077#1090#1082#1080
      Visible = False
      OnClick = pUnCheckAll_Click
    end
    object FiltrPrim: TMenuItem
      Caption = #1060#1080#1083#1100#1090#1088#1072#1094#1080#1103' '#1087#1086' '#1089#1086#1076#1077#1088#1078#1072#1085#1080#1102
      ShortCut = 32846
      OnClick = FiltrPrim_Click
    end
  end
  object bPopupMenu2: xbPopupMenu
    Left = 355
    Top = 220
    object OperRaschet: TMenuItem
      Caption = #1056#1072#1089#1095#1077#1090#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = OperRaschet_Click
    end
    object EtapRaschet: TMenuItem
      Caption = #1056#1072#1089#1095#1077#1090#1099' '#1087#1086' '#1101#1090#1072#1087#1072#1084
      OnClick = EtapRaschet_Click
    end
    object ZakazDogovor: TMenuItem
      Caption = #1047#1072#1082#1072#1079#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = ZakazDogovor_Click
    end
    object ContractDoc: TMenuItem
      Caption = #1044#1086#1082#1091#1084#1077#1085#1090#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = ContractDoc_Click
    end
  end
  object PopupM: xbPopupMenu
    Left = 181
    Top = 193
  end
  object bPopupMenu4: xbPopupMenu
    Left = 251
    Top = 199
    object pEdit: TMenuItem
      Caption = #1042#1074#1086#1076
      ShortCut = 16452
      OnClick = pEdit_Click
    end
    object pShow: TMenuItem
      Caption = #1055#1088#1086#1089#1084#1086#1090#1088' '#1074#1082#1083'/'#1074#1099#1082#1083
      ShortCut = 16454
      OnClick = pShow_Click
    end
  end
end
frmContract.PRG                                                     119498object frmContract: TfrmContract
  Left = -4
  Top = 25
  Width = 710
  Height = 468
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1050#1072#1088#1090#1086#1090#1077#1082#1072' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    702
    434)
  PixelsPerInch = 96
  TextHeight = 13
  object bPage1: xbPageControl
    Left = 4
    Top = 2
    Width = 690
    Height = 400
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight]
    TabOrder = 6
    TabStop = False
    OnChange = bPage1_Change
    OnDrawTab = bPage1_DrawTab
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        688
        378)
      object bLNameAgent: xbLabel
        Left = 208
        Top = 108
        Width = 471
        Height = 17
        Caption = #1055#1086#1089#1090#1072#1074#1097#1080#1082'/'#1055#1086#1082#1091#1087#1072#1090#1077#1083#1100
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NAMEAGENT'
        DataSource = DSR
      end
      object bLSHORTNAME: xbLabel
        Left = 346
        Top = 307
        Width = 350
        Height = 17
        Caption = #1047#1072#1082#1072#1079#1095#1080#1082
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        Visible = False
        DataField = 'SHORTNAME'
        DataSource = DSR
      end
      object bLabel3: xbLabel
        Left = 210
        Top = 8
        Width = 139
        Height = 17
        Caption = #1042#1080#1076' '#1076#1086#1075#1086#1074#1086#1088#1072
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'TYPETITLE'
        DataSource = DSR
      end
      object bLCntObjName: xbLabel
        Left = 552
        Top = 153
        Width = 128
        Height = 17
        Caption = #1055#1088#1077#1076#1084#1077#1090' '#1076#1086#1075#1086#1074#1086#1088#1072
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'CNT_OBJNAME'
        DataSource = DSR
      end
      object bLabel6: xbLabel
        Left = 209
        Top = 177
        Width = 153
        Height = 17
        Caption = #1052#1077#1085#1077#1076#1078#1077#1088
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NamManager'
        DataSource = DSR
      end
      object bLBDGCOMM: xbLabel
        Left = 662
        Top = 325
        Width = 158
        Height = 17
        Caption = 'bLBDGCOMM'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        Visible = False
        DataField = 'BDG_COMM'
        DataSource = DSR
      end
      object bLBDGLINENAME: xbLabel
        Left = 381
        Top = 343
        Width = 111
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'bLBDGLINENAME'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'BDG_LINE_NAME'
        DataSource = DSR
      end
      object lblCFO: xbLabel
        Left = 552
        Top = 177
        Width = 128
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'lblCFO'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NAMECFO'
        DataSource = DSR
      end
      object blNameTaxMod: xbLabel
        Left = 552
        Top = 131
        Width = 128
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'blNameTaxMod'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'TAX_MOD_NAME'
        DataSource = DSR
      end
      object bLRefContragent: xbLabelEditRefer
        Left = 7
        Top = 104
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1055#1086#1089#1090#1072#1074#1097#1080#1082'/'#1055#1086#1082#1091#1087#1072#1090#1077#1083#1100
        CaptionAlignment = taLeftJustify
        DataField = 'CONTRAGENT'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 12
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'CONTRAGENT;NAMEAGENT;IDAGENT;TAX_MOD_CODE;CODEVAL'
        BeforeButtonClick = bLRefContragent_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLRefContragent_Select
      end
      object bLRefCNTYPE: xbLabelEditRefer
        Left = 7
        Top = 4
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1042#1080#1076' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'Vid'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLRefCNTYPE_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;6;1;0;'#1050#1086#1076'|Title;-1;30;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSCNTYPE
        OutFieldsArray = 'code;type_id'
        PutFieldsArray = 'vid;type'
        ReferCaption = #1042#1080#1076#1099' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
        TypeFindFieldName = 'Code'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLRefCNTYPE_Select
      end
      object bLNumReg: xbLabelEdit
        Left = 384
        Top = 4
        Width = 177
        Height = 21
        BorderColor = clWindowText
        Caption = #1056#1077#1075#1080#1089#1090#1088'. '#1085#1086#1084#1077#1088
        CaptionAlignment = taLeftJustify
        DataField = 'NUMREG'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = True
      end
      object bLNUNDOCE: xbLabelEdit
        Left = 7
        Top = 27
        Width = 340
        Height = 21
        BorderColor = clWindowText
        Caption = #1070#1088#1080#1076#1080#1095'. '#1085#1086#1084#1077#1088
        CaptionAlignment = taLeftJustify
        DataField = 'NUMDOC_E'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLRefMyIDPartn: xbLabelEditRefer
        Left = 143
        Top = 303
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1072#1082#1072#1079#1095#1080#1082
        CaptionAlignment = taLeftJustify
        DataField = 'MYCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 27
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Visible = False
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        EnabledEdit = False
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLDate: xbLabelEditCalend
        Left = 572
        Top = 4
        Width = 110
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'DATE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 2
        LabelWidth = 40
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        OnEnter = bLDate_Enter
        OnExit = bLDate_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLCONTACT: xbLabelEditRefer
        Left = 7
        Top = 127
        Width = 339
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1085#1090#1072#1082#1090#1085#1086#1077' '#1083#1080#1094#1086
        CaptionAlignment = taLeftJustify
        DataField = 'CONTACTNAME'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 13
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'CONTACT'
        BeforeButtonClick = bLCONTACT_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLPSUM: xbLabelEditCalc
        Left = 7
        Top = 197
        Width = 236
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'PSUM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 20
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        OnExit = bLPSUM_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bSumNds: xbLabelEditCalc
        Left = 384
        Top = 196
        Width = 205
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1053#1044#1057
        CaptionAlignment = taLeftJustify
        DataField = 'SUM_NDS'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 21
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bAdvRate: xbLabelEditCalc
        Left = 7
        Top = 220
        Width = 236
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1072#1074#1082#1072' '#1072#1074#1072#1085#1089#1072', %'
        CaptionAlignment = taLeftJustify
        DataField = 'ADV_RATE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 22
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 2
        Text = '0'
        OnExit = bAdvRate_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bLabelEditCalc3: xbLabelEditCalc
        Left = 384
        Top = 220
        Width = 205
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1072#1074#1072#1085#1089#1072
        CaptionAlignment = taLeftJustify
        DataField = 'ADV_SUM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 23
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        EnabledEdit = False
        EnabledButton = False
        VisibleButton = False
      end
      object bLCntObj: xbLabelEditRefer
        Left = 384
        Top = 150
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1055#1088#1077#1076#1084#1077#1090' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'CNT_OBJCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 17
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'CNT_OBJ'
        BeforeButtonClick = bLCntObj_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLtRefMANAGER: xbLabelEditRefer
        Left = 7
        Top = 173
        Width = 200
        Height = 22
        BorderColor = clWindowText
        Caption = #1052#1077#1085#1077#1076#1078#1077#1088' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'MANAGER'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 18
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'MANAGER'
        BeforeButtonClick = bLtRefMANAGER_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        OutFieldsArray = 'Code'
        PutFieldsArray = 'MANAGER'
        ReferCaption = #1054#1090#1074#1077#1089#1090#1074#1077#1085#1085#1099#1081
        TypeFindFieldName = 'Code'
        xReferId = 0
        IsHarbourRefer = True
        IsMustEnter = True
      end
      object bLPrim: xbLabelEditRefer
        Left = 7
        Top = 243
        Width = 675
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1086#1076#1077#1088#1078#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'PRIM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 24
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
        UseStandartHint = True
        ColumnsTune = 'VALUE;-1;120;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSSPRADD
        OutFieldsArray = 'Value'
        PutFieldsArray = 'prim'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1090#1080#1087#1086#1074#1099#1093' '#1089#1086#1076#1077#1088#1078#1072#1085#1080#1081
        xReferId = 0
        IsHarbourRefer = True
      end
      object bCheckBox: xbCheckBox
        Left = 7
        Top = 150
        Width = 140
        Height = 21
        Caption = #1044#1086#1075#1086#1074#1086#1088' '#1073#1077#1079' '#1101#1090#1072#1087#1086#1074
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 15
        TabStop = True
        OnClick = bCheckBox_Click
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'NOPHASE'
        DataSource = DSR
      end
      object ChPHASE: xbCheckBox
        Left = 155
        Top = 150
        Width = 182
        Height = 21
        Caption = #1056#1072#1089#1095#1077#1090#1099' '#1087#1086' '#1101#1090#1072#1087#1072#1084
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 16
        TabStop = True
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'IS_PHASE'
        DataSource = DSR
      end
      object bLStatus: xbLabelEdit
        Left = 8
        Top = 344
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1072#1090#1091#1089
        CaptionAlignment = taLeftJustify
        DataField = 'SetStatus'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 30
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Visible = False
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLastUpd: xbLabelEditCalend
        Left = 438
        Top = 349
        Width = 180
        Height = 22
        BorderColor = clWindowText
        Caption = #1055#1086#1089#1083#1077#1076#1085#1077#1077' '#1080#1079#1084'.'
        CaptionAlignment = taLeftJustify
        DataField = 'LAST_UPD'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        EditMask = '!99/99/0000;1; '
        TabOrder = 31
        LabelWidth = 100
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        Visible = False
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        EnabledEdit = False
        EnabledButton = False
        VisibleButton = False
      end
      object bLDATECLOS: xbLabelEdit
        Left = 7
        Top = 266
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1072#1090#1072' '#1079#1072#1082#1088#1099#1090#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_CLOSE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 25
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bReason: xbLabelCombo
        Left = 384
        Top = 266
        Width = 205
        Height = 21
        ParentBackGround = True
        Caption = #1055#1088#1080#1095#1080#1085#1072
        TabOrder = 26
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        ItemIndex = -1
        UseStandartHint = True
        OnClick = bReason_Click
      end
      object bLCNTDATE: xbLabelEditCalend
        Left = 384
        Top = 27
        Width = 177
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'CNT_DATE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 4
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object BdgCode: xbLabelEditRefer
        Left = 461
        Top = 322
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1041#1102#1076#1078#1077#1090'/'#1043#1086#1089#1079#1072#1082#1072#1079
        CaptionAlignment = taLeftJustify
        DataField = 'BDG_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 28
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Visible = False
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'BDG_ID;BDG_LINE'
        BeforeButtonClick = BdgCode_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'BDG_CODE'
        xReferId = 0
        IsHarbourRefer = True
      end
      object blRefBDGLine: xbLabelEditRefer
        Left = 196
        Top = 340
        Width = 180
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1088#1086#1082#1072' '#1075#1086#1089#1079#1072#1082#1072#1079#1072
        CaptionAlignment = taLeftJustify
        DataField = 'BDGTMPCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 29
        LabelWidth = 100
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Visible = False
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'BDG_LINE'
        BeforeButtonClick = blRefBDGLine_BeforeButtonClick
        VisibleButton = False
        UseStandartHint = True
        ColumnsTune = 'RNUM;-1;110;1;0;'#1050#1086#1076'|Title;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSBDGLINE
        ReferCaption = #1057#1090#1088#1086#1082#1080' '#1075#1086#1089#1079#1072#1082#1072#1079#1072
        TypeFindFieldName = 'BDG_LINE_CODE'
        xReferId = 0
        IsHarbourRefer = False
      end
      object rfCFO: xbLabelEditRefer
        Left = 384
        Top = 173
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1062#1060#1054
        CaptionAlignment = taLeftJustify
        DataField = 'CODECFO'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 19
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'STRUCT'
        BeforeButtonClick = rfCFO_BeforeButtonClick
        OnClearButtonClick = rfCFO_ClearButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = rfCFO_Select
      end
      object bLRefTaxMod: xbLabelEditRefer
        Left = 384
        Top = 127
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1072#1083'. '#1084#1086#1076#1077#1083#1100
        CaptionAlignment = taLeftJustify
        DataField = 'TAX_MOD_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 14
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'TAX_MODEL'
        BeforeButtonClick = bLRefTaxModJ_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'MD_CODE;-1;110;1;0;'#1050#1086#1076'|MD_NAME;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        OutFieldsArray = 'MOD_ID'
        PutFieldsArray = 'TAX_MODEL'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1085#1072#1083#1086#1075#1086#1074#1099#1093' '#1084#1086#1076#1077#1083#1077#1081
        TypeFindFieldName = 'MD_CODE'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLabelEdit8: xbLabelEdit
        Left = 7
        Top = 50
        Width = 254
        Height = 21
        BorderColor = clWindowText
        Caption = #1058#1080#1087' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'NAME_IZM_TYPE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 6
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLabelEdit9: xbLabelEdit
        Left = 384
        Top = 50
        Width = 177
        Height = 21
        BorderColor = clWindowText
        Caption = #1042#1077#1088#1089#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'NUM_IZM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 7
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLabelEditCalend1: xbLabelEditCalend
        Left = 572
        Top = 50
        Width = 110
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'LAST_UPD'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        EditMask = '!99/99/0000;1; '
        TabOrder = 8
        LabelWidth = 40
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        EnabledEdit = False
        EnabledButton = False
        VisibleButton = False
      end
      object bLabelEdit10: xbLabelEdit
        Left = 572
        Top = 27
        Width = 110
        Height = 21
        BorderColor = clWindowText
        Caption = #1058#1080#1087
        CaptionAlignment = taLeftJustify
        DataField = 'NAME_TYPE_SV'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 5
        LabelWidth = 40
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLDATEBEG: xbLabelEditCalend
        Left = 7
        Top = 73
        Width = 200
        Height = 22
        BorderColor = clWindowText
        Caption = #1057#1088#1086#1082' '#1080#1089#1087#1086#1083#1085#1077#1085#1080#1103' c'
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_BEG'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 9
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLDATES: xbLabelEditCalend
        Left = 210
        Top = 73
        Width = 136
        Height = 21
        BorderColor = clWindowText
        Caption = #1087#1086
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_S'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 10
        LabelWidth = 50
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLabelEdit11: xbLabelEdit
        Left = 384
        Top = 73
        Width = 298
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1072#1090#1091#1089
        CaptionAlignment = taLeftJustify
        DataField = 'SetStatus'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 11
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bFrame5: xbFrame
        Left = 7
        Top = 98
        Width = 676
        Height = 2
        TabOrder = 32
      end
      object bLabelEdit12: xbLabelEdit
        Left = 247
        Top = 197
        Width = 98
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1074#1072#1083#1102#1090#1099
        CaptionAlignment = taLeftJustify
        DataField = 'CODEVAL'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 33
        TabStop = False
        LabelWidth = 65
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = #1056#1059#1041
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
    end
    object TabSheet7: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        688
        378)
      object bLabel3J: xbLabel
        Left = 208
        Top = 7
        Width = 139
        Height = 17
        Caption = 'bLabel3J'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'TYPETITLE'
        DataSource = DSR
      end
      object bLNameAgentJ: xbLabel
        Left = 208
        Top = 100
        Width = 139
        Height = 17
        Caption = 'bLNameAgentJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NAMEAGENT'
        DataSource = DSR
      end
      object bLabel6J: xbLabel
        Left = 208
        Top = 145
        Width = 139
        Height = 17
        Caption = 'bLabel6J'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NamManager'
        DataSource = DSR
      end
      object blNameTaxModJ: xbLabel
        Left = 551
        Top = 99
        Width = 130
        Height = 17
        Caption = 'blNameTaxModJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'TAX_MOD_NAME'
        DataSource = DSR
      end
      object bLabel1: xbLabel
        Left = 619
        Top = 168
        Width = 61
        Height = 17
        Caption = 'bLabel1'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'CODEVAL'
        DataSource = DSR
      end
      object bLBDGCOMMJ: xbLabel
        Left = 208
        Top = 214
        Width = 139
        Height = 17
        Caption = 'bLBDGCOMMJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'BDG_COMM'
        DataSource = DSR
      end
      object bLBDGLINENAMEJ: xbLabel
        Left = 551
        Top = 215
        Width = 132
        Height = 17
        Caption = 'bLBDGLINENAMEJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'BDG_LINE_NAME'
        DataSource = DSR
      end
      object bLKodBudName: xbLabel
        Left = 208
        Top = 260
        Width = 139
        Height = 17
        Caption = 'bLKodBudName'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'KOD_BUD_NAME'
        DataSource = DSR
      end
      object bLKodVnbNameJ: xbLabel
        Left = 551
        Top = 260
        Width = 132
        Height = 17
        Caption = 'bLKodVnbNameJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'KOD_VNB_NAME'
        DataSource = DSR
      end
      object bLRazmName: xbLabel
        Left = 551
        Top = 236
        Width = 132
        Height = 17
        Caption = 'bLRazmName'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'KOD_RAZM_NAME'
        DataSource = DSR
      end
      object bLCntObjNameJ: xbLabel
        Left = 551
        Top = 124
        Width = 130
        Height = 17
        Caption = 'bLCntObjNameJ'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'CNT_OBJNAME'
        DataSource = DSR
      end
      object bLabel2: xbLabel
        Left = 551
        Top = 146
        Width = 130
        Height = 16
        Anchors = [akLeft, akTop, akRight]
        Caption = 'bLabel2'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NAMECFO'
        DataSource = DSR
      end
      object bLRefCNTYPEJ: xbLabelEditRefer
        Left = 7
        Top = 4
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1042#1080#1076' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'Vid'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;6;1;0;'#1050#1086#1076'|Title;-1;30;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSCNTYPE
        OutFieldsArray = 'code;type_id'
        PutFieldsArray = 'vid;type'
        ReferCaption = #1042#1080#1076#1099' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
        TypeFindFieldName = 'Code'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLRefCNTYPEJ_Select
      end
      object bLNumRegJ: xbLabelEdit
        Left = 384
        Top = 4
        Width = 177
        Height = 21
        BorderColor = clWindowText
        Caption = #1056#1077#1075#1080#1089#1090#1088'. '#1085#1086#1084#1077#1088
        CaptionAlignment = taLeftJustify
        DataField = 'NUMREG'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = True
      end
      object bLDateJ: xbLabelEditCalend
        Left = 572
        Top = 4
        Width = 110
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'DATE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 2
        LabelWidth = 40
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        OnEnter = bLDateJ_Enter
        OnExit = bLDateJ_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLNUNDOCEJ: xbLabelEdit
        Left = 7
        Top = 27
        Width = 340
        Height = 21
        BorderColor = clWindowText
        Caption = #1070#1088#1080#1076#1080#1095'. '#1085#1086#1084#1077#1088
        CaptionAlignment = taLeftJustify
        DataField = 'NUMDOC_E'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLCNTDATEJ: xbLabelEditCalend
        Left = 384
        Top = 27
        Width = 177
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'CNT_DATE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 4
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLNameTypeSvJ: xbLabelEdit
        Left = 572
        Top = 27
        Width = 110
        Height = 21
        BorderColor = clWindowText
        Caption = #1058#1080#1087
        CaptionAlignment = taLeftJustify
        DataField = 'NAME_TYPE_SV'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 5
        LabelWidth = 40
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLNameIzmTypeJ: xbLabelEdit
        Left = 7
        Top = 50
        Width = 254
        Height = 21
        BorderColor = clWindowText
        Caption = #1058#1080#1087' '#1080#1079#1084#1077#1085#1077#1085#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'NAME_IZM_TYPE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 6
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLNumIzmJ: xbLabelEdit
        Left = 384
        Top = 50
        Width = 177
        Height = 21
        BorderColor = clWindowText
        Caption = #1042#1077#1088#1089#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'NUM_IZM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 7
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLastUpdJ: xbLabelEditCalend
        Left = 572
        Top = 50
        Width = 110
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'LAST_UPD'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        EditMask = '!99/99/0000;1; '
        TabOrder = 8
        LabelWidth = 40
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        EnabledEdit = False
        EnabledButton = False
        VisibleButton = False
      end
      object bLDATEBEGJ: xbLabelEditCalend
        Left = 7
        Top = 73
        Width = 200
        Height = 22
        BorderColor = clWindowText
        Caption = #1057#1088#1086#1082' '#1080#1089#1087#1086#1083#1085#1077#1085#1080#1103' c'
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_BEG'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 9
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLDATESJ: xbLabelEditCalend
        Left = 210
        Top = 73
        Width = 136
        Height = 21
        BorderColor = clWindowText
        Caption = #1087#1086
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_S'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 10
        LabelWidth = 50
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLStatusJ: xbLabelEdit
        Left = 384
        Top = 73
        Width = 298
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1072#1090#1091#1089
        CaptionAlignment = taLeftJustify
        DataField = 'SetStatus'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 11
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLRefContragentJ: xbLabelEditRefer
        Left = 7
        Top = 97
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1055#1086#1089#1090#1072#1074#1097#1080#1082'/'#1055#1086#1082#1091#1087#1072#1090#1077#1083#1100
        CaptionAlignment = taLeftJustify
        DataField = 'CONTRAGENT'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 12
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'CONTRAGENT;NAMEAGENT;IDAGENT;CODEVAL'
        BeforeButtonClick = bLRefContragent_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLRefContragent_Select
      end
      object bCheckBoxJ: xbCheckBox
        Left = 7
        Top = 120
        Width = 140
        Height = 21
        Caption = #1044#1086#1075#1086#1074#1086#1088' '#1073#1077#1079' '#1101#1090#1072#1087#1086#1074
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 14
        TabStop = True
        OnClick = bCheckBox_Click
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'NOPHASE'
        DataSource = DSR
      end
      object ChPHASEJ: xbCheckBox
        Left = 169
        Top = 120
        Width = 178
        Height = 21
        Caption = #1056#1072#1089#1095#1077#1090#1099' '#1087#1086' '#1101#1090#1072#1087#1072#1084
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        TabOrder = 15
        TabStop = True
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'IS_PHASE'
        DataSource = DSR
      end
      object bLtRefMANAGERJ: xbLabelEditRefer
        Left = 7
        Top = 142
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1052#1077#1085#1077#1076#1078#1077#1088' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'MANAGER'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 17
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'MANAGER'
        BeforeButtonClick = bLtRefMANAGER_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        OutFieldsArray = 'Code'
        PutFieldsArray = 'MANAGER'
        ReferCaption = #1054#1090#1074#1077#1089#1090#1074#1077#1085#1085#1099#1081
        TypeFindFieldName = 'Code'
        xReferId = 0
        IsHarbourRefer = True
        IsMustEnter = True
      end
      object bLRefTaxModJ: xbLabelEditRefer
        Left = 384
        Top = 96
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1072#1083'. '#1084#1086#1076#1077#1083#1100
        CaptionAlignment = taLeftJustify
        DataField = 'TAX_MOD_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 13
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'TAX_MODEL'
        BeforeButtonClick = bLRefTaxModJ_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'MD_CODE;-1;110;1;0;'#1050#1086#1076'|MD_NAME;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        OutFieldsArray = 'MOD_ID'
        PutFieldsArray = 'TAX_MODEL'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1085#1072#1083#1086#1075#1086#1074#1099#1093' '#1084#1086#1076#1077#1083#1077#1081
        TypeFindFieldName = 'MD_CODE'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLabelEditCalc1: xbLabelEditCalc
        Left = 7
        Top = 165
        Width = 236
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'PSUM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 19
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        OnExit = bLPSUM_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bLabelEditCalc4: xbLabelEditCalc
        Left = 384
        Top = 165
        Width = 233
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1053#1044#1057
        CaptionAlignment = taLeftJustify
        DataField = 'SUM_NDS'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 20
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bLabelEditCalc2: xbLabelEditCalc
        Left = 7
        Top = 188
        Width = 236
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1072#1074#1082#1072' '#1072#1074#1072#1085#1089#1072', %'
        CaptionAlignment = taLeftJustify
        DataField = 'ADV_RATE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 21
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 2
        Text = '0'
        OnExit = bAdvRate_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bLabelEditCalc5: xbLabelEditCalc
        Left = 384
        Top = 188
        Width = 233
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1072#1074#1072#1085#1089#1072
        CaptionAlignment = taLeftJustify
        DataField = 'ADV_SUM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 22
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        EnabledEdit = False
        EnabledButton = False
        VisibleButton = False
      end
      object BdgCodeJ: xbLabelEditRefer
        Left = 7
        Top = 211
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1086#1084#1077#1088' '#1075#1086#1089#1079#1072#1082#1072#1079#1072
        CaptionAlignment = taLeftJustify
        DataField = 'BDG_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 23
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'BDG_ID'
        BeforeButtonClick = BdgCode_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'BDG_CODE'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLNAMEPUBJ: xbLabelEdit
        Left = 7
        Top = 234
        Width = 340
        Height = 21
        BorderColor = clWindowText
        Caption = #1048#1089#1090#1086#1095#1085#1080#1082' '#1092#1080#1085#1072#1085#1089#1080#1088
        CaptionAlignment = taLeftJustify
        DataField = 'NAME_PUB'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 25
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLRefKodBudCodeJ: xbLabelEditRefer
        Left = 7
        Top = 257
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1073#1102#1076#1078#1077#1090#1072
        CaptionAlignment = taLeftJustify
        DataField = 'KOD_BUD_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 27
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        BeforeButtonClick = bLRefKodBudCodeJ_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;110;1;0;'#1050#1086#1076'|NAME;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        OutFieldsArray = 'rowid'
        PutFieldsArray = 'KOD_BUD'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1082#1086#1076#1086#1074' '#1073#1102#1076#1078#1077#1090#1072
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLRefKodVnbCodeJ: xbLabelEditRefer
        Left = 384
        Top = 257
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1074#1085#1077#1073#1102#1076#1078
        CaptionAlignment = taLeftJustify
        DataField = 'KOD_VNB_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 28
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        BeforeButtonClick = bLRefKodVnbCodeJ_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;110;1;0;'#1050#1086#1076'|NAME;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        OutFieldsArray = 'rowid'
        PutFieldsArray = 'NAME_VNB'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1074#1085#1077#1073#1102#1076#1078#1077#1090#1085#1099#1093' '#1089#1088#1077#1076#1089#1090#1074
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLRefRAZMJ: xbLabelEditRefer
        Left = 384
        Top = 234
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1087#1086#1089#1086#1073' '#1088#1072#1079#1084#1077#1097#1077#1085#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'KOD_RAZM_CODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 26
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        BeforeButtonClick = bLRefRAZMJ_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;110;1;0;'#1050#1086#1076'|NAME;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        OutFieldsArray = 'rowid'
        PutFieldsArray = 'Razm'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1082#1086#1076#1086#1074' '#1088#1072#1079#1084#1077#1097#1077#1085#1080#1103
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLCntObjJ: xbLabelEditRefer
        Left = 384
        Top = 119
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1055#1088#1077#1076#1084#1077#1090' '#1076#1086#1075#1086#1074#1086#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'CNT_OBJCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 16
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'CNT_OBJ'
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLNumIzvJ: xbLabelEdit
        Left = 384
        Top = 280
        Width = 298
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1086#1084#1077#1088' '#1076#1086#1082'-'#1090#1072
        CaptionAlignment = taLeftJustify
        DataField = 'NUM_IZV'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 30
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLCalDateItogJ: xbLabelEditCalend
        Left = 7
        Top = 280
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1072#1090#1072' '#1072#1091#1082#1094#1080#1086#1085#1072
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_ITOG'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 29
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bLRekvDocJ: xbLabelEdit
        Left = 384
        Top = 303
        Width = 298
        Height = 21
        BorderColor = clWindowText
        Caption = #1054#1089#1085#1086#1074#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'REKV_DOC'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 33
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLCalDateRekvJ: xbLabelEditCalend
        Left = 247
        Top = 303
        Width = 99
        Height = 21
        BorderColor = clWindowText
        Caption = #1086#1090
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_REKV'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 32
        LabelWidth = 20
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
      object bLPrimJ: xbLabelEditRefer
        Left = 7
        Top = 326
        Width = 675
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1086#1076#1077#1088#1078#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'PRIM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 34
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
        UseStandartHint = True
        ColumnsTune = 'VALUE;-1;120;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSSPRADD
        OutFieldsArray = 'Value'
        PutFieldsArray = 'prim'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1090#1080#1087#1086#1074#1099#1093' '#1089#1086#1076#1077#1088#1078#1072#1085#1080#1081
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLDATECLOSJ: xbLabelEdit
        Left = 7
        Top = 349
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1072#1090#1072' '#1079#1072#1074#1077#1088#1096#1077#1085#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_CLOSE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 35
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bReasonJ: xbLabelCombo
        Left = 384
        Top = 349
        Width = 298
        Height = 21
        ParentBackGround = True
        Caption = #1055#1088#1080#1095#1080#1085#1072
        TabOrder = 36
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDown
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        ItemIndex = -1
        UseStandartHint = True
        OnClick = bReason_Click
      end
      object blRefBDGLineJ: xbLabelEditRefer
        Left = 384
        Top = 211
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1090#1088#1086#1082#1072' '#1075#1086#1089#1079#1072#1082#1072#1079#1072
        CaptionAlignment = taLeftJustify
        DataField = 'BDGTMPCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 24
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'BDG_LINE'
        BeforeButtonClick = blRefBDGLine_BeforeButtonClick
        VisibleButton = False
        UseStandartHint = True
        ColumnsTune = 'RNUM;-1;110;1;0;'#1050#1086#1076'|Title;-1;250;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSBDGLINE
        ReferCaption = #1057#1090#1088#1086#1082#1080' '#1075#1086#1089#1079#1072#1082#1072#1079#1072
        TypeFindFieldName = 'BDG_LINE_CODE'
        xReferId = 0
        IsHarbourRefer = False
      end
      object rfCFOJ: xbLabelEditRefer
        Left = 384
        Top = 142
        Width = 165
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076' '#1062#1060#1054
        CaptionAlignment = taLeftJustify
        DataField = 'CODECFO'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 18
        LabelWidth = 105
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'STRUCT'
        BeforeButtonClick = rfCFO_BeforeButtonClick
        OnClearButtonClick = rfCFO_ClearButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = rfCFO_Select
      end
      object bLabelEdit7: xbLabelEdit
        Left = 7
        Top = 303
        Width = 236
        Height = 21
        BorderColor = clWindowText
        Caption = #1055#1086#1076#1090#1074'. '#1076#1086#1082'-'#1090' '#8470
        CaptionAlignment = taLeftJustify
        DataField = 'NUM_RECV'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 31
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
    end
    object TabSheet2: TTabSheet
      Caption = #1069#1090#1072#1087#1099
      DesignSize = (
        688
        378)
      object GridVid1: xbGrid
        Left = 5
        Top = 57
        Width = 680
        Height = 218
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSROBL
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        SumList.Active = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        OnDblClick = GridVid1_DblClick
        OnKeyPress = GridVid1_KeyPress
        OnTitleClick = GridVid1_TitleClick
        IdGrid = '{4B6C0899-F937-417A-958B-C44C334ED2CD}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'LNUM'
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#8470
            Width = 43
          end
          item
            EditButtons = <>
            FieldName = 'SETDATE'
            Footer.WordWrap = True
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#1053#1072#1095#1072#1083#1086
            Width = 90
          end
          item
            EditButtons = <>
            FieldName = 'DATE_END'
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#1054#1082#1086#1085#1095#1072#1085#1080#1077
            Width = 89
          end
          item
            EditButtons = <>
            FieldName = 'NAME'
            Footer.Alignment = taRightJustify
            Footer.Value = #1048#1058#1054#1043#1054
            Footer.ValueType = fvtStaticText
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#1057#1086#1076#1077#1088#1078#1072#1085#1080#1077
            Width = 192
          end
          item
            EditButtons = <>
            FieldName = 'PSUM'
            Footer.FieldName = 'ZPLANIN'
            Footer.ValueType = fvtFieldValue
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#1057#1091#1084#1084#1072
            Width = 95
          end
          item
            EditButtons = <>
            FieldName = 'LAST_UPD'
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#1048#1079#1084#1077#1085#1077#1085
          end
          item
            EditButtons = <>
            FieldName = 'IS_CLOSED'
            Footers = <>
            Title.Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072' |'#1057#1090#1072#1090#1091#1089
            Width = 55
          end>
      end
      object GridVid3: xbGrid
        Left = 5
        Top = 57
        Width = 680
        Height = 218
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSROBL
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        ReadOnly = True
        SumList.Active = True
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        VTitleMargin = 5
        IdGrid = '{1492F048-48B1-4877-809A-01C101831D3A}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'LNUM'
            Footers = <>
            Title.Caption = #8470
            Width = 57
          end
          item
            EditButtons = <>
            FieldName = 'Name'
            Footers = <>
            Title.Caption = #1057#1086#1076#1077#1088#1078#1072#1085#1080#1077' '#1101#1090#1072#1087#1072'/'#1076#1086#1075#1086#1074#1086#1088#1072
            Width = 237
          end
          item
            EditButtons = <>
            FieldName = 'RegZakaz'
            Footers = <>
            Title.Caption = #1047#1072#1082#1072#1079'|'#1056#1077#1075'. '#8470
            Width = 61
          end
          item
            EditButtons = <>
            FieldName = 'DateZakaz'
            Footer.Alignment = taRightJustify
            Footer.Value = #1048#1058#1054#1043#1054
            Footer.ValueType = fvtStaticText
            Footers = <>
            Title.Caption = #1047#1072#1082#1072#1079'|'#1044#1072#1090#1072
            Width = 69
          end
          item
            EditButtons = <>
            FieldName = 'PSUM'
            Footer.FieldName = 'ZPSUM'
            Footer.ValueType = fvtFieldValue
            Footers = <>
            Title.Caption = #1055#1083#1072#1085
            Width = 79
          end
          item
            EditButtons = <>
            FieldName = 'FSUM'
            Footer.FieldName = 'ZFSUM'
            Footer.ValueType = fvtFieldValue
            Footers = <>
            Title.Caption = #1060#1072#1082#1090
            Width = 88
          end
          item
            EditButtons = <>
            FieldName = 'Delta'
            Footers = <>
            Title.Caption = '%'
            Width = 70
          end>
      end
      object bRVid3: xbRadioButton
        Left = 7
        Top = 9
        Width = 190
        Height = 21
        Caption = #1057#1087#1080#1089#1086#1082' '#1101#1090#1072#1087#1086#1074
        Checked = True
        TabOrder = 2
        TabStop = True
        OnClick = bRVid3_Click
      end
      object bRVid1: xbRadioButton
        Left = 7
        Top = 31
        Width = 190
        Height = 21
        Caption = #1048#1089#1087#1086#1083#1085#1077#1085#1080#1077
        TabOrder = 3
        TabStop = True
        OnClick = bRVid1_Click
      end
      object bFrame1: xbFrame
        Left = 6
        Top = 283
        Width = 346
        Height = 88
        Caption = #1055#1086' '#1101#1090#1072#1087#1091
        TabOrder = 4
        Anchors = [akLeft, akBottom]
        object bLLNUM2: xbLabelEdit
          Left = 12
          Top = 23
          Width = 122
          Height = 21
          BorderColor = clWindowText
          Caption = #8470
          CaptionAlignment = taLeftJustify
          DataField = 'LNUM'
          DataSource = DSROBL
          ButtonsColor = clBlack
          EnabledColor = clWhite
          Enabled = False
          TabOrder = 0
          LabelWidth = 50
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
        object bPSUM2: xbLabelEdit
          Left = 149
          Top = 23
          Width = 169
          Height = 21
          BorderColor = clWindowText
          Caption = #1055#1083#1072#1085
          CaptionAlignment = taLeftJustify
          DataField = 'PSUM'
          DataSource = DSROBL
          ButtonsColor = clBlack
          EnabledColor = clWhite
          Enabled = False
          TabOrder = 1
          LabelWidth = 50
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
        object bLFSUM2: xbLabelEdit
          Left = 149
          Top = 47
          Width = 169
          Height = 21
          BorderColor = clWindowText
          Caption = #1060#1072#1082#1090
          CaptionAlignment = taLeftJustify
          DataField = 'FSUM'
          DataSource = DSROBL
          ButtonsColor = clBlack
          EnabledColor = clWhite
          Enabled = False
          TabOrder = 2
          LabelWidth = 50
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
      end
      object bFrame2: xbFrame
        Left = 351
        Top = 283
        Width = 330
        Height = 88
        Caption = #1055#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
        TabOrder = 5
        Anchors = [akLeft, akRight, akBottom]
        object bLabelEdit1: xbLabelEdit
          Left = 26
          Top = 23
          Width = 250
          Height = 21
          BorderColor = clWindowText
          Caption = #1048#1090#1086#1075#1086
          CaptionAlignment = taLeftJustify
          DataField = 'PSUM'
          DataSource = DSR
          ButtonsColor = clBlack
          EnabledColor = clWhite
          Enabled = False
          TabOrder = 0
          LabelWidth = 110
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
        object bLabelEdit2: xbLabelEdit
          Left = 26
          Top = 47
          Width = 250
          Height = 21
          BorderColor = clWindowText
          Caption = #1055#1086#1089#1090#1072#1074#1083#1077#1085#1086
          CaptionAlignment = taLeftJustify
          DataField = 'SUMINCARD'
          DataSource = DSR
          ButtonsColor = clBlack
          EnabledColor = clWhite
          Enabled = False
          TabOrder = 1
          LabelWidth = 110
          LabelFont.Charset = DEFAULT_CHARSET
          LabelFont.Color = clWindowText
          LabelFont.Height = -11
          LabelFont.Name = 'MS Sans Serif'
          LabelFont.Style = []
          PopupListClickKey = 0
          AddPrefixOnFilial = False
        end
      end
    end
    object TabSheet3: TTabSheet
      Caption = #1054#1087#1083#1072#1090#1072
      DesignSize = (
        688
        378)
      object GridVid2: xbGrid
        Left = 5
        Top = 9
        Width = 680
        Height = 265
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSROBL
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        SumList.Active = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        OnDblClick = GridVid2_DblClick
        OnKeyPress = GridVid2_KeyPress
        IdGrid = '{42111EC9-E212-43F0-8B72-41E714BF927B}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'STR_TYPE'
            Footers = <>
            Title.Caption = #1042#1080#1076' '#1089#1088#1077#1076#1089#1090#1074
            Width = 111
          end
          item
            EditButtons = <>
            FieldName = 'SETDATE'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1044#1072#1090#1072' '#1086#1087#1083#1072#1090#1099
            Width = 93
          end
          item
            EditButtons = <>
            FieldName = 'PSUM'
            Footer.FieldName = 'ZPLANOUT'
            Footer.Value = #1048#1058#1054#1043#1054
            Footer.ValueType = fvtFieldValue
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1057#1091#1084#1084#1072
            Width = 116
          end
          item
            EditButtons = <>
            FieldName = 'NAME'
            Footer.Alignment = taRightJustify
            Footer.ValueType = fvtStaticText
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1077
            Width = 341
          end>
      end
      object bLabelEdit3: xbLabelEdit
        Left = 7
        Top = 279
        Width = 631
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1042#1080#1076' '#1089#1088#1077#1076#1089#1090#1074
        CaptionAlignment = taLeftJustify
        DataField = 'STR_TYPENAME'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 1
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLabelEdit4: xbLabelEdit
        Left = 7
        Top = 303
        Width = 631
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1040#1085#1072#1083#1080#1090#1080#1082#1072
        CaptionAlignment = taLeftJustify
        DataField = 'STR_DIM'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 2
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLabelEdit5: xbLabelEdit
        Left = 7
        Top = 327
        Width = 331
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1048#1090#1086#1075#1086
        CaptionAlignment = taLeftJustify
        DataField = 'PSUM'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 3
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLabelEdit6: xbLabelEdit
        Left = 7
        Top = 351
        Width = 331
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1054#1087#1083#1072#1095#1077#1085#1086
        CaptionAlignment = taLeftJustify
        DataField = 'SUMOUTCARD'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 4
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
    end
    object TabSheet8: TTabSheet
      Caption = #1057#1087#1077#1094#1080#1092#1080#1082#1072#1094#1080#1080
      DesignSize = (
        688
        378)
      object bLabel4: xbLabel
        Left = 224
        Top = 10
        Width = 452
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'bLabel4'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NAME'
        DataSource = DSRrefObl
      end
      object bLabel5: xbLabel
        Left = 7
        Top = 356
        Width = 672
        Height = 17
        Anchors = [akLeft, akTop, akRight]
        Caption = 'bLabel5'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'NNUM_NAME'
        DataSource = DSRCBookM
      end
      object GridVid6: xbGrid
        Left = 6
        Top = 33
        Width = 673
        Height = 317
        AllowedOperations = []
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSRCBookM
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        OnDblClick = GridVid6_DblClick
        OnKeyPress = GridVid6_KeyPress
        IdGrid = '{A2AB7CB4-3294-49DC-B6B5-BDD0E5F60254}'
        Columns = <
          item
            Checkboxes = False
            EditButtons = <>
            FieldName = 'GRUP'
            Footers = <>
            Title.Caption = #1053#1086#1084#1077#1085#1082#1083#1072#1090#1091#1088#1072' |'#1043#1088#1091#1087#1087#1072
            Width = 63
          end
          item
            EditButtons = <>
            FieldName = 'NNUM'
            Footers = <>
            Title.Caption = #1053#1086#1084#1077#1085#1082#1083#1072#1090#1091#1088#1072' | '#1053#1086#1084#1077#1088
            Width = 93
          end
          item
            EditButtons = <>
            FieldName = 'NNUM_NAME'
            Footers = <>
            Title.Caption = #1053#1086#1084#1077#1085#1082#1083#1072#1090#1091#1088#1072' | '#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
            Width = 183
          end
          item
            EditButtons = <>
            FieldName = 'MDIM'
            Footers = <>
            Title.Caption = #1040#1085#1072#1083#1080#1090#1080#1082#1072
            Width = 77
          end
          item
            EditButtons = <>
            FieldName = 'KOL'
            Footers = <>
            Title.Caption = #1050#1086#1083'.'
            Width = 59
          end
          item
            EditButtons = <>
            FieldName = 'EI'
            Footers = <>
            Title.Caption = #1045#1048
            Width = 38
          end
          item
            EditButtons = <>
            FieldName = 'CENAOUT'
            Footers = <>
            Title.Caption = #1062#1077#1085#1072
            Width = 65
          end
          item
            EditButtons = <>
            FieldName = 'SUMOUT'
            Footers = <>
            Title.Caption = #1057#1091#1084#1084#1072
            Width = 101
          end>
      end
      object bLObl: xbLabelEditRefer
        Left = 11
        Top = 7
        Width = 200
        Height = 21
        BorderColor = clWindowText
        Caption = #1069#1090#1072#1087
        CaptionAlignment = taLeftJustify
        DataField = 'LNUM'
        DataSource = DSRrefObl
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        ReadOnly = True
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLObl_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'LNUM;-1;6;1;0;'#8470'|NAME;-1;30;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSrefObl
        ReferCaption = #1057#1087#1080#1089#1086#1082' '#1101#1090#1072#1087#1086#1074
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLObl_Select
      end
    end
    object TabSheet4: TTabSheet
      Caption = #1057#1095#1077#1090#1072
      DesignSize = (
        688
        378)
      object bTypeOsn: xbLabelEdit
        Left = 5
        Top = 9
        Width = 675
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1054#1089#1085#1086#1074#1072#1085#1080#1077' '#1088#1072#1089#1095#1077#1090#1086#1074
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 0
        LabelWidth = 200
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bGrid1: xbGrid
        Left = 6
        Top = 38
        Width = 672
        Height = 332
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSRSchet
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        ReadOnly = True
        SumList.Active = True
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        IdGrid = '{3D22F023-6C2E-4F1A-8CC9-9A3574DD5E53}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'CNREGNO'
            Footer.Alignment = taRightJustify
            Footer.Value = #1048#1058#1054#1043#1054
            Footer.ValueType = fvtStaticText
            Footers = <>
            Title.Caption = #1057#1095#1077#1090'/'#1057#1095#1077#1090'-'#1092#1072#1082#1090#1091#1088#1072'| '#1056#1077#1075'.'#8470
            Width = 107
          end
          item
            EditButtons = <>
            FieldName = 'CNJURNO'
            Footers = <>
            Title.Caption = #1057#1095#1077#1090'/'#1057#1095#1077#1090'-'#1092#1072#1082#1090#1091#1088#1072'| '#1070#1088'.'#1085#1086#1084#1077#1088
            Width = 132
          end
          item
            EditButtons = <>
            FieldName = 'CNREGD'
            Footers = <>
            Title.Caption = #1057#1095#1077#1090'/'#1057#1095#1077#1090'-'#1092#1072#1082#1090#1091#1088#1072'| '#1044#1072#1090#1072
            Width = 89
          end
          item
            EditButtons = <>
            FieldName = 'SUMIN'
            Footer.Value = 'SUMIN'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #1057#1091#1084#1084#1072'/'#1089#1090#1086#1080#1084#1086#1089#1090#1100' |'#1087#1086#1089#1090#1072#1074#1082#1080
            Width = 122
          end
          item
            EditButtons = <>
            FieldName = 'SUMOUT'
            Footer.Value = 'SUMOUT'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #1057#1091#1084#1084#1072'/'#1089#1090#1086#1080#1084#1086#1089#1090#1100' |'#1086#1087#1083#1072#1090#1099
            Width = 116
          end
          item
            EditButtons = <>
            FieldName = 'SUM'
            Footer.Value = 'SUM'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Caption = #1057#1091#1084#1084#1072'/'#1089#1090#1086#1080#1084#1086#1089#1090#1100' |'#1089#1072#1076#1100#1076#1086
            Width = 94
          end>
      end
    end
    object TabSheet5: TTabSheet
      Caption = #1056#1072#1089#1095#1077#1090#1099
      DesignSize = (
        688
        378)
      object GridVid4: xbGrid
        Left = 5
        Top = 9
        Width = 679
        Height = 160
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSRRASDOG
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        ReadOnly = True
        SumList.Active = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        IdGrid = '{3D22F023-6C2E-4F1A-8CC9-9A3574DD5E53}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'NAME'
            Footer.Alignment = taRightJustify
            Footer.Value = #1048#1058#1054#1043#1054
            Footer.ValueType = fvtStaticText
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1044#1086#1075#1086#1074#1086#1088'\'#1069#1090#1072#1087
            Width = 154
          end
          item
            EditButtons = <>
            FieldName = 'SUMAD'
            Footer.FieldName = 'SUMAD'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1057#1091#1084#1084#1072' '#1101#1090#1072#1087#1072
            Width = 126
          end
          item
            EditButtons = <>
            FieldName = 'SUMAIN'
            Footer.FieldName = 'SUMAIN'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1055#1086#1089#1090#1072#1074#1082#1080' '#1074#1089#1077#1075#1086
            Width = 126
          end
          item
            EditButtons = <>
            FieldName = 'SUMAOUT'
            Footer.FieldName = 'SUMAOUT'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1054#1087#1083#1072#1090#1072' '#1074#1089#1077#1075#1086
            Width = 126
          end
          item
            EditButtons = <>
            FieldName = 'SUMADELT'
            Footer.FieldName = 'SUMADELT'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1044#1086#1083#1075' '#1087#1072#1088#1090#1085#1077#1088#1072
            Width = 126
          end>
      end
      object GridVid5: xbGrid
        Left = 5
        Top = 177
        Width = 680
        Height = 196
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = DSRDOCR
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        FooterRowCount = 1
        ReadOnly = True
        SumList.Active = True
        TabOrder = 1
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        IdGrid = '{DDC7DCBD-3E66-4F7C-BC9C-D329E5C68C48}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'Document'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1044#1086#1082#1091#1084#1077#1085#1090
            Width = 150
          end
          item
            EditButtons = <>
            FieldName = 'Date'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1044#1072#1090#1072
            Width = 85
          end
          item
            EditButtons = <>
            FieldName = 'PartName'
            Footer.Alignment = taRightJustify
            Footer.Value = #1048#1058#1054#1043#1054
            Footer.ValueType = fvtStaticText
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1055#1072#1088#1090#1085#1077#1088
            Width = 241
          end
          item
            EditButtons = <>
            FieldName = 'Sum'
            Footer.FieldName = 'Sum'
            Footer.ValueType = fvtSum
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1057#1091#1084#1084#1072
            Width = 127
          end
          item
            EditButtons = <>
            FieldName = 'CUR'
            Footers = <>
            Title.Alignment = taCenter
            Title.Caption = #1042#1072#1083#1102#1090#1072
          end>
      end
    end
    object TabSheet6: TTabSheet
      Caption = #1054#1087#1080#1089#1072#1085#1080#1077
      DesignSize = (
        688
        378)
      object bPanel1: xbPanel
        Left = 6
        Top = 6
        Width = 676
        Height = 365
        Anchors = [akLeft, akTop, akRight, akBottom]
        BevelOuter = bvNone
        Caption = 'bPanel1'
        TabOrder = 0
        object bSpliter1: xbSpliter
          Left = 0
          Top = 205
          Width = 676
          Height = 3
          Cursor = crVSplit
          Align = alTop
        end
        object bFrame3: xbFrame
          Left = 0
          Top = 0
          Width = 676
          Height = 205
          Align = alTop
          Caption = #1055#1088#1077#1076#1084#1077#1090' '#1076#1086#1075#1086#1074#1086#1088#1072' ('#1087#1086#1076#1088#1086#1073#1085#1086')'
          TabOrder = 0
          DesignSize = (
            676
            205)
          object bMemo1: xbMemo
            Left = 5
            Top = 14
            Width = 664
            Height = 186
            ColorFlat = clBtnFace
            ParentColor = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            Lines.Strings = (
              'bMemo1')
            Anchors = [akLeft, akTop, akRight, akBottom]
            BorderStyle = bsNone
            Color = clWhite
            DisabledColor = clInactiveBorder
            DisabledFontColor = 7368816
            DataField = 'OBJECT'
            DataSource = DSR
          end
        end
        object bFrame4: xbFrame
          Left = 0
          Top = 208
          Width = 676
          Height = 157
          Align = alClient
          Caption = #1054#1087#1080#1089#1072#1085#1080#1077' '#1076#1086#1075#1086#1074#1086#1088#1072
          TabOrder = 1
          DesignSize = (
            676
            157)
          object bMemo2: xbMemo
            Left = 5
            Top = 15
            Width = 664
            Height = 135
            ColorFlat = clBtnFace
            ParentColor = True
            Font.Charset = DEFAULT_CHARSET
            Font.Color = clWindowText
            Font.Height = -11
            Font.Name = 'MS Sans Serif'
            Font.Style = []
            ParentFont = False
            TabOrder = 0
            Lines.Strings = (
              'bMemo2')
            Anchors = [akLeft, akTop, akRight, akBottom]
            BorderStyle = bsNone
            Color = clWhite
            DisabledColor = clInactiveBorder
            DisabledFontColor = 7368816
            DataField = 'COMM'
            DataSource = DSR
          end
        end
      end
    end
  end
  object btnCancel: xbButton
    Left = 618
    Top = 408
    Width = 75
    Height = 21
    Hint = #1042#1099#1093#1086#1076' '#1080#1079' '#1076#1086#1082#1091#1084#1077#1085#1090#1072'(Esc)'
    Caption = #1054#1090#1084#1077#1085#1072
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 5
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnOk: xbButton
    Left = 538
    Top = 408
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100' '#1076#1086#1082#1091#1084#1077#1085#1090' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 4
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupButton2: xbPopupButton
    Left = 458
    Top = 408
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPMenu3
    RoundedButton = True
    TabOrder = 3
    OnClick = bPopupButton2_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupButton3: xbPopupButton
    Left = 379
    Top = 408
    Width = 75
    Height = 21
    Caption = #1044#1086#1075#1086#1074#1086#1088
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPMenu2
    RoundedButton = True
    TabOrder = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object Balans: xbButton
    Left = 300
    Top = 408
    Width = 75
    Height = 21
    Hint = #1041#1072#1083#1072#1085#1089' '#1088#1072#1089#1095#1077#1090#1086#1074' (Ctrl-B)'
    Caption = #1041#1072#1083#1072#1085#1089
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    OnClick = Balans_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bDocDim: xbButton
    Left = 222
    Top = 408
    Width = 75
    Height = 21
    Hint = #1042#1074#1086#1076' Ctrl-D'
    Caption = #1048#1079#1084#1077#1088#1077#1085#1080#1103
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 0
    OnClick = bDocDim_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupButton1: xbPopupButton
    Left = 57
    Top = 408
    Width = 75
    Height = 21
    Hint = #1057#1084#1077#1085#1080#1090#1100' '#1074#1080#1076' (Alt-T)'
    Caption = #1042#1080#1076
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    PopupMenu = bPMVidDog
    RoundedButton = True
    ShowHint = True
    TabOrder = 7
    Visible = False
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsContract'
    Active = False
    Left = 162
    Top = 70
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 268
    Top = 73
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 307
    Top = 97
  end
  object BOCntype: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntype'
    Active = False
    Left = 158
    Top = 208
  end
  object DSCNTYPE: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOCntype
    FieldDefs = <>
    OEMTranslate = False
    Left = 169
    Top = 221
  end
  object DSOBL: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'OBL'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 107
    Top = 317
  end
  object DSROBL: xbADSDataSource
    DataSet = DSOBL
    Left = 152
    Top = 327
  end
  object bPMenu2: xbPopupMenu
    Left = 306
    Top = 217
    object pComm: TMenuItem
      Caption = #1054#1087#1080#1089#1072#1085#1080#1077' '#1076#1086#1075#1086#1074#1086#1088#1072
      ShortCut = 32833
      OnClick = pComm_Click
    end
    object pbSetAdd: TMenuItem
      Caption = #1044#1086#1087#1086#1083#1085'. '#1088#1077#1082#1074#1080#1079#1080#1090#1099
      ShortCut = 32884
      OnClick = pbSetAdd_Click
    end
    object pRUK: TMenuItem
      Caption = #1055#1086#1076#1087#1080#1089#1080' '#1082' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = pRUK_Click
    end
    object pCntNote: TMenuItem
      Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1103' '#1082' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = pCntNote_Click
    end
    object pMRequisitions: TMenuItem
      Caption = #1056#1077#1082#1074#1080#1079#1080#1090#1099' '#1082#1086#1084#1087#1072#1085#1080#1080
      ShortCut = 116
      OnClick = pMRequisitions_Click
    end
  end
  object bPMenu3: xbPopupMenu
    Left = 364
    Top = 252
    object KontrEtap: TMenuItem
      Caption = #1050#1086#1085#1090#1088#1086#1083#1100' '#1101#1090#1072#1087#1086#1074
      ShortCut = 16466
      OnClick = KontrEtap_Click
    end
    object AvtoEtap: TMenuItem
      Caption = #1040#1074#1090#1086#1074#1086#1076' '#1101#1090#1072#1087#1086#1074
      OnClick = AvtoEtap_Click
    end
    object ChangeStatus: TMenuItem
      Caption = #1048#1079#1084#1077#1085#1080#1090#1100' '#1089#1090#1072#1090#1091#1089
      ShortCut = 32851
      OnClick = ChangeStatus_Click
    end
  end
  object DSRAPREG: xbADSDataSource
    DataSet = DSAPREG
    Left = 219
    Top = 217
  end
  object DSAPREG: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'APCARD:DOC'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    AfterScroll = DSAPREG_AfterScroll
    Left = 288
    Top = 299
  end
  object BOSPRADD: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSPR_ADD'
    Active = False
    Left = 250
    Top = 313
  end
  object DSSPRADD: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOSPRADD
    FieldDefs = <>
    OEMTranslate = False
    Left = 226
    Top = 301
  end
  object BOCompany: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCompany'
    Active = False
    Left = 354
    Top = 318
  end
  object DSRASDOG: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    OEMTranslate = False
    Left = 30
    Top = 327
  end
  object DSRRASDOG: xbADSDataSource
    DataSet = DSRASDOG
    Left = 64
    Top = 339
  end
  object DSDOCR: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    OEMTranslate = False
    Left = 64
    Top = 269
  end
  object DSRDOCR: xbADSDataSource
    DataSet = DSDOCR
    Left = 115
    Top = 271
  end
  object bPMVidDog: xbPopupMenu
    Left = 338
    Top = 202
    object pEtap: TMenuItem
      Caption = #1069#1090#1072#1087#1099' '#1076#1086#1075#1086#1074#1086#1088#1072
      OnClick = pEtap_Click
    end
    object pOplata: TMenuItem
      Caption = #1043#1088#1072#1092#1080#1082' '#1086#1087#1083#1072#1090#1099
      OnClick = pOplata_Click
    end
    object pIspoln: TMenuItem
      Caption = #1048#1089#1087#1086#1083#1085#1077#1085#1080#1077' '#1076#1086#1075#1086#1074#1086#1088#1072
      OnClick = pIspoln_Click
    end
    object pRaschet: TMenuItem
      Caption = #1056#1072#1089#1095#1077#1090#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = pRaschet_Click
    end
    object pDocDog: TMenuItem
      Caption = #1044#1086#1082#1091#1084#1077#1085#1090#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
      OnClick = pDocDog_Click
    end
    object pCommDog: TMenuItem
      Caption = #1054#1087#1080#1089#1072#1085#1080#1077' '#1076#1086#1075#1086#1074#1086#1088#1072
      OnClick = pCommDog_Click
    end
  end
  object DSSchet: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    OEMTranslate = False
    Left = 305
    Top = 36
  end
  object DSRSchet: xbADSDataSource
    DataSet = DSSchet
    Left = 376
    Top = 65526
  end
  object DSBDGLINE: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    TableName = 'finplan\fttabler'
    OEMTranslate = False
    Left = 630
    Top = 65529
  end
  object DSRCBookM: xbADSDataSource
    DataSet = DSCBookM
    Left = 501
    Top = 65532
  end
  object DSCBookM: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'CBookM'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 437
    Top = 65524
  end
  object DSrefObl: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    TableName = 'CNTR\obligate.dbf'
    OEMTranslate = False
    AfterScroll = DSrefObl_AfterScroll
    Left = 541
    Top = 374
  end
  object DSRrefObl: xbADSDataSource
    DataSet = DSrefObl
    Left = 611
    Top = 375
  end
end
frmObligate.PRG                                                      13206object frmObligate: TfrmObligate
  Left = 25
  Top = 25
  Width = 550
  Height = 260
  ActiveControl = bStrType
  Anchors = []
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1072#1084#1080' - '#1057#1090#1088#1086#1082#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Constraints.MinHeight = 260
  Constraints.MinWidth = 550
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnInnerEvent = Form_InnerEvent
  DesignSize = (
    542
    226)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 6
    Top = 6
    Width = 529
    Height = 191
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        527
        169)
      object bLStrType: xbLabel
        Left = 173
        Top = 13
        Width = 291
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        Caption = 'bLStrType'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'STR_TYPENAME'
        DataSource = DSROBL
      end
      object bIsClosed: xbLabel
        Left = 448
        Top = 13
        Width = 71
        Height = 20
        Alignment = taRightJustify
        Anchors = [akTop, akBottom]
        Caption = #1054#1090#1082#1088#1099#1090'/'#1047#1072#1082#1088#1099#1090
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = [fsBold, fsItalic]
        ParentFont = False
        ShowAccelChar = False
        Transparent = True
        DataField = 'IS_CLOSEDNAME'
        DataSource = DSROBL
      end
      object bLDateBeg: xbLabelEditCalend
        Left = 8
        Top = 57
        Width = 181
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1072#1090#1072' '#1085#1072#1095#1072#1083#1072
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_BEG'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 3
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        OnEnter = bLDateBeg_Enter
        OnExit = bLDateBeg_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLName: xbLabelEdit
        Left = 8
        Top = 105
        Width = 458
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1086#1076#1077#1088#1078#1072#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'Name'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 6
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLPLANIN: xbLabelEditCalc
        Left = 8
        Top = 129
        Width = 190
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072
        CaptionAlignment = taLeftJustify
        DataField = 'psum'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 7
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLLNUM: xbLabelEdit
        Left = 8
        Top = 33
        Width = 151
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1086#1084#1077#1088' '#1101#1090#1072#1087#1072
        CaptionAlignment = taLeftJustify
        DataField = 'LNUM'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object ChORGANIZ: xbCheckBox
        Left = 202
        Top = 81
        Width = 142
        Height = 19
        Caption = #1053#1077' '#1092#1080#1085#1072#1085#1089#1086#1074#1099#1081
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowHint = True
        TabOrder = 5
        TabStop = True
        OnClick = ChORGANIZ_Click
        ParentShowHint = False
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'IS_ORGANIZ'
        DataSource = DSROBL
      end
      object bLDateEnd: xbLabelEditCalend
        Left = 8
        Top = 81
        Width = 181
        Height = 21
        BorderColor = clWindowText
        Caption = #1044#1072#1090#1072' '#1086#1082#1086#1085#1095#1072#1085#1080#1103
        CaptionAlignment = taLeftJustify
        DataField = 'DATE_END'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 4
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        OnEnter = bLDateEnd_Enter
        OnExit = bLDateEnd_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLLastUpd: xbLabelEditCalend
        Left = 175
        Top = 33
        Width = 246
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1048#1079#1084#1077#1085#1077#1085
        CaptionAlignment = taLeftJustify
        DataField = 'LAST_UPD'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        EditMask = '!99/99/0000;1; '
        TabOrder = 2
        LabelWidth = 126
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        OnEnter = bLDateBeg_Enter
        OnExit = bLDateBeg_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        EnabledEdit = False
        EnabledButton = False
        VisibleButton = False
      end
      object bLSumNds: xbLabelEditCalc
        Left = 240
        Top = 129
        Width = 180
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072' '#1053#1044#1057
        CaptionAlignment = taLeftJustify
        DataField = 'SUM_NDS'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 8
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bStrType: xbLabelEditRefer
        Left = 8
        Top = 9
        Width = 151
        Height = 22
        BorderColor = clWindowText
        Caption = #1042#1080#1076' '#1089#1088#1077#1076#1089#1090#1074
        CaptionAlignment = taLeftJustify
        DataField = 'STR_TYPE'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ListDataSet = dsRef
        OutFieldsArray = 'FIN_TP'
        PutFieldsArray = 'STR_TYPE'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1042#1080#1076#1086#1074' '#1089#1088#1077#1076#1089#1090#1074
        TypeFindFieldName = 'FIN_TP'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bARef: xbLabelEditAnalitRefer
        Left = 8
        Top = 142
        Width = 456
        Height = 21
        BorderColor = clWindowText
        Caption = #1040#1085#1072#1083#1080#1090#1080#1082#1072' '#1088#1072#1089#1093#1086#1076#1072
        CaptionAlignment = taLeftJustify
        DataField = 'STR_DIM'
        DataSource = DSROBL
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 9
        LabelWidth = 110
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'STR_DIM'
        EnabledEdit = False
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
        MakeChecking = True
      end
    end
  end
  object btnOk: xbButton
    Left = 382
    Top = 202
    Width = 75
    Height = 21
    Hint = 'C'#1086#1093#1088#1072#1085#1080#1090#1100' '#1089#1090#1088#1086#1082#1091' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnCancel: xbButton
    Left = 462
    Top = 202
    Width = 75
    Height = 21
    Hint = #1042#1099#1093#1086#1076' '#1080#1079' '#1089#1090#1088#1086#1082#1080'(Esc)'
    Caption = #1054#1090#1084#1077#1085#1072
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 2
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupButton2: xbPopupButton
    Left = 299
    Top = 203
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPMenu3
    RoundedButton = True
    TabOrder = 3
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    Active = False
    Left = 31
    Top = 110
  end
  object DSOBL: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'OBL'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 57
    Top = 110
  end
  object DSROBL: xbADSDataSource
    DataSet = DSOBL
    Left = 89
    Top = 110
  end
  object dsRef: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    TableName = 'PAY\FIN_TP.DBF'
    OEMTranslate = False
    Left = 52
    Top = 186
  end
  object bPMenu3: xbPopupMenu
    Left = 404
    Top = 85
    object ChangeStatus: TMenuItem
      Caption = #1048#1079#1084#1077#1085#1080#1090#1100' '#1089#1090#1072#1090#1091#1089
      ShortCut = 32851
      OnClick = ChangeStatus_Click
    end
  end
end
frmMyRequisitions.PRG                                                 9290object xbFrm_45: TxbFrm_45
  Left = 25
  Top = 25
  Width = 500
  Height = 273
  ActiveControl = bLMyCode
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1056#1077#1082#1074#1080#1079#1080#1090#1099' '#1082#1086#1084#1087#1072#1085#1080#1080
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    492
    239)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 7
    Top = 6
    Width = 478
    Height = 205
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 1
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        476
        183)
      object bLShortname: xbLabel
        Left = 227
        Top = 6
        Width = 255
        Height = 17
        Caption = 'bLShortname'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'SHORTNAME'
        DataSource = DSR
      end
      object bLMyCode: xbLabelEditRefer
        Left = 7
        Top = 5
        Width = 212
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1076
        CaptionAlignment = taLeftJustify
        DataField = 'MYCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'MYCODE'
        BeforeButtonClick = bLMyCode_BeforeButtonClick
        OnClearButtonClick = bLMyCode_ClearButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldName = 'MYCODE'
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        TypeFindFieldName = 'MYCODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLMyCode_Select
      end
      object bLInn: xbLabelEdit
        Left = 7
        Top = 29
        Width = 344
        Height = 21
        BorderColor = clWindowText
        Caption = #1048#1053#1053
        CaptionAlignment = taLeftJustify
        DataField = 'CODE_INN'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 1
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLRefAddr: xbLabelEditRefer
        Left = 7
        Top = 53
        Width = 452
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1040#1076#1088#1077#1089
        CaptionAlignment = taLeftJustify
        DataField = 'NAMEADRES'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 2
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLRefAddr_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'GetAddrName;-1;100;1;0;'#1058#1080#1087' '#1072#1076#1088#1077#1089#1072'|ADDRESS;-1;160;1;0;'#1040#1076#1088#1077#1089
        FindFieldName = 'ADDRESS'
        FindFieldType = tfCharacterString
        ListDataSet = DSADDR
        OutFieldsArray = 'REC_ID'
        PutFieldsArray = 'ID_ADRES'
        ReferCaption = #1040#1076#1088#1077#1089
        TypeFindFieldName = 'ADDRESS'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLAccnt: xbLabelEditRefer
        Left = 7
        Top = 78
        Width = 344
        Height = 21
        BorderColor = clWindowText
        Caption = #1056#1072#1089#1095#1077#1090#1085#1099#1081' '#1089#1095#1077#1090
        CaptionAlignment = taLeftJustify
        DataField = 'AccntBank'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLAccnt_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'GetAccntTypes;-1;20;1;0;'#1058#1080#1087' '#1089#1095#1077#1090#1072'|ACCNT;-1;30;1;0;'#1057#1095#1077#1090
        FindFieldType = tfCharacterString
        OutFieldsArray = 'Rec_Id'
        PutFieldsArray = 'ID_RSSCH'
        ReferCaption = #1056#1072#1089#1095#1077#1090#1085#1099#1081' '#1089#1095#1077#1090
        TypeFindFieldName = 'ACCNT'
        xReferId = 0
        IsHarbourRefer = True
      end
      object bLBankName: xbLabelEdit
        Left = 7
        Top = 103
        Width = 452
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        BorderColor = clWindowText
        Caption = #1041#1072#1085#1082
        CaptionAlignment = taLeftJustify
        DataField = 'BankName'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 4
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLBNKCODE: xbLabelEdit
        Left = 7
        Top = 128
        Width = 344
        Height = 21
        BorderColor = clWindowText
        Caption = #1041#1080#1082
        CaptionAlignment = taLeftJustify
        DataField = 'BNKCODE'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 5
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLACNTKORR: xbLabelEdit
        Left = 7
        Top = 153
        Width = 344
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1088'. '#1089#1095#1077#1090
        CaptionAlignment = taLeftJustify
        DataField = 'ACNTKORR'
        DataSource = DSR
        ButtonsColor = clBlack
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 6
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
    end
  end
  object bBOk: xbButton
    Left = 410
    Top = 216
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 0
    OnClick = bBOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupMenu1: xbPopupMenu
    Left = 436
    Top = 163
    object pMeny: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMeny_Click
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsContract'
    Active = False
    Left = 9
    Top = 194
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 53
    Top = 197
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 88
    Top = 198
  end
  object BOAddr: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsPartnerAddr'
    Active = False
    Left = 125
    Top = 188
  end
  object DSADDR: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOAddr
    FieldDefs = <>
    OEMTranslate = False
    Left = 178
    Top = 186
  end
end
frmCont_AddRee.PRG                                                    3511object frmCont_AddRee: TfrmCont_AddRee
  Left = -4
  Top = 25
  Width = 600
  Height = 290
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1044#1086#1087#1086#1083#1085#1080#1090#1077#1083#1100#1085#1099#1077' '#1088#1077#1082#1074#1080#1079#1080#1090#1099
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    592
    256)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 7
    Top = 8
    Width = 573
    Height = 214
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnDblClick = bGrid1_DblClick
    OnKeyPress = bGrid1_KeyPress
    IdGrid = '{468B72E0-70F3-4BAF-BF81-1EED72198C77}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Code'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1050#1086#1076
        Width = 119
      end
      item
        EditButtons = <>
        FieldName = 'Name'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 205
      end
      item
        EditButtons = <>
        FieldName = 'Default'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        Width = 232
      end>
  end
  object bCansel: xbButton
    Left = 506
    Top = 230
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 1
    OnClick = bCansel_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bOk: xbButton
    Left = 426
    Top = 230
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 2
    OnClick = bOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    OEMTranslate = False
    Left = 186
    Top = 117
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 257
    Top = 129
  end
  object bPopupMenu1: xbPopupMenu
    Left = 400
    Top = 125
    object pMeny: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMeny_Click
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    Active = False
    Left = 51
    Top = 143
  end
  object DSCONT: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'ContAdd'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 103
    Top = 157
  end
end
frmCont_Add.PRG                                                       6880object frmCont_Add: TfrmCont_Add
  Left = 25
  Top = 25
  Width = 400
  Height = 160
  ActiveControl = bLZnachT
  Anchors = []
  Caption = #1047#1085#1072#1095#1077#1085#1080#1077
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    392
    133)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 8
    Top = 7
    Width = 372
    Height = 88
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 2
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      object bLZnachT: xbLabelEdit
        Left = 7
        Top = 17
        Width = 334
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        OnKeyPress = bLZnachT_KeyPress
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bLZnachN: xbLabelEditCalc
        Left = 8
        Top = 17
        Width = 333
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        OnExit = bLZnachN_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLZnachN_BeforeButtonClick
        VisibleButton = False
      end
      object bLZnachD: xbLabelEditCalend
        Left = 8
        Top = 17
        Width = 333
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 2
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        OnExit = bLZnachD_Exit
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLZnachD_BeforeButtonClick
        VisibleButton = False
      end
      object bLReferZnach: xbLabelEditRefer
        Left = 7
        Top = 17
        Width = 333
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        BeforeButtonClick = bLReferZnach_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'VALUE;-1;120;1;0;'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        FindFieldType = tfCharacterString
        ListDataSet = DSADD
        ReferCaption = #1047#1085#1072#1095#1077#1085#1080#1077
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bLReferZnach_Select
        OnCancel = bLReferZnach_Cancel
      end
      object bARef: xbLabelEditAnalitRefer
        Left = 7
        Top = 17
        Width = 333
        Height = 21
        BorderColor = clWindowText
        Caption = #1047#1085#1072#1095#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'VALUE'
        DataSource = ads
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 4
        LabelWidth = 124
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        ClearFields = 'VALUE'
        EnabledEdit = False
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = bARef_Select
        MakeChecking = True
      end
    end
  end
  object bBCansel: xbButton
    Left = 307
    Top = 100
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 1
    OnClick = bBCansel_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bBOk: xbButton
    Left = 226
    Top = 100
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 0
    OnClick = bBOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupMenu1: xbPopupMenu
    Left = 335
    Top = 8
    object pMeny: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMeny_Click
    end
  end
  object DSADD: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOADD
    FieldDefs = <>
    OEMTranslate = False
    Left = 55
    Top = 75
  end
  object BOADD: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsSpr_Add'
    Active = False
    Left = 14
    Top = 74
  end
  object ads: xbADSDataSource
    DataSet = ds
    Left = 114
    Top = 85
  end
  object ds: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = bo
    FieldDefs = <>
    OEMTranslate = False
    Left = 150
    Top = 1
  end
  object bo: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCont_Add'
    Active = False
    Left = 163
    Top = 75
  end
end
frmContractComm.PRG                                                   2029object xbFrm_44: TxbFrm_44
  Left = 5
  Top = 5
  Width = 500
  Height = 273
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1054#1087#1080#1089#1072#1085#1080#1077' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    492
    246)
  PixelsPerInch = 96
  TextHeight = 13
  object bMemo1: xbMemo
    Left = 9
    Top = 9
    Width = 474
    Height = 198
    ColorFlat = clBtnFace
    ParentColor = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 0
    Lines.Strings = (
      'bMemo1')
    Anchors = [akLeft, akTop, akRight, akBottom]
    BorderStyle = bsNone
    Color = clWhite
    DisabledColor = clInactiveBorder
    DisabledFontColor = clBlack
    DataField = 'COMM'
    DataSource = DSR
  end
  object bOk: xbButton
    Left = 407
    Top = 215
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 1
    OnClick = bOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPopupMenu1: xbPopupMenu
    Left = 432
    Top = 131
    object pMenu: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMenu_Click
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    Active = False
    Left = 58
    Top = 166
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 121
    Top = 169
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 199
    Top = 159
  end
end
frmChangeStatus.PRG                                                   1961object xbFrm_3: TxbFrm_3
  Left = 25
  Top = 25
  Width = 350
  Height = 160
  Anchors = []
  Caption = #1057#1090#1072#1090#1091#1089' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    342
    133)
  PixelsPerInch = 96
  TextHeight = 13
  object bCansel: xbButton
    Left = 260
    Top = 102
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 2
    OnClick = bCansel_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bOk: xbButton
    Left = 179
    Top = 102
    Width = 75
    Height = 21
    Default = True
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 1
    ModalResult = 1
    OnClick = bOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bPageControl1: xbPageControl
    Left = 7
    Top = 4
    Width = 325
    Height = 93
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      object brProekt: xbRadioButton
        Left = 9
        Top = 9
        Width = 121
        Height = 17
        Caption = #1055#1088#1086#1077#1082#1090
        TabOrder = 0
      end
      object brDeys: xbRadioButton
        Left = 9
        Top = 31
        Width = 121
        Height = 17
        Caption = #1044#1077#1081#1089#1090#1074#1091#1077#1090
        TabOrder = 1
      end
      object brZakr: xbRadioButton
        Left = 9
        Top = 51
        Width = 121
        Height = 17
        Caption = #1047#1072#1082#1088#1099#1090
        TabOrder = 2
      end
    end
  end
end
frmContractDate.PRG                                                   1786object xbFrm_52: TxbFrm_52
  Left = 25
  Top = 25
  Width = 400
  Height = 150
  Anchors = []
  Caption = #1044#1072#1090#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    392
    116)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 8
    Top = 5
    Width = 376
    Height = 78
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      object blDate: xbLabelEditCalend
        Left = 10
        Top = 14
        Width = 351
        Height = 21
        BorderColor = clWindowText
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        EditMask = '!99/99/0000;1; '
        TabOrder = 0
        LabelWidth = 280
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 10
        Text = '  /  /    '
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
    end
  end
  object bOk: xbButton
    Left = 308
    Top = 89
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 1
    OnClick = bOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
end
frmContractApRegRee.PRG                                               7715object xbFrm_16: TxbFrm_16
  Left = 25
  Top = 25
  Width = 600
  Height = 350
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1054#1087#1077#1088#1072#1094#1080#1080' '#1087#1086' '#1088#1072#1089#1095#1077#1090#1072#1084
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    592
    317)
  PixelsPerInch = 96
  TextHeight = 13
  object bLabelEdit1: xbLabelEdit
    Left = 8
    Top = 5
    Width = 365
    Height = 21
    BorderColor = clWindowText
    Caption = #1055#1072#1088#1090#1085#1077#1088
    CaptionAlignment = taLeftJustify
    DataField = 'NAMEAGENT'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 0
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
  end
  object bLabelEdit2: xbLabelEdit
    Left = 8
    Top = 29
    Width = 230
    Height = 21
    BorderColor = clWindowText
    Caption = #1044#1086#1075#1086#1074#1086#1088
    CaptionAlignment = taLeftJustify
    DataField = 'NUMDOC_E'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 1
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
  end
  object bLabelEdit3: xbLabelEdit
    Left = 243
    Top = 29
    Width = 130
    Height = 21
    BorderColor = clWindowText
    Caption = #1086#1090
    CaptionAlignment = taLeftJustify
    DataField = 'DATE'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 2
    LabelWidth = 30
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
  end
  object bGrid1: xbGrid
    Left = 5
    Top = 60
    Width = 580
    Height = 181
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSRAPREG
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    ReadOnly = True
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{DF1194D9-4FAD-4B26-B43E-99E286AA653B}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'TYPEDOC'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1058#1080#1087' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
        Width = 90
      end
      item
        EditButtons = <>
        FieldName = 'Document'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 165
      end
      item
        EditButtons = <>
        FieldName = 'DATE'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1044#1072#1090#1072
        Width = 62
      end
      item
        EditButtons = <>
        FieldName = 'CUR'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1042#1072#1083#1102#1090#1072
        Width = 47
      end
      item
        EditButtons = <>
        FieldName = 'SumIn'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1055#1088#1080#1093#1086#1076
        Width = 104
      end
      item
        EditButtons = <>
        FieldName = 'SumOut'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1056#1072#1089#1093#1086#1076
        Width = 92
      end>
  end
  object bButton1: xbButton
    Left = 509
    Top = 293
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 4
    OnClick = bButton1_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bLabelEdit4: xbLabelEditCalc
    Left = 328
    Top = 246
    Width = 168
    Height = 21
    Anchors = [akRight, akBottom]
    BorderColor = clWindowText
    Caption = #1048#1090#1086#1075#1086
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 5
    LabelWidth = 83
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Text = '0'
    PopupListClickKey = 0
    ClickKeysAlternate = 'F2'
    EnabledEdit = False
    VisibleButton = False
  end
  object bLabelEdit6: xbLabelEditCalc
    Left = 328
    Top = 269
    Width = 256
    Height = 21
    Anchors = [akRight, akBottom]
    BorderColor = clWindowText
    Caption = #1044#1086#1083#1075' '#1087#1072#1088#1090#1085#1077#1088#1072
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 6
    LabelWidth = 83
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Text = '0'
    PopupListClickKey = 0
    ClickKeysAlternate = 'F2'
    EnabledEdit = False
    VisibleButton = False
  end
  object bLabelEdit5: xbLabelEditCalc
    Left = 504
    Top = 246
    Width = 80
    Height = 21
    Anchors = [akRight, akBottom]
    BorderColor = clWindowText
    Caption = ' '
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 7
    LabelWidth = 0
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Text = '0'
    PopupListClickKey = 0
    ClickKeysAlternate = 'F2'
    EnabledEdit = False
    VisibleButton = False
  end
  object bPopupMenu1: xbPopupMenu
    Left = 423
    Top = 107
    object pMenu: TMenuItem
      Caption = #1048#1085#1092#1086#1088#1084#1072#1094#1080#1103
      OnClick = pMenu_Click
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsContract'
    Active = False
    Left = 11
    Top = 202
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 48
    Top = 206
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 85
    Top = 206
  end
  object DSAPREG: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BOReg
    FieldDefs = <>
    OEMTranslate = False
    Left = 125
    Top = 213
  end
  object DSRAPREG: xbADSDataSource
    DataSet = DSAPREG
    Left = 176
    Top = 212
  end
  object BOReg: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsAP_REG'
    Active = False
    Left = 220
    Top = 139
  end
end
frmContractRbookRee.PRG                                               4654object xbFrm_10: TxbFrm_10
  Left = 5
  Top = 5
  Width = 600
  Height = 350
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1105#1088#1072#1084#1080' - '#1047#1072#1082#1072#1079#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1072#1084
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    592
    323)
  PixelsPerInch = 96
  TextHeight = 13
  object bLabelEdit1: xbLabelEdit
    Left = 8
    Top = 5
    Width = 365
    Height = 21
    BorderColor = clWindowText
    Caption = #1055#1072#1088#1090#1085#1077#1088
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 0
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
  end
  object bLabelEdit2: xbLabelEdit
    Left = 8
    Top = 29
    Width = 230
    Height = 21
    BorderColor = clWindowText
    Caption = #1044#1086#1075#1086#1074#1086#1088
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 1
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
  end
  object bLabelEdit3: xbLabelEdit
    Left = 243
    Top = 29
    Width = 130
    Height = 21
    BorderColor = clWindowText
    Caption = #1086#1090
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 2
    LabelWidth = 30
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
  end
  object bButton1: xbButton
    Left = 509
    Top = 290
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 3
    OnClick = bButton1_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bGrid1: xbGrid
    Left = 6
    Top = 56
    Width = 577
    Height = 226
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    ReadOnly = True
    TabOrder = 4
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{41BF5250-BBBC-4375-9072-44E131A9BC12}'
    Columns = <
      item
        Alignment = taCenter
        EditButtons = <>
        FieldName = 'DOPCODE'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1056#1077#1075'.'#8470
        Width = 79
      end
      item
        Alignment = taCenter
        EditButtons = <>
        FieldName = 'DATE'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1044#1072#1090#1072
        Width = 94
      end
      item
        Alignment = taCenter
        EditButtons = <>
        FieldName = 'NUMDOC'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1057#1095#1077#1090' '#8470
        Width = 168
      end
      item
        Alignment = taCenter
        EditButtons = <>
        FieldName = 'SUMOUT'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1057#1091#1084#1084#1072
        Width = 154
      end
      item
        EditButtons = <>
        FieldName = 'Status'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1057#1090#1072#1090#1091#1089
        Width = 63
      end>
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsRealRbook'
    Active = False
    Left = 28
    Top = 189
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 64
    Top = 195
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 120
    Top = 184
  end
end
frmContractEtapRaschet.prg                                            4195object frmContractEtapRaschet: TfrmContractEtapRaschet
  Left = 17
  Top = 25
  Width = 720
  Height = 350
  Anchors = []
  Caption = #1056#1072#1089#1095#1077#1090#1099' '#1087#1086' '#1101#1090#1072#1087#1072#1084
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    712
    317)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 5
    Top = 14
    Width = 700
    Height = 272
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    UseMultiTitle = True
    VTitleMargin = 6
    OnTitleClick = bGrid1_TitleClick
    IdGrid = '{EE585F1D-386E-44A4-80DB-AAC35CA67A01}'
    Styles.Style1.FieldName = 'YesVyp'
    Styles.Style1.Value = '0'
    Styles.Style1.FillColor = clWhite
    Styles.Style1.TextColor = clRed
    Styles.Style2.FillColor = clYellow
    Styles.Style2.TextColor = clAqua
    Columns = <
      item
        EditButtons = <>
        FieldName = 'NAME'
        Footers = <>
        Title.Caption = #1069#1090#1072#1087' '#1076#1086#1075#1086#1074#1086#1088#1072'|'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 122
      end
      item
        EditButtons = <>
        FieldName = 'SETDATE'
        Footers = <>
        Title.Caption = #1069#1090#1072#1087' '#1076#1086#1075#1086#1074#1086#1088#1072'|'#1044#1072#1090#1072
      end
      item
        EditButtons = <>
        FieldName = 'PlanIn'
        Footers = <>
        Title.Caption = #1069#1090#1072#1087' '#1076#1086#1075#1086#1074#1086#1088#1072'|'#1055#1088#1080#1093#1086#1076
        Width = 103
      end
      item
        EditButtons = <>
        FieldName = 'PlanOut'
        Footers = <>
        Title.Caption = #1069#1090#1072#1087' '#1076#1086#1075#1086#1074#1086#1088#1072'|'#1056#1072#1089#1093#1086#1076
        Width = 99
      end
      item
        EditButtons = <>
        FieldName = 'SUM_OPL'
        Footers = <>
        Title.Caption = #1042#1099#1087#1086#1083#1085#1077#1085#1086'|'#1054#1087#1083#1072#1090#1072
        Width = 78
      end
      item
        EditButtons = <>
        FieldName = 'FSUM'
        Footers = <>
        Title.Caption = #1042#1099#1087#1086#1083#1085#1077#1085#1086'|'#1055#1086#1089#1090#1072#1074#1082#1072
        Width = 74
      end
      item
        EditButtons = <>
        FieldName = 'DelSumFO'
        Footers = <>
        Title.Caption = #1042#1099#1087#1086#1083#1085#1077#1085#1086'|'#1044#1086#1083#1075
        Width = 74
      end
      item
        EditButtons = <>
        FieldName = 'OVERDUE'
        Footers = <>
        Title.Caption = #1055#1088#1086#1089#1088#1086#1095#1077#1085#1086', '#1089#1091#1090
        Width = 62
      end
      item
        EditButtons = <>
        FieldName = 'YesVyp'
        Footers = <>
        Visible = False
      end>
  end
  object bOk: xbButton
    Left = 632
    Top = 293
    Width = 75
    Height = 21
    Caption = 'OK'
    RoundedButton = True
    TabOrder = 1
    OnClick = bOk_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsContract'
    Active = False
    Left = 62
    Top = 251
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'OBL'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 101
    Top = 216
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 136
    Top = 250
  end
end
frmContractDocRee.prg                                                 4286object frmContractDocRee: TfrmContractDocRee
  Left = 5
  Top = 5
  Width = 600
  Height = 400
  Anchors = []
  Caption = #1044#1086#1082#1091#1084#1077#1085#1090#1099' '#1087#1086' '#1076#1086#1075#1086#1074#1086#1088#1091
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    592
    373)
  PixelsPerInch = 96
  TextHeight = 13
  object bNamePart: xbLabelEdit
    Left = 8
    Top = 9
    Width = 382
    Height = 21
    BorderColor = clWindowText
    Caption = #1055#1072#1088#1090#1085#1077#1088
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 0
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
  end
  object bContract: xbLabelEdit
    Left = 8
    Top = 33
    Width = 243
    Height = 21
    BorderColor = clWindowText
    Caption = #1044#1086#1075#1086#1074#1086#1088
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 1
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
  end
  object bContractDate: xbLabelEdit
    Left = 261
    Top = 33
    Width = 129
    Height = 21
    BorderColor = clWindowText
    Caption = #1086#1090
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 2
    LabelWidth = 50
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
  end
  object bGrid1: xbGrid
    Left = 5
    Top = 64
    Width = 580
    Height = 271
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    ReadOnly = True
    TabOrder = 3
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{7B20D71D-F2E8-4CB2-A1B1-B000EC4857EE}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Document'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1044#1086#1082#1091#1084#1077#1085#1090
        Width = 126
      end
      item
        EditButtons = <>
        FieldName = 'Date'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1044#1072#1090#1072
        Width = 74
      end
      item
        EditButtons = <>
        FieldName = 'PartName'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1055#1072#1088#1090#1085#1077#1088
        Width = 151
      end
      item
        EditButtons = <>
        FieldName = 'Sum'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1057#1091#1084#1084#1072
        Width = 144
      end
      item
        EditButtons = <>
        FieldName = 'CUR'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1042#1072#1083#1102#1090#1072
      end>
  end
  object bOK: xbButton
    Left = 511
    Top = 344
    Width = 75
    Height = 21
    Caption = 'OK'
    RoundedButton = True
    TabOrder = 4
    OnClick = bOK_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    ReadOnly = True
    OEMTranslate = False
    Left = 57
    Top = 143
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 144
    Top = 162
  end
end
frmCntObjRee.PRG                                                      3701object frmCntObjRee: TfrmCntObjRee
  Left = 25
  Top = 25
  Width = 510
  Height = 365
  Anchors = []
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1072#1084#1080' - '#1055#1088#1077#1076#1084#1077#1090' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    502
    331)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 8
    Top = 36
    Width = 486
    Height = 265
    Anchors = [akLeft, akTop, akRight, akBottom]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{F90F91B4-E03B-4016-ABF0-981ACC2BFFBA}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Code'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1050#1086#1076
        Width = 91
      end
      item
        EditButtons = <>
        FieldName = 'NAME'
        Footers = <>
        Title.Alignment = taCenter
        Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
        Width = 379
      end>
  end
  object cLBrg: xbLabelCombo
    Left = 8
    Top = 8
    Width = 261
    Height = 21
    ParentBackGround = True
    Caption = #1042#1080#1076' '#1089#1076#1077#1083#1082#1080
    TabOrder = 1
    LabelWidth = 124
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Sorted = False
    EditColor = clWindow
    DisabledColor = clBlack
    DisabledFontColor = clBlack
    BorderColor = clBlack
    AutoComplete = False
    Style = csDropDownList
    CharCase = ecNormal
    DropDownCount = 0
    ItemHeight = 0
    MaxLength = 0
    Items.Strings = (
      #1047#1072#1082#1091#1087#1082#1080
      #1055#1088#1086#1076#1072#1078#1072)
    ItemIndex = -1
    UseStandartHint = True
    OnSelect = cLBrg_Select
  end
  object bPopupButton1: xbPopupButton
    Left = 418
    Top = 308
    Width = 75
    Height = 21
    Caption = #1054#1087#1077#1088#1072#1094#1080#1080
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = bPopupMenu1
    RoundedButton = True
    TabOrder = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntObj'
    Active = False
    Left = 31
    Top = 214
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 75
    Top = 212
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 137
    Top = 203
  end
  object bPopupMenu1: xbPopupMenu
    Left = 244
    Top = 152
    object N14: TMenuItem
      Caption = #1042#1074#1086#1076'/'#1041#1099#1089#1090#1088#1099#1081' '#1087#1086#1080#1089#1082
      ShortCut = 8310
    end
  end
end
frmCntrDim.prg                                                        6158object frmCntrDim: TfrmCntrDim
  Left = 25
  Top = 25
  Width = 477
  Height = 196
  ActiveControl = lerDimAnl
  Anchors = []
  Caption = #1040#1085#1072#1083#1080#1090#1080#1082#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnActivate = Form_Activate
  OnClose = Form_Close
  OnCloseQuery = Form_CloseQuery
  OnCreate = Form_Create
  DesignSize = (
    469
    169)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 8
    Top = 8
    Width = 453
    Height = 118
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        451
        96)
      object bLabel1: xbLabel
        Left = 246
        Top = 8
        Width = 196
        Height = 21
        Anchors = [akLeft, akTop, akRight]
        Caption = 'bLabel1'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ShowAccelChar = False
        DataField = 'DIM_NAME'
        DataSource = ADS
      end
      object lerDimAnl: xbLabelEditRefer
        Left = 6
        Top = 8
        Width = 230
        Height = 21
        BorderColor = clWindowText
        Caption = #1048#1079#1084#1077#1088#1077#1085#1080#1077
        CaptionAlignment = taLeftJustify
        DataField = 'DIM_CODE'
        DataSource = ADS
        ButtonsColor = clBtnFace
        EnabledColor = clWhite
        TabOrder = 0
        LabelWidth = 120
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'DIM_ID'
        BeforeButtonClick = lerDimAnl_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        ColumnsTune = 'CODE;-1;100;1;0;'#1050#1086#1076'|NAME;-1;350;1;0;'#1053#1072#1079#1074#1072#1085#1080#1077
        FindFieldName = 'CODE'
        FindFieldType = tfCharacterString
        ListDataSet = DSDIM
        OutFieldsArray = 'DIM_ID'
        PutFieldsArray = 'DIM_ID'
        ReferCaption = #1057#1087#1080#1089#1086#1082
        ReferHeight = 300
        TypeFindFieldName = 'CODE'
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = lerDimAnl_Select
      end
      object lecNumSeg: xbLabelEditCalc
        Left = 6
        Top = 32
        Width = 230
        Height = 21
        BorderColor = clWindowText
        Caption = #1055#1086#1088#1103#1076#1082#1086#1074#1099#1081' '#1085#1086#1084#1077#1088
        CaptionAlignment = taLeftJustify
        DataField = 'ORDER'
        DataSource = ADS
        ButtonsColor = clBtnFace
        EnabledColor = clWhite
        Enabled = False
        TabOrder = 1
        LabelWidth = 120
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        ReadOnly = True
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        EnabledEdit = False
        VisibleButton = False
      end
      object cbInput: xbCheckBox
        Left = 5
        Top = 54
        Width = 136
        Height = 17
        Caption = #1054#1073#1103#1079#1072#1090#1077#1083#1100#1085#1099#1081' '#1074#1074#1086#1076' . . . . . . . . . . . . . . . . . . . .'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        Layout = checkboxRight
        ParentFont = False
        TabOrder = 2
        TabStop = True
        ValueChecked = 'True'
        ValueUnchecked = 'False'
        DataField = 'ISINPUT'
        DataSource = ADS
      end
    end
  end
  object btnOK: xbButton
    Left = 302
    Top = 134
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1077#1085#1080#1077' '#1076#1086#1082#1091#1084#1077#1085#1090#1072' (F10)'
    Caption = #1054#1050
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnCANCEL: xbButton
    Left = 389
    Top = 134
    Width = 75
    Height = 21
    Hint = #1042#1099#1093#1086#1076' '#1080#1079' '#1076#1086#1082#1091#1084#1077#1085#1090#1072' (Esc)'
    Caption = #1054#1090#1084#1077#1085#1072
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntrDim'
    Active = False
    Left = 326
    Top = 53
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    AfterEdit = DS_AfterEdit
    Left = 403
    Top = 51
  end
  object ADS: xbADSDataSource
    DataSet = DS
    Left = 366
    Top = 52
  end
  object DSDIM: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    TableName = 'dim_anl'
    OEMTranslate = False
    Left = 215
    Top = 97
  end
end
frmContractAvto.PRG                                                   3315object frmContractAvto: TfrmContractAvto
  Left = 25
  Top = 25
  Width = 400
  Height = 140
  Anchors = []
  Caption = #1044#1072#1090#1072' '#1076#1086#1075#1086#1074#1086#1088#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  DesignSize = (
    392
    113)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 8
    Top = 5
    Width = 376
    Height = 77
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      object bPeriod: xbLabelCombo
        Left = 10
        Top = 30
        Width = 350
        Height = 21
        ParentBackGround = True
        Caption = #1055#1077#1088#1080#1086#1076' '#1084#1077#1078#1076#1091' '#1101#1090#1072#1087#1072#1084#1080
        TabOrder = 0
        LabelWidth = 200
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        Text = #1052#1077#1089#1103#1094
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDown
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        Items.Strings = (
          #1052#1077#1089#1103#1094
          #1050#1074#1072#1088#1090#1072#1083)
        ItemIndex = 0
        UseStandartHint = True
      end
      object bCount: xbLabelEditCalc
        Left = 9
        Top = 6
        Width = 236
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086' '#1101#1090#1072#1087#1086#1074
        CaptionAlignment = taLeftJustify
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 200
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 2
        Text = '1'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2;Alt+Down'
        VisibleButton = False
      end
    end
  end
  object bOk: xbButton
    Left = 225
    Top = 88
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1080#1090#1100' '#1076#1086#1082#1091#1084#1077#1085#1090' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnCancel: xbButton
    Left = 311
    Top = 88
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 2
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
end
frmCntNote.PRG                                                        4715object frmCntNote: TfrmCntNote
  Left = 25
  Top = 25
  Width = 510
  Height = 365
  ActiveControl = bDate
  Anchors = []
  Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1103' '#1082' '#1076#1086#1075#1086#1074#1086#1088#1091
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnCloseQuery = Form_CloseQuery
  DesignSize = (
    502
    338)
  PixelsPerInch = 96
  TextHeight = 13
  object bGrid1: xbGrid
    Left = 8
    Top = 10
    Width = 486
    Height = 148
    Anchors = [akLeft, akTop, akRight]
    AutoFitColWidths = True
    DataSource = DSR
    Flat = True
    FooterColor = clWindow
    FooterFont.Charset = DEFAULT_CHARSET
    FooterFont.Color = clWindowText
    FooterFont.Height = -11
    FooterFont.Name = 'MS Sans Serif'
    FooterFont.Style = []
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    IdGrid = '{6B9767CD-42C5-436A-931E-7FFA33FD0CF0}'
    Columns = <
      item
        EditButtons = <>
        FieldName = 'Date'
        Footers = <>
        ReadOnly = True
        Title.Alignment = taCenter
        Title.Caption = #1044#1072#1090#1072
        Width = 100
      end
      item
        EditButtons = <>
        FieldName = 'COMMENT'
        Footers = <>
        ReadOnly = True
        Title.Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1077
        Width = 370
      end>
  end
  object bDate: xbLabelEditCalend
    Left = 8
    Top = 167
    Width = 174
    Height = 21
    BorderColor = clWindowText
    Caption = #1044#1072#1090#1072
    CaptionAlignment = taLeftJustify
    DataField = 'DATE'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    EditMask = '!99/99/0000;1; '
    TabOrder = 1
    LabelWidth = 100
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    MaxLength = 10
    Text = '  /  /    '
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    VisibleButton = False
  end
  object bCOMMENT: xbLabelEdit
    Left = 9
    Top = 191
    Width = 485
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1077
    CaptionAlignment = taLeftJustify
    DataField = 'COMMENT'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 2
    LabelWidth = 100
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    PopupListClickKey = 0
    AddPrefixOnFilial = False
  end
  object bNOTE: xbMemo
    Left = 8
    Top = 215
    Width = 486
    Height = 82
    ColorFlat = clBtnFace
    ParentColor = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    TabOrder = 3
    Lines.Strings = (
      'bMemo1')
    Anchors = [akLeft, akTop, akRight, akBottom]
    BorderStyle = bsNone
    Color = clWhite
    DisabledColor = clInactiveBorder
    DisabledFontColor = 7368816
    DataField = 'NOTE'
    DataSource = DSR
  end
  object btnOK: xbButton
    Left = 417
    Top = 308
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1077#1085#1080#1077' '#1076#1086#1082#1091#1084#1077#1085#1090#1072' (F10)'
    Caption = #1054#1050
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 4
    ModalResult = 1
    OnClick = btnOK_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntNote'
    Active = False
    Left = 237
    Top = 107
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'CntNote'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 342
    Top = 114
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 434
    Top = 111
  end
end
frmCBookM.PRG                                                        12555object frmCBookM: TfrmCBookM
  Left = 25
  Top = 25
  Width = 550
  Height = 260
  Anchors = []
  BorderIcons = [biSystemMenu, biMinimize]
  Caption = #1044#1086#1075#1086#1074#1086#1088#1099' '#1089' '#1087#1072#1088#1090#1085#1077#1088#1072#1084#1080' - '#1057#1090#1088#1086#1082#1072' '#1089#1087#1077#1094#1080#1092#1080#1082#1072#1094#1080#1080
  Color = clBtnFace
  Constraints.MinHeight = 260
  Constraints.MinWidth = 550
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnInnerEvent = Form_InnerEvent
  DesignSize = (
    542
    226)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 6
    Top = 6
    Width = 529
    Height = 191
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1054#1073#1097#1077#1077
      DesignSize = (
        527
        169)
      object cmbItemTp: xbLabelCombo
        Left = 8
        Top = 5
        Width = 189
        Height = 24
        ParentBackGround = True
        Caption = #1058#1080#1087' '#1089#1090#1088#1086#1082#1080
        TabOrder = 0
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clBlack
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        ItemIndex = -1
        UseStandartHint = True
        OnSelect = cmbItemTp_Select
      end
      object lblGrop: xbLabelEditRefer
        Left = 8
        Top = 28
        Width = 188
        Height = 21
        BorderColor = clWindowText
        Caption = #1043#1088#1091#1087#1087#1072
        CaptionAlignment = taLeftJustify
        DataField = 'GRUP'
        DataSource = DSRCBookM
        ButtonsColor = clBtnFace
        EnabledColor = clWhite
        TabOrder = 1
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'GRUP'
        BeforeButtonClick = lblGrop_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ListDataSet = dsRef
        OutFieldsArray = 'CODE'
        PutFieldsArray = 'GRUP'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1075#1088#1091#1087#1087
        ReferWidth = 400
        xReferId = 0
        IsHarbourRefer = True
      end
      object rfAnalit: xbLabelEditAnalitRefer
        Left = 8
        Top = 76
        Width = 229
        Height = 21
        BorderColor = clWindowText
        Caption = #1040#1085#1072#1083#1080#1090#1080#1082#1072
        CaptionAlignment = taLeftJustify
        DataField = 'MDIM'
        DataSource = DSRCBookM
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 3
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'MDIM'
        EnabledEdit = False
        BeforeButtonClick = rfAnalit_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ListDataSet = DSANALIT
        OutFieldsArray = 'code'
        ReferCaption = #1057#1087#1080#1089#1086#1082
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = rfAnalit_Select
        MakeChecking = True
      end
      object bLabelEditCalc1: xbLabelEditCalc
        Left = 8
        Top = 99
        Width = 190
        Height = 21
        BorderColor = clWindowText
        Caption = #1050#1086#1083#1080#1095#1077#1089#1090#1074#1086
        CaptionAlignment = taLeftJustify
        DataField = 'KOL'
        DataSource = DSRCBookM
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 4
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLPLANIN: xbLabelEditCalc
        Left = 8
        Top = 122
        Width = 190
        Height = 21
        BorderColor = clWindowText
        Caption = #1062#1077#1085#1072
        CaptionAlignment = taLeftJustify
        DataField = 'CENAOUT'
        DataSource = DSRCBookM
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 6
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLabelEditCalc2: xbLabelEditCalc
        Left = 8
        Top = 145
        Width = 190
        Height = 21
        BorderColor = clWindowText
        Caption = #1057#1091#1084#1084#1072
        CaptionAlignment = taLeftJustify
        DataField = 'SUMOUT'
        DataSource = DSRCBookM
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 7
        LabelWidth = 90
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        VisibleButton = False
      end
      object bLabelEdit1: xbLabelEdit
        Left = 201
        Top = 99
        Width = 69
        Height = 21
        BorderColor = clWindowText
        Caption = #1045#1048
        CaptionAlignment = taLeftJustify
        DataField = 'EI'
        DataSource = DSRCBookM
        ButtonsColor = clBlack
        EnabledColor = clWhite
        TabOrder = 5
        LabelWidth = 18
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        MaxLength = 5
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object txtAnalit: xbEdit
        Left = 241
        Top = 76
        Width = 277
        Height = 21
        TabStop = False
        AutoSize = False
        BorderStyle = bsNone
        Color = clWhite
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ShowHint = True
        TabOrder = 8
        Text = 'txtAnalit'
        Anchors = [akLeft, akTop, akRight]
        EnabledColor = clBlack
        DataField = 'MDIM_NAME'
        DataSource = DSRCBookM
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object bEdit1: xbEdit
        Left = 200
        Top = 28
        Width = 318
        Height = 21
        TabStop = False
        AutoSize = False
        BorderStyle = bsNone
        Color = clWhite
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 9
        Anchors = [akLeft, akTop, akRight]
        EnabledColor = clBlack
        DataField = 'GR_NAME'
        DataSource = DSRCBookM
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
      object lblNnum: xbLabelEditRefer
        Left = 7
        Top = 52
        Width = 189
        Height = 21
        BorderColor = clWindowText
        Caption = #1053#1086#1084#1077#1085#1082#1083#1072#1090#1091#1088#1072
        CaptionAlignment = taLeftJustify
        DataField = 'NNUM'
        DataSource = DSRCBookM
        ButtonsColor = clBtnFace
        EnabledColor = clWhite
        TabOrder = 2
        LabelWidth = 91
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Text = '0'
        PopupListClickKey = 0
        AddPrefixOnFilial = False
        ClickKeysAlternate = 'F2'
        ClearFields = 'NNUM'
        BeforeButtonClick = lblNnum_BeforeButtonClick
        VisibleButton = True
        UseStandartHint = True
        FindFieldType = tfCharacterString
        ListDataSet = dsRef
        OutFieldsArray = 'GRUP;NNUM'
        PutFieldsArray = 'GRUP;NNUM'
        ReferCaption = #1057#1087#1088#1072#1074#1086#1095#1085#1080#1082' '#1072#1088#1090#1080#1082#1091#1083#1086#1074
        ReferWidth = 550
        xReferId = 0
        IsHarbourRefer = True
        OnSelect = lblNnum_Select
      end
      object bEdit2: xbEdit
        Left = 200
        Top = 51
        Width = 318
        Height = 21
        TabStop = False
        AutoSize = False
        BorderStyle = bsNone
        Color = clWhite
        Enabled = False
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clWindowText
        Font.Height = -11
        Font.Name = 'MS Sans Serif'
        Font.Style = []
        ParentFont = False
        ParentShowHint = False
        ReadOnly = True
        ShowHint = True
        TabOrder = 10
        Anchors = [akLeft, akTop, akRight]
        EnabledColor = clBlack
        DataField = 'NNUM_NAME'
        DataSource = DSRCBookM
        PopupListClickKey = 0
        AddPrefixOnFilial = False
      end
    end
  end
  object btnOk: xbButton
    Left = 382
    Top = 202
    Width = 75
    Height = 21
    Hint = 'C'#1086#1093#1088#1072#1085#1080#1090#1100' '#1089#1090#1088#1086#1082#1091' (F10)'
    Caption = #1054#1050
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 1
    ModalResult = 1
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object btnCancel: xbButton
    Left = 462
    Top = 202
    Width = 75
    Height = 21
    Hint = #1042#1099#1093#1086#1076' '#1080#1079' '#1089#1090#1088#1086#1082#1080'(Esc)'
    Caption = #1054#1090#1084#1077#1085#1072
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 2
    ModalResult = 2
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object BO: TBObject
    xbsClassPointer = 0
    Active = False
    Left = 333
    Top = 32
  end
  object DSCBookM: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    xbsClassName = 'CBookM'
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 405
    Top = 38
  end
  object DSRCBookM: xbADSDataSource
    DataSet = DSCBookM
    Left = 456
    Top = 41
  end
  object dsRef: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    OEMTranslate = False
    Left = 52
    Top = 186
  end
  object DSANALIT: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    FieldDefs = <>
    OEMTranslate = False
    Left = 249
    Top = 187
  end
end
frmRuk.PRG                                                            7671object frmRuk: TfrmRuk
  Left = 25
  Top = 25
  Width = 510
  Height = 265
  ActiveControl = bLRuk
  Anchors = []
  BorderIcons = [biSystemMenu]
  Caption = #1044#1072#1085#1085#1099#1077' '#1086' '#1087#1086#1076#1087#1080#1089#1103#1093
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnCloseQuery = Form_CloseQuery
  DesignSize = (
    502
    238)
  PixelsPerInch = 96
  TextHeight = 13
  object bDateRuk: xbLabelEditCalend
    Left = 8
    Top = 64
    Width = 224
    Height = 21
    BorderColor = clWindowText
    Caption = #1044#1072#1090#1072' '#1087#1086#1076#1087#1080#1089#1080
    CaptionAlignment = taLeftJustify
    DataField = 'DATE_RUK'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    EditMask = '!99/99/0000;1; '
    TabOrder = 2
    LabelWidth = 150
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    MaxLength = 10
    Text = '  /  /    '
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    VisibleButton = False
  end
  object btnOK: xbButton
    Left = 417
    Top = 208
    Width = 75
    Height = 21
    Hint = #1057#1086#1093#1088#1072#1085#1077#1085#1080#1077' '#1076#1086#1082#1091#1084#1077#1085#1090#1072' (F10)'
    Caption = #1054#1050
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ParentShowHint = False
    RoundedButton = True
    ShowHint = True
    TabOrder = 6
    ModalResult = 1
    OnClick = btnOK_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bLRuk: xbLabelEditRefer
    Left = 8
    Top = 14
    Width = 412
    Height = 23
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1060#1048#1054' '#1088#1091#1082#1086#1074#1086#1076#1080#1090#1077#1083#1103
    CaptionAlignment = taLeftJustify
    DataField = 'NAME_RUK'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 0
    LabelWidth = 150
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    ReadOnly = True
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    BeforeButtonClick = bLRuk_BeforeButtonClick
    VisibleButton = True
    UseStandartHint = True
    ColumnsTune = 
      'CODE;-1;50;1;-1;'#1058#1072#1073'.'#8470'|SHORTNAME;-1;120;1;-1;'#1060#1072#1084#1080#1083#1080#1103'|name1;-1;100' +
      ';1;-1;'#1048#1084#1103'|Name2;-1;150;1;-1;'#1054#1090#1095#1077#1089#1090#1074#1086
    FindFieldType = tfCharacterString
    ReferCaption = #1057#1087#1080#1089#1086#1082
    xReferId = 0
    IsHarbourRefer = True
    OnSelect = bLRuk_Select
  end
  object bLDolRuk: xbLabelEditRefer
    Left = 8
    Top = 39
    Width = 412
    Height = 23
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100' '#1088#1091#1082#1086#1074#1086#1076#1080#1090#1077#1083#1103
    CaptionAlignment = taLeftJustify
    DataField = 'DOL_RUK_FK'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 1
    LabelWidth = 150
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    ReadOnly = True
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    BeforeButtonClick = bLDolRuk_BeforeButtonClick
    VisibleButton = True
    UseStandartHint = True
    FindFieldType = tfCharacterString
    ReferCaption = #1057#1087#1080#1089#1086#1082
    xReferId = 0
    IsHarbourRefer = True
  end
  object bLIsp: xbLabelEditRefer
    Left = 8
    Top = 88
    Width = 412
    Height = 23
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1060#1048#1054' '#1080#1089#1087#1086#1083#1085#1080#1090#1077#1083#1103
    CaptionAlignment = taLeftJustify
    DataField = 'NAME_ISP'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 3
    LabelWidth = 150
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    ReadOnly = True
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    BeforeButtonClick = bLIsp_BeforeButtonClick
    VisibleButton = True
    UseStandartHint = True
    ColumnsTune = 
      'CODE;-1;50;1;-1;'#1058#1072#1073'.'#8470'|SHORTNAME;-1;120;1;-1;'#1060#1072#1084#1080#1083#1080#1103'|name1;-1;100' +
      ';1;-1;'#1048#1084#1103'|Name2;-1;150;1;-1;'#1054#1090#1095#1077#1089#1090#1074#1086
    FindFieldType = tfCharacterString
    ReferCaption = #1057#1087#1080#1089#1086#1082
    xReferId = 0
    IsHarbourRefer = True
    OnSelect = bLIsp_Select
  end
  object bLDolIsp: xbLabelEditRefer
    Left = 8
    Top = 113
    Width = 412
    Height = 23
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1044#1086#1083#1078#1085#1086#1089#1090#1100' '#1080#1089#1087#1086#1083#1085#1080#1090#1077#1083#1103
    CaptionAlignment = taLeftJustify
    DataField = 'DOL_ISP_FK'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    TabOrder = 4
    LabelWidth = 150
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    ReadOnly = True
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    BeforeButtonClick = bLDolIsp_BeforeButtonClick
    VisibleButton = True
    UseStandartHint = True
    FindFieldType = tfCharacterString
    ReferCaption = #1057#1087#1080#1089#1086#1082
    xReferId = 0
    IsHarbourRefer = True
  end
  object bDateIsp: xbLabelEditCalend
    Left = 8
    Top = 138
    Width = 224
    Height = 21
    BorderColor = clWindowText
    Caption = #1044#1072#1090#1072' '#1087#1086#1076#1087#1080#1089#1080
    CaptionAlignment = taLeftJustify
    DataField = 'DATE_ISP'
    DataSource = DSR
    ButtonsColor = clBlack
    EnabledColor = clWhite
    EditMask = '!99/99/0000;1; '
    TabOrder = 5
    LabelWidth = 150
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    MaxLength = 10
    Text = '  /  /    '
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    VisibleButton = False
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsContract'
    Active = False
    Left = 146
    Top = 192
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 188
    Top = 191
  end
  object DSR: xbADSDataSource
    DataSet = DS
    Left = 230
    Top = 190
  end
end
frmCnt_ChangeSpec.prg                                                 4449object frmCnt_ChangeSpec: TfrmCnt_ChangeSpec
  Left = 25
  Top = 25
  Width = 275
  Height = 200
  Anchors = []
  Caption = #1048#1079#1084#1077#1085#1077#1085#1080#1103' '#1082#1086#1085#1090#1088#1072#1082#1090#1072
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnClose = Form_Close
  OnCreate = Form_Create
  DesignSize = (
    267
    166)
  PixelsPerInch = 96
  TextHeight = 13
  object bLabel1: xbLabel
    Left = 8
    Top = 84
    Width = 51
    Height = 19
    Caption = #1054#1087#1080#1089#1072#1085#1080#1077' . . . . . '
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    ShowAccelChar = False
  end
  object bLabelCombo1: xbLabelCombo
    Left = 8
    Top = 8
    Width = 250
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    ParentBackGround = True
    Caption = #1058#1080#1087
    TabOrder = 0
    LabelWidth = 60
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Sorted = False
    EditColor = clWindow
    DisabledColor = clBlack
    DisabledFontColor = clBlack
    BorderColor = clBlack
    AutoComplete = False
    Style = csDropDownList
    CharCase = ecNormal
    DropDownCount = 0
    ItemHeight = 0
    MaxLength = 0
    Items.Strings = (
      #1048#1079#1084#1077#1085#1077#1085#1080#1077' '#1082#1086#1085#1090#1088#1072#1082#1090#1072
      #1048#1079#1084#1077#1085#1077#1085#1080#1077' '#1089#1074#1077#1076#1077#1085#1080#1081)
    ItemIndex = -1
    UseStandartHint = True
  end
  object bLabelEditCalc1: xbLabelEditCalc
    Left = 8
    Top = 33
    Width = 250
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1053#1086#1084#1077#1088
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    Enabled = False
    TabOrder = 1
    LabelWidth = 60
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    Text = '0'
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    EnabledEdit = False
    VisibleButton = False
  end
  object bLabelEditCalend1: xbLabelEditCalend
    Left = 8
    Top = 57
    Width = 250
    Height = 21
    Anchors = [akLeft, akTop, akRight]
    BorderColor = clWindowText
    Caption = #1044#1072#1090#1072
    CaptionAlignment = taLeftJustify
    ButtonsColor = clBlack
    EnabledColor = clWhite
    EditMask = '!99/99/0000;1; '
    TabOrder = 2
    LabelWidth = 60
    LabelFont.Charset = DEFAULT_CHARSET
    LabelFont.Color = clWindowText
    LabelFont.Height = -11
    LabelFont.Name = 'MS Sans Serif'
    LabelFont.Style = []
    MaxLength = 10
    Text = '  /  /    '
    PopupListClickKey = 0
    AddPrefixOnFilial = False
    ClickKeysAlternate = 'F2;Alt+Down'
    VisibleButton = False
  end
  object bMemo1: xbMemo
    Left = 68
    Top = 82
    Width = 190
    Height = 54
    ColorFlat = clBtnFace
    ParentColor = True
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    MaxLength = 254
    ParentFont = False
    TabOrder = 3
    Lines.Strings = (
      'bMemo1')
    Anchors = [akLeft, akTop, akRight, akBottom]
    BorderStyle = bsNone
    Color = clWhite
    DisabledColor = clInactiveBorder
    DisabledFontColor = 7368816
  end
  object bButton1: xbButton
    Left = 100
    Top = 141
    Width = 75
    Height = 21
    Caption = #1054#1050
    RoundedButton = True
    TabOrder = 4
    OnClick = bButton1_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object bButton2: xbButton
    Left = 183
    Top = 141
    Width = 75
    Height = 21
    Caption = #1054#1090#1084#1077#1085#1072
    RoundedButton = True
    TabOrder = 5
    OnClick = bButton2_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
end
frmCntUnloadRee.prg                                                   6549object KB: TKB
  Left = 25
  Top = 25
  Width = 650
  Height = 404
  ActiveControl = bGrid1
  Anchors = []
  Caption = #1053#1072#1089#1090#1088#1086#1081#1082#1072' '#1089#1080#1089#1090#1077#1084#1099' '#1050#1083#1080#1077#1085#1090'-'#1073#1072#1085#1082
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnInnerEvent = Form_InnerEvent
  DesignSize = (
    642
    370)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 8
    Top = 8
    Width = 626
    Height = 331
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    TabStop = False
    object TabSheet1: TTabSheet
      Caption = #1056#1077#1077#1089#1090#1088
      DesignSize = (
        624
        309)
      object bGrid1: xbGrid
        Left = 5
        Top = 34
        Width = 608
        Height = 267
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = ADS
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgConfirmDelete, dgCancelOnExit]
        ReadOnly = True
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        OnCellClick = bGrid1_CellClick
        IdGrid = '{F0033CB3-D996-4ae6-8E2E-DD0DE5AFAAA1}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'CodeFormat'
            Footers = <>
            Title.Caption = #1050#1086#1076
          end
          item
            EditButtons = <>
            FieldName = 'NameFormat'
            Footers = <>
            Title.Caption = #1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077' '#1092#1086#1088#1084#1072#1090#1072
            Width = 223
          end
          item
            EditButtons = <>
            FieldName = 'TP_NAME'
            Footers = <>
            Title.Caption = #1042#1080#1076' '#1087#1083#1072#1090#1077#1078#1085#1086#1075#1086' '#1076#1086#1082#1091#1084#1077#1085#1090#1072
            Width = 148
          end
          item
            EditButtons = <>
            FieldName = 'Prim'
            Footers = <>
            Title.Caption = #1055#1088#1080#1084#1077#1095#1072#1085#1080#1077
            Width = 93
          end
          item
            EditButtons = <>
            FieldName = 'IsUse'
            Footers = <>
            ReadOnly = False
            Title.Caption = #1048#1089#1087
            Width = 32
          end
          item
            EditButtons = <>
            FieldName = 'IsSystem'
            Footers = <>
            Title.Caption = #1057#1080#1089
            Width = 28
          end>
      end
      object LblFormat: xbLabelCombo
        Left = 8
        Top = 8
        Width = 270
        Height = 21
        ParentBackGround = True
        Caption = #1060#1086#1088#1084#1072#1090'          '
        TabOrder = 1
        LabelWidth = 60
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clWindowText
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        ItemIndex = -1
        UseStandartHint = True
        OnSelect = LblFormat_Select
      end
      object LblTp: xbLabelCombo
        Left = 296
        Top = 8
        Width = 320
        Height = 21
        ParentBackGround = True
        Caption = #1042#1080#1076' '#1087#1083#1072#1090#1077#1078#1085#1086#1075#1086' '#1076#1086#1082#1091#1084#1077#1085#1090#1072'          '
        TabOrder = 2
        LabelWidth = 150
        LabelFont.Charset = DEFAULT_CHARSET
        LabelFont.Color = clWindowText
        LabelFont.Height = -11
        LabelFont.Name = 'MS Sans Serif'
        LabelFont.Style = []
        Sorted = False
        EditColor = clWindow
        DisabledColor = clBlack
        DisabledFontColor = clBlack
        BorderColor = clWindowText
        AutoComplete = False
        Style = csDropDownList
        CharCase = ecNormal
        DropDownCount = 0
        ItemHeight = 0
        MaxLength = 0
        ItemIndex = -1
        UseStandartHint = True
        OnSelect = LblTp_Select
      end
    end
  end
  object bPopupButton1: xbPopupButton
    Left = 555
    Top = 344
    Width = 75
    Height = 20
    Caption = #1055#1088#1086#1075#1088#1072#1084#1084#1099
    Font.Charset = DEFAULT_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'MS Sans Serif'
    Font.Style = []
    ParentFont = False
    PopupMenu = pMNUFunction
    RoundedButton = True
    TabOrder = 1
    OnClick = bPopupButton1_Click
    Anchors = [akRight, akBottom]
    ButtonColor = clBlack
  end
  object ADS: xbADSDataSource
    DataSet = DS
    Left = 35
    Top = 109
  end
  object DS: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    AfterInsert = DS_AfterInsert
    OnUpdateRecord = DS_UpdateRecord
    Left = 78
    Top = 110
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntKB'
    Active = False
    Left = 119
    Top = 110
  end
  object pMNUFunction: xbPopupMenu
    Left = 432
    Top = 216
    object N30: TMenuItem
      Caption = #1055#1088#1086#1075#1088#1072#1084#1084#1072' '#1101#1082#1089#1087#1086#1088#1090#1072
      ShortCut = 32817
    end
    object N31: TMenuItem
      Caption = #1055#1088#1086#1075#1088#1072#1084#1084#1072' '#1080#1084#1087#1086#1088#1090#1072
      ShortCut = 32818
    end
  end
end
frmCntrParam.prg                                                      4968object frmCntrParam: TfrmCntrParam
  Left = 36
  Top = 80
  Width = 450
  Height = 300
  Anchors = []
  Caption = #1053#1072#1089#1090#1088#1086#1081#1082#1072' '#1087#1072#1088#1072#1084#1077#1090#1088#1086#1074' '#1076#1086#1075#1086#1074#1086#1088#1086#1074
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Visible = True
  WindowState = wsNormal
  OnClose = Form_Close
  OnCreate = Form_Create
  DesignSize = (
    442
    266)
  PixelsPerInch = 96
  TextHeight = 13
  object bPageControl1: xbPageControl
    Left = 6
    Top = 6
    Width = 430
    Height = 254
    ActivePage = TabSheet1
    Anchors = [akLeft, akTop, akRight, akBottom]
    TabOrder = 0
    OnChange = bPageControl1_Change
    object TabSheet1: TTabSheet
      Caption = #1047#1072#1082#1091#1087#1082#1080
      DesignSize = (
        428
        232)
      object bGrid1: xbGrid
        Left = 4
        Top = 4
        Width = 419
        Height = 223
        AllowedOperations = [alopUpdateEh]
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = dsr
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        VTitleMargin = 6
        IdGrid = '{5EB9465A-4B04-4144-97E0-F05B1B7058FC}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'CODE'
            Footers = <>
            ReadOnly = True
            Title.Caption = #1055#1072#1088#1072#1084#1077#1090#1088'|'#1050#1086#1076
            Width = 110
          end
          item
            EditButtons = <>
            FieldName = 'NAME'
            Footers = <>
            ReadOnly = True
            Title.Caption = #1055#1072#1088#1072#1084#1077#1090#1088'|'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
            Width = 191
          end
          item
            Checkboxes = True
            EditButtons = <>
            FieldName = 'IS_ENTER'
            Footers = <>
            Title.Caption = #1054#1073#1103#1079#1072#1090#1077#1083#1100#1085#1086
            Width = 101
          end>
      end
    end
    object TabSheet2: TTabSheet
      Caption = #1055#1088#1086#1076#1072#1078#1080
      DesignSize = (
        428
        232)
      object bGrid2: xbGrid
        Left = 4
        Top = 4
        Width = 419
        Height = 223
        AllowedOperations = [alopUpdateEh]
        Anchors = [akLeft, akTop, akRight, akBottom]
        AutoFitColWidths = True
        DataSource = dsr
        Flat = True
        FooterColor = clWindow
        FooterFont.Charset = DEFAULT_CHARSET
        FooterFont.Color = clWindowText
        FooterFont.Height = -11
        FooterFont.Name = 'MS Sans Serif'
        FooterFont.Style = []
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
        UseMultiTitle = True
        VTitleMargin = 6
        IdGrid = '{5EB9465A-4B04-4144-97E0-F05B1B7058FC}'
        Columns = <
          item
            EditButtons = <>
            FieldName = 'CODE'
            Footers = <>
            ReadOnly = True
            Title.Caption = #1055#1072#1088#1072#1084#1077#1090#1088'|'#1050#1086#1076
            Width = 110
          end
          item
            EditButtons = <>
            FieldName = 'NAME'
            Footers = <>
            ReadOnly = True
            Title.Caption = #1055#1072#1088#1072#1084#1077#1090#1088'|'#1053#1072#1080#1084#1077#1085#1086#1074#1072#1085#1080#1077
            Width = 191
          end
          item
            Checkboxes = True
            EditButtons = <>
            FieldName = 'IS_ENTER'
            Footers = <>
            Title.Caption = #1054#1073#1103#1079#1072#1090#1077#1083#1100#1085#1086
            Width = 102
          end>
      end
    end
  end
  object BO: TBObject
    xbsClassPointer = 0
    xbsClassName = 'clsCntr_Param'
    Active = False
    Left = 313
    Top = 149
  end
  object ds: TBestDataset
    xbsClassPointer = 0
    xbsContainerPointer = 0
    BObject = BO
    FieldDefs = <>
    OEMTranslate = False
    Left = 83
    Top = 121
  end
  object dsr: xbADSDataSource
    DataSet = ds
    Left = 232
    Top = 144
  end
end
