Сервисы поддержки / Примеры / Разное / отправка оповещений смс email из РСбанка через RS-Alarm

отправка оповещений смс email из РСбанка через RS-Alarm

Автор:avtomatizacia
Дата:31.01.2007
Просмотров:2559
Скачиваний:738
Оценка:

, Оценок - 1

Скачать (rar-файл; Размер - 1215)

Обсудить в форуме

Описание

можно отправлять любые оповещения !
пример:
номер телефона хранится в userfield1 - счета
данный пример для postdoc.dbt
в начале import alarms;

во вложении:
аlarms.mac - отправка в рс-аларм
rsalarm.ini - пример ini

Текст примера

 if ( ( Режим == 3 ) and           /* Исправление док-та */
            (( Тип_документа == 1 ) or   /* В проведенные */
             ( Тип_документа == 2 )))     /* В Архивные*/
if  ( Режим == 3 )
acc.account=Документ.account_payer;
geteq(acc);
        	if (substr(acc.userfield1,1,2)=="+7")
        	msgsms="Дебет по счету: ";
                msgsms=msgsms+Документ.account_payer+" на сумму: "+Документ.sum +
                "  получатель: " +Документ.Receiver+"  назначение: "+Документ.ground;
		submits(acc.userfield1,msgsms);
        	end;

acc.account=Документ.account_Receiver;
geteq(acc);
        	if (substr(acc.userfield1,1,2)=="+7")
        	msgsms="Кредит по счету: ";
                msgsms=msgsms+Документ.account_Receiver+" на сумму: "+Документ.sum +
                "  плательщик: " +Документ.Payer+"  назначение: "+Документ.ground;
		submits(acc.userfield1,msgsms);
        	end;

        end;