topic Re: Interactive Reports in Application Development and Automation Discussions

Interactive Reports

Former Member — Wed, 19 Oct 2005 16:41:58 GMT

Hi folks

Please help for this.

I am going to genarate a report, in that report basic list contains the Sales Order no.s, if I click on a sales order no, I want to show VA01 in the next screen for selected Sales order No.

Regards

Praveen

Re: Interactive Reports

Former Member — Wed, 19 Oct 2005 16:50:43 GMT

Jus put the follwoing code in at line selection event.

************************************************************************

At Line-Selection *

************************************************************************

AT LINE-SELECTION.

*---Calling of corresponding transactions based on selected field.

PERFORM f_gr_ir_details.

&----

*& Form f_GR_IR_details

&----

Subroutine to call corresponding transactions based on at line
selection criteria

----

FORM f_gr_ir_details.

*---Getting the field name and value of the double clicked field.

GET CURSOR FIELD v_fdname VALUE v_inval.

*---Condense the field name to remove the gaps.

CONDENSE v_fdname NO-GAPS.

*---Function Module to convert EBELN and BELNR to their standard format

CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'

EXPORTING

input = v_inval

IMPORTING

output = v_outval.

*----Call transaction ME23N if EBELN is chosen.

IF v_fdname = 'ITAB-VBELN'. " should be in caps

SET PARAMETER ID 'AUN' FIELD v_outval.

CALL TRANSACTION 'VA03' AND SKIP FIRST SCREEN.

ELSE.

*---If any field other than PO number , IR and GR doc Number is chosen

*---for further display , pop a message

MESSAGE i014 WITH 'No navigation possible for the selected field'(i02).

ENDIF.

ENDFORM. " f_GR_IR_details

&----

Re: Interactive Reports

RichHeilman — Wed, 19 Oct 2005 16:51:05 GMT

Here is one way of doing it, you can also use hotspots.



report zrich_0002 no standard page heading.

data: ivbak type table of vbak with header line.

data : cursor_field(30),
       field_value(30) .

select-options: s_vbeln for ivbak-vbeln.

start-of-selection.

select * into corresponding fields of table ivbak
    from vbak
        where vbeln in s_vbeln.

        loop at ivbak.
        write:/ ivbak-vbeln.
        endloop.

at line-selection.
  get cursor field cursor_field value field_value.
  case cursor_field.
    when 'IVBAK-VBELN'.
      set parameter id 'AUN' field field_value.
      call transaction 'VA03' and skip first screen..
  endcase.

Regards,

Rich Heilman

Re: Interactive Reports

RichHeilman — Wed, 19 Oct 2005 16:53:35 GMT

Here is an example of using hotspots to achieve your requirement.



report zrich_0002 no standard page heading.

data: ivbak type table of vbak with header line.

data : cursor_field(30),
       field_value(30) .

select-options: s_vbeln for ivbak-vbeln.

start-of-selection.

  select * into corresponding fields of table ivbak
      from vbak
          where vbeln in s_vbeln.

  loop at ivbak.
    format hotspot on.
    write:/ ivbak-vbeln.
    hide ivbak-vbeln.
    format hotspot off.
  endloop.

at line-selection.

  set parameter id 'AUN' field ivbak-vbeln.
  call transaction 'VA03' and skip first screen.

Regards,

Rich Heilman

Re: Interactive Reports

Former Member — Wed, 19 Oct 2005 17:18:49 GMT

REPORT znktest .

DATA: sales_order LIKE vbak-vbeln,

name(40).

START-OF-SELECTION.

sales_order = 491.

name = 'Test'.

WRITE: / sales_order, name.

HIDE: sales_order.

AT LINE-SELECTION.

CHECK NOT sales_order IS INITIAL.

CALL TRANSACTION 'VA02'.

Re: Interactive Reports

RichHeilman — Wed, 19 Oct 2005 19:50:01 GMT

Did kishore's reply really solve your problem?

Regards,

Rich Heilman

Re: Interactive Reports

Former Member — Fri, 28 Oct 2005 19:35:11 GMT

HI Rich

Your answers are pretty good. But we need to point the rating for their answers. So blindly i cheked Kishor's answer. Sorry for the mistake.

Regards

Praveen

Re: Interactive Reports

RichHeilman — Fri, 28 Oct 2005 19:44:00 GMT

No problem there. I was just wondering if there was something that I missed. I assume that you got it working?

Regards,

Rich Heilman