Re: trouble with get_parameter_attr when passing parameters to new form

[Quoted] Hello Robert,

If you set SESSION in the Call
"Open_Form('Form2',activate,session,pl_id);" you can't pass parameters or use shared package variables;

For each new session Forms create an own set of "Modul"-Variables, only within an single session Forms could share variables.

CIAO,Michael

Robert Hoy wrote:
>
> Hello to all,
>
> I seem to have a bit of trouble trying to use the function
> get_parameter_attr.
> When I create the parameter list in Form1 and I run into problem in Form2.
> Hopefully, one of you can spot this problem and let me know where I did
> wrong. Thanks for any suggestions.
>
> In the first trigger (of Form1), I want to create a parameter list and here
> is
> what I used:
>
> DECLARE
> pl_name varchar2(20) := 'THEPARAMS';
> pl_id PARAMLIST;
> BEGIN
> pl_id := Get_Parameter_List(pl_name);
> IF NOT Id_Null(pl_id) THEN
> Destroy_Parameter_List(pl_id);
> END IF;
>
> pl_id := Create_Parameter_List(pl_name);
> Add_Parameter(pl_id, 'FILENAME',TEXT_PARAMETER,:operation.filename);
> Open_Form('Form2',activate,session,pl_id);
> END;
>
> In Form2, When-New-Form-Instance trigger:
>
> DECLARE
> paramtype number;
> pl_id PARAMLIST;
> pl_name varchar2(20) := 'THEPARAMS';
> BEGIN
> pl_id := Get_Parameter_List(pl_name);
> if id_null(pl_id) then
> :block.parameter := 'None!!!';
> else
> Get_Parameter_Attr(pl_id,'FILENAME',paramtype,:block.parameter);
> end if;
> END;
>
> When I run Form2 by itself, the block.parameter is set to "None!!!" as
> expected.
> When I call Form2 from Form1, then I get the following error:
>
> "FRM-47023. No such parameter named FILENAME exists in form FORM2."
>
> I tested with the Get_Parameter_Attr in the first trigger (of Form1), it
> worked.
>
> -Robert
>
> ----------------------------------------------------------------------------
> Robert Hoy hoy_at_solaria.hac.com
> ----------------------------------------------------------------------------
> "You are erratic, conflicted, disorganized...You lack harmony, cohesion,
> greatness. It will be your undoing." said the arrogant Borg Seven of Nine on
> Star Trek Voyager.

-- 

______________________________________________________________
| Michael Steinkellner            Phone : +43 (0)5577 - 82363
|                                ACHTUNG !! Neue WWW-Adresse !
| Bahnhofstrasse 51          E-Mail: 
| A-6893 Lustenau/Vlbg.             mist_at_ping.at
| Austria        WWW: http://members.ping.at/mist/
| ------------------------------------------------------
| "Au Schwoba sind nette Leit !"       
| " 'Schwoba' are nice guys too !"     
______________________________________________________________