| View previous topic :: View next topic | 
	
	
		| Author | Message | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 12 Oct 2005 12:37    Post subject: Есть ли аналог функции GenPro в Учёте закупок? |   |  
				| 
 |  
				| Заранее спаибо за помощь. |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| nordk 
 
 
 Joined: 27 Jun 2005
 Posts: 1000
 Location: Горбунов Константин
 Occupation: БЭСТ-Партнер
 Interests: СПб
 
 | 
			
				|  Posted: 12 Oct 2005 13:14    Post subject: |   |  
				| 
 |  
				| Ну в актах оформления услуг проводки формируются - значит там есть чегой-то   В актах устроит ?
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 12 Oct 2005 14:01    Post subject: |   |  
				| 
 |  
				| Конечно устроит.Именно о них я и спрашиваю...  |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| nordk 
 
 
 Joined: 27 Jun 2005
 Posts: 1000
 Location: Горбунов Константин
 Occupation: БЭСТ-Партнер
 Interests: СПб
 
 | 
			
				|  Posted: 12 Oct 2005 14:25    Post subject: |   |  
				| 
 |  
				| Посмотрю - это будет не очень быстро.... Примерно 2-3 дня
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 17 Oct 2005 09:30    Post subject: |   |  
				| 
 |  
				| Прошу прощения за назойливость,   но нет ли новостей?
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 18 Oct 2005 12:12    Post subject: |   |  
				| 
 |  
				|  	  | nordk wrote: |  	  | Обе процедуры платные
 | 
 
 
 А функцию выложить?
  |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| nordk 
 
 
 Joined: 27 Jun 2005
 Posts: 1000
 Location: Горбунов Константин
 Occupation: БЭСТ-Партнер
 Interests: СПб
 
 | 
			
				|  Posted: 18 Oct 2005 13:53    Post subject: |   |  
				| 
 |  
				| Обязательно отвечу - потерпите еще чуть-чуть плз |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 24 Oct 2005 10:55    Post subject: |   |  
				| 
 |  
				| Ап... |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 24 Oct 2005 15:37    Post subject: |   |  
				| 
 |  
				| Жаль, что нет ответа... Вышел из ситуации следующим образом.В первую стороку шаблонов проводок вставил iif(HFileEval('proga.hrb')=.T.,S,0).Прога вызывает
 shadowbox(...) c getами , которые потом записываются в dbf'ник и
 никогда не возвращает .Т.(не надо).
 Следующие алгоритмы шаблонов проводок тоже содержат ХФалеВал,
 но уже возвращающий суммы из dbf'ника выше.С суммами решили...
 Как быть с аналитиками?...
  Параметров никаких...В первую прогу вставил код, меняющий в k_spropp(файл шаблонов проводок) dt_code на введённый пользователем.
  .Вот так пришлось изрватится....Работает но есть неприятные нюансы.Предупреждение о несоответсвии суммы проводок и док-та появляется ВСЕГДА.Т.е абсолютно при равных суммах.Даже при одной проводке.Где копать?...Raund'ами в типовой операции игрался, в базы смотрел...Это первое...И самое неприятное, иногда зависает в док-те уже после того как суммы введены,проводки сформированы.После вопроса "сохранить?".Реагирует только на esc до полного выхода из АРМа.Может есть какоето негласное правило, которое я нарушил или не выполнил при формировании проводок таким образом?...Может  функция которая вызывается первой, с getами должна возвращать какое-то значение?Последняя строчка в ней dbpop() возвращающий NIL...
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 25 Oct 2005 09:01    Post subject: |   |  
				| 
 |  
				|  	  | garik wrote: |  	  | ..И самое неприятное, иногда зависает в док-те уже после того как суммы введены,проводки сформированы.После вопроса "сохранить?".Реагирует только на esc до полного выхода из АРМа... | 
 
 
 Проблему решил.Как уже писал в другой теме всё дело в пересекающихся get'ах док-та и моих.Переменную getlist объявил private'ной и перед get'ами вставил read.Но на проблему с не соответствия суммы проводок и док-та никак не могу найти решение...
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| garik 
 
 
 Joined: 25 Jul 2005
 Posts: 40
 Location: Ruslan
 Occupation: it
 Interests: moscow
 
 | 
			
				|  Posted: 25 Oct 2005 13:44    Post subject: |   |  
				| 
 |  
				| Константин, хоть название функции подкиньте ,пожалуйста. А уж с параметрами разберёмся....
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		| nordk 
 
 
 Joined: 27 Jun 2005
 Posts: 1000
 Location: Горбунов Константин
 Occupation: БЭСТ-Партнер
 Interests: СПб
 
 | 
			
				|  Posted: 25 Oct 2005 19:05    Post subject: |   |  
				| 
 |  
				| Пока могу дать только это - функция формирующая проводки в нижней части экрана актов закупок Удачи !!! (Если что можно спросить еще
  ) 
 
 
  	  | Code: |  	  | FUNCTION SaveTipOper(nnOperProv, nDoc, dDataOper, nVSumma_Doc,; ;//                       5             6             7           8
 cSchetAnalit, lAnalitSchet, codeTipOper, typeTipOper,;
 ;//                      9        10           11           12
 cNameOper, lOborot, bakcodeTipOper, bakSumma,;
 ;//                     13        14        15         16         17
 cCrSchet, cCrAnalit, bakNDoc, bakDataOper, cModel,;
 ;//                     18           19            20      21
 nnOperKalk, lKalkulUpdate, lDoublu, bTPost,;
 ;//                     22         23      24      25       26
 lBakOborot, lFlag1, lSpraw, aProvod, lMyStar)
 //----------------------------------------------------------------------------//
 //  Попытка заполнения проводок в соотв. с выбранными типовыми операциями
 // и оборотом и если не удалась, то стандартно (без перерисовки) .
 /*
 cSchetAnalit - аналитика по aSchet[1] выбранная в документе
 lOborot      - оборот (по умолчанию кредитовый .T. )
 lDoublu      - если .T. то генерация проводок по типовой операции
 в любом случае без удаления старых проводок
 bTPost       - постблок записи
 lSpraw       - .T., то заполнение аналитик в соотв. с навешанными справочниками
 расширенное заполнение
 aProvod      -  если указано, то генерация проводок в массив
 | 
 |  | 
	
		| Back to top |  | 
	
		|  | 
	
		|  |