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

Как заставить работать fileeval в БЭСТ5?

 
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: 11 Jul 2007 08:32    Post subject: Как заставить работать fileeval в БЭСТ5? Reply with quote

Как переделать fileeval из БЭСТ4 в БЭСТ5
в БЭСТ4 вызов из формирования аналитики в типовой операции
fileeval("1.txt")


Code:
private a
if (pgrup='00032')
a:="200007"
endif
if (pgrup='00019')
a:="200008"
endif
if (pgrup='00016')
a:="200010"
endif
if (pgrup='00024')
a:="200017"
endif
if (pgrup='00021 00026 00031')
a:="200018"
endif
if (pgrup='00001 00002 00003 00006 00007 00011 00012 00022 00008 00010 00014 00015 00017 00018 00020 00023 00025 00029')
a:="200019"
endif
if (pgrup='00005 00004 00030')
a:="200011"
endif

a
Back to top
View user's profile Send private message Send e-mail
ewgen



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

PostPosted: 11 Jul 2007 12:44    Post subject: Reply with quote

Спасибо. Ростовцевой Екатерине.
Нужно было переменной "a" присвоить значение.
Все заработало.
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