v7: Движения документа - Код операции, как изменить?

Добрый день. Конфигурация комплексная, создаю обработкой документ Приходный кассовый ордер

                ДокПКО.Новый();

                ДокПКО.ДатаДок =                     ДатаФин;
                ДокПКО.Фирма =                         Док.Фирма;
             ДокПКО.Автор =                         глПользователь;
             ДокПКО.КодИБ =                         Константа.ПрефиксБазы;
             ДокПКО.ТипУчета =                     0;
             ДокПКО.ДокументОснование =             Док.ТекущийДокумент();
                ДокПКО.РСчет =                       Док.Касса;
              //ДокПКО.НомерПО =                  номера ПКО для этой кассы роли не играют, не наращиваем.
             ДокПКО.Счет =                       СчетПоКоду("361");
             ДокПКО.ВидНДС =                     Константа.БазНДС;
             Ст = ДокПКО.ВидНДС.Ставка.Получить(ДатаФин);
             ДокПКО.СуммаВал =                   Док.Итог("СуммаСНДС");
             ДокПКО.НДС =                          ДокПКО.СуммаВал * Ст / (1 + Ст);
             ДокПКО.НазначитьТип("Субконто1","Справочник.Контрагенты");
             ДокПКО.Субконто1 =                  Док.Контрагент;
             //ДокПКО.Субконто2 =
             //ДокПКО.Субконто3 =
             //ДокПКО.УказанаОтгрузка =
             //ДокПКО.СуммаО =
             //ДокПКО.НДСО =
             ДокПКО.ВидОплаты =                     Перечисление.ВидыОплаты.Оплата;
             //ДокПКО.СубконтоВалДохРасх =
             //ДокПКО.Приложение =
             ДокПКО.Кассир =                     Док.Касса.Кассир;
             ДокПКО.НеПроводить =                 0;
             ДокПКО.Основание =                     Док.ПредставлениеВида()+" "+Док.НомерДок+" ("+Док.ДатаДок+")";
             ДокПКО.ВидПриходаДенег =            Перечисление.ВидыПриходаДенег.ВыручкаОтРеализации;
             //ДокПКО.ДокументЗаказ =
             ДокПКО.ОперационнаяКР =             1;
             //ДокПКО.Ведомость =
             ДокПКО.ПринятоОт =                  Док.Контрагент.ПолнНаименование;
             ДокПКО.Договор =                     Док.Договор;
             ДокПКО.РежимОплаты =                 Перечисление.РежимыОплаты.КонкретныйДоговор;
             //ДокПКО.ВозвратАвансаДо0104 =
             //ДокПКО.СуммаВР =
             ДокПКО.ЭККА =                         Док.ЭККА;
             ДокПКО.ЧекПробит =                  Док.ЧекПробит;
             ДокПКО.НомерЧека =                  Док.НомерЧека;
             ДокПКО.ДатаЧека =                   Док.ДатаЧека;

             ИзмТип(ДокПКО);

             Попытка
                 ДокПКО.Записать();
                 фЗаписать = 1;
             Исключение
                 Сообщить(ДокПКО + " не записан", "!!!" );
                 фЗаписать = 0;
             КонецПопытки;
             Если фПроводить = 1 Тогда
                 ДокПКО.Провести();
             КонецЕсли;

Документ получается полностью идентичный тому если делать вручную за исключением движений, там код операции "О", Если делать вручную то "П". Как его изменить?)