Display of values in sapscript output

Hi,
I am working on a sap script in which i am displaying the data coming from the program.but in 1 column there is a problem that it
is not able to display the data properly i.e. it is a text which is not able to display properly. Same type of text is displaying in the other columns of the output but in that column it is displaying the data half i.e. half of the text is displayed.
Please provide me guidelines to solve this problem.

Hi Ricx .s,
Please try to change the highte and width of the box/cell/table whereevere you are facing the problem in Sapscript.
It may be not printing the data fully because there is no enough space on page/table/cell/box which can accomodate that much lenght of text..
try changing width and/or height of the table and check the result.
Hope it will solve your problem..
Thanks & Regards
ilesh 24x7
ilesh Nandaniya

Similar Messages

Error displaying numeric values with SPREADSHEET output

Hi, I'm using Reports 10g R2 and I have all my reports with PDF output, they render just fine.
I want to render some of them with SPREADSHEET output but don't know why in some case numeric values are rendered as ****** instead of the corresponding number.
The same report shows numeric values correctly in PDF but no in some Excel cells, just SOME of them, not all.
I know that Excel column is not short because the internal value of the cell are the asterisks.
What could be happening?
Thanks!

Hi Ruby,
please refer to some very basic documentation on CRM 2007 Webclient UI or the IC Webclient of CRM 4.0.
What you are trying to do is create a value node and your code ABAP is wrong.
Here a code sample. Typed it by hand so there might be errors in it.
data:
ls_struct type /mystructure,
lr_struct_ref type ref to data,
lr_node type ref to cl_bsp_wd_value_node.
ls_struc-/attribute1/ = 'Hallo Welt'.
get reference of ls_struct into lr_struct_ref.
create object lr_node
exporting iv_data_ref = lr_struct_ref.
typed_context->/yourNode/->collection_wrapper->add( lr_node ).
cheers Carsten

Rate and accessable value is not displaying for the tax invoice output

Hello All,
Rate and accessable value is not displaying for the tax invoice output. Rest of all outputs for invoices shows Rate and accessable value.
Scenerio is free of charge sales order (samples) removing the goods from pant so excise invoice has been created and also updated. but for tax invoice out put rate and access value is not displaying.
Pricing procedure: In pricing procedure account keys have not been maintained because there is not gl account upadation during billing for free of charge delivery.
Thanks & Regards,
ramesh

hi Gurpreet,
You can add values to that transient column programatically,either by getiing the row from the iterator and then row.setAttribute('Column_name','Value');
Or providing value to it in the SQL...

Spool read data (sapscript output value)

Hi Gurus,
I need to read spool data. I tried following program ;
DATA : mem_tab LIKE abaplist OCCURS 0 WITH HEADER LINE.
DATA : BEGIN OF itab OCCURS 0,
data(2000),
END OF itab.
SUBMIT rspolst2 EXPORTING LIST TO MEMORY AND RETURN
WITH rqident = '158593'
WITH first = '1'.
CALL FUNCTION 'LIST_FROM_MEMORY'
TABLES
    listobject = mem_tab."( TABLE LIKE TABLE OF abaplist ).
break xkbahar.
IF NOT mem_tab[] IS INITIAL.
CALL FUNCTION 'LIST_TO_ASCI'
    EXPORTING
      list_index = -1
    TABLES
      listasci   = itab
      listobject = mem_tab." (LIKE TABLE OF abaplist)
ENDIF.
and   [converting spool contents into internal table;
but doesn't help me. Because i want to read sapscript output value in spool.
anybody have idea ? how do i read my sapscript output data in spool? Any function any program?
Please help me with the solution.
Regards
Emre.

Hi,
By selecting print icon of your form output ur able to generate spool of the document.
Ex: va03->provide orden no ->frm menu -> Sales Document -> issue output to-> select output type-> click on print icon(ctrl+p).
Spool of the form will be creatted for u, Check the same in SPO1 transaction.
For further details you can debug the same after selecting print icon.
If you need further details, Provide me the exact business requirement.
Regards,
Bysani.

Displaying parameter value in the report output

Hi,
I have a requirement to display the value 'All' in the report when the user selects 'All' from the list box. Can anyone suggest a way?
E.g.
My LOV input to the report has following values, 'A', 'B', 'C', 'All'.
If I select 'All', all the values A, B, C go into the query . But I need to display this I/P parameter as a field in the RTF showing 'All' in it.

u can try like this
if they select all u will have 'a,'b','c' as value in the xml tag right so always the string length of that xml field will be same when you select all . SAY STRING LENGTH WILL be 10 when user select ALL
( check the string how much is the value when you select ALL and implement this)
we can try using string length
<?xdoxslt:ifelse(number(string-length(XML_FIELD_TAG))>=10,'ALL',XML_FIELD_TAG)?>
or
<?xdoxslt:ifelse(number(string-length(//XML_FIELD_TAG))>=10,'ALL',//XML_FIELD_TAG)?>
So it will display ALL when user selects ALL else the selected value.
if you are not having parameter values as xml tag then you have use like this
<?xdoxslt:ifelse(number(string-length($XML_FIELD_TAG))>=10,'ALL',$XML_FIELD_TAG)?>
assign some points if helpful.

Displaying the Values of Varaibles in the WAD 7.0

Hi,
I have created a query Q1 with Restricted Key figures. In the KF's I have a strcuture as : Col 1 = Current period, Col 2 = Prev period, Col 3 = YTD to Period, Col 4 = YTD to previous period, Col 5 = last year YTD to period, Col 6 = dummy. However, I have used 0I_FPER in Q1 Col6 only. For the other cols in Q1 I have created two user exit Varaibles ZPER1 and ZYTD1 to calculate the period intervals using the DATE TO from 0I_FPER. I have used these variables in the respective restrcited key figures.
I also have another query Q2 that shows YTD and this has the variable 0I_FPER as filter in the query.
I have set up a WAD tab report and used the same variable 0I_FPER in both queries so that the user only needs to input the variable values once. I have used containers for the Tabs, and effectively assigned Q1 to Tab1 and Q2 to Tab2.
Now, I am using the Info Field web item in the tab reports. I want to display the 0I_FPER in Tab 2 and display ZPER1 in Tab 1. I can display 0I_FPER correcly in Tab2, but I cannot display ZPER1in Tab2. I get the message that the DP1 does not have ZPER1.
Although the query Q1 is using the variable in key figures it does not allow me to display it as part of the Info Field web item. the variable is not available in the dropdown although 0FISCPER is available. However, when I use 0FISCPER it still does not show me the values of ZPER1.
Does anyone have any suggestions please ?
thanks

Hi Bal, I've had exactly the same issue, and couldn't figure a way. I tried to use Exit variable value in query output in Web Analyzer/WAD using &VARNAME&; Also tried using some Text Variable with Replacement Path, formula variables & help cells etc. But none of the above methods didn't help as the exit variable hasn't any input value or isn't physically holding related values for references returned from exit logic. However, we can debug using RSRT > Debug Mode > Set Breakpoints to check correctness of logic used. Plus, we can also use the query in workbooks to check the the values of a particular filter in cells. Suggestions anyone? Thanks.

Displaying the value of an variable on the stage

I have managed to display the values contained in string variables on stage, and I am happy with that, however when I wish to display the value of an int and convert it to a string as one is supposed to do the output to the stage just calls it [class int] and does not give its value. any suggestions?
My rogram contains a stage at frame 1 which displays a word. The user must input a word. Frame 30 then displays the word which was displayed and the word input by the user. That all works fine. But the value of the variable NumberRight, which has been assigned to that variable will only display as [class int] without showing its value. (even though I have converet it to a string using the .to string function you see below).
My code is as follows;
trace( "The number correct was" + NumberRight); //This works fine in the output window and shows the value of the variable as NumberRight [class int]1 (showing the value to be 1)
outputText.appendText("in/"+textAtIN); //this works fine displaying the word presented and word input by user as in/in
outputText.appendText( NumberRight.toString(     )); //here lies the problem as it just displays [class int] and nothing else.
Yes I have managed to overcome that problem it was some code on the first frame, please excuse, however, now, is there any way to remove the [class int] bit from the displays, I wish to have the results as a clear copy of the results so that they can be printed out, without [class int] all over the place?

Hi Ned thanks for that. Yes I had accidently created blank spaces in the String() argument. (wanted to check if there was a subsequent difference in display and forgot to return them to normal ...Sorted )
Your next suggestion has eliminated the [class int] but I get a value now of 0.
My code on the first frame for a correct response for example is;
function keyPressedIN(event:KeyboardEvent):void
          if (event.keyCode == 13)/*Normally,this will move straight on to the next frame-
          recording a correct response and all that that implies in terms of scores etc. But now I have re directed it to Frame 30 to check are the variables working properly*/
                    //insert code for correct responses vowels etc.
                    VowelI = VowelI+1;
                    NumberRight = NumberRight +1;
                    stage.focus = stage;
                    //There is no need to display the text box as this is a correct response.
                    pupilsResponseIN.visible = false;
                    mainText.visible = false;
                    gotoAndPlay(30);//at the moment this takes me to the display frame to check if all is ok
On the first frame when the user say hits the Return key my code assigns the value of +1 to the variable; eg
NumberRight=NumberRight+1;
and the value of +1 to the value of VowelI
VowelI=VowelI+1
At Frame 30 the code is as follows;
stop();
trace( "The number correct was"+ NumberRight);
outputText.appendText("in/"+textAtIN);
outputText.appendText( "\n");
outputText.appendText("Vowels Correct ="+(int(VowelI).toString()));
outputText.appendText( "\n");
outputText.appendText("TotalCorrect="+(int(NumberRight).toString()));
//outputText.appendText( VowelI.toString());
Now what I am getting is
in/in
Vowels Correct = O
Total Correct = O
Yet the trace (output box) records the Number correct as [class int]1
many years ago I wrote this same program in Authorware using similar code. I am trying to re write it in FlashCS5 using ActionScript 3 and It take days to solve small problems. I notice also that If for example the user of the program makes an error and I record the error as NumberRight =NumberRight -1 the program records it as Total Correct = NaN .
I gave up on this a few months back but I am trying again. I think there must be a better way to do this. Variables do not seem to add up or subtract for me at present. no doubt its me thats got it wrong.

I am trying to build a basic TCL skeleton script that reads a remote SNMP OID and displays the value on the screen.

I am trying to build a basic TCL skeleton script that reads a remote SNMP OID and displays the value on the screen.
I don't want it to be an EEM Event, I just want to run it from the (tcl)# prompt.
So I guess I'm asking if you can use cli_exec and other commands in the "namespace import ::cisco::eem::*" in a normal non-EEM script - can I do that?
This is the error I get:
OTN.159(tcl)#source flash:TCL_SNMP_Remote_Read.tcl
invalid command name "::cisco::eem::event_register_none"             ^
% Invalid input detected at '^' marker.
What am I missing?
================= TCL_SNMP_Remote_Read.tcl ==============================
::cisco::eem::event_register_none
namespace import ::cisco::eem::*
namespace import ::cisco::lib::*
if [catch {cli_open} RESULT]
    { error $RESULT $errorInfo }
    else { array set cli1 $RESULT }
if [catch {cli_exec $cli1(fd) "snmp get v2c 192.168.1.100 public timeout 1 oid 1.3.6.1.2.1.1.1.0" } RESULT]
       { error $RESULT $errorInfo }
       else { set SnmpSysDesc $RESULT }
if [catch {cli_close $cli1(fd) $cli1(tty_id)} RESULT] {
            error $RESULT $errorInfo
puts $SnmpSysDesc
=========================================================================
In the sho-run config I have:
event manager directory user policy "flash:/"
event manager session cli username "cisco"
Any help to get me started would be greatly appreciated!
Tim

If you don't want an EEM policy, then don't use any of the EEM constructs. Instead, all you need is this:
set output [exec "snmp get v2c 192.168.1.100 public timeout 1 oid 1.3.6.1.2.1.1.1.0"]puts $output

Is it possible to display Suffix values in ALV Report

Hi,
Is it possible to display a suffix value in the output of ALV Report? If so how I can proceed? Please let me know an example.
Thanks,
Sekhar.J

Hi Siddarth,
I am sorry for the typo. It shold be Sub Script, Not a Suffix.
Let us take an example H2O, If we print it in this way it won't be meaning full, So i want to display this like
H Subscript 2 O. I have a requirement for a column to always to display this kind of values, Is it Possible?
Thanks,
Sekhar.J

How to display field value only once in REUSE_ALV_GRID_DISPLAY

hi experts,
               i am using REUSE_ALV_GRID_DISPLAY, for alv outpur display.but i want one of the field in output ,not to display the value which is of same, it have to be displayed only once, I mean i have a number which contains multiple line items corresponding, here i want to display the field value only once when it is repeating , for the same header number, how can i achieve it

Hi,
check the sample code,
REPORT Z_ALV.
Database table declaration
TABLES:
sflight.
Typepool declaration
TYPE-POOLS:
slis.
Selection screen elements
SELECTION-SCREEN BEGIN OF BLOCK blk_1 WITH FRAME TITLE text-000.
SELECT-OPTIONS:
s_carrid FOR sflight-carrid.
SELECTION-SCREEN END OF BLOCK blk_1.
Field string to hold sflight data
DATA:
BEGIN OF fs_sflight ,
    carrid   TYPE sflight-carrid,      " Carrier Id
    connid   TYPE sflight-connid,      " Connection No
    fldate   TYPE sflight-fldate,      " Flight date
    seatsmax TYPE sflight-seatsmax,    " Maximum seats
    seatsocc TYPE sflight-seatsocc,    " Occupied seats
END OF fs_sflight.
Internal table to hold sflight data
DATA:
t_sflight LIKE
   STANDARD TABLE
         OF fs_sflight .
Work variables
DATA:
t_fieldcat TYPE slis_t_fieldcat_alv,
fs_fieldcat LIKE
         LINE OF t_fieldcat.
*START-OF-SELECTION
START-OF-SELECTION.
PERFORM get_data_sflight.            " Getting data for display
PERFORM create_field_cat.            " Create field catalog
PERFORM alv_display.
*&      Form create_field_cat
      Subroutine to create field catalog
      There is no interface paramete
FORM create_field_cat .
PERFORM fill_fieldcat USING   'Carrier Id'    'CARRID'   '2'.
PERFORM fill_fieldcat USING   'Connection No' 'CONNID'   '1'.
PERFORM fill_fieldcat USING   'Flight Date'   'FLDATE'   '3'.
PERFORM fill_fieldcat USING   'Maxm.Seats'    'SEATSMAX' '4'.
PERFORM fill_fieldcat USING   'Seats Occ'     'SEATSOCC' '5'.
ENDFORM.                                    "create_field_cat
*&      Form fill_fieldcat
      Subroutine to fill data to field column
     -->p_seltext      Column label
     -->p_fieldname    Fieldname of database table
     -->p_col_pos      Column position
FORM fill_fieldcat USING
                    p_seltext    LIKE fs_fieldcat-seltext_m
                    p_fieldname LIKE fs_fieldcat-fieldname
                    p_col_pos    LIKE fs_fieldcat-col_pos.
fs_fieldcat-seltext_m = p_seltext.
fs_fieldcat-fieldname = p_fieldname.
fs_fieldcat-col_pos    = p_col_pos.
APPEND fs_fieldcat TO t_fieldcat.
CLEAR fs_fieldcat.
ENDFORM.                    " fill_fieldcat
*&      Form get_data_sflight
      Subroutine to fetch data from database table
      There is no interface parameter
FORM get_data_sflight .
SELECT carrid
         connid
         fldate
         seatsmax
         seatsocc
    FROM sflight
    INTO TABLE t_sflight
   WHERE carrid IN s_carrid.
ENDFORM.                    " get_data_sflight
*&      Form alv_display
      Subroutine for ALV display
      There is no interface parameter
FORM alv_display .
CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
    EXPORTING
      it_fieldcat   = t_fieldcat
    TABLES
      t_outtab      = t_sflight
    EXCEPTIONS
      program_error = 1
      OTHERS        = 2.
IF sy-subrc NE 0.
    MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
            WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
ENDIF.
ENDFORM.                    " alv_display
End of code

How to write a formula for display the value by group

Post Author: abadugu
CA Forum: Formula
Hi
Could any one please help me on writing the formula for the below senario.
I'm creating Crystal report Via using ClearQuest (IBM tool) since this tool is not supporting subreport function. I'm planning to write a formula.
I have grouped report by request_type field (request_type field contains Validation Defect, Production Defect, Known Defect etc..)
right now my report output is grouped by request_type
ex:
Validation Defect
                     SUMMARY                                                          COMMENTS
Production Defect
                   SUMMARY                                                          COMMENTS
my question was
If request_type = Production Defect display pm_number value field otherwise display null
ex
Production Defect
PM#          SUMMARY                                                       COMMENTS
Validation Defect
                 SUMMARY                                                       COMMENTS
could you please help me writing a formula.
Thanks
Anand

Post Author: abadugu
CA Forum: Formula
It worked Thank you and I appreciated your help
Thanks

How to have default value in an output field?

Hi,
I am working on module pool program and want the initial value for a numeric data to appear by default in an Input/Output field.
How do I achieve the same?
Thanks.

Hi,
You have to write the code in PBO module.
or In the field attributes if check the from dictionary option it will display initial value by default.

OO ALV displaying without Values despite Internal table contains

My   below OO ALV displaying without Values despite Internal table contains the values ...
Help please ...
REPORT zsd_concession1 NO STANDARD PAGE HEADING
                        LINE-SIZE 285
                        LINE-COUNT 64
                        MESSAGE-ID zz.
Program Description ******************************
This report is to Calculate consession against Quotations
complying standards for enhanced Performance, Readability &
Maintenance.
Change Log *********************************
Remedy # /       Who       When        Why / What
Transport #
CLASS lcl_event_handler DEFINITION DEFERRED.
*&      Data Definitions .
DATA: BEGIN OF vbap_wa,
            vbeln               TYPE vbak-vbeln,           "Quotation#
            erdat               TYPE vbak-erdat,           "Quot date
            knumv               TYPE vbak-knumv,           "Cond Rec#
            posnr               TYPE vbap-posnr,           "Line Item
            matnr               TYPE vbap-matnr,           "Mat#
            zansicat            TYPE zmarall-zansicat,     "AnsiCat#
            zansigrd            TYPE zmarall-zansigrd,     "Grade
            zcurrvaltnarea      TYPE zco002-zcurrvaltnarea,"Val Area
            zcurrcstusd         TYPE zco002-zcurrcstusd,   "Cost$
            zzbrndnm            TYPE mara-zzbrndnm,        "Brand
            zqedscgrp           TYPE zglbprc-zqedscgrp, "QE Disc Grp
            mstav               TYPE mara-mstav,        "Status
            kwmeng              TYPE vbap-kwmeng,       "Qty
            lprc                TYPE konv-kbetr, "List Price ZBP1
            sprc                TYPE konv-kbetr, "Std Pric ZNAA,ZNAX
            netpr               TYPE vbap-netpr, "Quot price
            mrgn                TYPE konv-kbetr, "margin%
       END   OF vbap_wa,
       BEGIN OF konv_wa,
            knumv               TYPE konv-knumv, "Cond#
            kposn               TYPE konv-kposn, "Cond Item#
            kappl               TYPE konv-kappl, "Applic
            kschl               TYPE konv-kschl, "Cond Typ
            kbetr               TYPE konv-kbetr, "Price ZBP1,ZNAA,ZNAX
       END   OF konv_wa,
       BEGIN OF vbpa_wa,
            vbeln               TYPE vbpa-vbeln, "Quot#
            posnr               TYPE vbpa-posnr, "Item#
            parvw               TYPE vbpa-parvw, "Prt Fn
            kunnr               TYPE vbpa-kunnr, "Cust#
       END   OF vbpa_wa,
       BEGIN OF result_wa,
            posnr               TYPE vbap-posnr,           "Line Item
            matnr               TYPE vbap-matnr,           "Mat#
            zansicat            TYPE zmarall-zansicat,     "AnsiCat#
            zansigrd            TYPE zmarall-zansigrd,     "Grade
            zcurrvaltnarea      TYPE zco002-zcurrvaltnarea,"Val Area
            zcurrcstusd         TYPE zco002-zcurrcstusd,   "Cost$
            zzbrndnm            TYPE mara-zzbrndnm,        "Brand
            zqedscgrp           TYPE zglbprc-zqedscgrp, "QE Disc Grp
            mstav               TYPE mara-mstav,        "Status
            kwmeng              TYPE vbap-kwmeng,       "Qty
            lprc                TYPE konv-kbetr, "List Price ZBP1
            sprc                TYPE konv-kbetr, "Std Pric ZNAA,ZNAX
            netpr               TYPE vbap-netpr, "Quot price
            mrgn                TYPE konv-kbetr, "margin%
       END   OF result_wa.
DATA: ikonv      LIKE STANDARD TABLE OF konv_wa,
      ivbap      LIKE STANDARD TABLE OF vbap_wa,
      ivbpa      LIKE STANDARD TABLE OF vbpa_wa,
      iresult    LIKE STANDARD TABLE OF result_wa.
*Work storage
DATA: BEGIN OF ws,
         vbeln       TYPE vbak-vbeln,
         ok_code     TYPE sy-ucomm,
         alv_save    TYPE c,   "ALV save
         alv_variant TYPE disvariant, "ALV Variant
         alv_sort    TYPE lvc_t_sort, "Sort table
      END OF ws.
*Data declarations for ALV Main list
DATA : ty_lay1        TYPE        lvc_s_layo,
       it_fieldcat    TYPE        lvc_t_fcat ,
       ty_fieldcat    TYPE        lvc_s_fcat ,
       l_smenu        TYPE REF TO cl_ctmenu,
       c_alv1         TYPE REF TO cl_gui_alv_grid,
       c_cont1        TYPE REF TO cl_gui_custom_container,
       e_dclick       TYPE REF TO lcl_event_handler.
*Data declarations for ALV Interactive list
DATA : ty_lay2        TYPE        lvc_s_layo,
       it_fcat        TYPE        lvc_t_fcat ,
       ty_fcat        TYPE        lvc_s_fcat ,
       c_alv2         TYPE REF TO cl_gui_alv_grid,
       c_cont2        TYPE REF TO cl_gui_custom_container.
*Field-Symbols
FIELD-SYMBOLS:
      <konv> LIKE   konv_wa,
      <vbap> LIKE   vbap_wa.
*Constants
CONSTANTS:
      c_end_row    TYPE i VALUE 65000.
*CLASS lcl_event_receiver DEFINITION
CLASS lcl_event_handler DEFINITION.
PUBLIC SECTION.
    METHODS:
     handle_double_click
     FOR EVENT double_click OF cl_gui_alv_grid IMPORTING e_row.
ENDCLASS. "lcl_event_handler DEFINITION
*CLASS lcl_event_receiver IMPLEMENTATION
CLASS lcl_event_handler IMPLEMENTATION.
METHOD handle_double_click.
    DATA: sec_wa LIKE LINE OF iresult.
*Reading the selected data into a variable
    READ TABLE iresult INDEX e_row-index INTO sec_wa.
*Select the field details of the selected table
SELECT * FROM dd03l INTO CORRESPONDING FIELDS OF TABLE it_dd03l
WHERE tabname EQ ls_dd02l-tabname.
*Calling the ALV containing the field values
    CALL SCREEN 101.
ENDMETHOD. "handle_double_click
ENDCLASS. "lcl_event_handler IMPLEMENTATION
*&      SELECTION-SCREEN.
SELECTION-SCREEN BEGIN OF BLOCK a WITH FRAME TITLE text-001.
SELECT-OPTIONS:
    s_vbeln FOR ws-vbeln DEFAULT '2002354788' OBLIGATORY.
SELECTION-SCREEN END OF BLOCK a.
INITIALIZATION.
PERFORM setup_screen_defaults.
START-OF-SELECTION.
PERFORM gather_report_data.
END-OF-SELECTION.
PERFORM create_output.
*&      Form initialization
FORM setup_screen_defaults.
CLEAR: ws, konv_wa, vbap_wa, vbpa_wa.
REFRESH: ivbpa, ikonv, ivbap, iresult.
ENDFORM.                    " setup_screen_defaults
*&      Form gather_report_data
FORM gather_report_data.
SELECT vbeln posnr parvw kunnr
           INTO TABLE ivbpa
           FROM vbpa
           WHERE vbeln IN s_vbeln
           AND ( parvw = 'SP' OR "SoldTO
                 parvw = 'WE' OR "ShipTo
                 parvw = 'ZT' ). "Top Parent
SELECT vkvbeln vkerdat vkknumv vpposnr vp~matnr
          z1zansicat z1zansigrd z2~zcurrvaltnarea
          z2zcurrcstusd m1zzbrndnm zg~zqedscgrp
          m1mstav vpkwmeng vp~netpr
    INTO CORRESPONDING FIELDS OF TABLE ivbap
    FROM vbak AS vk
    INNER JOIN vbap AS vp
       ON vpvbeln = vkvbeln
    INNER JOIN zmarall AS z1
       ON z1matnr = vpmatnr
    INNER JOIN zco002 AS z2
       ON z2matnr = vpmatnr
    INNER JOIN zglbprc AS zg
       ON zgmatnr = vpmatnr
    INNER JOIN mara AS m1
       ON m1matnr = vpmatnr
    WHERE vk~vbeln IN s_vbeln
    AND    vk~auart = 'AG'."AG = Quot
SORT ivbap BY posnr matnr.
SELECT kvknumv kvkposn kvkappl kvkschl kv~kbetr
          INTO TABLE ikonv
          FROM konv AS kv
          FOR ALL ENTRIES IN ivbap
          WHERE kv~knumv = ivbap-knumv
          AND    kv~kposn = ivbap-posnr
          AND    kv~kappl EQ 'V'
          AND    ( kv~kschl EQ 'ZBP1'
               OR kv~kschl EQ 'ZNAX'
               OR kv~kschl EQ 'ZNAA' ).
SORT ikonv BY knumv kposn.
LOOP AT ivbap ASSIGNING <vbap>.
    CLEAR konv_wa.
    READ TABLE ikonv INTO konv_wa WITH KEY
                               knumv = <vbap>-knumv
                               kposn = <vbap>-posnr
                               kschl = 'ZBP1'
                               BINARY SEARCH.
    IF sy-subrc EQ 0.
      <vbap>-lprc = konv_wa-kbetr.
    ENDIF.
    READ TABLE ikonv INTO konv_wa WITH KEY
                               knumv = <vbap>-knumv
                               kposn = <vbap>-posnr
                               kschl = 'ZNAX'
                               BINARY SEARCH.
    IF sy-subrc EQ 0.
      <vbap>-sprc = konv_wa-kbetr.
    ENDIF.
    READ TABLE ikonv INTO konv_wa WITH KEY
                               knumv = <vbap>-knumv
                               kposn = <vbap>-posnr
                               kschl = 'ZNAA'
                               BINARY SEARCH.
    IF sy-subrc EQ 0.
      <vbap>-sprc = konv_wa-kbetr.
    ENDIF.
ENDLOOP.
SORT ivbap BY posnr matnr.
LOOP AT ivbap INTO vbap_wa.
    MOVE-CORRESPONDING vbap_wa TO result_wa.
    APPEND result_wa TO iresult.
    CLEAR: vbap_wa, result_wa.
ENDLOOP.
ENDFORM.                    " gather_report_data
*&      Form create_output
FORM create_output.
CALL SCREEN 100.
FREE: iresult.
ENDFORM.                    " create_output
*&      Module PBO_0100 OUTPUT
      text
MODULE pbo_0100 OUTPUT.
SET PF-STATUS '0100'.
SET TITLEBAR '0100'.
IF c_cont1 IS INITIAL.
*Creating object of container
    CREATE OBJECT c_cont1
     EXPORTING
       container_name = 'CCONT1'.
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
*Creating object of alv
    CREATE OBJECT c_alv1
       EXPORTING
        i_parent = c_cont1.
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
*Alv layout
    PERFORM alv_100_layout.
    PERFORM save_alv_layout.
*Alv field catalogue
    PERFORM alv_100_fieldcat.
*Displaying the ALV grid
    CALL METHOD c_alv1->set_table_for_first_display
      EXPORTING
        is_layout       = ty_lay1
        i_save          = ws-alv_save
        is_variant      = ws-alv_variant
      CHANGING
        it_outtab       = iresult[]
        it_sort         = ws-alv_sort
        it_fieldcatalog = it_fieldcat[].
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
*Create object of the event class
*and setting handler for double click
    CREATE OBJECT e_dclick.
    SET HANDLER e_dclick->handle_double_click FOR c_alv1.
ENDIF.
ENDMODULE.                 " PBO_0100 OUTPUT
*&      Module PAI_0100 INPUT
      text
MODULE pai_0100 INPUT.
ws-ok_code = sy-ucomm.
CASE ws-ok_code.
    WHEN 'BACK'.
      CALL SELECTION-SCREEN 1000.
      CLEAR ws-ok_code.
    WHEN 'EXIT'.
      LEAVE TO SCREEN 0.
      CLEAR ws-ok_code.
      EXIT.
    WHEN 'CANCEL'.
      LEAVE TO SCREEN 0.
      CLEAR ws-ok_code.
      EXIT.
    WHEN OTHERS.
ENDCASE.
ENDMODULE.                 " PAI_0100 INPUT
*&      Form alv_100_layout
      text
--> p1        text
<-- p2        text
FORM alv_100_layout.
ty_lay1-numc_total = 'X'. " Numc total line
ty_lay1-cwidth_opt = 'X'. " Optimal column width
ty_lay1-detailinit = 'X'. " Show values that are initial in
ty_lay1-sel_mode = 'A'. " Column selection mode
ty_lay1-no_merging = 'X'. " No merging while sorting columns
ty_lay1-keyhot     = 'X'.
ty_lay1-grid_title = 'SD Concessions'.
ty_lay1-zebra      = 'X'.
ty_lay1-no_toolbar = ' '.
ENDFORM.                    " alv_100_layout
*&      Form alv_100_fieldcat
      text
--> p1        text
<-- p2        text
FORM alv_100_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 1.
ty_fieldcat-fieldname = 'posnr'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Item#'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 2.
ty_fieldcat-fieldname = 'matnr'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Mat#'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 3.
ty_fieldcat-fieldname = 'zansicat'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'AnsiCat#'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 4.
ty_fieldcat-fieldname = 'zansigrd'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Grade'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 5.
ty_fieldcat-fieldname = 'zcurrvaltnarea'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Val Area'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 6.
ty_fieldcat-fieldname = 'zcurrcstusd'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Cost $'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 7.
ty_fieldcat-fieldname = 'zzbrndnm'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Brand'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 8.
ty_fieldcat-fieldname = 'zqedscgrp'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'QE'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 9.
ty_fieldcat-fieldname = 'mstav'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Status'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 9.
ty_fieldcat-fieldname = 'kwmeng'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Qty'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 10.
ty_fieldcat-fieldname = 'lprc'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'List Price'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 11.
ty_fieldcat-fieldname = 'sprc'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Discount'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 12.
ty_fieldcat-fieldname = 'netpr'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Quot Price'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 13.
ty_fieldcat-fieldname = 'mrgn'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Margin%'.
ty_fieldcat-outputlen = 15.
APPEND ty_fieldcat TO it_fieldcat.
ENDFORM.                    " alv_100_fieldcat
*&      Module PBO_0101 OUTPUT
      text
MODULE pbo_0101 OUTPUT.
*Check if the Custom container exists.
IF c_cont2 IS INITIAL.
*Creating container object
    CREATE OBJECT c_cont2
      EXPORTING
        container_name = 'CCONT2'.
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
*creating ALV grid for interactive list
    CREATE OBJECT c_alv2
      EXPORTING
       i_parent = c_cont2.
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
*ALV layout
    PERFORM alv_101_layout.
*ALV fieldcatalogue
    PERFORM alv_101_fieldcat.
*Sorting the output by field position
    SORT iresult BY posnr.
*ALV for display field details
    CALL METHOD c_alv2->set_table_for_first_display
      EXPORTING
        is_layout       = ty_lay2
      CHANGING
        it_outtab       = iresult[]
        it_fieldcatalog = it_fieldcat.
    IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
    ENDIF.
ENDIF.
ENDMODULE.                 " PBO_0101 OUTPUT
*&      Module PAI_0101 INPUT
      text
MODULE pai_0101 INPUT.
ENDMODULE.                 " PAI_0101 INPUT
*&      Form alv_101_layout
      text
--> p1        text
<-- p2        text
FORM alv_101_layout.
ty_lay2-grid_title = 'Line Details'.
ty_lay2-zebra = 'X'.
ty_lay2-no_toolbar = 'X'.
ENDFORM.                    " alv_101_layout
*&      Form alv_101_fieldcat
      text
--> p1        text
<-- p2        text
FORM alv_101_fieldcat.
REFRESH it_fieldcat.
REFRESH it_fcat.
CLEAR ty_fcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 1.
ty_fieldcat-fieldname = 'posnr'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Item#'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 2.
ty_fieldcat-fieldname = 'matnr'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Mat#'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 3.
ty_fieldcat-fieldname = 'zansicat'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'AnsiCat#'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 4.
ty_fieldcat-fieldname = 'zansigrd'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Grade'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
CLEAR ty_fieldcat.
ty_fieldcat-row_pos = 1.
ty_fieldcat-col_pos = 5.
ty_fieldcat-fieldname = 'zcurrvaltnarea'.
ty_fieldcat-tabname = 'iresult'.
ty_fieldcat-coltext = 'Val Area'.
ty_fieldcat-outputlen = 10.
APPEND ty_fieldcat TO it_fieldcat.
ENDFORM.                    " alv_101_fieldcat
*&      Form save_alv_layout
      text
--> p1        text
<-- p2        text
form save_alv_layout.
ws-alv_save = 'A'.
ws-alv_variant-report = sy-repid.
endform.                    " save_alv_layout

Hello
Creating fieldcatalogs manually is one of the major error sources in ALV programming.
There is hardly any reason why NOT to use the standard-fm LVC_FIELDCATALOG_MERGE in order to create a proper fieldcatalog.
If you need some modification of the standard fieldcatalog (e.g. renaming of columns, etc.) just do your post-processing after calling the fm.
Regards
Uwe

- Sapscript output convert to XML -

Hi Gurus,
I need to convert sapscript output with values - not template - to an XML File or txt.
i tried RSTXSCRP program and FB_CONVERT_FORM_TO_XML function module but doesn't help me.
Please help me with the solution.
Regards
Emre.
Edited by: emre karakurum on May 21, 2010 11:38 AM

In my opinion, SAPScript form is something quite unstructured - the layout of it can be very complicated and as well containing graphic and so on. XML is, on the other side, something pretty structured. I don't think that you can find something standard for simple conversion SAPScript to XML. SAPScript is simply not like IDOC - it's human readable layout rather than strucutre of data. You will have to write your own print-program which will create your own XML file instead of printing SAPScript form. The logic how to structure the XML file (which tags will be there and which values) will be coded in this print-program.

Additional Field Infoset - how to display multiple values

Hi all,
I have created an extra field in an infoset and I can succesfully retrieve the value I need (with coding), only now I loop over a selection and then the last value that is retrieved is being displayed. How can you display all values of the selection, so you get several lines in the output?
Many thanks!
Nathalie

I have a item list box and i have 3 enteries in it .If suppose i click on the first entry with out the action being called it displays the message but the same case is not getting happened with multiple value selection..means when i am clicking all the three fields none of the value is getting displayed. There is no action or no button created in for displaying the value which u click on.Can you tell me how to go on with this???

Display of values in sapscript output

Similar Messages

Maybe you are looking for