| View previous topic :: View next topic   | 
	
	
	
		| Author | 
		Message | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 10 Jul 2007 10:52    Post subject: Автоматическое формирование счет-фактуры! | 
				     | 
			 
			
				
  | 
			 
			
				Здравствуйте.
 
 
Подскажите пожалуйста, как автоматически сформировать счет-фактуру, по документу отгрузки (товары,материалы), мне почему то кажется, что была функция, но вспомнить и нигде найти не могу.   
 
может кто-то подскажет? | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		shura_k
 
 
  Joined: 10 Oct 2003 Posts: 342 Location: Александр Occupation: Специалист Interests: Калининград
  | 
		
			
				 Posted: 10 Jul 2007 11:39    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				| addshfact(Nil, Nil , Nil, Nil) | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 10 Jul 2007 14:01    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				из реестра накладных функция отлично срабатывает, вот как бы ее заставить отработать при таких условиях
 
из командной строки (__run("bin\zapas /fe.......") запускаю приведенную ПРГшку, в результате получаю документы в реесте и хочу сгенерить по ним счет-фактуру. вот здесь возникает проблема.
 
 	  | Code: | 	 		  ImportD(globaltmppath+'_0102_.rar',.f.)
 
// импортирую заранее подготовленные файлы с удаленного склада. проходит успешно.
 
Netuse('U_mdoc1','I:\b4_1201\111\zapas\mdoc.dbf')
 
U_mdoc1->(OrdsetFocus('MDOC'))
 
Netuse('U_mdocm1','I:\b4_1201\111\zapas\mdocm.dbf')
 
U_mdocm1->(OrdsetFocus('MDOCM'))
 
U_mdoc1->(dbseek(upper('00000121001000301')))
 
U_mdocm1->(dbseek(upper('00000121001000301')))
 
//if(select('U_mdoc1')<>0,alert('yes'),alert('no'))
 
U_mdocm1->(addshfact(Nil, Nil, Nil, Nil))
 
// вот здесь пишет мне ошибку (Ошибка при выполнении строки  файла //путь\2.txt !!! Алисас не существует
 
U_mdoc1->(dbclosearea())
 
U_mdocm1->(dbclosearea())
 
 | 	  
 
 
возможно не все алиасы доступны? может что-нибудь еще открыть? | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		nordk
 
 
  Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
  | 
		
			
				 Posted: 10 Jul 2007 17:15    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				Даже если Вы найдете алиас, то может выявиться куча неопределенных переменных...   
 
Но если Вы желаете двигаться в этом направлении код
 
addshFact() могу выложить в принципе он не большой,
 
только не забывайте каждая счет-фактура после его
 
создания желает F10 (запись) | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 10 Jul 2007 18:04    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | nordk wrote: | 	 		  Даже если Вы найдете алиас, то может выявиться куча неопределенных переменных...    | 	  
 
тогда может подскажете как по другому автоматом сформировать счет-фактуру?
 
 	  | nordk wrote: | 	 		  Но если Вы желаете двигаться в этом направлении код
 
addshFact() могу выложить в принципе он не большой, | 	  
 
 
готов рассмотреть альтернативные возможности автоматического формирования счетов-фактур, также если не затруднит опубликуйте код функции addshFact() 
 
 
 	  | nordk wrote: | 	 		  только не забывайте каждая счет-фактура после его
 
создания желает F10 (запись) | 	  
 
а он еще в начале спрашивает желаем или нет сформировать счет-фактуру, пока меня такое поведение не пугает | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		nordk
 
 
  Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
  | 
		
			
				 Posted: 10 Jul 2007 18:44    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | maestro_ wrote: | 	 		   	  | nordk wrote: | 	 		  Даже если Вы найдете алиас, то может выявиться куча неопределенных переменных...    | 	  
 
тогда может подскажете как по другому автоматом сформировать счет-фактуру? | 	  
 
Честно говоря не Вы первый пытаетесь решить этот вопрос    
 
Функцию выложу, подсказать не подскажу - сам еще не решил
 
этот вопрос. Хотя мы делали формирование счетов-фактур
 
по списанию с консигнации (не совсем из реестра)
 
Принцип следующий: создавали псевдо накладную, вставали
 
на нее курсором и стартовали формирование документа
 
с заполнением буфера клавиатуры нужными командами.
 
ВОт только насчет алиасов не помню - давно это было. | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 10 Jul 2007 20:31    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				в моем конкретном случае нахватало всего навсего 3 алиасов
 
 	  | Code: | 	 		  Netuse('sSH_FACT','I:\b4_1201\111\real\sh_fact.dbf')
 
Netuse('sSH_OP','I:\b4_1201\111\real\sh_op.dbf')
 
Netuse('sBOOK','I:\b4_1201\111\real\BOOK.dbf')
 
 | 	 
  | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 28 Aug 2007 19:13    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | Quote: | 	 		  | чем дальше в лес тем...... | 	  
 
 
а есть ли функция которая поможет мне сформировать счет-фактуру на приход матерала в полуавтоматическом режиме? 
 
Заранее большое спасибо! | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		nordk
 
 
  Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
  | 
		
			
				 Posted: 29 Aug 2007 10:01    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				Вообще-то функция формирования счетов-фактур одна.
 
А что в Вашем понимании полуавтоматический режим ? | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 29 Aug 2007 12:35    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				 	  | nordk wrote: | 	 		  Вообще-то функция формирования счетов-фактур одна.
 
А что в Вашем понимании полуавтоматический режим ? | 	  
 
 
Есть вот такой вот код  	  | Code: | 	 		  
 
Netuse('mdoc','I:\B4_1201\HOZ2007\zapas\mdoc.dbf')
 
mdoc->(OrdsetFocus('MDOC'))
 
Netuse('mdocm','I:\B4_1201\HOZ2007\zapas\mdocm.dbf')
 
mdocm->(OrdsetFocus('MDOCM'))
 
mdoc->(dbseek(upper('00000111001000673')))
 
mdocm->(dbseek(upper('00000111001000673')))
 
Netuse('sSH_FACT','I:\B4_1201\HOZ2007\tovar\sh_fact.dbf')
 
Netuse('sSH_OP','I:\B4_1201\HOZ2007\tovar\sh_op.dbf')
 
Netuse('sBOOK','I:\B4_1201\HOZ2007\tovar\BOOK.dbf')
 
addshfact(Nil, Nil, Nil, Nil)
 
mdoc->(dbclosearea())
 
mdocm->(dbclosearea())
 
sSH_FACT->(dbclosearea())
 
sSH_OP->(dbclosearea())
 
sBOOK->(dbclosearea())
 
 | 	  
 
в результате задаеться вопрос формировать счет-фактуру (да, нет) (полуавтоматический режим)
 
и если ответ положительный в реестре с/ф по отгрузке и оказанию услуг появляеться  счет-фактура,
 
а должна (очень хотелось бы) что бы появляться в управлениях закупок в реестрее с/ф по покупкам товаров и услуг
 
как исправить что бы с/ф создавалась в управлении закупками?
 
Заранее спасибо! | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		nordk
 
 
  Joined: 27 Jun 2005 Posts: 1000 Location: Горбунов Константин Occupation: БЭСТ-Партнер Interests: СПб
  | 
		
			
				 Posted: 29 Aug 2007 14:58    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				Если Вы не поленитесь посмотреть выше, то увидите объявление
 
с опубликованными функциями.
 
Там в 7 сообщении увидите полное описание данной функции.
 
А в нем прочитаете
 
 	  | Quote: | 	 		           FUNCTION AddShFact(lRefor,aDataDoc,lJoin,lPokup) 
 
//----------------------------------------------------------------------------// 
 
// Формирование или переформирование счета-факутры 
 
// lRefor != NIL, то запрос на переформирование 
 
// aDataDoc - массив структуры {{уникальный номер строки счета-фактуры,номер записи в MDOCM}...} 
 
//            используется при переформировании после редактирования 
 
//            (сохраняет предыдущее состояние) 
 
// lJoin != NIL, то добавление строк накладной к существующему счету-фактуре 
 
// lPokup = .T., то формирование счета-фактуры по закупкам 
 
//               по умолчанию .F.  | 	 
  | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		maestro_
 
 
  Joined: 29 Jan 2003 Posts: 95
 
 
 
  | 
		
			
				 Posted: 29 Aug 2007 15:00    Post subject:  | 
				     | 
			 
			
				
  | 
			 
			
				Большое спасибо! проглядел!   | 
			 
		  | 
	
	
		| Back to top | 
		 | 
	
	
		  | 
	
	
		 |