Главная
Новый форум
 FAQFAQ   SearchSearch   MemberlistMemberlist   UsergroupsUsergroups   RegisterRegister 
 ProfileProfile   Log in to check your private messagesLog in to check your private messages   Log inLog in 

Как установить "скоб"

 
Post new topic   Reply to topic   printer-friendly view     Forum Index -> БЭСТ-4
View previous topic :: View next topic  
Author Message
ewgen



Joined: 23 Nov 2002
Posts: 339
Location: Евгений
Occupation: (инженер программист)
Interests: Надым

PostPosted: 15 Nov 2004 16:27    Post subject: Как установить "скоб" Reply with quote

Пользуюсь
dbpush("arc_acc","arc_acc","arc_acc->tnum=apars[3].and.arc_acc->inout='ТР'.and.arc_acc->cperiod>=apars[1].and.arc_acc->cperiod<=apars[2]",{}) но работает долго. Как я понял будет быстрее если установить "скоб". Как его правильно написа
Back to top
View user's profile Send private message Send e-mail
wildstorm



Joined: 31 Jan 2003
Posts: 45



PostPosted: 15 Nov 2004 16:35    Post subject: Reply with quote

На фоксе
Back to top
View user's profile Send private message Send e-mail
SLS



Joined: 30 Aug 2004
Posts: 22
Location: Свешников Л.С.
Occupation: контора
Interests: Астрахань

PostPosted: 15 Nov 2004 17:37    Post subject: тема Reply with quote

wildstorm? Ты, наверное, Евгений Петросян?
ewgen почитай "Рук-во по программированию БЭСТ", ты найдешь его в исходниках.
Back to top
View user's profile Send private message
ewgen



Joined: 23 Nov 2002
Posts: 339
Location: Евгений
Occupation: (инженер программист)
Interests: Надым

PostPosted: 15 Nov 2004 18:12    Post subject: Reply with quote

Quote:
ewgen почитай "Рук-во по программированию БЭСТ", ты найдешь его в исходниках

и как этот файл называется???

А вообще почитал Develop.doc и сделал так:
dbpush("arc_acc","arc_acc","",{"tnum+cperiod+inout",apars[3]+apars[1]+"ТР",apars[3]+apars[2]+"ТР"})

apars[1] - начало периода, apars[2] - конец периода

Не работает!!!
Back to top
View user's profile Send private message Send e-mail
SLS



Joined: 30 Aug 2004
Posts: 22
Location: Свешников Л.С.
Occupation: контора
Interests: Астрахань

PostPosted: 15 Nov 2004 18:47    Post subject: тема Reply with quote

прости что заставил искать в исходниках
ты смотришь самое-то...
а уж что и как это не ко мне...
Back to top
View user's profile Send private message
ewgen



Joined: 23 Nov 2002
Posts: 339
Location: Евгений
Occupation: (инженер программист)
Interests: Надым

PostPosted: 16 Nov 2004 07:47    Post subject: Reply with quote

И еще. Как сделать вывод строчки только при величине рабочего времени больше нуля. Где поставить условие?
Форма такая:
заголовок
Таб№ ФИО Кол. отраб. часов
ячейки
Таб№ ФИО Fileeval("prg1.txt",{I41,I42,I01})

Текст программы:
Code:
avars:=afill(array(3),0)

if select("arc_acc")<>0
 avars[1]:=0
 dbpush("arc_acc","arc_acc","arc_acc->tnum=apars[3].and.arc_acc->inout='ТР'.and.arc_acc->cperiod>=apars[1].and.arc_acc->cperiod<=apars[2]",{})
  do while arc_acc->(!eof())
   avars[1]:=avars[1]+arc_acc->time
   arc_acc->(dbskip())
  enddo
 dbpop()
 avars[1]
endif
Back to top
View user's profile Send private message Send e-mail
SLS



Joined: 30 Aug 2004
Posts: 22
Location: Свешников Л.С.
Occupation: контора
Interests: Астрахань

PostPosted: 16 Nov 2004 15:25    Post subject: тема Reply with quote

Как ты знаешь, результатом работы FileEval является последний оператор присваивания, поставить вместо avars[1]
Code:

IF (рабочее время>0) 
  твоя_переменная:= avars[1]
ENDIF

может сработает
Back to top
View user's profile Send private message
ewgen



Joined: 23 Nov 2002
Posts: 339
Location: Евгений
Occupation: (инженер программист)
Interests: Надым

PostPosted: 14 Jan 2005 15:09    Post subject: Reply with quote

Разработчики. Если не можете (не хотите) ответить на вопрос, то скажите хотя бы где можно найти ответ. Спасибо.
Back to top
View user's profile Send private message Send e-mail
Display posts from previous:   
Post new topic   Reply to topic   printer-friendly view     Forum Index -> БЭСТ-4 All times are GMT + 4 Hours
Page 1 of 1

 
Jump to:  
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


Powered by phpBB © phpBB Group

Rambler
Rambler's Top100 Рейтинг@Mail.ru