| 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 | 
		 | 
	
	
		  | 
	
	
		 |