Галактика в вопросах и ответах

нет, не подцеплен

А надо бы

теперь он на него ругается

istrebitel писал(а):Вот так в .prj:
Код: Выделить всё
#include L:\gal810\frm\frm\compsrc\f\f_buhrep\PickBuh.vih
#make "d:\new_ard\*.*"
в итоге при компиляции пишет, что нет в словаре pickbuh

Так ведь уже говорилось, что надо 2 определения добавить:

Код: Выделить всё

#define ComponentVersion
#define Gal8_1
#include L:\gal810\frm\frm\compsrc\f\f_buhrep\PickBuh.vih
#make "d:\new_ard\*.*"

Посмотрите на содержимое PICKBUH.VIH (было на 1-ой стр.), и всё станет понятно.

большое спасибо за помощь. компиляция прошла.

теперь при запуске из галактике, после выбора даты валиться с ошибкой "Неправильная выборка"

Код: Выделить всё

RunInterface('F_BUHREP::bperiod',d1,d2);
RunInterface('F_BUHSCHET::GetBuhSchet',3,281474976710935);
end.
.create view  v1
as select *
from katorg,dogovor,SALDMOUN,oborot,
synonym oborot oborotDb,
synonym oborot oborotCr,
synonym SALDMOUN SALDMOUN_I,
pickbuh
where((                      c1==katorg.nrec
and                      katorg.nrec==dogovor.corg (noindex)
and                     katorg.cstate== katstate.nrec (noindex)
and                      katorg.ccity==katcity.nrec (noindex)
and                      d1==SALDMOUN.DATESAL (noindex)
and                                1==SALDMOUN.TBLOS[1] (noindex)
and                      katorg.nrec==SALDMOUN.KAUOS[1] (noindex)
and                               14==SALDMOUN.TBLOS[2]  (noindex)
and                     DOGOVOR.nrec==SALDMOUN.KAUOS[2] (noindex)
and                      Add_Day(d2,1)==SALDMOUN_I.DATESAL (noindex)
and                                1==SALDMOUN_I.TBLOS[1] (noindex)
and                      katorg.nrec==SALDMOUN_I.KAUOS[1] (noindex)
and                               14==SALDMOUN_I.TBLOS[2]  (noindex)
and                     DOGOVOR.nrec==SALDMOUN_I.KAUOS[2] (noindex)
and                         d2>>=oborotDb.DATOB (noindex)
and                        d1<<=oborotDb.DATOB (noindex)
and                                1==oborotDb.TBLOS[1] (noindex)
and                      katorg.nrec==oborotDb.KAUOS[1] (noindex)
and                               14==oborotDb.TBLOS[2]  (noindex)
and                     DOGOVOR.nrec==oborotDb.KAUOS[2] (noindex)
and                         d2>>=oborotCr.DATOB (noindex)
and                        d1<<=oborotCr.DATOB (noindex)
and                                1==oborotCr.TBLKS[1](noindex)
and                      katorg.nrec==oborotCr.KAUKS[1](noindex)
and                               14==oborotCr.TBLKS[2](noindex)
and                     DOGOVOR.nrec==oborotCr.KAUKS[2](noindex)
and 65531==pickbuh.kodtable
and pickbuh.schet==SALDMOUN.SCHETO
and pickbuh.SUBkau==saldmoun.SUBOSSCH
and pickbuh.schet==SALDMOUN_I.SCHETO
and pickbuh.SUBkau==saldmoun_I.SUBOSSCH
and pickbuh.schet==oborotDb.SCHETO
and pickbuh.SUBkau==oborotDb.SUBOSSCH
and pickbuh.schet==oborotCr.SCHETK
and pickbuh.SUBkau==oborotCr.SUBSCHK
))

[/code]

то есть при вызове фейса для выбора?

Interface F_BUHSCHET::GetBuhSchet
Выбор счетов бухгалтерского учета
Интерфейс обеспечивает выбор:

выбор счета и субсчета (одновременно) для указанного плана счетов
выбор только счета для указанного плана счетов (cgiPickSch)
выбор только субсчета для указанного счета (cgiPickSub)
множественный выбор (cgiMulti)
сохранение выбора при запуске интерфейса (cgiNotClear)
Внимание! Так практически во всех алгоритмах используется строковый код счета/субсчета, то маркер используется как вспомогательное средство (подсчет количество выбранных элементов)

Параметры
wIntMode : Word
myPlansNo : Comp
sGetSch : String [21]
sGetSub : String [21]
wIntMode в интерактивном 11, в оборотке по счету 3.
myPlansNo то точно указали? Ну и 2 строковых параметра нужно указать(объявите их как указано). А запрос сначала сделайте по pickbuh тока - чтобы проще было понять в чем дело, все люди занятые - экспериментами без задачи никто заниматься не будет - все ждут вас

.

Галактика в вопросах и ответах

Интерфейс GetBuhSchet