Различить буфер и фактическое количество в двух callback чтения

Учебные задачи

Из ABCDE сначала читаем AB в новый буфер, затем CDE в заранее подготовленные точки. Одна перегрузка даёт буфер, другая число 3.

Где и как запускать

Модуль пустой управляемой формы учебной внешней обработки; тонкий или толстый клиент Windows. Вставьте весь модуль. Это не серверный код.

Подготовка

  1. Создайте учебную внешнюю обработку с пустой управляемой основной формой. Создайте команду УчебныйПример и кнопку этой команды.

  2. В свойстве команды Действие выберите процедуру УчебныйПример. Вставьте полный приведённый модуль формы.

  3. Откройте EPF в тонком или толстом клиенте Windows и нажмите кнопку. Не переносите Ждать и Асинх в серверный общий модуль.

  4. Пример работает только со своими данными в памяти; записи в базу, файлы и сеть нет.

Перем Выполняется;

&НаКлиенте
Процедура УчебныйПример(Команда)
    Если Выполняется = Истина Тогда
        Сообщить("Дождитесь завершения предыдущей учебной цепочки");
        Возврат;
    КонецЕсли;
    Данные = ПолучитьДвоичныеДанныеИзСтроки("ABCDE", КодировкаТекста.UTF8, Ложь);
    Чтение = Новый ЧтениеДанных(Данные);
    Буфер = ПолучитьБуферДвоичныхДанныхИзСтроки("......", КодировкаТекста.UTF8, Ложь);
    Состояние = Новый Структура("Чтение,ЧтениеЗакрыто,Буфер", Чтение, Ложь, Буфер);
    Выполняется = Истина;
    Попытка
        Состояние.Чтение.НачатьЧтениеВБуферДвоичныхДанных(ОповещениеДля("ПослеНовогоБуфера", Состояние), 2);
    Исключение
        ОсвободитьУчебныеРесурсы(Состояние);
        Выполняется = Ложь;
        ВызватьИсключение;
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Функция ОповещениеДля(ИмяОбработчика, Состояние)
    Возврат Новый ОписаниеОповещения(ИмяОбработчика, ЭтотОбъект, Состояние,
        "ОшибкаОперации", ЭтотОбъект);
КонецФункции

&НаКлиенте
Процедура ОшибкаОперации(Ошибка, СтандартнаяОбработка, Состояние) Экспорт
    ОсвободитьУчебныеРесурсы(Состояние);
    Выполняется = Ложь;
    СтандартнаяОбработка = Истина;
КонецПроцедуры

&НаКлиенте
Процедура ОсвободитьУчебныеРесурсы(Состояние)
    Попытка
        Если Не Состояние.ЧтениеЗакрыто Тогда
            Состояние.Чтение.Закрыть();
            Состояние.ЧтениеЗакрыто = Истина;
        КонецЕсли;
    Исключение
        // Не заменяем первичную ошибку вторичной ошибкой освобождения ресурсов.
    КонецПопытки;
КонецПроцедуры

&НаКлиенте
Процедура ПослеНовогоБуфера(НовыйБуфер, Состояние) Экспорт
    Сообщить(НовыйБуфер.Размер = 2);
    Сообщить(ПолучитьСтрокуИзБуфераДвоичныхДанных(НовыйБуфер, КодировкаТекста.UTF8) = "AB");
    Состояние.Чтение.НачатьЧтениеВБуферДвоичныхДанных(ОповещениеДля("ПослеСуществующегоБуфера", Состояние), Состояние.Буфер, 1, 4);
КонецПроцедуры

&НаКлиенте
Процедура ПослеСуществующегоБуфера(РеальноеКоличество, Состояние) Экспорт
    Сообщить(РеальноеКоличество = 3);
    Сообщить(ПолучитьСтрокуИзБуфераДвоичныхДанных(Состояние.Буфер, КодировкаТекста.UTF8) = ".CDE..");
    Сообщить(Состояние.Чтение.ЧтениеЗавершено);
    Состояние.Чтение.НачатьЗакрытие(ОповещениеДля("ПослеЗакрытияЧтения", Состояние));
КонецПроцедуры

&НаКлиенте
Процедура ПослеЗакрытияЧтения(Состояние) Экспорт
    Состояние.ЧтениеЗакрыто = Истина;
    Выполняется = Ложь;
КонецПроцедуры

Разбор по шагам

  1. Первый вызов передаёт только количество 2. Callback получает НовыйБуфер, содержащий AB.

  2. Второй вызов передаёт существующий шестибайтный буфер, позицию 1 и запрошенные 4 байта.

  3. В источнике осталось 3, поэтому callback получает число РеальноеКоличество=3, а не сам буфер.

  4. Изменённый объект буфера доступен через Состояние.Буфер: он передавался в операцию и сохранил свою идентичность.

  5. Поскольку прочитано меньше запроса, ЧтениеЗавершено устанавливается в Истина.

Как проверить результат

  1. Новый буфер AB длиной 2; существующий .CDE.. длиной 6; реальное количество 3.

  2. Все пять сообщений Истина, а форма разрешает новый запуск после закрытия.

Ожидаемый результат

Показана реальная разница типов callback-результата у перегрузок одного метода.

На что обратить внимание

  1. Не копируйте сигнатуру ПослеНовогоБуфера для существующего буфера: первый аргумент будет Число.

  2. Не используйте всё запрошенное количество как доказательство успешного полного чтения.

  3. Позиции буфера байтовые и нулевые; остаточные точки не являются вновь прочитанными данными.

Пример не запускался в вашей базе. Перед применением проверьте его в указанном учебном контексте.

Не хотите разбираться сами?

Адаптируем это решение под вашу базу. Оценка бесплатно.

Оставить задачу

1С, 1С:Предприятие — товарные знаки ООО «1С». Сайт не является официальным представительством фирмы «1С» и не аффилирован с ней.