Страница 1 из 1

Как в ARD отчете получить сальдо по контрагену

Добавлено: 04 ноя 2002, 16:29
Stranger
Надо получить сальдо контрагента на дату по первичным документам.
Как это сделать? Может кто знает.

Re: Как в ARD отчете получить сальдо по контрагену

Добавлено: 04 ноя 2002, 17:37
m0p3e
Есть объектный фейс для получения сальдо, но заработает ли он в ARD... Это большой вопрос!

Re: Как в ARD отчете получить сальдо по контрагену

Добавлено: 04 ноя 2002, 19:18
Den
Вопрос, конечно, интересный :)
А если серьезно, то на каждом предприятии, по своему ведется учет операции по движению и оплате товаро-матер. ценностей и отражению этих вещей в рамках программы.Я например, не вижу сейчас возможности в Галактике получать подобную инфу, в том виде, в котором хочем получать,к примеру мой Отдел снабжения.(им надо с разбивкой по их бюро, причем разные бюро берут материал у одного и того же контрагента (бюро цветн. металлов,бюро вспом. матер, бюро гсм и т.д.).
Поэтому пришлось самому продумывать всю эту цепочку.Ну и соответсвенно писаниной заниматься...

Re: Как в ARD отчете получить сальдо по контрагену

Добавлено: 05 ноя 2002, 12:30
Stranger
МОРЗЕ, А какой фейс? Я пробовал GSALDKON ничего не получилось
Получил следующий ответ.
Использовать данный интерфейс нельзя, он не возвращает ни каких
значений.
Сейчас в нем идет обработка и возвращение результатов через функции,
которые доступны через объектный интерфейс.
Эта проблема занесена в ПиР под номером 101.20383. Просьба
интересоваться ходом ее решения.

Что еще попробовать?

Пример.

Добавлено: 05 ноя 2002, 14:08
m0p3e
ObjInterface GKonBalObj;
function GetKontrBalance (_c1 : comp; _d1 : date; NaklOnlyWas: word;
var BalR: double; var BalV:double; var BalB: double): boolean;
end;

Interface GetBlockForCorgDO AlwaysReturn;

Create View
var DoNrec : comp;
BalR, BalV, BalB, MaxDolgR : double;
GKB : GKonBalObj;
Block : Boolean;
as select *
from BaseDoc, Katorg
where ((
DoNrec == BaseDoc.nrec and
BaseDoc.corg == Katorg.nrec
))
;

Parameters DoNrec, Block;

HandleEvent
cmInit : { If GetFirst BaseDoc = tsOk
then If GetFirst Katorg = tsOk
then begin
GetVipRef(GKB,'GKonBal');
GKB.GetKontrBalance(Katorg.nrec, BaseDoc.dDoc, 0, BalR, BalV, BalB);
MaxDolgR := Katorg.MAXDOLGRUB;
If BalR + MaxDolgR < 0
then Block := true
else Block := false;
//Message( BalR + ' - ' + MaxDolGRub, 0);
end;
Abort;
};
End;
END.

Этот фейсик вызывается при печати ДО.

Добавлено: 05 ноя 2002, 14:15
m0p3e
Т.е. его смысловая нагрузка в следующем:
Определяется баланс с контром на дату и проверяется не превысил ли долг максимально допустимый. Из каталога контрагентов. Если превысил, то счет не печатается.

Re: Этот фейсик вызывается при печати ДО.

Добавлено: 29 ноя 2002, 10:37
Saint
В поставщиках получателях
Есть отчет "расчеты с контрагентами"
Там все есть, если угодно то присоединенную форму и переписать можно.

Но работает с условием, что учет ведется по всем правилам Галактики.

Re: Этот фейсик вызывается при печати ДО.

Добавлено: 02 дек 2002, 08:25
dozent
Это очень тормозной отчет! Просто ОЧЕНЬ! Раньше (в 5.7х) он считался быстро! А в 5.8х - супер тормоз... да и сопроводительную информацию он берет из накладных, что не всегда удобно, так как многие берут ее из документов - оснований!
И один из главных недостатков этого отчета - туда попадают все накладные: и оплаченные и неоплаченные! А чаще всего интересует САЛЬДО ПО КОНТРАГЕНТУ!
Но не все так плохо: написал свой отчет, который делает все, что НАМ нужно и главное -работает быстро! ;)

Re: Этот фейсик вызывается при печати ДО.

Добавлено: 05 дек 2002, 12:55
m0p3e
Фейс указанный мной тоже считает сальдо по "правилам Галактики". И довольно быстро...