Russian Progress User Group

Добрый день , необходим пример вызова динамического фрейма , т.е. фрейм для ввода данных меняется в зависимости от введенного первого параметра. Пример:
От вида первого параметра pVidKr берется свой фрейм с набором вводимых параметров

DEFINE FRAME edit1
pVidKr LABEL "Вид"
HELP "Вид кредита "
FORMAT "x(40)" SKIP

pdSum LABEL "Сумма, руб"
HELP "Сумма кредита (лимита), руб"
FORMAT "->>>,>>>,>>>,>>9.99" SKIP
pdRate LABEL "% ставка"
HELP "Процентная ставка, % годовых"
FORMAT "->>9.99" SKIP

piTerm1 LABEL "Срок дог., мес"
HELP "Срок договора, месяцев"
FORMAT ">>9.99" SKIP
piTerm2 LABEL "Срок транша"
HELP "Срок транша, дней"
FORMAT ">>9" SKIP
pdComm1 LABEL "%КрКом"
HELP "Комиссия за ведение ссудного и внебалансового счетов, % годовых"
FORMAT "->>9.99" SKIP
pdComm2 LABEL "%НеиспК"
HELP "Комиссия за неиспользованный лимит, % годовых"
FORMAT "->>9.99" AT COLUMN 27 ROW 5
pdComm3 LABEL "%Мес"
HELP "Ежемесячная комиссия %"
FORMAT ">>9.999999" AT COLUMN 44 ROW 5
pdTurn LABEL "План. об.,(т.р.)"
HELP "Плановый обороты, тыс. руб."
FORMAT "->>>,>>>,>>>,>>9.99" SKIP
piCat LABEL "Кат. кач."
HELP "Категория качества"
FORMAT "9" SKIP
pdRR LABEL "Разм. рез."
HELP "Размер расчетного резерва"
FORMAT "->>>,>>>,>>>,>>9.99" SKIP
psPos LABEL "ПОС"
HELP "Портфель однородных ссуд"
FORMAT "x(20)" SKIP
psVob LABEL "Вид об"
HELP "Вид обеспечения"
FORMAT "x(20)" SKIP
psDOb LABEL "Дост-ть об."
HELP "Достаточность обеспечения"
FORMAT "x(20)" SKIP
psLiz LABEL "Лизингопол-ль"
HELP "Лизингополучатель"
FORMAT "x(40)" SKIP
psOfOb LABEL "Оформ. об."
HELP "Порядок оформления обеспечения"
FORMAT "x(40)" SKIP
pdPosledZ LABEL "Дата послед.зал."
HELP "Конечная дата оформл.послед.залога. Без послед.залога-не запонять!"
FORMAT "99.99.9999" SKIP

WITH FRAME edit1 WIDTH 73 CENTERED
TITLE COLOR BRIGHT-WHITE
"[ УСЛОВИЕ ВЫДАЧИ КРЕДИТА]".



Заранее спасибо.

Могу ошибаться, но динамический фрейм помоему всегда создается 1 строчный.
Если необходимо менять набор полей в зависмости от того что примет 1 параметр, то можно объявить фрейм указав полностью его размеры (кол-во строк, ширина) далее создать полный набор динаимеских полей во фрейме и задать им имена. Завести два или более списка с именами полей и в зависимости от того что примет 1 параметр пройтись по нужному списку полей и сделать их видимыми.