object mmDelo: TDeloMainMenu
  AutoMerge = false
  Images = fmMain.ilMainMenu
  OwnerDraw = True
  Left = 680
  Top = 32
  MainDFM = 'Каталог сведений о местонахождении документов'

object mnOrganiz: TDeloMenuItem
  Caption = 'Организации   '
  ImageIndex=0
  object mnNewReestr: TDeloMenuItem
    ImageIndex = 0
    Caption = 'Организации    '
    FunctionName = 'CallReestrForm'
    FunctionParameters =
    <
      item
        ParamType = 4
        ParamValue = 'fmReestr_New'
      end
      item
        ParamType = 4
        ParamValue = '$$DELO$$\source_d\reestr_new._d'
      end
      item
        ParamType = 4
        ParamValue = 'Организации'
      end
    >
  end
  object mnAllNewReestr: TDeloMenuItem
    ImageIndex = 0
    Caption = 'Полный список    '
    FunctionName = 'CallReestrForm'
    FunctionParameters =
    <
      item
        ParamType = 4
        ParamValue = 'fmAll_Reestr_New'
      end
      item
        ParamType = 4
        ParamValue = '$$DELO$$\source_d\all_reestr_new._d'
      end
      item
        ParamType = 4
        ParamValue = 'Полный список'
      end
    >
  end
end




  object mnExchange: TDeloMenuItem
    Caption = ' Обмен данными     '
    ImageIndex = 9
   object mnExport: TDeloMenuItem
    ImageIndex = 10
    Caption = 'Выгрузка    '
    FunctionName = 'CallForm'
    FunctionParameters =
    <
      item
        ParamType = 4
        ParamValue = 'fmImpExp'
      end
      item
        ParamType = 4
        ParamValue = '$$DELO$$\source_d\imp_exp_form._d'
      end
      item
        ParamType = 0
        ParamValue = '1'
      end
    >
   end


   object mnImport: TDeloMenuItem
    ImageIndex = 11
    Caption = 'Загрузка    '
    FunctionName = 'CallForm'
    FunctionParameters =
    <
      item
        ParamType = 4
        ParamValue = 'fmImport'
      end
      item
        ParamType = 4
        ParamValue = '$$DELO$$\source_d\imp_form._d'
      end
      item
        ParamType = 0
        ParamValue = '1'
      end
    >
   end
end

  object mnSprav: TDeloMenuItem
    Caption = 'Справочники    '
    ImageIndex = 7
    

    object smPref_Town: TDeloMenuItem
      Caption = 'Виды нас.пунктов'
      ImageIndex = 4
      FunctionName = 'CallSimpleForm'
      FunctionParameters =
      <
        item
          ParamType = 4
          ParamValue = 'dmDaic'
        end
        item
          ParamType = 4
          ParamValue = 'cdsPref_Town'
        end
        item
          ParamType = 4
          ParamValue = 'Виды населенных пунктов'
        end
        item
          ParamType = 7
        end
        item
          ParamType = 4
          ParamValue = 'fmAddPrefTown'
        end
        item
          ParamType = 4
          ParamValue = '$$DELO$$source_d\Pref_Town._d'
        end
      >
    end

    object smTown: TDeloMenuItem
      Caption = 'Нас.пункты'
      ImageIndex = 5
            FunctionName = 'CallSimpleForm'
      FunctionParameters =
      <
        item
          ParamType = 4
          ParamValue = 'dmDaic'
        end
        item
          ParamType = 4
          ParamValue = 'cdsTown_a'
        end
        item
          ParamType = 4
          ParamValue = 'Населенные пункты'
        end
        item
          ParamType = 7
        end
        item
          ParamType = 4
          ParamValue = 'fmOneRecord'
        end
        item
          ParamType = 4
          ParamValue = '$$DELO$$source_d\Town._d'
        end
      >
    end
  end
 

   object mnService: TDeloMenuItem
    Caption = 'Сервис'
    object mnSource_Archive: TDeloMenuItem
      Caption = 'Код архива   '
      Imageindex = 3
      FunctionName = 'Call_Simple_Modal_Form'
      FunctionParameters =
          <
          item
              ParamType = 4
              ParamValue = 'dmDaic.cdsSource_Archive'
          end
          item
              ParamType = 0
              ParamValue = '1'
          end
          item
              ParamValue = '$$DELO$$\source_d\Edit_ID_ARC._d'
              ParamType = 4
          end
          item
              ParamValue = 'fmEdit_ID_ARC'
              ParamType = 4
          end
          item
              ParamValue = 'Код архива'
              ParamType = 4
          end
          >
    end
  end


  object mnHelp: TDeloMenuItem
    Caption = 'Справка    '
    Visible = true
    ImageIndex = 6
    object mnHelpOnLine: TDeloMenuItem
      Caption = 'Помощь'
      ImageIndex = 18
      FunctionName = 'CallExternal'
      FunctionParameters =
      <
        item
          ParamType = 4
          ParamValue = ''
        end
        item
          ParamType = 4
          ParamValue = 'daic.hlp'
        end
        item
          ParamType = 4
          ParamValue = ''
        end
        item
          ParamType = 4
          ParamValue = '$$DELO$$'
        end
        item
          ParamType = 0
          ParamValue = '5'
        end
      >
    end

    object mnAbout: TDeloMenuItem
      Caption = 'О программе ...'
      ImageIndex = 8
      FunctionName = 'CallAbout'
    end
  end
end

