To get details after second list in interactive report

hai abap experts,
i got a problem, i have written acode in which 3rd list is not executing how to write code for 3rd list(my 3rd list is to get item details by call transaction 'me23')
i'll send u all my code lz check n help out.
TABLES : EKKO,
         EKPO,
         LFA1,
         EKET.
SELECT-OPTIONS : S_LIFNR FOR EKKO-LIFNR,
                  S_BSART FOR EKKO-BSART,
                  S_AEDAT FOR EKKO-AEDAT.
************************INTERNAL TABLES*******************************
DATA : BEGIN OF RESULTS OCCURS 1000,    "DATA RETRIEVAL RESULTS
             LIFNR LIKE EKKO-LIFNR,
             EBELN LIKE EKKO-EBELN,
             EBELP LIKE EKPO-EBELP,
             AEDAT LIKE EKKO-AEDAT,
             ERNAM LIKE EKKO-ERNAM,
             LINES(3) TYPE N,
             NETWR LIKE EKPO-NETWR,
             MENGE LIKE EKPO-MENGE,
             WEMNG LIKE EKET-WEMNG,
             TXZ01 LIKE EKPO-TXZ01,
      END OF RESULTS.
DATA : BEGIN OF WRK,                       "WORK FIELD DEFINATIONS
          HDRSW(1),                        "LIST HEADER SWITCH
          TITLE2(40),                      "2ND TITLE LINE FOR REPORT
       END OF WRK.
DATA : BEGIN OF SELECT,                    "USER SELECTION FIELDS
            EBELN LIKE EKKO-EBELN,         "PURCHASE ORDER NO
            CHECKBOX(1) TYPE C,
       END OF SELECT.
DATA : BEGIN OF STATS,                      "STATISTICS
       START_TIME LIKE SY-UZEIT,
       END_TIME LIKE SY-UZEIT,
       PROC_TIME LIKE SY-UZEIT,
       RECS_EKPO LIKE SY-DBCNT,
       RECS_EKKO LIKE SY-DBCNT,
   END OF STATS.
**************************EVENTS**************************************
INITIALIZATION.
CLEAR S_AEDAT.
S_AEDAT-SIGN = 'I'.
S_AEDAT-OPTION = 'BT'.
S_AEDAT-LOW = SY-DATUM - 30.
S_AEDAT-HIGH = SY-DATUM.
APPEND S_AEDAT.
AT SELECTION-SCREEN.
LOOP AT S_LIFNR.
    CHECK S_LIFNR-OPTION = 'EQ'.
    SELECT SINGLE * FROM LFA1 WHERE LIFNR = S_LIFNR-LOW.
    IF SY-SUBRC NE 0.
      MESSAGE E002 WITH 'VENDOR' S_LIFNR-LOW 'NOT FOUND IN LFA1'.
    ENDIF.
ENDLOOP.
START-OF-SELECTION.
GET TIME.
STATS-START_TIME = SY-UZEIT.
SET PF-STATUS 'MAIN'.
PERFORM DATA_RETRIEVAL.
PERFORM PROCESS_DATA.
PERFORM DISPLAY_LIST.
PERFORM WRITE_SELECTIONS.
PERFORM WRITE_STATISTICS.
AT LINE-SELECTION.
CHECK NOT SELECT-EBELN IS INITIAL.
PERFORM DISPLAY_ITEM_DETAIL USING SELECT-EBELN.
CLEAR : SELECT-EBELN.
AT USER-COMMAND.
   CASE SY-UCOMM.
      WHEN 'DSA'.
        PERFORM CLEAR_ALL_SELECTED.
      WHEN 'DSL'.
         PERFORM DISPLAY_ALL_SELECTED.
   ENDCASE.
TOP-OF-PAGE.
CASE WRK-HDRSW.
    WHEN '1'.
      WRK-TITLE2 = 'PROGRAM SELECTIONS'(002).
    WHEN '2'.
      WRK-TITLE2 = 'PROGRAM DETAIL'(003).
    WHEN '3'.
      WRK-TITLE2 = 'PROGRAM SUMMARY'(004).
    WHEN '4'.
      WRK-TITLE2 = 'PROGRAM STATISTICS'(005).
ENDCASE.
FORMAT COLOR COL_HEADING.
PERFORM PGH_STANDARD_HEADING
      USING        TEXT-001
                    WRK-TITLE2.
IF WRK-HDRSW = '2'.
    WRITE : /01 SY-VLINE,
             02 'VENDOR #'(103),
             16 SY-VLINE,
             17 'PO #'(104),
             32 SY-VLINE,
             33 'ENTRY DATE'(105),
             43 SY-VLINE,
             44 'USER'(106),
             59 SY-VLINE,
             60 'LINES'(107),
             70 SY-VLINE,
             71 'AMOUNT'(108),
             91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
ENDIF.
FORMAT RESET.
**************************SECONDRY LIST*******************************
TOP-OF-PAGE DURING LINE-SELECTION.
CASE WRK-HDRSW.
    WHEN '5'.
      WRK-TITLE2 = 'DETAIL LISTING'(201).
ENDCASE.
FORMAT COLOR COL_HEADING.
PERFORM PGH_STANDARD_HEADING
      USING        TEXT-001
                    WRK-TITLE2.
IF WRK-HDRSW = '5'.
    WRITE : /01 SY-VLINE,
             02 'VENDOR #'(103),
             16 SY-VLINE,
             17 'PO #'(104),
             32 SY-VLINE,
             33 'ENTRY DATE'(105),
             43 SY-VLINE,
             44 'USER'(106),
             59 SY-VLINE.
    WRITE : /01 SY-ULINE(59).
    FORMAT COLOR COL_KEY.
    WRITE : /01 SY-VLINE,
             02 RESULTS-LIFNR,
             16 SY-VLINE,
             17 RESULTS-EBELN,
             32 SY-VLINE,
             33 RESULTS-AEDAT DD/MM/YY,
             43 SY-VLINE,
             44 RESULTS-ERNAM,
             59 SY-VLINE.
    WRITE : /01 SY-ULINE(101).
    FORMAT COLOR COL_HEADING.
    WRITE : /01 SY-VLINE,
             02 'LINE'(301),
             07 SY-VLINE,
             08 'DESCRIPTION'(302),
             48 SY-VLINE,
             49 'QTY ORDERDED'(303),
             64 SY-VLINE,
             65 'QTY RECEIVED'(304),
             80 SY-VLINE,
             81 'AMOUNT'(305),
             101 SY-VLINE.
    WRITE : /01 SY-ULINE(101).
ENDIF.
FORMAT RESET.
*************************SUBROUTINES**********************************
FORM DISPLAY_ALL_SELECTED.
DATA : LINE_NUMBER LIKE SY-LILLI.
          LINE_NUMBER = 1.
DO.
CLEAR : SELECT-CHECKBOX,
          SELECT-EBELN.
READ LINE LINE_NUMBER   FIELD VALUE SELECT-CHECKBOX
                                       SELECT-EBELN.
IF SY-SUBRC NE 0.
        EXIT.
ENDIF.
ADD 1 TO LINE_NUMBER.
CHECK SELECT-CHECKBOX = 'X'.
NEW-PAGE.
PERFORM DISPLAY_ITEM_DETAIL USING SELECT-EBELN.
ENDDO.
ENDFORM.
FORM CLEAR_ALL_SELECTED.
DATA : LINE_NUMBER LIKE SY-LILLI.
         LINE_NUMBER = 1.
DO.
READ LINE LINE_NUMBER   FIELD VALUE SELECT-CHECKBOX
                                       SELECT-EBELN.
IF SY-SUBRC NE 0.
        EXIT.
ENDIF.
IF SELECT-CHECKBOX = 'X'.
CLEAR : SELECT-CHECKBOX.
MODIFY LINE LINE_NUMBER FIELD VALUE SELECT-CHECKBOX
                                  SELECT-EBELN.
ENDIF.
ADD 1 TO LINE_NUMBER.
ENDDO.
ENDFORM.
FORM DATA_RETRIEVAL.
SELECT * FROM EKKO WHERE BSART IN S_BSART
                       AND AEDAT IN S_AEDAT
                       AND LIFNR IN S_LIFNR.
    CLEAR RESULTS.
    RESULTS-LIFNR = EKKO-LIFNR.
    RESULTS-EBELN = EKKO-EBELN.
    RESULTS-AEDAT = EKKO-AEDAT.
    RESULTS-ERNAM = EKKO-ERNAM.
    SELECT * FROM EKPO WHERE EBELN = EKKO-EBELN.
      MOVE 1 TO RESULTS-LINES.
      MOVE EKPO-NETWR TO RESULTS-NETWR.
      RESULTS-EBELP = EKPO-EBELP.
      RESULTS-TXZ01 = EKPO-TXZ01.
      RESULTS-MENGE = EKPO-MENGE.
      APPEND RESULTS.
    ENDSELECT.
ENDSELECT.
ENDFORM.                    "DATA_RETRIEVAL
FORM PROCESS_DATA.
LOOP AT RESULTS.
    CLEAR RESULTS-WEMNG.
    SELECT * FROM EKET WHERE EBELN = RESULTS-EBELN
                   AND EBELP = RESULTS-EBELP.
      ADD EKET-WEMNG TO RESULTS-WEMNG.
    ENDSELECT.
    MODIFY RESULTS.
ENDLOOP.
ENDFORM.                    "PROCESS_DATA
FORM DISPLAY_LIST.
DATA : TOT_LINES(3) TYPE N.
DATA : TOT_AMT      LIKE EKPO-NETWR.
DATA : WRT_FLAG(1) TYPE C.
SORT RESULTS BY LIFNR EBELN.
NEW-PAGE.
WRK-HDRSW = '2'.
LOOP AT RESULTS.
    AT END OF EBELN.
      MOVE 'X' TO WRT_FLAG.
    ENDAT.
    ADD 1 TO TOT_LINES.
    ADD RESULTS-NETWR TO TOT_AMT.
    IF WRT_FLAG = 'X'.
      WRITE : /01 SY-VLINE,
               02 SELECT-CHECKBOX AS CHECKBOX,
               04 RESULTS-LIFNR,
               16 SY-VLINE,
               17 RESULTS-EBELN,
               32 SY-VLINE,
               33 RESULTS-AEDAT MM/DD/YY,
               43 SY-VLINE,
               44 RESULTS-ERNAM,
               59 SY-VLINE,
               60 TOT_LINES,
               70 SY-VLINE,
               71 TOT_AMT,
               91 SY-VLINE.
      SELECT-EBELN = RESULTS-EBELN.
      HIDE : SELECT-EBELN.
      CLEAR : SELECT-EBELN.
      WRITE : /01 SY-ULINE(91).
      CLEAR : WRT_FLAG,
              TOT_LINES,
              TOT_AMT.
    ENDIF.
    AT END OF LIFNR.
     SUM.
      FORMAT COLOR COL_GROUP.
      WRITE : /01 SY-VLINE,
               02 'TOTAL FOR VENDOR:'(101),
                   RESULTS-LIFNR,
               70 SY-VLINE,
               71 RESULTS-NETWR,
               91 SY-VLINE.
      WRITE : /01 SY-ULINE(91).
      FORMAT RESET.
    ENDAT.
ENDLOOP.
IF SY-SUBRC NE 0.
    FORMAT COLOR COL_NEGATIVE.
    WRITE : /01 SY-VLINE,
             02 'NO RECORDS FOUND'(102),
             91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
    FORMAT RESET.
ENDIF.
ENDFORM.                    "DISPLAY_LIST
FORM DISPLAY_ITEM_DETAIL USING L_EBELN.
CALL TRANSACTION 'ME23' AND SKIP FIRST SCREEN.
SET PARAMETER ID 'BES' FIELD L_EBELN.
*GET PARAMETER ID 'BES' FIELD L_EBELN.
WRK-HDRSW = '5'.
SET PF-STATUS 'STLI'.
LOOP AT RESULTS WHERE EBELN = L_EBELN.
    WRITE : /01 SY-VLINE,
             02 RESULTS-EBELP,
             07 SY-VLINE,
             08 RESULTS-TXZ01,
             48 SY-VLINE,
             49(15) RESULTS-MENGE,
             64 SY-VLINE,
             65(15) RESULTS-WEMNG,
             80 SY-VLINE,
             81 RESULTS-NETWR,
             101 SY-VLINE.
      WRITE : /01 SY-ULINE(101).
    ENDLOOP.
IF SY-SUBRC NE 0.
    FORMAT COLOR COL_NEGATIVE.
    WRITE : /01 SY-VLINE,
             02 'NO RECORDS FOUND'(102),
             91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
    FORMAT RESET.
ENDIF.
ENDFORM.                    "DISPLAY_ITEM_DETAIL
FORM WRITE_SELECTIONS.
NEW-PAGE.
WRK-HDRSW = '1'.
WRITE : /01 SY-VLINE,
           02 'VENDOR NUMBER'(112),
           25 SY-VLINE.
LOOP AT S_LIFNR.
    WRITE : 26 S_LIFNR,
            91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
ENDLOOP.
IF SY-SUBRC NE 0.
    WRITE : 26 '*ALL*'(200),
            91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
ENDIF.
WRITE : /01 SY-VLINE,
           02 'PO TYPE'(111),
           25 SY-VLINE.
LOOP AT S_BSART.
    WRITE : 26 S_BSART,
            91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
ENDLOOP.
IF SY-SUBRC NE 0.
    WRITE : 26 '*ALL*'(200),
            91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
ENDIF.
WRITE : /01 SY-VLINE,
           02 'ENTRY DATES'(112),
           25 SY-VLINE.
LOOP AT S_AEDAT.
    WRITE : 26 S_AEDAT,
            91 SY-VLINE.
    WRITE : /01 SY-ULINE(91).
ENDLOOP.
IF SY-SUBRC NE 0.
    WRITE : 26 '*ALL*'(200),
            91 SY-VLINE.
    WRITE : / SY-ULINE(91).
ENDIF.
ENDFORM.                    "WRITE_SELECTIONS
FORM WRITE_STATISTICS.
NEW-PAGE.
WRK-HDRSW = '4'.
GET TIME.
STATS-END_TIME = SY-UZEIT.
IF STATS-END_TIME > STATS-START_TIME.
    STATS-PROC_TIME = STATS-END_TIME - STATS-START_TIME.
ELSE.
    STATS-PROC_TIME = '240000'.
    STATS-PROC_TIME = STATS-PROC_TIME - STATS-START_TIME.
    STATS-PROC_TIME = STATS-PROC_TIME + STATS-END_TIME.
ENDIF.
WRITE : /01 SY-VLINE,
           02 'START TIME'(113),
           25 SY-VLINE,
           26 STATS-START_TIME USING EDIT MASK '__:__:__',
           91 SY-VLINE.
WRITE : /01 SY-ULINE(91).
WRITE : /01 SY-VLINE,
           02 'END TIME'(114),
           25 SY-VLINE,
           26 STATS-END_TIME USING EDIT MASK '__:__:__',
           91 SY-VLINE.
WRITE : /01 SY-ULINE(91).
WRITE : /01 SY-VLINE,
           02 'PROCESSING TIME'(115),
           25 SY-VLINE,
           26 STATS-PROC_TIME USING EDIT MASK '__:__:__',
           91 SY-VLINE.
WRITE : /01 SY-ULINE(91).
WRITE : /01 SY-VLINE,
           02 'EKKO RECORDS READ'(116),
           25 SY-VLINE,
           26 STATS-RECS_EKKO,
           91 SY-VLINE.
WRITE : /01 SY-ULINE(91).
WRITE : /01 SY-VLINE,
           02 'EKPO RECORDS READ'(117),
           25 SY-VLINE,
           26 STATS-RECS_EKPO,
           91 SY-VLINE.
WRITE : /01 SY-ULINE(91).
ENDFORM.                    "WRITE_STATISTICS
FORM PGH_STANDARD_HEADING USING L_TITLE1
                                L_TITLE2.
FORMAT COLOR COL_HEADING.
PERFORM PGH_WRITE_DATE_TIME.
PERFORM PGH_WRITE_TITLE USING L_TITLE1.
PERFORM PGH_WRITE_REPORT_PAGE.
PERFORM PGH_WRITE_USERID.
PERFORM PGH_WRITE_TITLE USING L_TITLE2.
PERFORM PGH_WRITE_SYSTEM_CLIENT.
FORMAT RESET.
ENDFORM.                    "PGH_STANDARD_HEADING
FORM PGH_WRITE_USERID.
WRITE : /01 SY-ULINE(91).
WRITE : /01 SY-VLINE,
           02 'USERID:',
           10 SY-UNAME,
           91 SY-VLINE.
ENDFORM.                    "PGH_WRITE_USERID
FORM PGH_WRITE_DATE_TIME.
WRITE : /01 SY-ULINE(91).
WRITE : /01 SY-VLINE,
           02 'DATE:',
           10 SY-DATUM MM/DD/YYYY,
           21 '/',
           23 SY-UZEIT USING EDIT MASK'__:__:__',
           91 SY-VLINE.
ENDFORM.                    "PGH_WRITE_DATE_TIME
FORM PGH_WRITE_TITLE USING L_TITLE.
DATA : L_LINSZ LIKE SY-LINSZ.
DATA : L_TITLEL LIKE SY-TABIX.
DATA : L_START LIKE SY-TABIX.
L_LINSZ = SY-LINSZ.
L_TITLEL = STRLEN( L_TITLE ).
L_START = ( L_LINSZ / 2 ) - ( L_TITLEL / 2 ).
POSITION L_START.
WRITE :/01 SY-VLINE,
          02 L_TITLE,
          91 SY-VLINE.
ENDFORM.                    "PGH_WRITE_TITLE
FORM PGH_WRITE_REPORT_PAGE.
DATA : L_LINSZ LIKE SY-LINSZ.
DATA : L_START LIKE SY-TABIX.
L_LINSZ = SY-LINSZ.
L_START = L_LINSZ - 24.
POSITION L_START.
WRITE : /01 SY-VLINE,
           02 'REPORT:', SY-REPID, 'PG', (4) SY-PAGNO,
           91 SY-VLINE.
POSITION L_LINSZ.
ENDFORM.                    "PGH_WRITE_REPORT_PAGE
FORM PGH_WRITE_SYSTEM_CLIENT.
DATA : L_LINSZ LIKE SY-LINSZ.
DATA : L_START LIKE SY-TABIX.
L_LINSZ = SY-LINSZ.
L_START = L_LINSZ - 24.
POSITION L_START.
WRITE :/01 SY-VLINE,
          02 'SYSTEM:', SY-SYSID,'/',SY-MANDT,
          91 SY-VLINE.
POSITION L_LINSZ.
WRITE :/01 SY-VLINE.
WRITE : /01 SY-ULINE(91).
ENDFORM.                    "PGH_WRITE_SYSTEM_CLIENT

There is a very minor correction in your logic.
FORM DISPLAY_ITEM_DETAIL USING L_EBELN.
CALL TRANSACTION 'ME23' AND SKIP FIRST SCREEN.
SET PARAMETER ID 'BES' FIELD L_EBELN.
*GET PARAMETER ID 'BES' FIELD L_EBELN.
instead of this try
SET PARAMETER ID 'BES' FIELD L_EBELN.
CALL TRANSACTION 'ME23' AND SKIP FIRST SCREEN.
you should always set the parameter id first and then call the transaction.
i tried it in my system and it seems to be working.

Similar Messages

What is difference between interactive list and interactive reports?

what is difference between interactive list and interactive reports?

hi check this..
interactive report/list means any input(double click or single click or user command ) on the screen will results a new screen with the corresponding fields....this is upto 20 levels only check this..
report .
start-of-selection.
write:/ 'this is the source list'.
at line-selection .
if sy-lsind = 1 .
write:/ ' this is the 1st list'.
elseif.
if sy-lsind = 2 .
write:/ ' this is the 2 list'.
if sy-lsind = 3 .
write:/ ' this is the 3 list'.
if sy-lsind = 4 .
write:/ ' this is the 4 list'.
if sy-lsind = 5 .
write:/ ' this is the 5 list'.
if sy-lsind = 6 .
write:/ ' this is the 6 list'.
if sy-lsind = 7 .
write:/ ' this is the 7 list'.
if sy-lsind = 8.
write:/ ' this is the 8 list'.
if sy-lsind = 9 .
write:/ ' this is the 9 list'.
if sy-lsind = 10 .
write:/ ' this is the 10 list'.
endif.
regards,
venkat

How to create more than 21 lists in interactive reports

hello everyone,
I am new to ABAP as well as this site. Kindly help, I want to know how to create more than 21 lists in interactive reports.
Also, how can i create them without using WHEN 1, wHEN 2 and so on...
Kindly help.
thank you

Hello,
Using Intracive Reports its not possible to cretate more than 21 lists.
But its possible to create more than 21 using ALV concept.
for sample ALV u can serch in SDN.
Regards,
Anil.

How to skip from one list to another list in interactive report?

Hi Friends,
How to skip from one list to another list in interactive report that means now i am in 7 th list how to skip 4th list ?
Or now i am in 7 th list how to skip 9th list ?
can anybody send sample code please.
Thanks in advance.

hi,
at line-selection.
case sy-lsind.
when 9.
sylsind = 4.
endcase.
try like this when u r in 9th list next it goes to 4 th list

Select list within interactive report.

Hello y'all,
I have a need to develop an interactive report and am lost in how to proceed. I am asking for your help. The report requirements are as such:
- There are 3 types of records that will be in the report
- The is a checkbox to associate the records to a particular event.
- If the record is of a certain value, 3 of the columns in that record have to show as select lists.
- The records with the other 2 values should not have the select lists, just show a null in those columns.
- The checkbox must be checked for the select lists to appear.
- The select lists are based on a list of values. The values are populated with an existing common function used in many of the application pages.
I am having no success in trying to get the select lists in the report. Has anyone developed an interactive report that uses select lists within the report? Is this even possible?
I am using application Express 3.2.0.00.27. Any help that you can give is greatly appreciated. Thank you so much!
*** Got it. It has to be a tabular report with updateable columns. ***
Edited by: seashell on Sep 13, 2010 5:22 AM
Edited by: seashell on Sep 13, 2010 7:07 AM

Hi,
I am not sure if the "equal to" condition applies to a DOM object... after all, a DOM object can be anything (any HTML element) not only a field.
Try using a javascript expression instead, like this:
$v('P6_IR_SELECT_LIST')=='Delete'UPDATE: Sorry, I just tested and "equal to" condition works for DOM objects... should have tested before posting!
Luis
Edited by: Luis Cabral on Feb 29, 2012 4:45 PM

How to go back to a particulat list in interactive report.

hi experts,
I have created an interactive report which has a primary list and 4 secondary list.Now from my 4th list i want to go to second list .
what i have to do .i know something has to be done with sy-lsind.
just check this code.
case sy-ucomm.
when 'BACK'.
sy-lsind = sy-lsind - 2.
endcase.
i have written this code in the code for 4th list.but it is not working .

sy-lsind it has got different list levels
at back user command write code
SET USER COMMAND 'BACK'.
it will help u surely
thanx n regards
plz award
keep rockin
vivek

Get row number of record in Interactive Report

I am using an interactive report and want to be able to modify a field and if the value already exists in the database change it back to what it was originally. I am selecting data using the select statement below and I'm calling the javascript CheckExists function when the value changes. All this is working but I need to figure out how to get the row number so I can change the value back to what is in f03 in the same row. Does anyone know how to access the row number or know how I can do this?
select apex_item.checkbox(1, RESOURCE_TYPE_ID, 'onchange="CheckUsed(this, this.value);"', ':') "Delete",
apex_item.text(2, RESOURCE_TYPE, 20, 100, 'onchange="CheckExists(this, this.value);"' ) "RESOURCE_TYPE",
RESOURCE_TYPE_ID,
apex_item.text(3, RESOURCE_TYPE, 20, 100) "orig_resource_type"
from resource_types
order by RESOURCE_TYPE

Scott,
I was not able to find anything like using #ROWNUM# that would give me the current row number but I was able to get it if I looped through all the records until I found the record I was currently on. It is not really what I wanted to do but it works. I have included the code below.
Thanks a lot for your help I appreciate it.
Steve
*** Interactive Report Select statement ***
select apex_item.checkbox(1, RESOURCE_TYPE_ID, 'onchange="CheckUsed(this);"', ':') "Delete",
apex_item.text(2, RESOURCE_TYPE, 20, 100, 'onchange="CheckExists(this);"' ) RESOURCE_TYPE,
RESOURCE_TYPE_ID,
apex_item.text(3, RESOURCE_TYPE, 20, 100) ORIG_RESOURCE_TYPE
from resource_types
order by RESOURCE_TYPE
*** Javascript ***
function CheckUsed (pResourceType)
var get = new htmldb_Get(null,$x('pFlowId').value,'APPLICATION_PROCESS=ResourcesResourceTypeExists',0);
get.add('TEMPORARY_ITEM', pResourceType.value);
gReturn = get.get();
if (gReturn > 0)
alert('Resource records exist using the Resource Type; Unable to delete.');
pResourceType.checked=false;
function CheckExists (pResourceType)
// Get the current row number.
var lResourceTypeId = document.getElementsByName("f01");
var lResourceType = document.getElementsByName("f02");
var lOrigResourceType = document.getElementsByName("f03");
var j;
for (j = 0; j < lResourceType.length; j++)
if (lResourceType[j].value == pResourceType.value)
if (lResourceType[j].value != lOrigResourceType[j].value)
break;
} // if (lResourceType[j].value != lOrigResourceType[j].value)
} // if (lResourceType[j].value == pResourceType.value)
} // for (j = 0; j < lResourceType.length; j++)
// Check if the Resource Type already exists.
var get = new htmldb_Get(null,$x('pFlowId').value,'APPLICATION_PROCESS=ResourceTypeExists',0);
get.add('TEMPORARY_ITEM', pResourceType.value);
gReturn = get.get();
if (gReturn > 0)
// Reset the Resource Type to the original Resource Type.
get.add('lResourceType[j]', lOrigResourceType[j].value);
doSubmit('SUBMIT');
else
var get = new htmldb_Get(null,$x('pFlowId').value,'APPLICATION_PROCESS=UpdateResourceType',0);
get.add('TEMPORARY_ITEM', pResourceType.value);
get.add('TEMPORARY_ITEM_2', lResourceTypeId[j].value);
gReturn = get.get();
alert(gReturn );
}

How I get the primary key in a interactive report?

hi,I'm a noob of apex.
I want to get a Interactive report's primary key or rownum,and I try to use the f01...but it doesn't work.
how can I do this.
zl

Have a look at: Re: To reference Interactive Report filtered rows in PL/SQL

Select List beside Interactive report

Hi All,
I am not able to place a SELECT LIST item beside an Interactive Report.
What is happening:
<selecting columns to search> Go Action SELECT LIST*
I n t e r a c t i v e R e p o r t
Even though I am able to place a button beside the Interactive Report using the Button Position attribute for the button.
<selecting columns to search> Go Action Button
I n t e r a c t i v e R e p o r t
Sadly there is no such attribute for a SELECT LIST.
What I want:
|<selecting columns to search> Go Action SELECT LIST
I n t e r a c t i v e R e p o r t
I tried using the Grid Layout Attributes but to no avail.
Thanks,
Sombit

Hi,
I do not know is that possible without styles or JavaScript.
You can try this.
Place to page JavaScript Execute when Page Loads
$("#apexir_TOOLBAR").append($("#Px_YOUR_SELECT_LIST"));Change Px_YOUR_SELECT_LIST to your select list name
Regards,
Jari
My Blog: http://dbswh.webhop.net/htmldb/f?p=BLOG:HOME:0
Twitter: http://www.twitter.com/jariolai
Edited by: jarola on Mar 27, 2013 8:32 AM

How will come back 5th list to 3rd list in interactive reporting

hi all,
which of this code is correct to comeback 5th to 3rd list
at user-command.
case sy-ucomm.
when 'back'.
if sy-lsind = 5.
sy-lsind = 3.
endif.
endcase.
or
at user-command.
case sy-ucomm.
when 'back'.
if sy-lsind = 5.
sy-lsind = 2.
endif.
endcase.
thanks in advance

hi friend,
try out this code: normal list..i think second one will be the correct one..
START-OF-SELECTION.
WRITE: 'Basic List, SY-LSIND =', sy-lsind.
AT LINE-SELECTION.
WRITE: 'Secondary List, SY-LSIND =', sy-lsind.
if sy-lsind = 5.
sy-lsind = 2.
endif.
thanks
jaideep
if useful reward points..

How to get details of service activities in PS reports

Dear all,
We are using Service activities to capture external services in the project. The confirmation of these services is carried out through service entry sheets.
The issue is that the confirmed services in the service entry sheets do not get reflected in the PS reports. i.e. CN41 or CN41N. Because of this, the report in CN41 is incomplete and the report does not give clear picture.User has to see the MM reports to get the clear project completion.
Is there any other way through which services in the service entry sheets gets reflected in PS ?
Thanks in advance.
Potluri

You can see material/service related reports in PS as well using below transactions:
1. Purchase Orders For Project - ME2J
2. Purchase Orders For Account Assignment - ME2K (ex. for WBS, Activity etc.,)
In the selection screen of these reports you have various search criteria's. Ex Item Category (D- in your case). Choose appropriate value in the field 'Scope of List' ex., BEST. If you choose other values you'll have flexibility to change the layout (include fields etc).
Service entry sheets which have been accepted alone show as actuals in PS.
Regards
Sreenivas
Pls close the post if satisfied

Event getting trigger after hiding columns in alv report

Hi All,
I having requirement like after hiding columns,i have to control some of the hard coded data in report output. Is there any event to know what all are the columns are selected to hide?

You can use FM REUSE_ALV_LIST_LAYOUT_INFO_GET to read the fieldcat again.
Look at the parameter it_event_exit on the ALV FM to now user has press on some of the Layout buttons.
In the fieldcatalog, look for
- no_out = 'X'. " column is not displayed but can be choosen when changing the layout
-tech = 'X'.
" column is neither displayed nor availabe in the layout

Get Error After Add GL Account In Report Painter

Dear All,
I had add GL code into 2 reports (Cash Flow - Income Statement and Cash Flow - IPC Income Statement) but when I want to execute those reports in the report tree, it come out an error "In element OTHER EXP Jan the system adds quantities and values or different currencies."
May I know how to solve this problem?
Hope will get reply soon, rewards point will be given
[Financial Statement Version|http://www.picoodle.com/view.php?img=/4/4/7/f_FSE2m_f881d78.jpg&srv=img32]
[Report Painter|http://www.picoodle.com/view.php?img=/4/4/7/f_reportPaintm_0d1dd9a.jpg&srv=img29]
[Error Message|http://www.picoodle.com/view.php?img=/4/4/7/f_msgLongm_d25d1db.jpg&srv=img30]

Solved. TQ

How add Select list in Interactive report search bar

Hi , I am using Oracle Apex 4.2 and theme 25.
I want to add select list in IR search bar. I am able to add buttons but i am unable to add items..
Please guide me to achieve that ..
Thank You,
Nihar Narla

Hi,
There is no specify property called "Button Position " for page items. This is applicable for BUTTON only inside the Search bar.
There is a property in IR region -"Item Display Position" for page items to display but only 2 options [Above/below]
Thanks,
--Loga

Successfully connected clients disconnetcs after seconds

Hello,
I'm having troubles with AP541N in clustered mode.
The problem is that clients connects successfully but get disconnected after seconds without any visible reason.
The AP541N is configured to authenticate the clients against a Symantec Network Access Control (SNAC) and a radius server.
eventlog from radius server:
"User xxxxxx was granted access."
SNAC log:
Client[0000000c] xxxxxxxxxxxxxxxx, Status Recevied(HI:PASSED, EAP:PASSED, PRO:PASSED), UID is CORRECT, Enforcer matches(HI:PASSED, EAP:PASSED, PRO:ANY), switch VLAN XXXX on switch nnn.nnn.nnn.nnn.
client settings (Windows 7 32-bit):
WPA2-Enterprise/AES
EAP-Typ: secured EAP (PEAP)
This problems happens not to all clients (all clients are Dell Latitude laptops with Intel Wifi, but different models).
When I use eg. a D-Link USB Wifi adapter in a laptop causing troubles, the connection will work fine, no disconnects.
I have tested with Intel driver version 13.4.0.139
When I connect a laptop causing troubles to another access point (eg. D-Link) it will work fine.
Any ideas to solve the problem are welcome.
AP541N Device Information
Product Identifier: AP541N-E-K9
Hardware Version:   V01
Software Version:   AP541N-K9-1.9(2)
Serial Number:      DNI1422A06V
Device Name:        AP541N-E-K9
Device Description: 802.11n Dual Band Access Point - Single Radio
Wolfgang

Dear Wolfgang,
i have the same problems with old dlink ap-s.
After change to new hardware - no more, works fine.
mfg
Best regards.

To get details after second list in interactive report

Similar Messages

Maybe you are looking for