How to create pageInstance for a Particular page using page lable?

Hi,
Please guide me on how to create a PageInstance Object for a Particular page , if we got the pagelabel.
Thanks in advance.

You need to write a logic, show header and footer when the particular is page is hit.
<jsp:directive.page import="com.bea.netuix.servlets.controls.application.DesktopPresentationContext,
com.bea.netuix.servlets.controls.page.PagePresentationContext"/>
<jsp:scriptlet>
DesktopPresentationContext desktopCtx = DesktopPresentationContext.getDesktopPresentationContext(request);
BookPresentationContext mainBookCtx = desktopCtx.getBookPresentationContext();
String activeBookDefLabel = mainBookCtx .getActivePage();
BookPresentationContext activeBookCtx = mainBookCtx.getBookPresentationContextRecursive(activeBookDefLabel);
String activeBookTitle = activeBookCtx.getTitle();
String activePageDefLabel = activeBookCtx.getActivePage();
PagePresentationContext activePageCtx = activeBookCtx.getPagePresentationContextRecursive(activePageDefLabel);
String activePageTitle = activePageCtx.getTitle();
if(!activePageTitle.equals("whatyouwant"){
</jsp:scriptlet>
HEADER
<jsp:scriptlet>}</jsp:scriptlet>

Similar Messages

How to create menus for a particular file

Hello all,
can anyone solve my problem really i am totally fed up for writing logic for the following file ,
what iam doing is i have a file like this
aaa.mmm.ggg=/aaa/bbb
aaa.clock=/usr/sbin/clock
sss.jot=/user/pmsdev/bin/jot
sss.netscape=/usr/BIN/netscape
sss.nnn.gg=/gg/ss
sss.nnn.yy=/usr/sbin/clock
bbb.xclock=/usr/bin/X11/xclock
bbb.ggg.mmm=/usr/sbin/clock
bbb.ggg.kkk=/jjj/jjj
bbb.ggg.kkk.xxx=/ggg/mmm
bbb.hhh.pp=/ss/a
bbb.zz=/Zmm/vvv
vvv=/ddd/ddd
for this i have to create menus and coresponding submenus,
means for ex: *bbb.ggg.mmm=/usr/sbin/clock[*[B]bbb is the submenu of ggg which is the submenu of mmm ,so when i click on mmm i will get the value usr/sbin/clockso i have splitted on *"="* and i have used maps to store key value,this is ok,but how to create the menu structure for all how to compare one with other,please help me iam using swings for this.please help me.
Edited by: 1-ewqsfd on Sep 30, 2007 2:11 AM

Hello all,
can anyone solve my problem really i am totally fed up for writing logic for the following file ,
what iam doing is i have a file like this
aaa.mmm.ggg=/aaa/bbb
aaa.clock=/usr/sbin/clock
sss.jot=/user/pmsdev/bin/jot
sss.netscape=/usr/BIN/netscape
sss.nnn.gg=/gg/ss
sss.nnn.yy=/usr/sbin/clock
bbb.xclock=/usr/bin/X11/xclock
bbb.ggg.mmm=/usr/sbin/clock
bbb.ggg.kkk=/jjj/jjj
bbb.ggg.kkk.xxx=/ggg/mmm
bbb.hhh.pp=/ss/a
bbb.zz=/Zmm/vvv
vvv=/ddd/ddd
for this i have to create menus and coresponding submenus,
means for ex: *bbb.ggg.mmm=/usr/sbin/clock[*[B]bbb is the submenu of ggg which is the submenu of mmm ,so when i click on mmm i will get the value usr/sbin/clockso i have splitted on *"="* and i have used maps to store key value,this is ok,but how to create the menu structure for all how to compare one with other,please help me iam using swings for this.please help me.
Edited by: 1-ewqsfd on Sep 30, 2007 2:11 AM

How to create reservation for a particular material through Production orde

Hi gurus
How to create the reservation manually and through production order?
Kaisar

Hi,
If you convert a Planned Order to production oredr, all the dependent requirements will be converted to Order Reservations.
If you create a Production Order then the Order Reservations will be created for the BOM Components.
System will create this reservation automatically.
For Manual creation of reservations - I guess the T.Code is MB25(I am not very sure). You can serch in easy access menu..
Regards,
Siva

How do i create mailing labels for an avery template using pages

how do i create mailing labels for an avery template using pages.

mcc,
The first topic in the "More LIke This" box to the right of your question is a rather comprehensive address label printing discussion. Does it answer your question?
Jerry

How to create F4 for the standard transaction

Hi all ,
How to create F4 for the standard transaction for a particular field .
Bye

Santosh,
You can create F4 values for a field in a standard Transaction .
1. First search for a standard search help meeting your requirement .
2. If you don't find one, create your own custom (z) serach help .
( 1 is preferable )
After that, include that serch help to the standard field in the transaction .
For this u need to go to the screen
( F1->F9-> screen-> Field )
Click on the property of the field and include the search help .
You ll require the access key from the basisi guys as u r changing standard .
Hope it helps,
~ laxmi
Reward for helpful answers

How to give comments for a particular table

hi..
how to give comments for a particular table ..
select * from user_tab_comments;
tx in advance..

Try this.
SQL> COMMENT ON TABLE EMP IS 'THIS IS SAMPLE EMPLOYEE TABLE' ;
Comment created.
SQL> select * from user_tab_comments where table_name = 'EMP'
2 /
TABLE_NAME TABLE_TYPE
COMMENTS
EMP TABLE
THIS IS SAMPLE EMPLOYEE TABLE

How to created exit for CS02 transaction to maintain bom details of a mater

hi ,
     plz explain how to created exit for CS02 transaction to maintain BOM details of a material. what is the BOM component . give me sample example.

Hi,
these are the user-exits for CS02
Transaction Code - CS02                     Change Material BOM
Exit Name           Description
PCSD0001            Applications development R/3 BOMS
PCSD0002            BOMs: Customer fields in item
PCSD0003            BOMs: Customer fields in header
PCSD0004            BOM comparison
PCSD0005            BOMs: component check for material items
PCSD0006            Mass changes user exit
PCSD0007            Check changes in STKO
PCSD0008            WBS BOM: Customer-specific explosion for creating
PCSD0009            Order/WBS BOM, determine URL page
PCSD0010            Order/WBS BOM, determine explosion date
PCSD0011            Knowledge-based order BOM, parallel update
PCSD0012            Customer - Mat. number/mat. number during material exchange
PCSD0013            Customer-specific processing of an explosion for BOM browser
Regards
Nilesh

How to create hyperlink for region

I have page which contain two region.i want to create a link for each region. when i click the first link
first region should display,viceversa
Actually how to create link for region?
Thanks and regards
skud

Hi Bosamiya and vee,
Thank you very much...
but,
when i run my page it shows three tabs (*show all*,*region1*,*region2*).
How to disable that show all tab?
i want to show only region1 and region2 tabs.
Is it possible to disable the show all tab?
Thanks and regard,
Skud.

How to create prompt for inline filter?

HI All. Can anyone plz help me, how to create prompt for inline filter?
Let me give an examle...
Suppose I've taken two columns as # of New Invoices and # of Cancelled Invoices
Now, If I set a date prompt / month prompt, then the "# of cancelled invoices" column will fetch the number of cancelled invoice for that month only, which I have chosen in the prompt. But I want the "# of cancelled invoices" column to fetch data for the month chosen by me in another prompt.
So, can anyone help me with the sql statement, which will fetch the prompt data (i.e., month / date chosen by the user) automatically and will furnish the result accordingly.
Thanks.

To create a column prompt:
To create a dashboard prompt, use the following sub-procedure.
Navigate to the Oracle BI Enterprise Edition Home page, locate the global header, hover the mouse pointer over the New menu to access the menu, and select Dashboard Prompt. From the Select Subject Area menu, select the subject area for which you want to create a prompt. The "Definition pane" is displayed.
Click the New toolbar button in the Definition Pane to access the prompt type selection list. From the list, select Column Prompt. The "Select Column dialog" is displayed.
Select a column and click OK. The "New Prompt dialog" displays. If your repository is configured for double columns, then ensure that you select the correct display column. For information on double columns, see "Understanding the Double Column Feature".
The number of columns that you include in a prompt can affect performance. In general, you should limit the number of columns to as few as possible.
If you are creating a dashboard prompt and want to add or remove related subject areas, then click the Select subject area button in the "Select Column dialog" to display the "Add/Remove Subject Areas dialog".
To create an inline prompt, use the following sub-procedure.
Create a new analysis or access an existing analysis for which you want to create a prompt. Click the Prompts tab. The "Definition pane" is displayed.
Click the New toolbar button in the Definition Pane to access the prompt type selection list. From the list, select Column Prompt. The analysis' selected columns are displayed in the cascading menu that is adjacent to the Column Prompt selection item.
http://webmastersomesh.com

How to create iView for customized master head war ?

Hi,
I deployed customized masterhead war file. But i cant see deployed war in portal application location.
Anyone help me for customizing and masterhead page and how to create iView for customized master head...

Hi,
1. You can see the deployed application under the "Portal Applications"
2. If you want to create an iView out of it. right click on the application -> copy. than press right click in the folder you want the iView will be created and paste ad pcd object.
Hope I helped you.
Ronny.

How to create variant for selection screen which is in subscreen

Hi,
How to create variant for selection screen which is in subscreen in a module pool program?
it is very urgent.
Thanks in advance.

Hi,
You can create the 'Parameter Transaction' so that whenever you run the particular transaction it will run with the initial value given when the Tcode was created and hence you can skip the initial screen of the module pool program.
To create Parameter transaction from SE93 you have to choose the last option i.e Parameter Transaction.
Regards
Sudheer

How to create infosource for datasource?

dear all,
how does 1 go about creating infosource for a particular datasource to update to 2 infoobjects?

Raj,
Thanks for your reply
when i right click to create my infosource i input this datasource name 0EMPLOYEE_USER_ATTR
and i get this error
Pos. 1 of the InfoSource must be diff. to one of char.: 0123456789YZ.
Message no. RSAR150
any idea?

How to create program for bapi?

hi all,
how to create program for bapi?
reply me soon now.....
can anybody help me.....
thanks,
S.Suresh.
Title was edited by:
Alvaro Tejada Galindo

Hi ...Here is the step by step procedure for creating BAPIs.
There are 5 different steps in BAPI.
- Create BAPI Structure
- Create BAPI Function Module or API Method.
- Create BAPI object
- Release BAPI Function Module.
- Release BAPI object.
Step1. Creating BAPI Structure:
- Go to <SE11>.
- Select Data Type & Enter a name.
- Click on Create.
- Note: Always BAPI should be in a development class with request number (Not Local Object).
- Select Structure & hit ENTER.
- Enter the fields from your database. Make sure that the first field is the Primary Key Field.
- Then SAVE & ACTIVATE.
Step 2. Creating BAPI module:
- Enter TR.CODE <SE37>.
- Before entering any thing, from the present screen that you are in, select the menu
Goto -> Function Groups -> Create Group.
Enter a name (Note: This name Must start with ZBAPI)
Let this screen be as it is and open another window and there, enter TR.CODE <SE80).
Click on the Third ICON that says Inactive Objects.
Select the group that you just created and click on Activate.
Notice that the group you created will disappear from the list of inactive objects.
- Go back to ><SE37> screen and enter a name and hit <ENTER>. Then enter the group name that you just created and activated.
NOTE: When you release a function module the respective group will be attached to that particular application. It cannot be used for any other application. NEVER include an already existing group that is attached to another module.
Now click on the first Tab that says [ATTRIBUTES] and select the radio button that says remote-enabled module since we will be accessing this from any external system.
Then click on the second tab that says [IMPORT].
Enter a PARAMETER NAME, TYPE and the structure you created in the first step. Also select the check box Pa. All remotely enabled functional modules MUST be Pa enabled, where Pa means Passed by Value and if you dont select Pa, then that means it will be passed by reference..
Then click on tab that says [EXPORT].
Enter the following as is in the first three fields
RETURN TYPE BAPIRETURN (These 3 field values are always same)
Here also select Pa meaning Pass by value.
Note: BAPIRETURN contains structure with message fields.
Then SAVE and ACTIVATE.
Step 3. Creating BAPI object:
- Enter Tr.Code <SWO1> (Note. It is letter O and not Zero).
- Enter a name and then click on create. Enter details.
NOTE: Make sure that that Object Type and Program name are SAME.
- Enter Application M, if you are using standard table Mara. If you are using your own database then select Z at the bottom.
- Then hit <ENTER>.
- Now we have to add Methods. High light METHODS and then select the following from the menu:
Goto Utilities -> API Methods -> Add Methods.
- Enter function Module name and hit <ENTER>.
- Select the second FORWARD ARROW button (>)to go to next step.
- Check if every thing looks ok and again click on FORWARD ARROW button (>).
- Then select YES and click on <SAVE>.
- Now on a different screen goto TR.CODE <SE37>. Enter Function Module name and select from the top menu Function Module -> Release -> Release.
- Goback to TR.CODE <SWO1>.
Here select the menu combination shown below in the same order.
- Edit -> Change Release Status -> Object Type Component -> To Implemented.
- Edit -> Change Release Status -> Object Type Component -> To Released.
- Edit -> Change Release Status -> Object Type -> To Implemented.
- Edit -> Change Release Status -> Object Type -> To Released.
- Then click on <SAVE>.
- Then click on Generate Button (4th button from left hand side looks like spinning wheel).
- Then Click on the button that says PROGRAM to see the source code.
To check if this is present in work flow goto TR.CODE <BAPI>.
Here it shows business object repository.
- First click on the middle button and then select ALL and hit ENTER.
- Goto tab [ALPHABETICAL] and look for the object that you created. This shows that the BAPI object has been created successfully
Overall Info :
http://help.sap.com/saphelp_47x200/helpdata/EN/00/32a43697bc11d1acf9080009b0fb56/frameset.htm
BAPI Creation Info :
http://help.sap.com/saphelp_47x200/helpdata/EN/e0/9eb2370f9cbe68e10000009b38f8cf/frameset.htm
Reference :
http://help.sap.com/saphelp_47x200/helpdata/EN/00/32a43697bc11d1acf9080009b0fb56/frameset.htm
http://help.sap.com/saphelp_47x200/helpdata/EN/00/32a43697bc11d1acf9080009b0fb56/frameset.htm
http://help.sap.com/saphelp_47x200/helpdata/EN/e0/9eb2370f9cbe68e10000009b38f8cf/frameset.htm

How to create transaction for a maintenance view, Thank you.

How to create transaction for a maintenance view,
Thank you.
deniz...

Hi Deniz,
Go to se93.
Then create the new T.code.
Under that select parameter Transaction.
Then give the sm30 in the t.code in default values tab.
check the checkbox skip initial screen.
in classification tab.
click checkbox inherit gui attributes..
Now below..
In the default values..
select
viewname and give ur table name.
UPDATE= Xsave
view - table name ( Should be upper case
update X ( should be upper case).
http://www.sap-basis-abap.com/sapbs011.htm
Hope this helps you.
Regards,
Viveks

How 2 creat report for displaying the details of a Delivery Document using

how to create report for displaying the details of a Delivery Document using the tables LIKP, LIPS
thank you
regards,
jagrut bharatkumar shukla
points will be rewarded

HI
I AM GIVING YOU MY DELIVERY DOCUMENT CODE...MODIFY IT ACCORDING TO YOUR REQUIREMENT
*& Report ZDELIVERY                                *
report zdelivery message-id z9bhu          .
types: begin of t_likp,
           vbeln type likp-vbeln,      "Delivery
           erdat type likp-erdat,      "Date for rec creation
*           LFDAT TYPE LIKP-LFDAT,      "Delevery Date
*           WAERK TYPE LIKP-WAERK,      "Currency
           kunnr type likp-kunnr,      "Ship-To Party
           kunag type likp-kunag,      "Sold-to party
           traty type likp-traty,      "Means-of-Transport
       end of t_likp.
types: begin of t_lips,
           vbeln type lips-vbeln,      "Delivery
           posnr type lips-posnr,      "Delivery item
           matnr type lips-matnr,      "Material Number
           arktx type lips-arktx,      "Short Text for Sales Order Item
           lfimg type lips-lfimg,      "Actual quantity delivered
           netpr type lips-netpr,
*           MEINS TYPE LIPS-MEINS,      "Base Unit of Measure
           vgbel type lips-vgbel,      "Doc no of the reference document
        end of t_lips.
types: begin of t_vbpa,
           vbeln type vbpa-vbeln,      "SD DocumenT Number
           posnr type vbpa-posnr,      "Item number
           parvw type vbpa-parvw,      "Partner function
           kunnrb type vbpa-kunnr,      "Customer Number 1
       end of t_vbpa.
types: begin of t_kna1,
           kunnr type kna1-kunnr,      "Customer Number 1
           name1 type kna1-name1,      "Name 1
           ort01 type kna1-ort01,      "City
           adrnr type kna1-adrnr,      "Address
       end of t_kna1.
types: begin of t_li_vbpa,
           vbeln type likp-vbeln,      "Delivery
           erdat type likp-erdat,      "Date for rec creation
*           LFDAT TYPE LIKP-LFDAT,      "Delevery Date
*           WAERK TYPE LIKP-WAERK,      "Currency
           kunnr type likp-kunnr,      "Ship-To Party
           kunag type likp-kunag,      "Sold-to party
           traty type likp-traty,      "Means-of-Transport
           vbeln1 type lips-vbeln,      "Delivery
           posnr type lips-posnr,      "Delivery item
           matnr type lips-matnr,      "Material Number
           arktx type lips-arktx,      "Short Text for Sales Order Item
           lfimg type lips-lfimg,      "Actual quantity delivered
           netpr type lips-netpr,      "Net Price
*           MEINS TYPE LIPS-MEINS,      "Base Unit of Measure
           vgbel type lips-vgbel,      "Doc no of the reference document
           vbeln3 type vbpa-vbeln,     "SD DocumenT Number
           parvw type vbpa-parvw,      "Partner function
           kunnrb type vbpa-kunnr,      "Customer Number 1
       end of t_li_vbpa.
types: begin of t_final,
           vbeln type likp-vbeln,      "Delivery
           erdat type likp-erdat,      "Date for rec creation
           kunnr type likp-kunnr,      "Ship-To Party
           kunag type likp-kunag,      "Sold-to party
           traty type likp-traty,      "Means-of-Transport
           vbeln1 type lips-vbeln,      "Delivery
           posnr type lips-posnr,      "Delivery item
           matnr type lips-matnr,      "Material Number
           arktx type lips-arktx,      "Short Text for Sales Order Item
           lfimg type lips-lfimg,      "Actual quantity delivered
           netpr type lips-netpr,      "Net Price
           vgbel type lips-vgbel,      "Doc no of the reference document
           vbeln3 type vbpa-vbeln,     "SD DocumenT Number
           parvw type vbpa-parvw,      "Partner function
           kunnrb type vbpa-kunnr,     "Customer Number 1
           name1 type kna1-name1,      "Name 1
           ort01 type kna1-ort01,      "City
           adrnr1 type kna1-adrnr,     "Address
           name2 type kna1-name1,      "Name 1
           ort02 type kna1-ort01,      "City
           adrnr2 type kna1-adrnr,     "Address
           name3 type kna1-name1,      "Name 1
           ort03 type kna1-ort01,      "City
           adrnr3 type kna1-adrnr,     "Address
       end of t_final.
*            D A T A D E C L A R A T I O N
*&*********Internal Table Declaration****************&*
data: it_likp type standard table of t_likp.
data: it_lips type standard table of t_lips.
data: it_vbpa type standard table of t_vbpa.
data: it_kna1 type standard table of t_kna1.
data: it_li_vbpa type standard table of t_li_vbpa.
data: it_li_vbpa_temp type standard table of t_li_vbpa.
data: it_final type standard table of t_final.
*&*********Work Area Declaration********************&*
data: wa_likp type t_likp.
data: wa_lips type t_lips.
data: wa_vbpa type t_vbpa.
data: wa_kna1 type t_kna1.
data: wa_li_vbpa type t_li_vbpa.
data: wa_li_vbpa_temp type t_li_vbpa.
data: wa_final type t_final.
*&*********Data Declaration************************&*
data: d_vbeln type likp-vbeln.
data: flag type i value 0.
*           S E L E C T I O N S C R E E N   D E C L A R A T I O N
selection-screen begin of block block2 with frame title text-001.
select-options: s_vbeln for d_vbeln obligatory.    "Delivery no
selection-screen end of block block2.
*            A T S E L E C T I O N - S C R E E N   E V E N T S
*AT SELECTION-SCREEN.
*PERFORM VALIDATE_DATA.
*            S T A R T   O F S E L E C T I O N     E V E N T S
start-of-selection.
perform fetch_data.
perform merge_data_kna1.
*INCLUDE Z9BT_SH_***4_FORMS.
call function 'OPEN_FORM'
exporting
*   APPLICATION                       = 'TX'
*   ARCHIVE_INDEX                     =
*   ARCHIVE_PARAMS                    =
    device                            = 'PRINTER'
*   DIALOG                            = 'X'
*   FORM                              = ' '
   language                          = sy-langu
*   OPTIONS                           =
*   MAIL_SENDER                       =
*   MAIL_RECIPIENT                    =
*   MAIL_APPL_OBJECT                  =
*   RAW_DATA_INTERFACE                = '*'
*   SPONUMIV                          =
* IMPORTING
*   LANGUAGE                          =
*   NEW_ARCHIVE_PARAMS                =
*   RESULT                            =
exceptions
   canceled                          = 1
   device                            = 2
   form                              = 3
   options                           = 4
   unclosed                          = 5
   mail_options                      = 6
   archive_error                     = 7
   invalid_fax_number                = 8
   more_params_needed_in_batch       = 9
   spool_error                       = 10
   codepage                          = 11
   others                            = 12
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
sort it_final by vbeln.
loop at it_final into wa_final.
call function 'START_FORM'
exporting
*   ARCHIVE_INDEX          =
   form                   = 'Z9BT_DELIVERY'
   language               = sy-langu
*   STARTPAGE              = ' '
*   PROGRAM                = ' '
*   MAIL_APPL_OBJECT       =
* IMPORTING
*   LANGUAGE               =
exceptions
   form                   = 1
   format                 = 2
   unended                = 3
   unopened               = 4
   unused                 = 5
   spool_error            = 6
   codepage               = 7
   others                 = 8
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
call function 'WRITE_FORM'
exporting
   element                        = 'ITEM_LIST'
   function                       = 'SET'
   type                           = 'BODY'
   window                         = 'MAIN'
* IMPORTING
*   PENDING_LINES                  =
* EXCEPTIONS
*   ELEMENT                        = 1
*   FUNCTION                       = 2
*   TYPE                           = 3
*   UNOPENED                       = 4
*   UNSTARTED                      = 5
*   WINDOW                         = 6
*   BAD_PAGEFORMAT_FOR_PRINT       = 7
*   SPOOL_ERROR                    = 8
*   CODEPAGE                       = 9
*   OTHERS                         = 10
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
call function 'END_FORM'
* IMPORTING
*   RESULT                         =
exceptions
   unopened                       = 1
   bad_pageformat_for_print       = 2
   spool_error                    = 3
   codepage                       = 4
   others                         = 5
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
endloop.
call function 'CLOSE_FORM'
* IMPORTING
*   RESULT                         =
*   RDI_RESULT                     =
* TABLES
*   OTFDATA                        =
exceptions
   unopened                       = 1
   bad_pageformat_for_print       = 2
   send_error                     = 3
   spool_error                    = 4
   codepage                       = 5
   others                         = 6
if sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
*         WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
endif.
*&      Form VALIDATE_DATA
*       text
* --> p1        text
* <-- p2        text
form validate_data .
select single vbeln into wa_likp-vbeln
                    from likp where vbeln in s_vbeln.
append wa_likp to it_likp.
if sy-subrc <> 0.
flag = 1.
endif.
endform.                    " VALIDATE_DATA
*&      Form FETCH_DATA
*       text
* --> p1        text
* <-- p2        text
form fetch_data .
select a~vbeln
       a~erdat
       a~kunnr
       a~kunag
       a~traty
       b~vbeln
       b~posnr
       b~matnr
       b~arktx
       b~lfimg
       b~netpr
       b~vgbel
       c~vbeln
       c~parvw
       c~kunnr
         into table it_li_vbpa
                from likp as a
                left outer join lips as b on a~vbeln = b~vbeln
                inner join vbpa as c on b~vgbel = c~vbeln
                where a~vbeln in s_vbeln and
                c~parvw = 'RE'.
endform.                    " FETCH_DATA
*&      Form MERGE_DATA_KNA1
*       text
* --> p1        text
* <-- p2        text
form merge_data_kna1 .
if it_li_vbpa[] is not initial.
it_li_vbpa_temp[] = it_li_vbpa[].
sort it_li_vbpa_temp by kunnr.
delete adjacent duplicates from it_li_vbpa_temp comparing kunnr.
loop at it_li_vbpa into wa_li_vbpa.
read table it_li_vbpa_temp into wa_li_vbpa_temp with key kunnr =
wa_li_vbpa-kunag.
if sy-subrc <> 0.
wa_li_vbpa_temp = wa_li_vbpa.
append wa_li_vbpa_temp to it_li_vbpa_temp.
endif.
read table it_li_vbpa_temp into wa_li_vbpa_temp with key kunnr =
wa_li_vbpa-kunnrb.
if sy-subrc <> 0.
wa_li_vbpa_temp = wa_li_vbpa.
append wa_li_vbpa_temp to it_li_vbpa_temp.
endif.
endloop.
endif.
if it_li_vbpa_temp[] is not initial.
select kunnr
        name1
        ort01
        adrnr into table it_kna1 from kna1
                    for all entries in it_li_vbpa_temp
                    where kunnr = it_li_vbpa_temp-kunnr.
endif.
loop at it_li_vbpa into wa_li_vbpa .
wa_final-vbeln = wa_li_vbpa-vbeln.
wa_final-erdat = wa_li_vbpa-erdat.
*it_final-LFART = it_li_vbpa-LFART.
wa_final-kunnr = wa_li_vbpa-kunnr.
wa_final-kunag = wa_li_vbpa-kunag.
*it_final-VSTEL = it_li_vbpa-VSTEL.
wa_final-traty = wa_li_vbpa-traty.
wa_final-vbeln1 = wa_li_vbpa-vbeln.
wa_final-posnr = wa_li_vbpa-posnr.
wa_final-matnr = wa_li_vbpa-matnr.
wa_final-arktx = wa_li_vbpa-arktx.
wa_final-lfimg = wa_li_vbpa-lfimg.
wa_final-netpr = wa_li_vbpa-netpr.
*wa_final-GEWEI = it_li_vbpa-GEWEI.
*it_final-VOLUM = it_li_vbpa-VOLUM.
*it_final-VOLEH = it_li_vbpa-VOLEH.
wa_final-vgbel = wa_li_vbpa-vgbel.
wa_final-vbeln3 = wa_li_vbpa-vbeln.
*wa_final-PARVW = wa_li_vbpa-PARVW.
wa_final-kunnrb = wa_li_vbpa-kunnrb.
read table it_kna1 into wa_kna1 with key kunnr = wa_li_vbpa-kunnr.
if sy-subrc = 0.
wa_final-name1 = wa_kna1-name1.
wa_final-ort01 = wa_kna1-ort01.
wa_final-adrnr1 = wa_kna1-adrnr.
endif.
read table it_kna1 into wa_kna1 with key kunnr = wa_li_vbpa-kunag.
if sy-subrc = 0.
wa_final-name2 = wa_kna1-name1.
wa_final-ort02 = wa_kna1-ort01.
wa_final-adrnr2 = wa_kna1-adrnr.
endif.
read table it_kna1 into wa_kna1 with key kunnr = wa_li_vbpa-kunnrb.
if sy-subrc = 0.
wa_final-name3 = wa_kna1-name1.
wa_final-ort03 = wa_kna1-ort01.
wa_final-adrnr3 = wa_kna1-adrnr.
endif.
append wa_final to it_final.
clear wa_final.
endloop.
endform.

How to create pageInstance for a Particular page using page lable?

Similar Messages

Maybe you are looking for