Отправка длинного смс

Всем привет!
(Благодаря некоторым пользователям форума) отправляю СМС следующим образом.
(Формат текстовый, хотелось бы его и оставить. Кириллица не нужна.)



    СерверMSComm.Output = "AT" + Символ(13);
    Отправлено    = Ложь;
    ВремяНачала    = ТекущаяУниверсальнаяДатаВМиллисекундах();
    Пока ТекущаяУниверсальнаяДатаВМиллисекундах() - ВремяНачала <= 10000 Цикл
        Если СокрЛП(СерверMSComm.Input) = "OK" Тогда
            Отправлено = Истина;
            Прервать;
        КонецЕсли;
    КонецЦикла;
    Если НЕ Отправлено Тогда
        СерверMSComm.PortOpen = Ложь;
        Возврат 2;
    КонецЕсли;





    СерверMSComm.Output = "AT+CMGF=1" + Символ(13) + Символ(10);
    Отправлено    = Ложь;
    ВремяНачала    = ТекущаяУниверсальнаяДатаВМиллисекундах();
    Пока ТекущаяУниверсальнаяДатаВМиллисекундах() - ВремяНачала <= 10000 Цикл
        Если СокрЛП(СерверMSComm.Input) = "OK" Тогда
            Отправлено = Истина;
            Прервать;
        КонецЕсли;
    КонецЦикла;
    Если НЕ Отправлено Тогда
        СерверMSComm.PortOpen = Ложь;
        Возврат 2;
    КонецЕсли;


    СерверMSComm.Output = "AT+CMGS="""+НомерТелефона+"""" + Символ(13) + Символ(10);

    Отправлено    = Ложь;
    ВремяНачала    = ТекущаяУниверсальнаяДатаВМиллисекундах();
    Пока ТекущаяУниверсальнаяДатаВМиллисекундах() - ВремяНачала <= 10000 Цикл
        Если СокрЛП(СерверMSComm.Input) = ">" Тогда
            Отправлено = Истина;
            Прервать;
        КонецЕсли;
    КонецЦикла;
    Если НЕ Отправлено Тогда
        СерверMSComm.PortOpen = Ложь;
        Возврат 2;
    КонецЕсли;



    СерверMSComm.Output = ТекстСМС + Символ(26)+   Символ(13);
    Отправлено    = Ложь;
    ВремяНачала    = ТекущаяУниверсальнаяДатаВМиллисекундах();
    Пока ТекущаяУниверсальнаяДатаВМиллисекундах() - ВремяНачала <= 10000 Цикл
        Если Прав(СокрЛП(СерверMSComm.Input), 2) = "OK" Тогда
            Отправлено = Истина;
            Прервать;
        КонецЕсли;
    КонецЦикла;
    Если НЕ Отправлено Тогда
        СерверMSComm.PortOpen = Ложь;
        Возврат 2;
    КонецЕсли;

Так вот хотелось бы не уходя от этого формата отправлять смс длиннее чем 160 символов.
Возможно ли это? Менее 160 отправляется хорошо.