Joined: 30 Jan 2003 Posts: 130 Location: Поздняков А.Г. Occupation: ООО "ПИК" Interests: г. Ачинск
Posted: 16 Aug 2007 12:10 Post subject: Опять про ДТС КТС......(help)
Доброго времени суток всем !!!!!
и вам Костя !!!!!!!
Тока не пинайте ногами понимаю тема избитая донельзя
и никуда не посылайте нашел все что нужно на форуме тока ни фига не робит короче треба помощь
Плагин в Бэст5 (АРМ гл.бух. по CTRL+F5)
В плагине нужно получать сальдо по счетам (с аналит. и без)
типа сальдо на дату
допустим ДТС 501 "30/06/2007"
Обьясните функцию aOb :=Saldo({'00','10','','01','11'}[nFunc],aPar )
1. С первым массивом все понятно
2. nFunc - тоже все понятно
массив aPar не понятно что за чем идет и в каком виде
я так понимаю
aPar[1]- номер счета (а если он аналитический где аналитику поставить)
aPar[2]- дата чего? (начало или конец периода)
aPar[3]- дата тот же вопрос
тока к исходникам не отправляйте все что выше написано выцарапано из них и то люди помогли
желательно весь массив подробно что,где,зачем
RBalans() - почему то не работает на ней вылетает с ошибкой "переменная не определена " очень странно
И если можно для примера код (так чисто для ламеров по простому )
получения ДТС по 501 ну к примеру
nFunc - 1,2,4,5 // ДТС0 КТС0 ДТ КТ
6 или 7 ДТКТ
Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
Posted: 16 Aug 2007 14:04 Post subject:
А Вам не проще свой цикл написать по базе и посчитать сальдо ?
В явном виде массив aPar не объявляется, а в неявном текст очень
длинный.
Могу выложить если желание его анализировать вернется.
Это собственно организация выполнения внутреннего языка
Анализируется текст посимвольно и пихается это дело в aPar
Думаю то, что лежит в скобках функции это и есть элементы aPar
собственно
По поводу объявления переменных
ВОт какие переменные объявляются
Code:
STATIC FUNCTION Exe_Function()
LOCAL nFunc := nTok, aPar := {}, nRez := 0, dDate, dDate1,nI:=1,;
aType, nLen := 0, aVarPos
MEMVAR dSet_Date, dSet_Date0 // границы периода
Joined: 30 Jan 2003 Posts: 130 Location: Поздняков А.Г. Occupation: ООО "ПИК" Interests: г. Ачинск
Posted: 16 Aug 2007 18:05 Post subject:
Да уж ....
диалог типа кто в лес кто по дрова такое чувство что вопрос вообще не читали ну да ладно если функция Saldo() такой большой секрет компании ООО "БЭСТ" то бог с ней тогда какой смысл её выкладывать
цикл по базе всегда сделать успеется правда придеться еще и во вступительный баланс лезть чтобы сальдо на начало выдернуть и тока потом циклы делать просто не хотелось колесо изобретать
если его уже изобрели но что ж спасибо огромное что не отказали как говориться (узнаю Бэст все так просто возьми да напиши свои функции)
Тема закрыта модератор удаляйте
С Уважением!!!
Алек
Joined: 26 Jul 2002 Posts: 975 Location: Титов Александр Александрович Occupation: Компания БЭСТ Interests: Москва
Posted: 16 Aug 2007 19:57 Post subject: Re: Опять про ДТС КТС......(help)
Foreman wrote:
Плагин в Бэст5 (АРМ гл.бух. по CTRL+F5)
В плагине нужно получать сальдо по счетам (с аналит. и без)
типа сальдо на дату
допустим ДТС 501 "30/06/2007"
Обьясните функцию aOb :=Saldo({'00','10','','01','11'}[nFunc],aPar )
1. С первым массивом все понятно
2. nFunc - тоже все понятно
массив aPar не понятно что за чем идет и в каком виде
я так понимаю
aPar[1]- номер счета (а если он аналитический где аналитику поставить)
aPar[2]- дата чего? (начало или конец периода)
aPar[3]- дата тот же вопрос
тока к исходникам не отправляйте все что выше написано выцарапано из них и то люди помогли
желательно весь массив подробно что,где,зачем
RBalans() - почему то не работает на ней вылетает с ошибкой "переменная не определена " очень странно
И если можно для примера код (так чисто для ламеров по простому )
получения ДТС по 501 ну к примеру
nFunc - 1,2,4,5 // ДТС0 КТС0 ДТ КТ
6 или 7 ДТКТ
aOb :=Saldo({'00','10','','01','11'},1,{' 501','01/03/2007','30/03/2007'})
С Уважением !!!
Алексей!!!
Добрый вечер!
Мы пока не публикуем такие функции, поскольку в версии 34 они претерпят изменения. Однако если очень надо, то можно решить указанную задачу с помощью следующих функций:
nRez:=DaySaldo('00', aPar) - ДТС0
nRez:=DaySaldo('10', aPar) - КТС0
nRez:=DaySaldo('01', aPar) - ДТС
nRez:=DaySaldo('11', aPar) - КТС
где aPar:={Счет.Код_аналитики, дата}.
Пример1. Надо посчитать ДТC на 15.08.07 по счету 6011
aPar:={"6011",CTOD("15.08.07")}
nRez:=DaySaldo('01', aPar)
Пример2. Надо посчитать ДТC на 15.08.07 по счету 6011 и коду 000006
aPar:={"6011.000006",CTOD("15.08.07")}
nRez:=DaySaldo('01', aPar)
где CTOD(ccc) - функция преобразования строки в дату.
Попробуйте. Если что-то не получится, пишите, поможе _________________ С уважением, Александр Титов, Компания БЭСТ, Москва, отдел разрабо
Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
Posted: 16 Aug 2007 21:52 Post subject:
Foreman wrote:
Да уж ....
диалог типа кто в лес кто по дрова такое чувство что вопрос вообще не читали ну да ладно если функция Saldo() такой большой секрет компании ООО "БЭСТ" то бог с ней тогда какой смысл её выкладывать
С Уважением!!!
Алексей
Алексей, извините. Я читал вопрос и почему-то понял, что
не про плагин писали а про решение средствами макроязыка....
Был сегодня невнимателен. Виноват, впредь постараюсь
быть внимательнее
Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
Posted: 16 Aug 2007 21:55 Post subject:
Но вообще я в таких вопросах делаю проще:
скоб на базу проводок и расчет сальдо в цикле.
Это и подразумевал под плагином настаивая....
Просто у Вас в плагине частный случай, а функции предложенные
пишутся для общего для макроязыка.
Joined: 26 Jul 2002 Posts: 975 Location: Титов Александр Александрович Occupation: Компания БЭСТ Interests: Москва
Posted: 17 Aug 2007 09:01 Post subject:
Foreman wrote:
Нууууу это ж совсем другое дело сразу стока информации
и вся полезная спасибо огромное
Костя "Скоб на базу проводок " это понятно
а начальное сальдо из базы вытаскиваете
тем более что в Бэст5 многосегментная аналитика
если можно конечно как в 5 ке правильно вытащить
сальдо из вступительного баланса с учетом аналитики
ну а потом уже механизм ясен
скоб по сторокам и т.д.
сальдо на начало + оборот ДТ-оборот Кт = сальдо на конец
С Уважением!!!
Алексей
Доброе утро!
С утра начал проверять и понял, что не везде эти функции видны.
Поэтому просьба дождаться 31-го пакета (планируем сегодня или в крайнем случае в понедельник).
И в плагине надо написать LoadLibrary, например, вот такой фрагмент проверен - работает:
LoadLibrary("main.bdll")
sayandwait(str(DaySaldo("01",{"601",CTOD("01/12/05")}))) _________________ С уважением, Александр Титов, Компания БЭСТ, Москва, отдел разрабо
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum