Оборотно-сальдовая ведомость??! - DAX: Прочие вопросы

Silence · 04.12.2007, 11:47

Уважаемые коллеги, подскажите:
Есть форма и отчет "оборотно-сальдовая ведомость" по поставщику, так вот они показывают разные данные. Как понять какие данные верные? Да и верные ли?

ЗЫ. А может у кого завалялся ПРАВИЛЬНЫЙ запросик ?

Damn · 04.12.2007, 11:59

А как вы валюту указываете в диалогах ? Основную валюту компании ставите ?
В этом случае в "отчёте" идёт фильтрация операций поставщика только по этой валюте, а в "запросе" берутся операции по всем валютам, просто сальдо и обороты отображаются в основной валюте.
Тут в диалоге "отчёта" главное не заполнять поле "Валюта" когда "Тип валюты" - Основная.

Silence · 04.12.2007, 12:20

Цитата:

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

А как вы валюту указываете в диалогах ? Основную валюту компании ставите ?
В этом случае в "отчёте" идёт фильтрация операций поставщика только по этой валюте, а в "запросе" берутся операции по всем валютам, просто сальдо и обороты отображаются в основной валюте.
Тут в диалоге "отчёта" главное не заполнять поле "Валюта" когда "Тип валюты" - Основная.

И там и там поле "тип валюты" - "Основная", поле "Валюта" не заполняется.

Есть очень серьезные подозрения, что данные кривые. Для проверки своих подозрений мне и нужно понять, чему можно больше доверять - отчету или запросу?

Silence · 04.12.2007, 13:06

Правильно ли следущее?

X++:

VendTrans checkVendTrans()
{
    VendLedgerAccounts  vendLedgerAccounts;
    ;

    while select vendTrans
        where vendTrans.TransDate <= toDate
        {
            select firstOnly SumAccount from vendLedgerAccounts
                    where vendLedgerAccounts.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts.AccountCode    == TableGroupAll::Table
                       && vendLedgerAccounts.Num            == vendTrans.AccountNum;

            if (! vendLedgerAccounts.SumAccount)
            {
                select firstOnly SumAccount from vendLedgerAccounts
                    where vendLedgerAccounts.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts.AccountCode    == TableGroupAll::GroupId
                       && vendLedgerAccounts.Num            == VendTable::find(vendTrans.AccountNum).VendGroup;
            }

            if (! vendLedgerAccounts.SumAccount)
            {
                select firstOnly SumAccount from vendLedgerAccounts
                    where vendLedgerAccounts.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts.AccountCode    == TableGroupAll::All
                       && vendLedgerAccounts.SumAccount     == accountNum;
            }

            if (vendLedgerAccounts.SumAccount == accountNum)
                amountMST += vendTrans.AmountMST;
    }

    return vendTrans;
}

Такой запрос выдаёт тот же результат, что и запрос "Оборотно-сальдовая ведомость".

UNRW · 04.12.2007, 13:57

Если вы хотите просуммировать проводки по поставщику по бух счету, то так делать нельзя. Да - так делает отчет в расчетах с поставщиками, но в VendTrans не всегда заполняется поле PostingProfile, тогда система берет profile по-умолчанию из параметров модуля(Ax 3 sp 3) .

К тому же по множеству поставщиков и по множеству счетов это может очень долго работать

Silence · 04.12.2007, 14:00

Цитата:

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

Если вы хотите просуммировать проводки по поставщику по бух счету, то так делать нельзя. Да - так делает отчет в расчетах с поставщиками, но в VendTrans не всегда заполняется поле PostingProfile, тогда система берет profile по-умолчанию из параметров модуля(Ax 3 sp 3) .

К тому же по множеству поставщиков и по множеству счетов это может очень долго работать

А как нужно?

ЗЫ. Работает не долго, база маленькая.

UNRW · 04.12.2007, 16:39

желательно одим запросом

"правильный" счет - в проводке по ГК

UNRW · 04.12.2007, 16:42

мы, например, в проводку по ГК пишем аналитику с кодом контрагента

Silence · 04.12.2007, 16:59

Цитата:

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

желательно одим запросом : )

Конечно желательно

Цитата:

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

"правильный" счет - в проводке по ГК : )

Спасибо.

Цитата:

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

мы, например, в проводку по ГК пишем аналитику с кодом контрагента

Хм... К сожалению это не мне решать

UNRW · 04.12.2007, 17:20

вы посмотрите есть ли у вас в vendTrans пустые PostingProfile

а еще можно попробовать так

X++:

VendTrans checkVendTrans()
{
    VendLedgerAccounts  vendLedgerAccounts;
    ;

    while select vendTrans
        where vendTrans.TransDate <= toDate     
            outer join SumAccount from vendLedgerAccounts1
                    where vendLedgerAccounts1.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts1.AccountCode    == TableGroupAll::Table
                       && vendLedgerAccounts1.Num            == vendTrans.AccountNum
                outer join  SumAccount from vendLedgerAccounts2
                    where vendLedgerAccounts2.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts2.AccountCode    == TableGroupAll::GroupId
                       && vendLedgerAccounts2.Num            == VendTable::find(vendTrans.AccountNum).VendGroup
            outer join SumAccount from vendLedgerAccounts3
                    where vendLedgerAccounts3.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts3.AccountCode    == TableGroupAll::All
                       && vendLedgerAccounts3.SumAccount     == accountNum;
    {
      ....
    }

}

но так я и сам не пробовал
думаю Аксапта не потянет

Silence · 04.12.2007, 17:43

Цитата:

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

вы посмотрите есть ли у вас в vendTrans пустые PostingProfile

Пустых нету, но есть измененные.

Цитата:

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

а еще можно попробовать так

X++:

                outer join  SumAccount from vendLedgerAccounts2
                    where vendLedgerAccounts2.PostingProfile == vendTrans.PostingProfile
                       && vendLedgerAccounts2.AccountCode    == TableGroupAll::GroupId
                       && vendLedgerAccounts2.Num            == VendTable::find(vendTrans.AccountNum).VendGroup

но так я и сам не пробовал
думаю Аксапта не потянет

Не потянет

X++:

vendLedgerAccounts2.Num == VendTable::find(vendTrans.AccountNum).VendGroup

Низзя в селекте условия указывать

Да и как еще до выборки Вы пытаетесь достать данные из таблицы которая должна выбираться.
Нда, сам не понял что написал

Но думаю вы меня правильно поймете.

Silence · 05.12.2007, 13:04

Цитата:

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

вот так работает сцуко быстро

И правда быстро. Спасибо.

Цитата:

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

при условии что профиля и группы не менялись в настройках системы даже должен условно правильный результат дать

Цитата:

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

Пустых нету, но есть измененные.

Только не совсем правильно, так работает лучше:

X++:

                    where vendLedgerAccounts.PostingProfile == vendTrans.PostingProfile
                       && ((vendLedgerAccounts.AccountCode  == TableGroupAll::Table
                       && vendLedgerAccounts.Num            == vendTrans.AccountNum
                       && vendLedgerAccounts.SumAccount     == "60.02.0001")

                       || (vendLedgerAccounts.AccountCode   == TableGroupAll::GroupId
                       && vendLedgerAccounts.Num            == vendTable.VendGroup)

                       || (vendLedgerAccounts.AccountCode   == TableGroupAll::All
                       && vendLedgerAccounts.SumAccount     == "60.02.0001"))

По крайней мере результат идентичен результату запроса "Оборотно-сальдовая ведомость" по поставщику.

UNRW · 05.12.2007, 11:52

вот так работает сцуко быстро

X++:

static void DK_vendSaldoByProfiles(Args _args)
{
    VendLedgerAccounts  vendLedgerAccounts;
    VendTrans           vendTrans;
    VendTable           vendTable;
    Amount              bablosDeb;
    Amount              bablosCred;
    TransDate           transDate;
    ;

    transDate = 30\09\2007;

    while select vendTable
        group by VendGroup
        join sum (amountMst) from vendTrans
            group by AccountNum
                where
                      vendTrans.TransDate  <= transDate
                   && vendTrans.AccountNum == vendTable.AccountNum
            join vendLedgerAccounts
                    where
                          vendLedgerAccounts.SumAccount     == "60.02.0001"
                       && vendLedgerAccounts.PostingProfile == vendTrans.PostingProfile
                       && (
                              (
                                  vendLedgerAccounts.AccountCode    == TableGroupAll::Table
                               && vendLedgerAccounts.Num            == vendTrans.AccountNum
                              )
                          ||  (
                                  vendLedgerAccounts.AccountCode    == TableGroupAll::GroupId
                               && vendLedgerAccounts.Num            == vendTable.VendGroup
                              )
                          ||
                              (
                                  vendLedgerAccounts.AccountCode    == TableGroupAll::All
                              )
                          )
    {

        if (vendTrans.AmountMST > 0)
            bablosDeb += vendTrans.AmountMST;
        else
            bablosCred += vendTrans.AmountMST;
    }

    info(strfmt("%1   %2   ", bablosDeb, bablosCred));

}

при условии что профиля и группы не менялись в настройках системы
даже должен условно правильный результат дать

Silence · 05.12.2007, 15:54

Извиняюсь, не догнал сразу

Этот код вообще не работоспособен из-за условия ИЛИ.
Например:

Цитата:

PostingProfile = Table, SumAccount = Счет1
PostingProfile = All, SumAccount = Счет2

Нам нужны все проводки по счету "Счет2", но Ваш запрос увидев, что таковой существует не обратит внимания на то, что есть еще и "Счет1" который не должен обсчитываться. И соответственно посчитает эту строку.

ЗЫ. А так хорошо все начиналось...

UNRW · 06.12.2007, 10:38

Цитата:

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

Извиняюсь, не догнал сразу

Этот код вообще не работоспособен из-за условия ИЛИ.
Например:

Нам нужны все проводки по счету "Счет2", но Ваш запрос увидев, что таковой существует не обратит внимания на то, что есть еще и "Счет1" который не должен обсчитываться. И соответственно посчитает эту строку.

ЗЫ. А так хорошо все начиналось...

разве? счет ведь вынесен за общую скобку

Silence · 06.12.2007, 11:14

Цитата:

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

разве? счет ведь вынесен за общую скобку

Правильно. Если есть не одна запись в "vendLedgerAccounts", и даже если там присутствует нужный счет, то запись не должна выбираться.

Хммм... По крайней мере у нас.

UNRW · 11.12.2007, 14:54

оказалось косяпта лажается на строках

X++:

                                  vendLedgerAccounts.AccountCode    == TableGroupAll::Table
                               && vendLedgerAccounts.Num            == vendTrans.AccountNum

vendLedgerAccounts.Num
vendTrans.AccountNum

имеют выравнивания строки Left и Right

и SQL сервер не находит совпадений

можно попробовать так:

X++:

                                  vendLedgerAccounts.AccountCode    == TableGroupAll::Table
                               && vendLedgerAccounts.Num           like vendTrans.AccountNum

правда like в этом запросе не гуд
надо бы сделать LTRIM для обоих полей (Аксапта не умеет так делать), но тем не менее:

X++:

static void DK_vendSaldoByProfiles(Args _args)
{
    VendLedgerAccounts  vendLedgerAccounts;
    VendTrans           vendTrans;
    VendTable           vendTable;
    Amount              bablosDeb;
    Amount              bablosCred;
    TransDate           transDate;
    ;

    transDate = 30\09\2007;

    while select vendTable
        group by VendGroup
        join sum (amountMst) from vendTrans
            group by AccountNum
                where
                      vendTrans.TransDate  <= transDate
                   && vendTrans.AccountNum == vendTable.AccountNum
            join vendLedgerAccounts
                    where
                          vendLedgerAccounts.SumAccount     == "60.02.0001"
                       && vendLedgerAccounts.PostingProfile == vendTrans.PostingProfile
                       && (
                              (
                                  vendLedgerAccounts.AccountCode    == TableGroupAll::Table
                               && vendLedgerAccounts.Num            like vendTrans.AccountNum
                              )
                          ||  (
                                  vendLedgerAccounts.AccountCode    == TableGroupAll::GroupId
                               && vendLedgerAccounts.Num            == vendTable.VendGroup
                              )
                          ||
                              (
                                  vendLedgerAccounts.AccountCode    == TableGroupAll::All
                              )
                          )
    {

        if (vendTrans.AmountMST > 0)
            bablosDeb += vendTrans.AmountMST;
        else
            bablosCred += vendTrans.AmountMST;
    }

    info(strfmt("%1   %2   ", bablosDeb, bablosCred));

}

Похожие темы
Тема	Автор	Раздел	Ответов	Посл. сообщение
Оборотно-сальдовая ведомость по складу	miklenew	DAX: Функционал	15	29.03.2010 12:27
Оборотно-сальдовая ведомость по клиентам	kvan	DAX: Программирование	11	30.11.2007 12:00
Оборотно-сальдовая ведомость (или проводки по складу)	oleg_e	DAX: Функционал	5	01.10.2007 13:39
Оборотно-вальдовая ведомость (поставщики)	G.Menshikh	DAX: Программирование	4	06.12.2006 10:19
Оборотно-сальдовая ведомость.	gaenar	DAX: База знаний и проекты	1	07.10.2005 19:47