Есть вопрос

[CRASH_505]

вот это ?
SysOperationProgress sop;
int cntItems;

;
delete_from tmpTable;

select count(RecId) from tmpTable;
cntItems = tmpTable.RecId;



sop = SysOperationProgress::newGeneral('','',cntItems);
далее идеt while select - условие
цикл
и sop.incCount();

[lev]

после

sop = SysOperationProgress::newGeneral('','',cntItems);

нужно сразу sop.update(true); - это ускорит работу, не будет вызываться апдейт прогрессбара для каждой строки.
sop.incCount() - нужно писать сразу после sop.setText() внутри цикла

[CRASH_505]

Ща попробую

[lev]

Ещё раз посмотрел код. Увидел что временная таблица у вас заполняется в цикле. а Вы ищите в ней записи до цикла, конечно же там будет ноль записей. а так как при инициализации sop у Вас подставляется нулевое значение, то и бегунок не заполняется.

[CRASH_505]

так значит мне надо сделать вот так select count(recid)from Prodjournaltable;
cntItems = ProdJournalTable.RecId;



sop = SysOperationProgress::newGeneral('','',cntItems); или как то по другому

[lev]

Цитата:

Сообщение от CRASH_505

так значит мне надо сделать вот так select count(recid)from Prodjournaltable;
cntItems = ProdJournalTable.RecId;



sop = SysOperationProgress::newGeneral('','',cntItems); или как то по другому

это зависит от того, по какой таблице\таблицам у Вас основной цикл...
думаю в вашем случае что то типа:

select  count(RecId)
    from ProdJournalTable
    where
        ProdJournalTable.Posted==NOYES::No
    exists join TableId from ProdJournalRoute
    where ProdJournalRoute.JournalId==ProdJournalTable.JournalId&&
          (ProdJournalRoute.WrkCtrId == '113' ||
           ProdJournalRoute.WrkCtrId == '135');

cntItems = ProdJournalTable.RecId;
....

только учтите что это может увеличить время работы функции.. если время выполнения критично, можно обойтись и без заполнения строки состояния, а просто писать что типа "Просмотрено столько то строк"... Я обычно жертвую красотой ради производительности

[Alex_KD]

Вот это смотрите и изучайте....
\Forms\tutorial_Progress

[lev]

Цитата:

Сообщение от Alex_KD

Вот это смотрите и изучайте....
\Forms\tutorial_Progress

я уже в начале темы советовал эту форму но судя по вопросам человека, он пока не сможет посмотреть и разобраться (не хочу ни кого обидеть).

[CRASH_505]

Большое спасибо все работает отлично. ВСЕМ СПАСИБО

[CRASH_505]

ВСЕМ СПАСИБО ДО ЗАВТРА

[CRASH_505]

Спасибо ща попробую

[CRASH_505]

Все норм заработало но Поле Itemid повторяеться так как количество Qty разные суммы и занимает много места, как мне их соеденить через destinct.

[lev]

Цитата:

Сообщение от CRASH_505

Все норм заработало но Поле Itemid повторяеться так как количество Qty разные суммы и занимает много места, как мне их соеденить через destinct.

Вообще не понял суть проблемы

[CRASH_505]

Цитата:

Сообщение от lev

Вообще не понял суть проблемы

Не все норм просто я ступил немного.Во смотрите что у меня получилось

PHP код:

{
    ProdJournalTable ProdJournalTable;
    ProdJournalRoute ProdJournalRoute;
    ProdJournalRoute ProdJournalRoute_1;
    ProdJournalRoute ProdJOurnalRoute_2;
    TmpProdJournalRouteOutTime tmpTable;
    ProdTable  ProdTable;
    int nDay;
    SysOperationProgress    sop;
    int                     cntItems;
    date fromDate = 01\09\2008;
    date toDate = 31\09\2008;
    ;
    delete_from tmpTable;
    
 
        
        select count (Recid)from Prodjournaltable
    exists join ProdJournalRoute
    where ProdJournalRoute.JournalId==ProdJournalTable.JournalId&&
          ProdJournalTable.Createddate >= fromdate &&
         (ProdJournalRoute.WrkCtrId == '113' ||
          ProdJournalRoute.WrkCtrId == '135');

        cntItems = ProdJournalTable.RecId;

    sop = SysOperationProgress::newGeneral('','',cntItems); // преоброзование шкалы


    while select  createddate,journalid,posted
    from ProdJournalTable
    exists join ProdJournalRoute
    where ProdJournalRoute.JournalId==ProdJournalTable.JournalId&&
          ProdJournalTable.Createddate >= fromdate &&
         (ProdJournalRoute.WrkCtrId == '113' ||
          ProdJournalRoute.WrkCtrId == '135')
    {
        select ProdJournalRoute_1
        order by oprnum desc
        where
            ProdJournalRoute_1.JournalId == ProdJournalTable.JournalId;

        select ProdTable
        where
            ProdTable.ProdId == ProdJournalRoute_1.ProdId;

        select  ProdJournalRoute_2
        where
                ProdJournalRoute_2.OprId like '045*' &&
                ProdJournalRoute_2.JournalId == ProdJournalTable.JournalId;




       sop.incCount();

                info
        (
            strfmt("%1,%2,%3",
            ProdJournalTable.createdDate,
            ProdJournalTable.JournalId,
            toDay() - ProdJournalTable.createdDate)
        );



        tmpTable.clear();

        tmpTable.ITEMID =ProdTable.ItemId;
        tmpTable.WRKCTRID=ProdjournalRoute_1.WrkCtrId;
        tmpTable.Qty=ProdJournalRoute_1.QtyGood+ProdJournalRoute_1.QtyError;
        tmpTable.Days= toDay() - ProdJournalTable.createdDate;
        tmpTable.Normal=noYes::No;


       if ( tmpTable.WRKCTRID == '135')
        {
            nDay = 1;
        }
        if ( tmpTable.WRKCTRID == '113')
        {
            if (ProdJournalRoute_2 != NULL)
            {
                 nDay=5;
            }
            else
            {
                nDay = 3;
            }
        }

        if (tmpTable.Days > nDay)
            tmpTable.Normal=NoYes::No;
        else
            tmpTable.Normal=NoYes::Yes ;

        tmpTable.insert();
    }

} 


[coolibin]

Цитата:

Сообщение от CRASH_505

Все норм заработало но Поле Itemid повторяеться так как количество Qty разные суммы и занимает много места, как мне их соеденить через destinct.

тактамэтоеслизаработалотонадобыкакнибудьподругомуапотомобрезатьивсе

[HorrR]

coolibin, не будьте злюкой, может у человек облегченная форма аграфии - апунктия, какая-нибудь.
CRASH_505, вы ведь явно не ItemId имели в виду, так ведь? В любом случае используйте group by. И вот ещё, если начали обучение, постарайтесь, если есть возможность делать это постепенно, по системе, если надо, напишите в личку почту - вышлю пару книг в электронке для начинающих.

З.Ы Тема плавно переростает в CRASH_505_спаммер_блог)

[CRASH_505]

CRASH_505, вы ведь явно не ItemId имели в виду, так ведь? В любом случае используйте group by. И вот ещё, если начали обучение, постарайтесь, если есть возможность делать это постепенно, по системе, если надо, напишите в личку почту - вышлю пару книг в электронке для начинающих.

Я тока начинающий не судите строго ОК. А за книги если пришлете спасибо CRASH_505@mail.ru

[HorrR]

Ого, прогресс на лицо, заюзан тег xpp!

[HorrR]

Так я же не сужу ваши профессиональные какчества, я сам ламер, мне как-то и судить не полагается, обьектом шуток является ваш стиль изложения, вот и все) Книги пришлю.

[CRASH_505]

Цитата:

Сообщение от HorrR

Так я же не сужу ваши профессиональные какчества, я сам ламер, мне как-то и судить не полагается, обьектом шуток является ваш стиль изложения, вот и все) Книги пришлю.

Буду ждать спасибо