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

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


Вступление в Клуб: 19.11.2012
СообщениеПн Мар 04, 2013 15:14   Печать из фин.распоряжений Ответить с цитатой
Полезность: Нет оценки
Подскажите, пожалуйста, как правильно реализовать операцию печати фин.распоряжений из продукта Кредиты (выдача кредита, печать в Ворд).
Текстовые поля не заполняются(

pragma MACRO(ReportFile,'''DOC\ШАБЛОН_РАСПОРЯЖЕНИЕ НА ВЫДАЧУ.dot''');
pragma include(::[PR_CRED].[LIB_MACRO]);

CR ref [PR_CRED];
--CLIENT ref [CLIENT];
--PRODUCT ref [PRODUCT];

begin

if p_info = 'НОМЕР' then
P_DATA := CR.[NUM_DOG];

Мне кажется, я неправильно делаю ссылку на кредиты.
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеПн Мар 04, 2013 15:20   Re: Печать из фин.распоряжений Ответить с цитатой
Полезность: Нет оценки
spbetta пишет:
Подскажите, пожалуйста, как правильно реализовать операцию печати фин.распоряжений из продукта Кредиты (выдача кредита, печать в Ворд).
Текстовые поля не заполняются(

pragma MACRO(ReportFile,'''DOC\ШАБЛОН_РАСПОРЯЖЕНИЕ НА ВЫДАЧУ.dot''');
pragma include(::[PR_CRED].[LIB_MACRO]);

CR ref [PR_CRED];
--CLIENT ref [CLIENT];
--PRODUCT ref [PRODUCT];

begin

if p_info = 'НОМЕР' then
P_DATA := CR.[NUM_DOG];

Мне кажется, я неправильно делаю ссылку на кредиты.



Точнее, печать фин.распоряжений на выдачу кредита из Документы - Финансовые распоряжения
yaffil
Профи


Вступление в Клуб: 18.08.2011
СообщениеПн Мар 04, 2013 15:35   Re: Печать из фин.распоряжений Ответить с цитатой
Полезность: Нет оценки
spbetta пишет:

CR ref [PR_CRED];

begin

if p_info = 'НОМЕР' then
P_DATA := CR.[NUM_DOG];

Мне кажется, я неправильно делаю ссылку на кредиты.


Если вам текщий печатать, то можно использовать конструкцию this, тогда ваш код будет так:
Код:
begin

if p_info = 'НОМЕР' then
P_DATA := this.[NUM_DOG];
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеПн Мар 04, 2013 15:37   Re: Печать из фин.распоряжений Ответить с цитатой
Полезность: Нет оценки
yaffil пишет:
spbetta пишет:

CR ref [PR_CRED];

begin

if p_info = 'НОМЕР' then
P_DATA := CR.[NUM_DOG];

Мне кажется, я неправильно делаю ссылку на кредиты.


Если вам текщий печатать, то можно использовать конструкцию this, тогда ваш код будет так:
Код:
begin

if p_info = 'НОМЕР' then
P_DATA := this.[NUM_DOG];


Да, это я знаю.
А как быть с реквизитами, которые внутри кредитного договора (процентные ставки, ПОТ,ПОС,группа риска и так далее), ведь я печатаю из фин.распоряжений.
Как правильно прописать, что данные берутся из КРЕДИТОВ.
yaffil
Профи


Вступление в Клуб: 18.08.2011
СообщениеПн Мар 04, 2013 15:44    Ответить с цитатой
Полезность: Нет оценки
Как обычно, прыгаете через "." и всё, либо используете функции, либо пишите селекты и курсоры.

Например код филиала кредитного договора:

this.[FILIAL].[CODE]

Ссылку на договор всегда можно определить из кучи мест, тогда вашей переменной и присваивайте эту ссылку. CR := 151627
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеПн Мар 04, 2013 16:52    Ответить с цитатой
Полезность: Нет оценки
yaffil пишет:
Как обычно, прыгаете через "." и всё, либо используете функции, либо пишите селекты и курсоры.

Например код филиала кредитного договора:

this.[FILIAL].[CODE]

Ссылку на договор всегда можно определить из кучи мест, тогда вашей переменной и присваивайте эту ссылку. CR := 151627



Совсем не работает.
elsif p_info = 'КЛИЕНТ' then
P_DATA := CR.[CLIENT].[NAME];
yaffil
Профи


Вступление в Клуб: 18.08.2011
СообщениеПн Мар 04, 2013 16:58    Ответить с цитатой
Полезность: Нет оценки
По конкретнее, что не работает?
Вы определили значение CR ? Где? Я в вашем примере этого не вижу, т.е. у Вас ссылка пустая, а соответственно и всё остальное пусто.
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеПн Мар 04, 2013 17:01    Ответить с цитатой
Полезность: Нет оценки
yaffil пишет:
По конкретнее, что не работает?
Вы определили значение CR ? Где? Я в вашем примере этого не вижу, т.е. у Вас ссылка пустая, а соответственно и всё остальное пусто.


в проверке

CR ref [PR_CRED];
PRODUCT ref [PRODUCT];
client ref [CLIENT];

begin

if p_message = 'DEFAULT' then
CR:= this.[PRODUCT];

elsif p_message = 'VALIDATE' then
P_DATA := ' ';

if p_info = 'REPORTFILE' then
P_DATA := &ReportFile;

elsif p_info = 'REPORTPATH' then
P_DATA := [MSLIB].GetReportPath;
yaffil
Профи


Вступление в Клуб: 18.08.2011
СообщениеВт Мар 05, 2013 08:42    Ответить с цитатой
Полезность: Нет оценки
Чего конкретно не работает?

Вот так:
CR:= this.[PRODUCT];
+ вот так
P_DATA := CR.[CLIENT].[NAME];

Как у вас написано из фин распоряжений должно работать, если вы на кредитном фин распоряжении свою операцию запускаете. Может у вас проблема в клиент скрипте, потому и не выводит в ворд.
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеВт Мар 05, 2013 09:24    Ответить с цитатой
Полезность: Нет оценки
yaffil пишет:
Чего конкретно не работает?

Вот так:
CR:= this.[PRODUCT];
+ вот так
P_DATA := CR.[CLIENT].[NAME];

Как у вас написано из фин распоряжений должно работать, если вы на кредитном фин распоряжении свою операцию запускаете. Может у вас проблема в клиент скрипте, потому и не выводит в ворд.


В отладку клиент выходит
10:23:38 клиент Власова Светлана Витальевна
10:23:39 p_message = VALIDATE
p_info = REPORTPATH

Проблема в клиент-скрипте?
yaffil
Профи


Вступление в Клуб: 18.08.2011
СообщениеВт Мар 05, 2013 09:29    Ответить с цитатой
Полезность: Нет оценки
Да. У вас ворд шаблон вообще поднимается? Он должен подниматься в любом случае.
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеВт Мар 05, 2013 09:32    Ответить с цитатой
Полезность: Нет оценки
yaffil пишет:
Да. У вас ворд шаблон вообще поднимается? Он должен подниматься в любом случае.


Шаблон открыввается. данные из фин.распоряжений подтягиваются, а вот данные с кредитов в файл не выводятся(
yaffil
Профи


Вступление в Клуб: 18.08.2011
СообщениеВт Мар 05, 2013 09:46    Ответить с цитатой
Полезность: Нет оценки
Раз отладка у вас выводит данные, то это уже хорошо. Попробуйте закладки в Ворде писать только заглавными на инглише и в коде соответственно тоже (elsif p_info = 'KLI_NAME' then P_DATA := CR.[CLIENT].[NAME]). И без цифер на конце.
Alkov
Профи


Вступление в Клуб: 23.09.2010
СообщениеВт Мар 05, 2013 10:39    Ответить с цитатой
Полезность: Нет оценки
А что в клиент-скрипте, должна же быть команда на заполнение закладки с определённым именем...?
spbetta
Участник со стажем


Вступление в Клуб: 19.11.2012
СообщениеВт Мар 05, 2013 13:57    Ответить с цитатой
Полезность: Нет оценки
Alkov пишет:
А что в клиент-скрипте, должна же быть команда на заполнение закладки с определённым именем...?



Это все есть.
Показать сообщения:   
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Разработка в PL/PLUS. Оптимизация запросов Oracle Часовой пояс: GMT + 3
На страницу 1, 2  След.
Страница 1 из 2

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