Статус клиентов

Семен Фишман

Завсегдатай
Статус клиентов

при импорте клиентов из экселя их статус определился как все. как их статус поменять на прочие?
Количество более 1000

Используемая программа: Бухгалтерия Стандарт
 
Последнее редактирование:
при импорте клиентов из экселя их статус определился как все. как их статус поменять на прочие?
Количество более 1000
Вот такая типовуха есть, в контекстное меню можно закинуть. На предыдущее значение вида контрагента "не смотрит".
Код:
ОПЕРАЦИЯ Контрагенты: Назначить вид контрагентов списком
  <---------------------------->
    Выберите необходимые виды:
       $выбор_гр["1"]("Покупатель")
       $выбор_гр["2"]("Поставщик")
       $выбор_гр["3"]("Прочая организация")
  <---------------------------->
ВЫЧИСЛИТЬ
  ЕСЛИ ИЗ_ЖУРНАЛА(с_клиенты) <> 1 ТО
    СТОП_ВСЕ
  КОНЕЦ_ЕСЛИ
  ВВЕСТИ
  ИСПОЛЬЗОВАТЬ("c_clients")
  выбранные_клиенты[""] = ПУСТО
  ЦИКЛ ИЗ_ЖУРНАЛА с_клиенты с
    выбранные_клиенты!с.код = с.код
  КОНЕЦ_ЦИКЛА
  СТАТУС("Удаление прежних настроек клиентов")
  ЦИКЛ ДЛЯ (инд ИЗ выбранные_клиенты)
    с_клиенты_в_группе.ОЧИСТИТЬ!(код_клиента = выбранные_клиенты!инд)
  КОНЕЦ_ЦИКЛА
  ЦИКЛ ДЛЯ (инд ИЗ выбранные_клиенты)
    СТАТУС("Назначение видов клиентов")
    ЕСЛИ выбор_гр!"1" = ДА ТО
      с_клиенты_в_группе.вид_клиента = клПокуп
      с_клиенты_в_группе.код_клиента = выбранные_клиенты!инд
      с_клиенты_в_группе.ДОБАВИТЬ(НЕТ)
    КОНЕЦ_ЕСЛИ
    ЕСЛИ выбор_гр!"2" = ДА ТО
      с_клиенты_в_группе.вид_клиента = клПост
      с_клиенты_в_группе.код_клиента = выбранные_клиенты!инд
      с_клиенты_в_группе.ДОБАВИТЬ(НЕТ)
    КОНЕЦ_ЕСЛИ
    ЕСЛИ выбор_гр!"3" = ДА ТО
      с_клиенты_в_группе.вид_клиента = клПрочий
      с_клиенты_в_группе.код_клиента = выбранные_клиенты!инд
      с_клиенты_в_группе.ДОБАВИТЬ(НЕТ)
    КОНЕЦ_ЕСЛИ
    ПОДТВЕРДИТЬ
    с.ОбновитьВид
  КОНЕЦ_ЦИКЛА
  с_клиенты.ОБНОВИТЬ
КОНЕЦ
 
Спасибо! Но эту возможность было бы не плохо включить и в стандартную поставку! - очевидна ее необходимость
 
Последнее редактирование:
Назад
Сверху