عاوزة اعمل فورم تاخد رقم الموظف 

ويكون فيه زر اما اضغط عليه يفتحلي تقرير
ياريت لو حد عنده خطوات اقدر امشي عليها أو يشرحلي اعملها ازاي

انت شغال بنظام ايه ؟؟؟؟؟؟؟؟؟؟؟؟؟  اوراكل 6i        ولا          اوراكل 10g؟

 

 

عموما لو شغال بأوراكل 6I

اكتب الكود دا فى الزر اللى ع الفورم مع تغيير القيم الموجودة باللون الاحمر حسب القيم الخاصة بالفورم واسم الريبورت والبارميتر

 

Declare

    pl_id   ParamList;

    pl_name VARCHAR2(10) := 'batates';    

Begin

   pl_id := Get_Parameter_List(pl_name);

   IF Id_Null(pl_id) THEN

      pl_id := Create_Parameter_List(pl_name);

      ADD_PARAMETER (pl_id, 'parameter_name',TEXT_PARAMETER,(:Employee_number));

      ADD_PARAMETER (pl_id, 'paramform',TEXT_PARAMETER,'NO');

      RUN_PRODUCT (reports,'report_name',SYNCHRONOUS,RUNTIME,FILESYSTEM,pl_id, NULL);

      destroy_parameter_list(pl_id);

   End if;

End ;

 

انت شغال بنظام ايه ؟؟؟؟؟؟؟؟؟؟؟؟؟  اوراكل 6i        ولا          اوراكل 10g؟

 

 

عموما لو شغال بأوراكل 6I

اكتب الكود دا فى الزر اللى ع الفورم مع تغيير القيم الموجودة باللون الاحمر حسب القيم الخاصة بالفورم واسم الريبورت والبارميتر

 

Declare

    pl_id   ParamList;

    pl_name VARCHAR2(10) := 'batates';    

Begin

   pl_id := Get_Parameter_List(pl_name);

   IF Id_Null(pl_id) THEN

      pl_id := Create_Parameter_List(pl_name);

      ADD_PARAMETER (pl_id, 'parameter_name',TEXT_PARAMETER,(:Employee_number));

      ADD_PARAMETER (pl_id, 'paramform',TEXT_PARAMETER,'NO');

      RUN_PRODUCT (reports,'report_name',SYNCHRONOUS,RUNTIME,FILESYSTEM,pl_id, NULL);

      destroy_parameter_list(pl_id);

   End if;

End ;

 

انا بنت مش ولد

انا بشتغل علي اوراكل 10g

وهل الكود هيتغير في 10g

وياريت تفهمني اللي في الكود 

تم تعديل 3 أغسطس 201312 سنة بواسطة منمون علي