| Предыдущая тема :: Следующая тема   | 
	 
	
	
		| Автор | 
		Сообщение | 
	 
	
		timochev Эксперт
 
  Вступление в Клуб: 02.07.2007
  | 
		
			
				 Пт Фев 15, 2008 12:02    | 
				     | 
			 
			
				Полезность: Нет оценки 
  | 
			 
			
				У нас в операции WORK_INCOMING нет такого кода. У нас версия 7.7.22, но мы накатывали какие-то хранилища дополнительно. Может в них была модификация этого места.
 
 
 	  | Код: | 	 		           -- Подтверждения
 
         if substr(fname,3,1) = 'F' then
 
               begin
 
                  locate x in ::[GNI_JOUR] where
 
                     x.[COM_STATUS] in ([COM_STATUS_PRD](CODE = 'IMNS_SEND'), [COM_STATUS_PRD](CODE = 'IMNS_LETTER'))
 
                     -- 21.01.08 КОБ Тимошевский Д.С.
 
                     -- добавил upper, т.к. без них не находит
 
                     and UPPER(SUBSTR(x.[FILENAME],4)) = UPPER(substr(fname,4));
 
                     -- 21.01.08 КОБ Тимошевский Д.С.
 
                     -- неправильный принцип квитовки ответа с запросом
 
                     --and substr(x.[REQ_FILE].[ID_FILE],22) = substr(IdFile,22);
 
                  x.[TO_FILENAME] := fname;
 
                  x.[COM_STATUS] := [COM_STATUS_PRD](CODE = 'IMNS_CLOSE');
 
                  x.[DESCRIPTION] := SysDate||' Обработка завершена '||Stdlib.FIO(Stdlib.UserId ->Name, 'Ф И.О.')||chr(10)||x.[DESCRIPTION];
 
                  x.[IN_FILE_DATETIME] := Sysdate;
 
                  x.[IN_FILE_TEXT] := tmp_memo;
 
                  x.[IN_FLAG] := true;
 
                  stdio.put_line_buf('<%PLPCALL %THIS%.[EXPORT_LOCAL](%VAR%.V_SRC_NAME=>'''||fname||''',%VAR%.V_DST_PATH=>'''||P_PATH_ARC||''',%VAR%.V_SRC_PATH=>'''||P_PATH_SERV||''',%VAR%.V_FROM_SERVER=>'''||1||''')%>');
 
                  exception when NO_DATA_FOUND then
 
                     debug('Файл '||fname||' обработать не удалось. Не найдена запись c идентификатором файла '||IdFile||chr(10));
 
                     stdio.put_line_buf('<%PLPCALL %THIS%.[EXPORT_LOCAL](%VAR%.V_SRC_NAME=>'''||fname||''',%VAR%.V_DST_PATH=>'''||P_PATH||''',%VAR%.V_SRC_PATH=>'''||P_PATH_SERV||''',%VAR%.V_FROM_SERVER=>'''||1||''')%>');
 
               end;
 
         end if;
 
 | 	 
  | 
			 
		  | 
	 
	
		  | 
	 
	
		Alexsey Эксперт
 
  Вступление в Клуб: 06.09.2007
  | 
		
			
				 Пт Фев 15, 2008 12:10    | 
				     | 
			 
			
				Полезность: Нет оценки 
  | 
			 
			
				 	  | timochev пишет: | 	 		  У нас в операции WORK_INCOMING нет такого кода. У нас версия 7.7.22, но мы накатывали какие-то хранилища дополнительно. 
 
Может в них была модификация этого места.
 
 | 	  
 
 
 у нас 7.7.21... 311-П настроено по содержанию даной ветки форума    
 
доп. хранилищ не накатывали и код такого вида
 
 
[code]
 
 
 
 if substr(fname,3,1) = 'F' then
 
				--tmp_memo := ''; --в дистрибутиве раскоментарено
 
				--tmp_memo_str := '';
 
					begin
 
						locate x in ::[GNI_JOUR] where
 
							x.[COM_STATUS] in ([COM_STATUS_PRD]([CODE] = 'IMNS_SEND'), [COM_STATUS_PRD]([CODE] = 'IMNS_LETTER'))
 
							and upper(SUBSTR(x.[FILENAME],4)) = upper(substr(fname,4));
 
							--and substr(x.[REQ_FILE].[ID_FILE],22) = substr(IdFile,22);
 
						x.[TO_FILENAME] := fname;
 
						x.[COM_STATUS] := [COM_STATUS_PRD]([code] = 'IMNS_CLOSE');
 
						x.[DESCRIPTION] := SysDate||' Обработка завершена '||Stdlib.FIO(Stdlib.UserId ->Name, 'Ф И.О.')||chr(10)||x.[DESCRIPTION];
 
						x.[IN_FILE_DATETIME] := Sysdate;
 
						x.[IN_FILE_TEXT] := tmp_memo;
 
						x.[IN_FLAG] := true;
 
						stdio.put_line_buf('<%PLPCALL %THIS%.[EXPORT_LOCAL](%VAR%.V_SRC_NAME=>'''||fname||''',%VAR%.V_DST_PATH=>'''||P_PATH_ARC||''',%VAR%.V_SRC_PATH=>'''||P_PATH_SERV||''',%VAR%.V_FROM_SERVER=>'''||1||''')%>');
 
						exception when NO_DATA_FOUND then
 
							debug('Файл '||fname||' обработать не удалось. Не найдена запись c идентификатором файла '||IdFile||chr(10));
 
							stdio.put_line_buf('<%PLPCALL %THIS%.[EXPORT_LOCAL](%VAR%.V_SRC_NAME=>'''||fname||''',%VAR%.V_DST_PATH=>'''||P_PATH||''',%VAR%.V_SRC_PATH=>'''||P_PATH_SERV||''',%VAR%.V_FROM_SERVER=>'''||1||''')%>');
 
					end;
 
			end if;
 
[/code] _________________ всегда есть как минимум 2 выхода
  Последний раз редактировалось: Alexsey (Вт Мар 04, 2008 14:22), всего редактировалось 1 раз | 
			 
		  | 
	 
	
		  | 
	 
	
		YuSokolov Профи
 
  Вступление в Клуб: 29.06.2007
  | 
		
			
				 Ср Фев 27, 2008 16:35    | 
				     | 
			 
			
				Полезность: 1 
  | 
			 
			
				Сегодня узнал, что существует
 
ПРИКАЗ ФНС РФ от 17.01.2008 N ММ-3-09/10@
 
"О ВНЕСЕНИИ ИЗМЕНЕНИЙ В ПРИКАЗ ФЕДЕРАЛЬНОЙ НАЛОГОВОЙ СЛУЖБЫ ОТ 13 ДЕКАБРЯ 2006 Г. N САЭ-3-09/861@ "ОБ УТВЕРЖДЕНИИ ФОРМ СООБЩЕНИЙ БАНКА ОБ ОТКРЫТИИ (ЗАКРЫТИИ) СЧЕТА, ОБ ИЗМЕНЕНИИ РЕКВИЗИТОВ СЧЕТА"
 
(Зарегистрировано в Минюсте РФ 04.02.2008 N 11096) 
 
Уважаемый Владимир Резин    
 
Вы уже с этим Приказом ознакомились    | 
			 
		  | 
	 
	
		  | 
	 
	
		dale Участник со стажем
 
  Вступление в Клуб: 28.09.2007
  | 
		
			
				 Чт Фев 28, 2008 10:00    | 
				     | 
			 
			
				Полезность: Нет оценки 
  | 
			 
			
				Коллеги, я уже месяц как нахожусь в другом подразделении и данной проблемой не занимаюсь, поэтому к сожалению не ознакамливался. Но я думаю что те кто подхватил эстафету уже в курсе. _________________ Программа делает не то, что хочет программист, а то, что написано в коде. (c) | 
			 
		  | 
	 
	
		  | 
	 
	
		YuSokolov Профи
 
  Вступление в Клуб: 29.06.2007
  | 
		
			
				 Пт Фев 29, 2008 13:32    | 
				     | 
			 
			
				Полезность: Нет оценки 
  | 
			 
			
				 	  | YuSokolov пишет: | 	 		  ПРИКАЗ ФНС РФ от 17.01.2008 N ММ-3-09/10@
 
"О ВНЕСЕНИИ ИЗМЕНЕНИЙ В ПРИКАЗ ФЕДЕРАЛЬНОЙ НАЛОГОВОЙ СЛУЖБЫ ОТ 13 ДЕКАБРЯ 2006 Г. N САЭ-3-09/861@ "ОБ УТВЕРЖДЕНИИ ФОРМ СООБЩЕНИЙ БАНКА ОБ ОТКРЫТИИ (ЗАКРЫТИИ) СЧЕТА, ОБ ИЗМЕНЕНИИ РЕКВИЗИТОВ СЧЕТА" | 	  
 
 
Вот и ответ
 
 
Реализация планируется. Печатные формы будут доработаны в регламентные сроки.
 
 
С уважением, Павел Маличенко
 
Инженер по сопровождению
 
Управление сопровождения банковских систем
 
Центр Финансовых Технологий  | 
			 
		  | 
	 
	
		  | 
	 
	
		w00per Профи
 
  Вступление в Клуб: 17.10.2007
  | 
		
			
				 Вт Мар 04, 2008 11:04    | 
				     | 
			 
			
				Полезность: Нет оценки 
  | 
			 
			
				Сегодня обнаружил новую проблему, заполнение реквизита СвидГР. У клиента не заполнены серия и номер свидетельства о государственной регистрации, а при формировании сообщения в реквизит заносится значение "," , а надо чтобы ничего не заносилось.
 
 	  | 311-п пишет: | 	 		  | Для иностранной организации, нотариуса, занимающегося частной практикой, адвоката, учредившего адвокатский кабинет, реквизит не заполняется | 	  
 
ЗЫ Клиент нотариус. _________________ I Lie About Everything. | 
			 
		  | 
	 
	
		  | 
	 
	
		 | 
	 
 
  
	 
	    
	   | 
	
Вы не можете начинать темы Вы не можете отвечать на сообщения Вы не можете редактировать свои сообщения Вы не можете удалять свои сообщения Вы не можете голосовать в опросах
  | 
   
 
		 |