AXForum  
Вернуться   AXForum > Microsoft Dynamics AX > DAX: Программирование
All
Забыли пароль?
Зарегистрироваться Правила Справка Пользователи Сообщения за день Поиск Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
Старый 27.04.2006, 15:57   #10  
Recoilme is offline
Recoilme
злыдень
Аватар для Recoilme
Злыдни
 
895 / 192 (8) ++++++
Регистрация: 18.06.2003
Не влез гад..
Это через джемини и CCAdo

PHP код:
    progr.setTotal(recCnt);
    
progr.setCaption('?????????????');

    
//?????????????
    
while select invclass
    
{
        
progr.incCount();
        
invClassId.insert(invClass.InventClassVarId,invClass.RecId);
        
descr strdel(invclass.Description,55,200);
        
maksskidka invclass.DiscLimit 100;
        
koefret invclass.RetailPricePctKoeff 100;
        if (
invclass.LMA_LevelNum == 1)
        {
            
adoRecordset  = new CCADORecordset();
            
adoRecordset.open(strfmt("select id from z_kategoria where id = %1",CNN::quoted(invclass.RecId)),cn#adOpenForwardOnly, #adLockReadOnly);
            
if (adoRecordset.EOF())
                
cn.execute(strfmt("INSERT INTO Z_KATEGORIA (KATEGORIA,ID,KOEFPRODAJ,MAKSSKIDKA) VALUES (%1,%2,%3,%4)",CNN::quoted(Descr),CNN::quoted(invclass.RecId),CNN::quoted(koefret),CNN::quoted(maksskidka)));
            else
                
cn.execute(strfmt("UPDATE Z_KATEGORIA SET KATEGORIA=%1,KOEFPRODAJ=%3,MAKSSKIDKA=%4 WHERE ID = %2",CNN::quoted(Descr),CNN::quoted(invclass.RecId),CNN::quoted(koefret),CNN::quoted(maksskidka)));
            
adoRecordset.close();
        }

        if (
invclass.LMA_LevelNum == 2)
        {
            
adoRecordset  = new CCADORecordset();
            
adoRecordset.open(strfmt("select id from Z_GRUPPA where id = %1",CNN::quoted(invclass.RecId)),cn#adOpenForwardOnly, #adLockReadOnly);
            
if (adoRecordset.EOF())
                
cn.execute(strfmt("INSERT INTO Z_GRUPPA (GRUPPA,ID,KOEFPRODAJ,MAKSSKIDKA) VALUES (%1,%2,%3,%4)",CNN::quoted(Descr),CNN::quoted(invclass.RecId),CNN::quoted(koefret),CNN::quoted(maksskidka)));
            else
                
cn.execute(strfmt("UPDATE Z_GRUPPA SET GRUPPA=%1,KOEFPRODAJ=%3,MAKSSKIDKA=%4 WHERE ID = %2",CNN::quoted(Descr),CNN::quoted(invclass.RecId),CNN::quoted(koefret),CNN::quoted(maksskidka)));
            
adoRecordset.close();
        }

        if (
invclass.LMA_LevelNum == 3)
        {
            
adoRecordset  = new CCADORecordset();
            
adoRecordset.open(strfmt("select id from Z_PODGRUPPA where id = %1",CNN::quoted(invclass.RecId)),cn#adOpenForwardOnly, #adLockReadOnly);
            
if (adoRecordset.EOF())
                
cn.execute(strfmt("INSERT INTO Z_PODGRUPPA (PODGRUPPA,ID,KOEFPRODAJ,MAKSSKIDKA) VALUES (%1,%2,%3,%4)",CNN::quoted(Descr),CNN::quoted(invclass.RecId),CNN::quoted(koefret),CNN::quoted(maksskidka)));
            else
                
cn.execute(strfmt("UPDATE Z_PODGRUPPA SET PODGRUPPA=%1,KOEFPRODAJ=%3,MAKSSKIDKA=%4 WHERE ID = %2",CNN::quoted(Descr),CNN::quoted(invclass.RecId),CNN::quoted(koefret),CNN::quoted(maksskidka)));
            
adoRecordset.close();
        }

    } 
__________________
Ибо зло есть лучшая сила человека. "Человек должен становиться все лучше и злее" -- так учу я. /Ф. Ницше/
 

Похожие темы
Тема Автор Раздел Ответов Посл. сообщение
Проблема с самописной DLL. VAlek DAX: Программирование 18 28.12.2008 10:37
Client Axapta 3.0 SP4 и Linux. Как запустить? Daiver DAX: Администрирование 10 28.06.2007 15:59
Вызов экспортируемой функции DLL Jabberwocky DAX: Программирование 8 12.09.2006 17:20
при вызове функции из своей DLL, вылетает ошибка Delfins DAX: Программирование 9 07.03.2006 19:29
Описание кода в Аксапте vasiliy DAX: Прочие вопросы 5 23.03.2005 12:16
Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход

Рейтинг@Mail.ru
Часовой пояс GMT +3, время: 16:55.