Passing a parameter from one form to another

Question

Hi
I'm trying to pass a parameter from one form to another. I've read lots of postings about this, and I have succeeded in calling the second form using code behind one of the existing Portal buttons (insert). Here is the code:
DECLARE
pro_id NUMBER;
pro_link VARCHAR2(1200);
BEGIN
pro_id := p_session.get_value_as_number(
p_block_name => 'DEFAULT',
p_attribute_name => 'A_PRO_ID');
pro_link := portal30.wwv_user_utilities.get_url(
'CINTRA_APP.PRO_LINK_1',
'WKG_PRO_ID',pro_id,
'_WKG_PRO_ID_cond','=');
PORTAL30.wwa_app_module.set_target(pro_link,'CALL');
END;
Trouble is, the parameter does not get passed. This could be because:
the field I'm trying to populate is based on an LOV ?
the target form is not set up to receive parameters? (I read this somewhere, but how do you do it?)
Thanks
Manfred

Answer 1

Dear InoL
My Header Form coding as follows.
When I press the button to move to the lines the following code executes
PASSING FORM CODING;
DECLARE
     pl PARAMLIST := GET_PARAMETER_LIST('PL_AT');
BEGIN
     IF NOT ID_NULL(pl) THEN
          DESTROY_PARAMETER_LIST(pl);
     END IF;
     pl := CREATE_PARAMETER_LIST('PL_AT');
     ADD_PARAMETER(pl,'P_AT',TEXT_PARAMETER,:HWSI_ASSET_TAG);
     CALL_FORM('E:\IT_SYSTEM\6i\HWDYNAMICINFO.FMX',NO_HIDE,DO_REPLACE,NO_QUERY_ONLY,PL);
END;
RECEIVING FORM CODING;
Written on WHEN_NEW_FORM_INSTANCE
BEGIN
     IF :PARAMETER.P_AT IS NULL THEN
          GO_ITEM('NZK_HW_DYNAMIC.OS_ASSET_TAG');
          ENTER_QUERY;
     ELSE
          SET_BLOCK_PROPERTY('NZK_HWSTATIC_INFO',DEFAULT_WHERE,'HWSI_ASSET_TAG ='||:parameter.p_at);
         SET_BLOCK_PROPERTY('NZK_HWSTATIC_INFO',DEFAULT_WHERE,'HWSI_ASSET_TAG ='||:parameter.p_at);
          EXECUTE_QUERY;
          GO_ITEM('NZK_HW_DYNAMIC.OS_ASSET_TAG');
     END IF;
END;
Created PARAMETER as P_AT, Data Type CHAR, MAX LENGTH 30
Thank you
NZK