| View previous topic :: View next topic | 
	
	
		| Author | Message | 
	
		| SLS 
 
 
 Joined: 30 Aug 2004
 Posts: 22
 Location: Свешников Л.С.
 Occupation: контора
 Interests: Астрахань
 
 | 
			
				|  Posted: 29 Oct 2004 09:31    Post subject: Конечно же, FileEval! |   |  
				| 
 |  
				| Народ, задача стоит так: В шаблон основного прайс-листа хочу добавить ещё одну колонку -"Цену прошлой продажи по данной наменклатуре". Мысли по алгоритму имеются. Проблема в том, что шаблон делаю первый раз.
 
 Для понимания проблемы помогите продублировать колонку прайс-листа "Цена". Помогите пожалуйста!
  [/i] |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Jul 
 
 
 Joined: 16 Dec 2003
 Posts: 394
 Location: Короткова Юля
 
 
 
 | 
			
				|  Posted: 29 Oct 2004 15:33    Post subject: |   |  
				| 
 |  
				| Добрый день! 
 Продублировать колонку прайс-листа нельзя. Можно в шаблоне нарисовать эту колонку вручную с помощью клавиши "ALT+латинская буква", подсказка нужной латинской буквы будет на экране как только Вы нажмете клавишу ALT.
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| SLS 
 
 
 Joined: 30 Aug 2004
 Posts: 22
 Location: Свешников Л.С.
 Occupation: контора
 Interests: Астрахань
 
 | 
			
				|  Posted: 30 Oct 2004 09:55    Post subject: ответик с утра пораньше |   |  
				| 
 |  
				| Я конечно понимаю, что 29 октября гео-магнитные бури на солнце, но не надо так всё усложнять
  . Я спрашиваю о том как (нарисовав колонку, сделав поле) обращятся к полям -> точнее бежать по ним.. (надяюсь понятно, что это нужно слабать через FileEval).
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| SLS 
 
 
 Joined: 30 Aug 2004
 Posts: 22
 Location: Свешников Л.С.
 Occupation: контора
 Interests: Астрахань
 
 | 
			
				|  Posted: 04 Nov 2004 17:04    Post subject: а теперь по делу |   |  
				| 
 |  
				| Итак,  задача заключается в следующем: В шаблон основного прайс-листа нужно добавить ещё одну колонку «Цену прошлой продажи по данной наменклатуре».
 
 В шаблоне основного прайс-листа делаю следующие действия:
 
 
  	  | Code: |  	  | № стр.   Наименование группы   Наименование товара   Ед. изм.   Цена, руб   Цена прошлой продажи
 ##         ############        ############              ####        ##########      #########
 
 | 
 
 1.Добавляю новую колонку - «Цена прошлой продажи».
 2.Вычисляю по формуле:
 a)колонку № стр. -  FileEval(‘File00.txt’,{Ns})
 b)колонку Наименование товара  - aglobvars[2]
 c)колонку Цена прошлой продажи - aglobvars[3]
 
 
 Файл File00.txt выглядит следующим образом:
 
 [list] 	  | Code: |  	  | private i, a
 
 //Первый вызов FileEval
 if apars[1]==1
 aglobvars[1]:=1
 aglobvars[2]:=''
 i:=1
 endif
 
 aglobvars[2]:=Mlabel->Name
 aglobvars[1]:=Ns
 
 netuse("Mdocm")
 dbPush("Mdocm","Mdocm_D","",{"Upper(Sclad+Vid+Type+Codedoc+Numdoc)",Mdoc->(Upper(Sclad+Vid+Type+Codedoc+Numdoc))})
 
 //Сортировка по датам
 Mdocm->(OrdSetFocus("Mdocm_D"))
 
 f_setrelarion("Mlabel","Upper(Grup+Nnum)")
 
 aglobvars[3]:=Mdocm->Ocena1
 //Здесь я не знаю как передвинутся на следующую запись
 
 dbPop()
 
 
 | 
 В результате работы колонка «Цена прошлой продажи» не заполняется.
 
 Вопросы:
 1.В чем мои ошибки (а они безусловно есть).
 2.Для чего нужен параметр «Флаг списка*»? (равносилено ли его применение, созданию полей с помощью @@@@, а не ##### ).
 [/code]
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| Наталья Позднякова 
 
 
 Joined: 27 Jun 2003
 Posts: 27
 Location: Наталья Позднякова
 
 Interests: Минск, Беларусь
 
 | 
			
				|  Posted: 04 Nov 2004 17:47    Post subject: |   |  
				| 
 |  
				| Параметр «Флаг списка*» как раз и нужен для того, чтобы программа отрабатывала для каждой строки печатной формы, тогда в fileeval не надо никаких команд перехода на следующую строку. Можно поставить # в любом месте на строке и привязать к ней флаг списка, аналогичный эффет будет, если использовать в строке хотя бы один параметр, помеченный *, например, наименование ТМЦ*, группа* и т. |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| SLS 
 
 
 Joined: 30 Aug 2004
 Posts: 22
 Location: Свешников Л.С.
 Occupation: контора
 Interests: Астрахань
 
 | 
			
				|  Posted: 05 Nov 2004 11:30    Post subject: смотрите все!!! |   |  
				| 
 |  
				| У меня всё-таки остались вопросы: 
 
  	  | Code: |  	  | //При первом входе обнуляю массив aglobvars
 if apars[1]==1
 aglobvars[1]:=1
 aglobvars[2]:=''
 aglobvars[3]:=''
 endif
 
 
 aglobvars[2]:=Mlabel->Name
 
 dbPush("Mdocm","Mdocm_D","",{"Upper(SCLAD+VID+TYPE+CODEDOC+NUMDOC)",Mdoc->(Upper(SCLAD+VID+TYPE+CODEDOC+NUMDOC))})
 
 //Здесь нужна сортировка по датам - в порядке убывания
 Mdocm->(OrdSetFocus("Mdocm_D"))
 
 f_setrelation("Mlabel","Upper(Grup+Nnum)")
 
 aglobvars[3]:=Mdocm->Cenaout
 dbPop()
 
 aglobvars[1]:=Ns
 
 | 
 
 1.Как отсортировать записи MDOCM по датам в порядке убывания?
 2.В итоге элемент массива AGOLBVARS[3] оказывается равным нулю, почему?
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		|  |