هناك أمر إسمه destroy فيما يستخدم ولماذا ؟
وكيف يتم نسخ Item من Page إلى Page في canvas من نوع Tab Page من دون تكرار ، أو بدون إستخدام COPY - Paste

الاخ السائل
يمكنك استخدام الغلوبل فاريبل

global variable
للقيمة المراد النسخ منها الى ال تاب الثاني

الأمر destroy
يستخدم في تصفية القيمة المخزنة لاحظ هذا المثال

DECLARE
	pl_id 						ParamList; 
	C 								NUMBER;
	Ret_Val 					NUMBER;
	Ret_Val2 					NUMBER;
	Ret_Counter 			Boolean;
	Message_Cut 			Varchar2(100);
	V_DATE 						DATE;
BEGIN 
/*	SELECT MAX(PAID_DATE) INTO V_DATE
	FROM WATER_TRANS;
	
	IF :DATE_BUY < V_DATE THEN
		MESSAGE('ÊÇÑíÎ ÇáÊÍÕíá ÛíÑ ÕÍíÍ ... Þã ÈÊÚÏíá ÊÇÑíÎ ÇáÌåÇÒ ÈÇáÊÇÑíÎ ÇáÕÍíÍ ...¿¿¿');
		MESSAGE('ÊÇÑíÎ ÇáÊÍÕíá ÛíÑ ÕÍíÍ ... Þã ÈÊÚÏíá ÊÇÑíÎ ÇáÌåÇÒ ÈÇáÊÇÑíÎ ÇáÕÍíÍ ...¿¿¿');
		RAISE FORM_TRIGGER_FAILURE;
	END IF;
	*/
	Ret_Val := Current_Amount(:SUPPORTS.V_BRANCH_ID,:SUPPORTS.V_CYCLE_NO,:SUPPORTS.V_CONTRACT_NO);
	IF Ret_Val > :V_LAST_BILL_AMOUNT Then
		Message_Cut := 'ÞÜÜÜÜÓØ ãä ÇáÍÜÜÓÇÈ ãÈáÛ ÇáÑÕíÏ'||'(' || Ret_Val || ')';
	Else
		Message_Cut := '' ;
	End If;
	
	IF :AMOUNT_CHK = 0 THEN
		IF Ret_Val < :V_LAST_BILL_AMOUNT Then
			Message('ÇáãÈáÛ ÇáãÏÎá ÃßÈÑ ãä ÑÕíÏ ÇáÝÇÊæÑÉ');
			Message('ÇáãÈáÛ ÇáãÏÎá ÃßÈÑ ãä ÑÕíÏ ÇáÝÇÊæÑÉ');
		  RAISE Form_Trigger_Failure;
		End if;
	ELSE
		IF Ret_Val < :V_LAST_BILL_AMOUNT Then
			Message('ÇáãÈáÛ ÇáãÏÎá ÃßÈÑ ãä ÑÕíÏ ÇáÝÇÊæÑÉ');
			Message('ÇáãÈáÛ ÇáãÏÎá ÃßÈÑ ãä ÑÕíÏ ÇáÝÇÊæÑÉ');
	  End if;
  End if;	
	Ret_Counter := Counter(:SUPPORTS.V_BRANCH_ID,:SUPPORTS.V_CYCLE_NO,:SUPPORTS.V_CONTRACT_NO);
	IF Ret_Counter= False THEN
		SET_ALERT_PROPERTY('YESNO_NO', ALERT_MESSAGE_TEXT
		, 'ÇáÇÊÝÇÞíÉ ãÓÏÏÉ ãä ÓÇÈÞ ááÔåÑ ÇáÍÇáí' );
		Ret_Val2 := SHOW_ALERT('YESNO_NO');
		IF Ret_Val2 <> ALERT_BUTTON1 THEN
			RETURN;
		END IF;
		pl_id := Get_Parameter_List('tmpdata'); 
	  IF NOT Id_Null(pl_id) THEN 
			Destroy_Parameter_List( pl_id ); 
		END IF; 
	  pl_id := Create_Parameter_List('tmpdata'); 
		Add_Parameter(pl_id,'P_BRANCH_ID'					,TEXT_PARAMETER, :V_BRANCH_ID);
		Add_Parameter(pl_id,'P_AMOUNT_ARB'				,TEXT_PARAMETER, :AMOUNT_ARB);
		Add_Parameter(pl_id,'P_CASHIER_ID'				,TEXT_PARAMETER, :V_CASHIER_ID);
		Add_Parameter(pl_id,'P_CASHIER_NAME'			,TEXT_PARAMETER, :V_CASHIER_NAME);
		Add_Parameter(pl_id,'P_CONTRACT_NO'				,TEXT_PARAMETER, :V_CONTRACT_NO);
		Add_Parameter(pl_id,'P_CONTRACT_NAME'			,TEXT_PARAMETER, :V_CONTRACT_NAME);
		Add_Parameter(pl_id,'P_CYCLE_DATE'				,TEXT_PARAMETER, :V_PERIOD);
		Add_Parameter(pl_id,'P_CYCLE_NO'			  	,TEXT_PARAMETER, :V_CYCLE_NO);
		Add_Parameter(pl_id,'P_LAST_BILL_AMOUNT'	,TEXT_PARAMETER, :V_LAST_BILL_AMOUNT);
		Add_Parameter(pl_id,'P_REF_NO'			  		,TEXT_PARAMETER, :REF_NO);
		Add_Parameter(pl_id,'P_Message_Cut'			 	,TEXT_PARAMETER, Message_Cut);
		Run_Product(REPORTS,'SUP_BILL', SYNCHRONOUS, RUNTIME, FILESYSTEM, pl_id, NULL); 
		CLEAR_BLOCK;
	ELSE
		pl_id := Get_Parameter_List('tmpdata'); 
		IF NOT Id_Null(pl_id) THEN 
			Destroy_Parameter_List( pl_id ); 
	  END IF; 
	  pl_id := Create_Parameter_List('tmpdata'); 
		Add_Parameter(pl_id,'P_BRANCH_ID'					,TEXT_PARAMETER, :V_BRANCH_ID);
		Add_Parameter(pl_id,'P_AMOUNT_ARB'				,TEXT_PARAMETER, :AMOUNT_ARB);
		Add_Parameter(pl_id,'P_CASHIER_ID'				,TEXT_PARAMETER, :V_CASHIER_ID);
		Add_Parameter(pl_id,'P_CASHIER_NAME'			,TEXT_PARAMETER, :V_CASHIER_NAME);
		Add_Parameter(pl_id,'P_CONTRACT_NO'				,TEXT_PARAMETER, :V_CONTRACT_NO);
		Add_Parameter(pl_id,'P_CONTRACT_NAME'			,TEXT_PARAMETER, :V_CONTRACT_NAME);
		Add_Parameter(pl_id,'P_CYCLE_DATE'				,TEXT_PARAMETER, :V_PERIOD);
		Add_Parameter(pl_id,'P_CYCLE_NO'			  	,TEXT_PARAMETER, :V_CYCLE_NO);
		Add_Parameter(pl_id,'P_LAST_BILL_AMOUNT'	,TEXT_PARAMETER, :V_LAST_BILL_AMOUNT);
		Add_Parameter(pl_id,'P_REF_NO'			  		,TEXT_PARAMETER, :REF_NO);
		Add_Parameter(pl_id,'P_Message_Cut'			 	,TEXT_PARAMETER, Message_Cut);
		Run_Product(REPORTS,'SUP_BILL', SYNCHRONOUS, RUNTIME, FILESYSTEM, pl_id, NULL); 
		CLEAR_BLOCK;
	END IF; 
END;