Regarding quantity field...value in layout

Hi All,
my issue is here i am passing vbrp-fkimg value to layout..
the value in the field above is 100.000, but here in the layout it is coming as 100 and printing it.
how the value of 100.000 become 100.
any settings, configuaration are there which changes the value..
Regards,
vinesh..

Hi,
quantity field will be whole no.
if the requirment is like printing decimals.
Then declare one variable of type pack decimal.
data : w_var type p decimal 3.
Move vbrp-fkimg to w_var.
and desplay this variable w_var.
Reward pts if helpfull.
Regards,
Dhan

Similar Messages

Tcode VL10G quantity field values are not displaying ?

Hi All,
In TCODE - VL10G - Sales and Purchase Order display -
After passing the input values it displays the results with minimum fields in the ALV layout. When I add Quantity fields to the layout - WMENG -Order quantity and any other Quantity related fields it is not displaying values in the results. Even though the values exists in the table.
Can anyone tell me what could be the reason? In the input screen u2013 passing the values in USER ROLE tab has anything related to this issue?
I tried to debug and could not find code related to VBEP table or other table which has quantity fields.
Please let me know if any ideas? Thanks in advance.

Hi,
We are using - SAP ECC 6.0 system.
Any hint how I can solve this?
Thanks.

Editable ALV- Quantity field value is getting changed while double clicking

Hi all,
I have created Editable ALV grid using Class concepts. Quantity field is editable in dat. but after changing value and if im double clicking on that field, value is getting changed. eg: 45 is changing to .045. How can i resolve this problem.
Could u plz help.

Hi Anu,
One question from my side.
U have displayed the ALV.In that grid u have quantity field.U have changed the value of that field to 45.
When u press enter the value has been changed to .045.Is this u r problem.
U can do onething anu.
Declare one varaible with the local field.
Pass u r quantity field value into that variable.
While displaying thriugh SET_TABLE_FIRST_DISPLAY in your internal table pass this variable.
It will solve u r problem.I think.
Let me if yu have any problem
IF u want u can refer to the program BCALV_EDIT* in se38.
There also u have needful info
Thanks,

Planning function to change date field value in layout

Hello experts,
I have 1 BPS layout with 2 date fields ( Start date, End date ). With a filter conditions, set of data comes in BPS layout on execution and 2 date fields also contain some value...I want to change values of these 2 dates...both the date fields are char infoobjects..in BPS layout, in planning function I got only 1 function ( Repost function ) to change the value of char infoobject based on some condition. but date field value is not the status field...i want to enter new date instead of old date..if i right exit function in that also i can change only keyfigs values..so please help me to solve this problem..
Thanks & Regards,
Priyanka Joshi

Hi Priyanka,
As of now master data planning is not so flexibly supported.
Still u can refer the below link which is enhancement of standard Repost function,and can be used to change master data.
[http://www.sdn.sap.com/irj/scn/index?rid=/library/uuid/10d2b273-0e12-2c10-fab3-a34bde559f92]
As far as my knowledge goes u cannot directly input date in rows.
regards,
Rajendra

How can this happen? Quantity Field values are showing doubles in ODS

Hello BW Gurus,
I have a staging ODS, on top of it a reporting ODS and a cube. I have loaded the data from flatfile to the staging ODS which looks perfectly fine but coming to the Reporting ODS and the cube, the values in quantity field are doubled. If it was just cube where the values were doubled then I might have thought it could be due to double time loading or may be because of duplicate records. But I can see the Quantity values doubled in reporting ODS (which has Overwrite option).
Does anyone has any clues? when we had this issue couple of days back - I have deleted the request from Reporting ODS and Cube and re-loaded it which looked perfectly fine.
But today our issue is back - is it not strange?
help me if you have any thoughts and thanks so much,
Swathi.

Hello Dinesh and Vikash,
My issue has taken a twist and here is the new problem:
on Friday the report was fine
on Saturday the report was fine
on Sunday we had problems with Reporting ODS as it was showing all double values. (I cleaned the reporting ODS and Cube and reloaded the data) after that the report worked fine.
on Monday the report was fine
on Tuesday again we got duplicate values (for few plants) now in staging ODS as well, which has completely with 'overwrite' option with one to one mapping with no routines.
I loaded the same file in DEV. and this was working fine?
I debugged the code that was fine too.
I think this is a strange Issue.
Please let me know your ideas,
Thanks so much,
Swathi

Problem regarding XML field value to XML generation

Hi Everybody,
I am facing a typical problem. I am storing xml in an xml datatype field in a table. But when I am generating physical file from the xml field, '&' in the xml field is getting converted into '&' in the physical file. But I want '&' to
be intact.
Can anyone faced the issue or have any idea of solving this?
Thanks & Regards,
Anujit Karmakar
Anujit Karmakar Sr. Software Engineer

Hi Anujit,
How do you generate physical file from the xml field?
I make a test on my computer using your XML data with the following scripts, '&' exists in my exported file.
DECLARE @testXML XML
SELECT @TestXML='<ENVELOPE>
<HEADER>
<TALLYREQUEST>Import Data</TALLYREQUEST>
</HEADER>
<BODY>
<IMPORTDATA>
<LEDGER NAME="Prafulla Ghosh">
<ADDRESS.LIST TYPE="String">
<ADDRESS>BEHIND DILIP MATH & DISARI CLUB</ADDRESS>
</ADDRESS.LIST>
<MAILINGNAME.LIST TYPE="String">
<MAILINGNAME>Prafulla Ghosh</MAILINGNAME>
</MAILINGNAME.LIST>
<STATENAME>West Bengal</STATENAME>
</LEDGER>
</IMPORTDATA>
</BODY>
</ENVELOPE>'
-- We Store the contents of an XML variable to a table
CREATE TABLE MyXMLTable
xCol XML
INSERT INTO MyXMLTable ( xCol )
SELECT @testXML
We Save an XML value to a file.
DECLARE @Command VARCHAR(255)
DECLARE @Filename VARCHAR(100)
SELECT @Filename = 'C:\Files\TestXMLRoutine'
/* we then insert a row into the table from the XML variable */
/* so we can then write it out via BCP! */
SELECT @Command = 'bcp "select xCol from ' + DB_NAME()
+ '..MyXMLTable" queryout '
+ @Filename + ' -w -T -S' + @@servername
EXECUTE master..xp_cmdshell @command
--so now the xml is written out to a file
SELECT CONVERT(nVARCHAR(max),BulkColumn)
FROM OPENROWSET(BULK 'C:\Files\TestXMLRoutine', SINGLE_BLOB) AS x
go
Thanks,
Lydia Zhang
Lydia Zhang
TechNet Community Support

ALV: Quantity field displays both blank and 0 value.

Hi,
My ALV has a quantity field. The requirement is for the first time displaying the value of this column always blank but once user change it to 0, it should keep 0 value.
I implemented the first requirement by setting the property Display Leading Zeros in Formatting area to "Zeros as Blanks" for the corresponding attribute/node in context. The problem is whenever I key in 0 then enter --> the value of this field is always set back to null.
I have another solution is using type char instead of type quantity. But this is the last choice because I don't want to validate and make the char field works as the numeric field.
Please help.
Thanks,
Khanh
Edited by: khaliachika on Jul 16, 2010 12:36 AM

Hi Anu,
One question from my side.
U have displayed the ALV.In that grid u have quantity field.U have changed the value of that field to 45.
When u press enter the value has been changed to .045.Is this u r problem.
U can do onething anu.
Declare one varaible with the local field.
Pass u r quantity field value into that variable.
While displaying thriugh SET_TABLE_FIRST_DISPLAY in your internal table pass this variable.
It will solve u r problem.I think.
Let me if yu have any problem
IF u want u can refer to the program BCALV_EDIT* in se38.
There also u have needful info
Thanks,

At New event Quantity field

hello
i have following data in my internal table
RUBBER1     1100     2007     BISO     AA     9.000     0.000
RUBBER1     1100     2007     BISO     AB     5.000     0.000
RUBBER1     1100     2007     EXTO     AB     3.000     0.000
RUBBER1     1100     2007     FG             AC      8.000     0.000
RUBBER2     1100     2007     BISO     AA     0.000     0.000
RUBBER2     1100     2007     BISO     AB     5.000     0.000
RUBBER2     1100     2007     EXTO     AB     3.000     0.000
RUBBER2     1100     2007     FG             AC      8.000     0.000
i want output like
RUBBER1     1100     2007     BISO     AA     9.000     0.000
RUBBER1     1100     2007     EXTO     AB     3.000     0.000
RUBBER1     1100     2007     FG             AC      8.000     0.000
RUBBER2     1100     2007     BISO     AA     0.000     0.000
RUBBER2     1100     2007     EXTO     AB     3.000     0.000
RUBBER2     1100     2007     FG             AC      8.000     0.000
i used at new on storage location that is BISO but then i am getting data like above but in that i get my quantity fields value as 0.000.
regards
soniya.

HI,
You need to write this way..
SORT ITAB BY <storage location>.
LOOP AT ITAB.
   MOVE ITAB TO WA.
   AT NEW <storage location>.
      WRITE:/ WA.   " write the data to output.
   ENDAT.
ENDLOOP.

Convert quantity field to char field

Hi folks ,
i have a requirement where i need to convert quantity field value to char field value so as to send in idoc.
plz help me .its urgent
regards,
chandra

data: f1(17).
f1 = qauntity_field.
lenth of the field f1 is the same or gr8 than quan_field also add one more place for decimal .
ex-
ur quan_filed like 13 and 3 decimal place than ur char field must be
13 + 3 + 1(for decimal) = 17

Problem with the quantity field in bdc?

Hi,
i have to populate a quantity field in bdc .
for ex 123.00. but the bdc accepting only in the form of 123,00.
How can I do this .
I tried by changing the user profile, but went in vain.
Suggest me how to convert ?
Thanks.

Hi,
Create a variable of TYPE CHAR.Write your quantity field value into this variable and pass this variable to the BDC. This is the way of passing quantity fields to BDC.
DATA: V_AMOUNT(22) TYPE C.
WRITE ITAB-DMBTR INTO V_AMOUNT.
Pass this V_AMOUNT to BDC flow.
Hope this helps.
ashish

Quantity field in at user-command

Hi,
I have declared the quantity field V_QTY TYPE AFKO-GAMNG.
I am passing the quantity field values from the internal table which is having data for the quantity field to V_QTY. but the field V_QTY is not filling with the quantity.
Instead of the quantity, it is taking the   * value into the field.
I am not using any control break commands in my coding. I am attaching the code also. can anyone guide me .
Report ztest.
TABLES: AFKO,                         " Order Header
         AFPO,                         " Order Item
         AUFK,                         " Order Master
         RESB,
         AFVC,                         " Order Operation w/i an Order
         AFVV,                        " Qty/Dates/values in an Operation
         CRHD,                         " Work Center
         MARA,                         " Material Master
         MAKT,                         " Material Description
         AUSP,                         " Characteristic Values
         CABN,                         " Characteristic
         PLPO,                         " Task list-operation/activity
         PLFL,                         " Task list - sequences
         TJ02T,                        " System status texts
         JEST.                         " Individual Object Status
TYPE-POOLS:SLIS.
TYPE-POOLS:ICON.
DATA:CHECK(1),
     TOTAL(7) VALUE 'TOTAL :',
     W_AMOUNT TYPE GAMNG VALUE 0.
TYPES:BEGIN OF T_AFKO,
      CHECK,
      AUFNR TYPE AFKO-AUFNR,
      GLTRP TYPE AFKO-GLTRP,
      GSTRP TYPE AFKO-GSTRP,
      GAMNG TYPE AFKO-GAMNG,
      PLNBEZ TYPE AFKO-PLNBEZ,
      END OF T_AFKO.
DATA:I_AFKO TYPE STANDARD TABLE OF T_AFKO,
     W_AFKO LIKE LINE OF I_AFKO.
DATA:I_AFKO1 TYPE STANDARD TABLE OF T_AFKO,
     W_AFKO1 LIKE LINE OF I_AFKO1.
DATA:PONUM TYPE AFKO-AUFNR,
     STDATE TYPE AFKO-GLTRP,
     FIDATE TYPE AFKO-GSTRP,
     QUANTY TYPE AFKO-GAMNG,
     MATER TYPE AFKO-PLNBEZ,
     DESCR TYPE MAKT-MAKTX,
     INDEX TYPE SY-INDEX,
     COUNT(3) VALUE '0'.
TYPES:BEGIN OF T_FINAL,
      CHECK,
      LIGHT TYPE ICON-ID,
      MATNR TYPE RESB-MATNR,
      AUFNR TYPE AFKO-AUFNR,
      GLTRP TYPE AFKO-GLTRP,
      GSTRP TYPE AFKO-GSTRP,
      GAMNG TYPE AFKO-GAMNG,
      PLNBEZ TYPE AFKO-PLNBEZ,
      MAKTX TYPE MAKT-MAKTX,
      END OF T_FINAL.
DATA:I_FINAL TYPE STANDARD TABLE OF T_FINAL,
     W_FINAL LIKE LINE OF I_FINAL,
     I_FINAL1 TYPE STANDARD TABLE OF T_FINAL,
     W_FINAL1 LIKE LINE OF I_FINAL1.
TYPES:BEGIN OF T_CRHD,
      OBJID TYPE CRHD-OBJID,
      ARBPL TYPE CRHD-ARBPL,
      END OF T_CRHD.
DATA:I_CRHD TYPE STANDARD TABLE OF T_CRHD,
     W_CRHD LIKE LINE OF I_CRHD.
TYPES:BEGIN OF T_AFVC,
      AUFPL TYPE AFVC-AUFPL,
      ARBID TYPE AFVC-ARBID,
      END OF T_AFVC.
DATA:I_AFVC TYPE STANDARD TABLE OF T_AFVC,
     W_AFVC LIKE LINE OF I_AFVC.
TYPES:BEGIN OF T_ITEM,
      MATNR TYPE RESB-MATNR,       " Component Matl Number
      MAKTX TYPE MAKT-MAKTX,       " Matl Desc for Component
      BDMNG TYPE RESB-BDMNG,       " Component Req'd Qty
      END OF T_ITEM.
DATA:I_ITEM TYPE STANDARD TABLE OF T_ITEM,
     W_ITEM LIKE LINE OF I_ITEM.
TYPES:BEGIN OF T_RESB,
      MATNR TYPE RESB-MATNR,
      AUFNR TYPE RESB-AUFNR,
      BDMNG TYPE RESB-BDMNG,
      END OF T_RESB.
DATA:I_RESB TYPE STANDARD TABLE OF T_RESB,
     W_RESB LIKE LINE OF I_RESB.
DATA:I_MAKT TYPE STANDARD TABLE OF MAKT,
     W_MAKT LIKE LINE OF I_MAKT,
     I_MAKT1 TYPE STANDARD TABLE OF MAKT,
     W_MAKT1 LIKE LINE OF I_MAKT1.
TYPES:BEGIN OF T_AUFK,
      AUFNR TYPE AUFK-AUFNR,
      AUART TYPE AUFK-AUART,
      WERKS TYPE AUFK-WERKS,
      OBJNR TYPE AUFK-OBJNR,
      END OF T_AUFK.
DATA:I_JEST TYPE STANDARD TABLE OF JEST,
     W_JEST LIKE LINE OF I_JEST.
DATA:I_AUFK TYPE STANDARD TABLE OF T_AUFK,
     W_AUFK LIKE LINE OF I_AUFK.
DATA:V_QTY TYPE AFKO-GAMNG,
     LINES TYPE I,
     V_AUFNR TYPE AFKO-AUFNR.
SELECTION-SCREEN BEGIN OF BLOCK B1 WITH FRAME TITLE TEXT-001.
PARAMETERS:
P_WERKS TYPE AUFK-WERKS OBLIGATORY MEMORY ID WRK, " PLANT
P_AUART TYPE AUFK-AUART OBLIGATORY.                "ORDER TYPE
SELECT-OPTIONS: S_PLNBEZ FOR AFKO-PLNBEZ.          "material
PARAMETERS: P_ARBPL TYPE CRHD-ARBPL OBLIGATORY.    "Work center
SELECT-OPTIONS:
S_GSTRP FOR AFKO-GSTRP OBLIGATORY.   "ORDER BASIC START DATE
*s_gltrp FOR afko-gltrp OBLIGATORY, "ORDER BASIC FINISH DATE
*s_gstrs FOR afko-gstrs,             "ORDER SCHEDULE START DATE
*s_gltrs FOR afko-gltrs.             "ORDER SCHEDULE FINISH DATE
PARAMETERS:P_MATNR TYPE RESB-MATNR.
SELECTION-SCREEN END OF BLOCK B1.
*ALV data declarations
DATA: I_FIELDCATALOG    TYPE SLIS_T_FIELDCAT_ALV,
      W_FIELDCATALOG    LIKE LINE OF I_FIELDCATALOG,
      S_FIELDCATALOG TYPE SLIS_T_FIELDCAT_ALV WITH HEADER LINE,
      GD_TAB_GROUP    TYPE SLIS_T_SP_GROUP_ALV,
      GD_LAYOUT       TYPE SLIS_LAYOUT_ALV,
      GD_REPID        LIKE SY-REPID VALUE SY-REPID,
      T_HEADING       TYPE SLIS_T_LISTHEADER,
      IT_LISTHEADER   TYPE SLIS_T_LISTHEADER,
      W_KEYINFO       TYPE SLIS_KEYINFO_ALV,
      WA_SORT         TYPE SLIS_SORTINFO_ALV,
      IT_SORT         TYPE SLIS_T_SORTINFO_ALV,
      IT_TITLE_BASIC TYPE
            LVC_TITLE VALUE 'SELECTION OF PRODUCTION ORDERS',
      IT_TITLE_ITEM TYPE LVC_TITLE VALUE 'MIXING REPORT'.
DATA: PO TYPE AUFNR,
      P_SELFIELD TYPE SLIS_SELFIELD.
DATA: I_EVENTS TYPE SLIS_T_EVENT,
      W_EVENTS LIKE LINE OF I_EVENTS.
CLEAR:   W_EVENTS.
REFRESH: I_EVENTS.
DATA:I_HEADER TYPE SLIS_T_LISTHEADER,
     W_HEADER LIKE LINE OF I_HEADER.
BEGIN OF CODE FOR ALV_HIERSEQ_LIST*************
TYPES:BEGIN OF T_HHEADER,
     EXPAND,
      MATNR TYPE RESB-MATNR,
      MAKTX TYPE MAKT-MAKTX,
      V_QTY,
      END OF T_HHEADER.
DATA:I_HHEADER TYPE STANDARD TABLE OF T_HHEADER,
     W_HHEADER LIKE LINE OF I_HHEADER.
TYPES:BEGIN OF T_HITEM,
      CHECK,
      MATNR TYPE RESB-MATNR,
      AUFNR TYPE AFKO-AUFNR,
      GAMNG TYPE AFKO-GAMNG,
      PLNBEZ TYPE AFKO-PLNBEZ,
      MAKTX TYPE MAKT-MAKTX,
      GLTRP TYPE AFKO-GLTRP,
      GSTRP TYPE AFKO-GSTRP,
      END OF T_HITEM.
DATA:I_HITEM TYPE STANDARD TABLE OF T_HITEM,
     W_HITEM LIKE LINE OF I_HITEM.
END OF CODE FOR ALV_HIERSEQ_LIST ****************************
INITIALIZATION.
PERFORM BUILD_FIELDCATALOG.
PERFORM BUILD_LAYOUT.
*Start-of-selection.
START-OF-SELECTION.
PERFORM GET_EVENTS.
PERFORM GET_DATA.
END-OF-SELECTION.
PERFORM DISPLAY_ALV_REPORT.
*&      Form BUILD_FIELDCATALOG
      text
FORM BUILD_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '1'.
W_FIELDCATALOG-FIELDNAME    = 'MATNR'.
W_FIELDCATALOG-TABNAME      = 'I_HHEADER'.
W_FIELDCATALOG-SELTEXT_M    = 'Phantom Material'.
W_FIELDCATALOG-ROLLNAME     = 'MATNR'.
W_FIELDCATALOG-OUTPUTLEN    = '20'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '2'.
W_FIELDCATALOG-FIELDNAME    = 'MAKTX'.
W_FIELDCATALOG-TABNAME      = 'I_HHEADER'.
W_FIELDCATALOG-SELTEXT_M    = 'Phantom Material Description'.
W_FIELDCATALOG-ROLLNAME     = 'MAKTX'.
W_FIELDCATALOG-OUTPUTLEN    = '40'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '3'.
W_FIELDCATALOG-FIELDNAME    = 'BDMNG'.
W_FIELDCATALOG-TABNAME      = 'I_HHEADER'.
W_FIELDCATALOG-OUTPUTLEN    = '20'.
W_FIELDCATALOG-SELTEXT_M    = 'Total Batch qty:'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '1'.
W_FIELDCATALOG-SELTEXT_M    = 'Selection'.
W_FIELDCATALOG-FIELDNAME    = 'CHECK'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
W_FIELDCATALOG-EDIT        = 'X'.
W_FIELDCATALOG-CHECKBOX    = 'X'.
W_FIELDCATALOG-INPUT       = 'X'.
W_FIELDCATALOG-HOTSPOT     = 'X'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '2'.
W_FIELDCATALOG-FIELDNAME    = 'MATNR'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
W_FIELDCATALOG-ROLLNAME     = 'MATNR'.
W_FIELDCATALOG-OUTPUTLEN    = '12'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '2'.
W_FIELDCATALOG-FIELDNAME    = 'AUFNR'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
W_FIELDCATALOG-ROLLNAME     = 'AUFNR'.
W_FIELDCATALOG-OUTPUTLEN    = '12'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG.
W_FIELDCATALOG-COL_POS      = '3'.
W_FIELDCATALOG-SELTEXT_M    = 'PO Qty'.
W_FIELDCATALOG-FIELDNAME    = 'GAMNG'.
W_FIELDCATALOG-ROLLNAME     = 'GAMNG'.
W_FIELDCATALOG-OUTPUTLEN    = '20'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG.
W_FIELDCATALOG-COL_POS      = '4'.
W_FIELDCATALOG-SELTEXT_M    = 'Header Material'.
W_FIELDCATALOG-FIELDNAME    = 'PLNBEZ'.
W_FIELDCATALOG-ROLLNAME     = 'MATNR'.
W_FIELDCATALOG-OUTPUTLEN    = '20'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG.
W_FIELDCATALOG-COL_POS      = '5'.
W_FIELDCATALOG-SELTEXT_M    = 'Material Description'.
W_FIELDCATALOG-FIELDNAME    =   'MAKTX'.
W_FIELDCATALOG-ROLLNAME     =   'MAKTX'.
W_FIELDCATALOG-OUTPUTLEN    = '40'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '6'.
W_FIELDCATALOG-FIELDNAME    = 'GSTRP'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
W_FIELDCATALOG-ROLLNAME     = 'CO_GSTRP'.
W_FIELDCATALOG-OUTPUTLEN    = '10'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
CLEAR W_FIELDCATALOG .
W_FIELDCATALOG-COL_POS      = '7'.
W_FIELDCATALOG-FIELDNAME    = 'GLTRP'.
W_FIELDCATALOG-TABNAME      = 'I_HITEM'.
W_FIELDCATALOG-ROLLNAME     = 'CO_GLTRP'.
W_FIELDCATALOG-OUTPUTLEN    = '10'.
W_FIELDCATALOG-SELTEXT_M    = 'Basic End Date'.
APPEND W_FIELDCATALOG TO I_FIELDCATALOG.
ENDFORM.                    "BUILD_FIELDCATALOG
*&      Form get_events
      text
FORM GET_EVENTS.
CLEAR : W_EVENTS, I_EVENTS[].
CALL FUNCTION 'REUSE_ALV_EVENTS_GET'
    EXPORTING
      I_LIST_TYPE = 0
    IMPORTING
      ET_EVENTS   = I_EVENTS.
READ TABLE I_EVENTS WITH KEY NAME = SLIS_EV_TOP_OF_PAGE
                         INTO W_EVENTS.
IF SY-SUBRC EQ 0.
    MOVE 'TOP_OF_PAGE' TO W_EVENTS-FORM.
    MODIFY I_EVENTS FROM W_EVENTS INDEX SY-TABIX.
ENDIF.
READ TABLE I_EVENTS WITH KEY NAME = SLIS_EV_USER_COMMAND
                         INTO W_EVENTS.
IF SY-SUBRC EQ 0.
    MOVE 'SUB_USER_COMMAND' TO W_EVENTS-FORM.
    MODIFY I_EVENTS FROM W_EVENTS INDEX SY-TABIX.
ENDIF.
READ TABLE I_EVENTS WITH KEY NAME = SLIS_EV_PF_STATUS_SET
            INTO W_EVENTS.
IF SY-SUBRC EQ 0.
    MOVE 'PF_STATUS_SET' TO W_EVENTS-FORM.
    MODIFY I_EVENTS FROM W_EVENTS INDEX SY-TABIX.
ENDIF.
ENDFORM.                    "get_events
*&      Form build_layout
      text
FORM BUILD_LAYOUT.
gd_layout-no_input          = 'X'.
gd_layout-colwidth_optimize = 'X'.
GD_LAYOUT-ZEBRA             = 'X'.
W_KEYINFO-HEADER01          = 'MATNR'.
W_KEYINFO-ITEM01            = 'MATNR'.
GD_LAYOUT-TOTALS_TEXT       = 'Totals'(201).
GD_LAYOUT-EXPAND_FIELDNAME = 'EXPAND'.
ENDFORM.                    " BUILD_LAYOUT
*&      Form data_retrieval
      text
FORM GET_DATA.
IF p_matnr IS NOT INITIAL.
SELECT MATNR
         AUFNR
         BDMNG
         FROM RESB INTO TABLE I_RESB
         WHERE DUMPS = 'X'.
            AND matnr = p_matnr.
SORT I_RESB BY MATNR AUFNR.
ENDIF.
SELECT * FROM JEST INTO CORRESPONDING FIELDS OF TABLE I_JEST
               WHERE STAT = 'I0002'
                AND INACT = ' '.
SELECT OBJID
          ARBPL
          FROM CRHD INTO TABLE I_CRHD WHERE ARBPL = P_ARBPL.
IF NOT I_CRHD[] IS INITIAL.
    SELECT AUFPL
           ARBID
           FROM AFVC INTO TABLE I_AFVC
           FOR ALL ENTRIES IN I_CRHD
           WHERE ARBID = I_CRHD-OBJID.
ENDIF.
IF NOT I_AFVC[] IS INITIAL.
    SELECT AUFNR
           GLTRP
           GSTRP
           GAMNG
           PLNBEZ
           FROM AFKO INTO CORRESPONDING FIELDS OF TABLE I_AFKO
           FOR ALL ENTRIES IN I_AFVC
           WHERE AUFPL = I_AFVC-AUFPL
             AND GSTRP IN S_GSTRP.
    SORT I_AFKO BY AUFNR.
ENDIF.
IF NOT I_AFKO[] IS INITIAL.
    SELECT AUFNR
           AUART
           WERKS
           OBJNR
           FROM AUFK INTO TABLE I_AUFK
           FOR ALL ENTRIES IN I_AFKO
               WHERE AUFNR = I_AFKO-AUFNR
                 AND AUART = P_AUART
                 AND WERKS = P_WERKS.
    SORT I_AUFK BY AUFNR OBJNR.
    SELECT * FROM MAKT INTO TABLE I_MAKT1
             FOR ALL ENTRIES IN I_AFKO
             WHERE MATNR = I_AFKO-PLNBEZ
               AND SPRAS = SY-LANGU.
    SORT I_MAKT1 BY MATNR.
ENDIF.
IF NOT I_RESB[] IS INITIAL.
    SELECT * FROM MAKT INTO TABLE I_MAKT
             FOR ALL ENTRIES IN I_RESB
             WHERE MATNR = I_RESB-MATNR
               AND SPRAS = SY-LANGU.
    SORT I_MAKT BY MATNR.
ENDIF.
CLEAR W_HHEADER-BDMNG.
***BEGIN OF PHANTOM MATERIAL HEADER INTERNAL TABLE***
CLEAR W_AUFK.
CLEAR W_RESB.
LOOP AT I_RESB INTO W_RESB.
    W_HHEADER-MATNR = W_RESB-MATNR.
    READ TABLE I_MAKT INTO W_MAKT
              WITH KEY MATNR = W_RESB-MATNR BINARY SEARCH.
    W_HHEADER-MAKTX = W_MAKT-MAKTX.
    APPEND W_HHEADER TO I_HHEADER.
    MODIFY I_HHEADER FROM W_HHEADER INDEX SY-TABIX.
    CLEAR W_HHEADER.
    CLEAR W_RESB.
    SORT I_HHEADER BY MATNR.
    DELETE ADJACENT DUPLICATES FROM I_HHEADER.
ENDLOOP.
****END OF PHANTOM MATERIAL HEADER INTERNAL TABLE***
**BEGIN OF PHANTOM MATERIAL ITEM DETAILS***************
IF NOT I_HHEADER[] IS INITIAL.
    LOOP AT I_HHEADER INTO W_HHEADER.
      LOOP AT I_RESB INTO W_RESB WHERE MATNR = W_HHEADER-MATNR.
        IF SY-SUBRC = 0.
          READ TABLE I_AUFK INTO W_AUFK
                     WITH KEY AUFNR = W_RESB-AUFNR.
          READ TABLE I_JEST INTO W_JEST
                     WITH KEY OBJNR = W_AUFK-OBJNR.
          IF SY-SUBRC = 0.
            W_HITEM-CHECK = CHECK.
            W_HITEM-MATNR = W_HHEADER-MATNR.
            READ TABLE I_AFKO INTO W_AFKO
                    WITH KEY AUFNR = W_AUFK-AUFNR BINARY SEARCH.
            W_HITEM-AUFNR = W_AFKO-AUFNR.
            W_HITEM-PLNBEZ = W_AFKO-PLNBEZ.
            READ TABLE I_MAKT1 INTO W_MAKT1
                    WITH KEY MATNR = W_AFKO-PLNBEZ.
            W_HITEM-MAKTX = W_MAKT1-MAKTX.
            W_HITEM-GLTRP = W_AFKO-GLTRP.
            W_HITEM-GSTRP = W_AFKO-GSTRP.
            W_HITEM-GAMNG = W_AFKO-GAMNG.
            APPEND W_HITEM TO I_HITEM.
            MODIFY I_HITEM FROM W_HITEM INDEX SY-TABIX.
            SORT I_HITEM BY AUFNR.
            CLEAR W_HITEM.
          ENDIF.
        ENDIF.
      ENDLOOP.
    ENDLOOP.
ENDIF.
***********END OF PHANTOM MATERIAL ITEM DETAILS.*********************
ENDFORM.                    "get_item_DETAILS
*&      Form top_of_page
      text
FORM TOP_OF_PAGE.
CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
EXPORTING
IT_LIST_COMMENTARY = I_HEADER
I_LOGO =
I_END_OF_LIST_GRID =
ENDFORM.                    " alv_top_of_page
*&      Form user_command
      text
     -->P_UCOMM    text
     -->P_SELFIELD text
FORM DISPLAY_ALV_REPORT.
SORT I_HHEADER BY MATNR.
SORT I_HITEM   BY MATNR AUFNR.
CALL FUNCTION 'REUSE_ALV_HIERSEQ_LIST_DISPLAY'
    EXPORTING
I_INTERFACE_CHECK              = ' '
     I_CALLBACK_PROGRAM             = GD_REPID
     I_CALLBACK_PF_STATUS_SET       = 'PF_STATUS_SET'
     I_CALLBACK_USER_COMMAND        = 'SUB_USER_COMMAND'
     IS_LAYOUT                      = GD_LAYOUT
     IT_FIELDCAT                    = I_FIELDCATALOG
IT_EXCLUDING                   =
IT_SPECIAL_GROUPS              =
IT_SORT                        =
IT_FILTER                      =
IS_SEL_HIDE                    =
I_SCREEN_START_COLUMN          = 0
I_SCREEN_START_LINE            = 0
I_SCREEN_END_COLUMN            = 0
I_SCREEN_END_LINE              = 0
I_DEFAULT                      = 'X'
I_SAVE                         = ' '
IS_VARIANT                     =
     IT_EVENTS                      = I_EVENTS[]
IT_EVENT_EXIT                  =
      I_TABNAME_HEADER               = 'I_HHEADER'
      I_TABNAME_ITEM                 = 'I_HITEM'
i_structure_name_header        =
i_structure_name_item          =
      IS_KEYINFO                     = W_KEYINFO
IS_PRINT                       =
IS_REPREP_ID                   =
I_BYPASSING_BUFFER             =
I_BUFFER_ACTIVE                =
IMPORTING
E_EXIT_CAUSED_BY_CALLER        =
ES_EXIT_CAUSED_BY_USER         =
    TABLES
      T_OUTTAB_HEADER                = I_HHEADER
      T_OUTTAB_ITEM                  = I_HITEM
EXCEPTIONS
PROGRAM_ERROR                  = 1
OTHERS                         = 2
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.                    "display_alv_report
*****BEGIN OF CUMMILATIVE QUANTITY***********************
FORM PF_STATUS_SET USING EXTAB TYPE SLIS_T_EXTAB.
BREAK POINT.
SET PF-STATUS 'STANDARD' EXCLUDING EXTAB.
ENDFORM.                    "PF_STATUS_SET
*&      Form SUB_USEMR_COMMAND
      text
     -->P_UCOMM    text
     -->P_SELFIELD text
FORM SUB_USER_COMMAND USING P_UCOMM LIKE SY-UCOMM
                       P_SELFIELD TYPE SLIS_SELFIELD.
CASE SY-UCOMM.
    WHEN 'SUMM'.
      CLEAR W_HITEM.
      CLEAR W_HHEADER-V_QTY.
      P_SELFIELD-REFRESH = 'X'.
      DATA:LV_TABIX TYPE SY-TABIX.
      LOOP AT I_HITEM INTO W_HITEM.
        READ TABLE I_HHEADER INTO W_HHEADER
                    WITH KEY MATNR = W_HITEM-MATNR BINARY SEARCH.
        IF SY-SUBRC = 0.
          LV_TABIX = SY-TABIX.
          IF W_HITEM-CHECK = 'X'.
            W_HHEADER-V_QTY = W_HHEADER-V_QTY + W_HITEM-GAMNG.
            MODIFY I_HHEADER FROM W_HHEADER
                  INDEX LV_TABIX." TRANSPORTING V_QTY.
          ENDIF.
        ENDIF.
      ENDLOOP.
ENDCASE.
ENDFORM.                    "USER_COMMAND
*********END OF CUMMILATIVE QUANTITY
Thanks in advance.
Ramesh.

Hello Ramesh,
Check your declerations,
In internal table I_HHEADER , the quantity field is of character type. And in internal table I_HITEM, the field GAMNG is of type quantity. There will be type mismatch.Correct it and see if it works.
Regards

VF02 Quantity field change issue

Hi all,my client want to change the quantity field in VF02 transaction,I tried many ways but none worked.I have got an enhancement point in PAI of the screen,at this enhancement there is a field called 'KOMP-MGAME' have the quantity field value,I changed that value with some other value,but it is not getting reflected there.Can anyone tell me how to solve it?
Thanks in advance.

Thanks Balu for the reply,as siad above my client want to edit Quantity(Value of quantity like want to change quantity 5 to quantity 10) in VF02 which is not available in the standard,but I found an enhancement ,at that point I have got the value of quantity in MGAME,what I want to do is,I want to popup a message with quantity field and the client will enter the quantity after that I will change the quantity(MGAME) in that screen,but it is changing the value of MGAME in that enhancement point but it is not getting reflected in the screen.So how can I change the Quantity now? is there any other field which actually hold the quantity value which appears in the VF02 transaction?
Hope Iam clear with the question.

Input Field: Value Range in IP Web Layout

Hi Experts,
I've created a Web Layout based on IP with a copy function (e.g. from actual 2008 to plan2009) over 12 calendar months. For choosing the months to be copied, I created a Variable (calmonths) and added an Input Field into my layout to enter the the months to be copied. I referred the variable to the input field and it's working...
When I want to select several months to be copied, I can type in " 1; 2; 3; " into the input field, execute the planning function and only month 1, 2, 3 (i.e. Jan, Feb, Mar) are being copied. But when I want to copy all 12 months, i have to enter 1; 2; 3; 4;...11; 12 which is kind of anoying! Has somebody some experience whether I can use a value range like 1-12 (or something like that) to avoid entering all the months individually? (I tried 1-12; 1- 12; 1 - 12; 1:12 etc but nothing like this is working)
It would be very helpful if someone has an idea
All the best,
Norbert

Hi Mayank, hi Srinivas.
Thanks a lot for your valuable input! Unfortunately I was not able until today to test your recommodations.
I tried your Interval variable but then faced the problem that I cannot enter multiple months anymore (e.g. 5 - 8 worked, 1; 3; 5 not). Then I inserted both variables, multiple values & interval, into the planning function as well as in the button group in WAD for executing the PF but was not able to execute the following example: 1; 8; 4 - 6. After trying out for some time I figured out that one has to type in the figures in the following order: 4 - 6; 1; 8. Only then I am able to execute the planning function for the months April-June & Jan & August. So, if you're facing the same problem in the future, maybe you have the solution
Best regards,
Norbert

CJI3 report not displaying values correctly in the "Total Quantity" field

Dear Friends,
Need your assistance on the issue explained below,
In our project there is a scenario where the actuals posted on a WBS are split/distributed to various WBS.These actuals that are split can be CATS entries,manual posting (KB21) or postings that come to R3 from a legacy system.The split happens by means of a custom program and is not standard.There is a tab seperated text file that contains the split percentages and the sender as well as the receiver WBS elements.Off late it has been observed that after the split is done the CJI3 report does not show the split quantities correctly and hence there is difference in the values displayed in the currency field.This is not a rounding off difference and is considerable.We have done all possible analysis from our side but i am unable to find how the difference occurs.
To add to this i have even come across certain notes which describe the issue closely but none of it has helped so far. I have simulated the scenario with the same settings in the Quality server and it seems to work fine there without any glitches. We have even compared the program in both the Quality as well as the Production servers and there is no difference in the program as well.The values for the total quantity field are stored in the table COVP and it has been observed the report is fetching this data to display in CJI3.
I have run CJEN too but this too does not correct the report. I was just wondering if any of our colleagues can provide me with some suggestions or insight in this issue.
Regards,
Gokul

Hi Praveen,
Thanks for the response.
Actually i did debug the program with the help of our technical guys but found nothing wrong in both the quality and the production system. We compared the program in both the systems and it seems to be same. I am exploring this issue. Will update the findings here.
In case anyone has any suggestion please do suggest.
Regards,
Gokul

In smartforms the quantity field is not showing the perfect value .

In smartforms the quantity field is not showing the perfect value because the point is shifting left
insted of showing 8.10 it is showing 80.00.

Hi,
Dont use the quantity field same as that it come from interface Fm declare one field for quantity in the global settings and write the logic to pass the value to that field and pass that global value to the particular texts...same is the case with currency fields also.
Regards,
Rohan.

Regarding quantity field...value in layout

Similar Messages

Maybe you are looking for