Москва

Россия

1. Необходима функция (Pascal или C) для преобразования входных данных (текст, номер телефона, тип кодирования) в PDU.
2. Необходима обратная функция: PDU -> (Текст, отправитель)

Т.е.

function GetPDU(const AText, APhone: string; ACodeType: integer; const ASMSC: string; const ADelivery: boolean): string;

AText - текст сообщения;

APhone - номер телефона получателя;

ACodeType - тип кодирования
 =0 - 7 битная кодировка
 =1 - UNICODE

ASMSC - номер SMS центра; может быть пустым;

ADelivery - подтверждение доставки
 =false - без подтверждения
 =true - с подтверждением

Result - строка PDU 


function DecodePDU(var AText, APhone: string; var ACodeType: integer; var ADelivery: boolean): integer;

AText - текст полученного сообщения;

APhone - номер телефона отправителя;

ACodeType - тип кодирования полученного сообщения
 =0 - 7 битная кодировка
 =1 - UNICODE

ADelivery - полученная сообщение - подтверждение доставки
 =false - обычное сообщение 
 =true в этом случае - в параметре AText - дата и время доставки (в любом предопредленном формате, например 2006.10.18 08:32:57)

Result - код ошибки
 =0 - без ошибки
 >0 - ошибка - код ошибки

Максим maxgromoff

Функция по формированию SMS PDU