CftClub.ru
Клуб специалистов ЦФТ-Банк

Использование маски файлов при экспорте импорте файлов

 
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Разработка в PL/PLUS. Оптимизация запросов Oracle
Предыдущая тема :: Следующая тема  
Автор Сообщение
kyky
Участник


Вступление в Клуб: 15.04.2008
СообщениеЧт Май 14, 2009 07:58   Использование маски файлов при экспорте импорте файлов Ответить с цитатой
Полезность: Нет оценки
Добрый день. Столкнулся со следующей проблемой. Нужно с локального диска скопировать все файлы из папки в папку на сервере. Нашел цфт решение в Продукты-Расчетный центр-IMP_RKC_VIP
вот оно
Код:

P#FILE.[SRC_TYPE] := false;
      P#FILE.[SRC_DELETE] := true;
      P#FILE.[DST_TYPE] := true;
   
.......
   P#FILE.[SRC_NAME] := '*.'||P_DOG_RKC.[AB].[EXTENTION];

Имя файлов источника и приемника заданы маской *.расширение.
Все работает.
Я вставил в свою процедуру то же самое.
Код:

begin     
   if P_MESSAGE = 'DEFAULT' then
      T_322p_file_path := ::[FP_TUNE].[LIB].get_str_value('322P_FILE_PATH');
      --T_322p_file_place := ::[FP_TUNE].[lib].get_bool_value('322P_FILE_PLACE',::[FP_TUNE].[LIB].set_canons(stdlib.userid.filial%class, stdlib.userid.filial), False);
      
      csmd.init_form(V_VB, 'FRD_322P', 'WORK_INCOMING');
   
      P_PATH := T_322p_file_path||'in';
      P_PATH_ARC := T_322p_file_path||'arc';
      p_list :='1';
      P_FILE.[SRC_TYPE] := false;
      P_FILE.[DST_TYPE] := true;
      P_FILE.[SRC_DELETE] := true;
      P_FILE.[SRC_NAME] := '*.*';
      
      P_FILE.[SRC_PATH] :=P_PATH;
      P_INFO := 'OK,P_FILE';
      
   elsif P_MESSAGE = 'VALIDATE' then
      if P_INFO = 'OK' then
      P_FILE.[DST_PATH]:=/*[SYSTEM_PARAMS]::[GET]('PATH', False)||*/'322P/in';
      P_FILE.[DST_name] := P_FILE.[SRC_name];
      
         p_list :='2';
         --   p_list := replace(stdio.file_list(P_FILE.[DST_PATH]), chr(10),'|');
            
      
      end if;
   end if;
end;


у меня выдает ошибку, и создает на сервере файл с именем *.*, который нельзя открыть.
если прописываю конкретное имя файла, то он нормально переносится на сервер.
Помогите разобраться в чем ошибка.
Alexsey
Эксперт


Вступление в Клуб: 06.09.2007
СообщениеЧт Май 14, 2009 08:13    Ответить с цитатой
Полезность: Нет оценки
Мы когда филиалы перетаскивали писали в проверке следующим образом... все работало и работает до сих пор

Код:
Begin
   If P_MESSAGE = 'DEFAULT' then
      P_F.[SRC_MASK] := 'ALLDOSSU.*';
      P_F.[SRC_NAME] := 'ALLDOSSU.TXT';
      P_F.[SRC_PATH] := './trc/imp';
   End if;
End;

_________________
всегда есть как минимум 2 выхода
w00per
Профи


Вступление в Клуб: 17.10.2007
СообщениеЧт Май 14, 2009 08:14    Ответить с цитатой
Полезность: Нет оценки
Может вся проблема именно в
Код:
P_FILE.[SRC_NAME] := '*.*';

т.е. скажем
Код:
P_FILE.[SRC_NAME] := '*.txt';

отработает нормально
_________________
I Lie About Everything.
kyky
Участник


Вступление в Клуб: 15.04.2008
СообщениеЧт Май 14, 2009 08:22    Ответить с цитатой
Полезность: Нет оценки
я пробывал и *.txt и r*.txt, ошибка та же и на сервер появляются файлы *.txt и r*.txt
Показать сообщения:   
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Разработка в PL/PLUS. Оптимизация запросов Oracle Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Рейтинг@Mail.ru