Bestovichek
Joined: 22 Mar 2002
Posts: 257
|
 Posted: 07 Jun 2002 14:27 Post subject: Программы пользователей |
 |
|
В каких-то вопросах-ответах была программка пользователя, подключающаяся к приходной накладной, для заполнения цен прайс-листа при записи накладной, так-вот, цены заполняються все очень удобно, если доработать под пользователя; но при печати приходной накладной эти цены из прайс листа, не суммируются  , все нормально только после расчета прайс-листа, т.е. все равно в прайс-листы приходится ходить и его расчитывать - может кто подскажет как это до конца автоматизировать?
прилагаю выдержку из вопросов-ответов
--------------------------------------------
Вам программу, которая при записи документа запрашивает цену по
каждой номенклатуре и заносит ее в mlabel->ocena1.
Спецфункцию нужно создавать с условием "на запись документа".
| Code: | private a
//скоб по данному документу
DBPUSH("MDOCM","MDOCM","",{"UPPER(Sclad+Vid+Type+CodeDoc+NumDoc)",MDOC->(UPPER(Sclad+Vid+Type+CodeDoc+NumDoc))})
//устанавливаем связь с номенклатурным справочником
f_setrelation("MLABEL","UPPER(GRUP+NNUM)")
//цикл по строкам документа
do while (mdocm->(!eof()))
a:=dialog(mlabel->name,"999999999.999",mlabel->ocena1)
mlabel->(reclock())
mlabel->ocena1:=a
mlabel->(f_dbunlock())
mdocm->(dbskip())
enddo
DBPOP() |
Литвак Тамара.
<font size=-1>[ Это Сообщение было отредактировано: Bestovichek в 2002-06-07 14:54 ]</font> |
|
FAQ
Search
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
