Regarding QUANTITY AND CURR FIELD

Hi Expert,
i want to divide Currency field but when i divide currency field it givies garbage
values.
BSEG-WRBTR is curr field when i divide it by 10 it gives garbage value.
plz tell me silution.
regards,
sonu

Hi
What is the field to which you are moving the resultant of division?
Check the declaration of that field.
Regards
Raj

Similar Messages

How to delete zeros in layout for quantity and currency fields

Hi All
Iam getting zeros in place of quantity and currency field records, which i doesnt require in layout SAP-Script.
Please let me know if any one has an idea.
Regards
Bhaskar

Hi,
Add NO-ZEROES statement to it.
or
U can use CONDENSE statement.
Cheers,
SImha.

Urgent : Problem with Editable ALV Grid for Quantity and Currency Fields

Hi All,
I am using Editable ALV Grid display and have quantity and value as editable fields in the display.
When user changes these values these values are not changing properly .
For the quantity field the domain is MENG13 with 3 deciamal places and here if we enter 500 it takes it as 0.500 .
The same problem is for the currency field. Here the Domain is WERT7 with 3 decimal places.
Here also it takes last 2 digits after decimal places by default.
Please advice how to get proper values in this case from ALV editable fields.
Thanks and Regards
Harshad
Edited by: Harshad Rahirkar on Dec 25, 2007 7:39 AM

for all the currency field , it will display like that only.
u have to manipulate uin program before displaying.
if they are giving 500, in program multiply with 100 and move it to table.
when u are getting from table, divinde and display.
this is what I am doing.
Reward if helpfull.

How to display the Quantity and Rate fields in PO Report

I am trying to get a Purchase Order report that has the following fields in it.
1. Ordering Date
2. Purchase Order ID
3. Supplier
4. Product
5 Quantity
6. Rate
7. Amount (Quantity x Amount)
The reports under the Purchase Order WoC do not display Quantity and Rate.
Any more information like pointing to an Article or Help Topic is appreciated.
Regards
Yagyesh

Try the Purchase Order Volume report as your starting point.
I got everything you need onto that report in about two minutes (except quantity which may take longer).
The report can be found under the reports menu or you can find it under Business Analytics WoC if you have access.
I have been using the Business Analytics WoC for all of my reporting since it saves me the step of going to each WoC to look for the core reports.
Jim

Q54: Cumulative quantity and value fields

Hi All,
Thanks for all previous help in getting me up and running but now I have a new challenge...........
Which table(s) can I find the fields for Cumulative Qty and Cumulative Value as reported in the Stock Audit Report?
Regards,
Robin

Hi Robin,
There is no fields in any tables hold those cumulative quantity and values. Those values are calculated on the fly by program. You can reproduce them easily through an excel formula to verify.
Thanks,
Gordon

Miro line item quantity and amount after miro

Dear Forum,
I have got the help about this subject and quite clear. Thanks for all have helped.
Now I need to confirm 1 more part.
Assuming in PO there are 2 scenarios where gr based iv is ticked and also not ticked, after both GR and miro done (complete the process from PO until book vendor invoice in miro), I purposely do another miro invoice type referring to these 2 PO.
I just wonder why the item line still enabled with quantity and amount fields empty? I thought the line item should be totally grey out?
Need advice.
Thanks
Rgds

Dear Srina,
As Std SAP practice system will populate the line item with enable mode even though MIRO fully done for said line item. But any how message will prompt if you enter amount & qty again in empty field & wanted to post the said line item as stated below;
"Check if invoice already entered under accounting doc. no. XXXXXXXXX 2010". Probably you may refer to abapers to have user exit to control this field.
Please view the below link for better understanding.
Exits and Badi in Logistic Invoice Verification
Calculate tax in MIRO
rgds,
nanthakumar

Regarding currency and quantity fields

i hav to fill one field with the calculated value of currency and the field of type DEC as below
wa_final_unitprice = currency field/DEC field.
how to declare that field in data dictionary as i hav to create ztable.
and i hav to fill another field as
wa_final_val = (wa_final_unitprice * quantity field)
how to declare wa_final_val field?
plz help me in this.

HI,
At table level you declare like currency only for that feild-c.
For Ex: feild-C = feild-A * feild-B.
But to get the value in the feild-c you need to create a table maintainece generator. In that you write Events. In Table control after save event (02) you need write the code like below.
feild-C = feild-A * feild-B.
to go the events, go to se11 maintain feilds and activate.
Then go to Utilities -
> Tabel Maintanence Generator
now go to Environment ---> Modification ---> Events
Many Thanks,
Raghu.

R12: Disable Field Quantity and Unit Price in Line Item (AR)

Hello,
Is there a setup in Oracle Receivables - Transactions where I can disable the field "Quantity" and "Unit Price" on the form for line item?
I don't have Order Management nor Inventory setup in this environment.
Note: In AP invoices, these field are disabled.
vik

Hello.
I don't think that is possible because the system uses those fields to calculate the Amount field, which cannot be filled in directly.
Octavio

Problem while creating with QUAN and CURR data type fields

I am trying to create a Z table. A couple of fields are of data type QUAN and CURR, which need to have reference table and reference field.
Field               DataType     Length     Decimal
TOT_QTY       QUAN            15                 3
PRICE              CURR             16                2
For reference table and fields, I found a Table HRPAD23 which has a field called N_QUANTITY (15,3) that matches my TOT_QTY field's data type and it also has a field called UN_PRICE that matches my PRICE field's data type. But when I use them as reference, and try to activate the table, I get an error "combination reference table/field does not exist". How do I fix this? Can anybody help me? Thanks in advance.
Chris
Edited by: martin99 on Aug 18, 2011 9:16 PM

Martin,
I doubt that you need to add 2 extra fields in your table as suggested in the last post by John.
Your error is very CLEAR that you seem to be use wrong combination of reference table and field.
For QTY field,
use ref table - HRPAD23.              ref field- UNIT
OR
ref table - VBAP                       ref field - VRKME
For PRICE field,
use ref table - PAD25                  ref field - KWAER
OR
ref table - T77REFDOC                                     ref field - CURRENCY
It should work.
BR,
Diwakar

This is regarding printing vertical lines for each and every field

Hi to all.....
1....Hi
here is a requirement
i want to print vertical lines and horizontal lines for each and every field in the output of a report.Here i want to see the output just like table i.e i want to draw line after each field.
                         suppose if the output list contains just 10 records, then the vertical line must end for 10 records.how to draw vertical lines for this requirement.
thanks and regards,
k.swaminath

Hi
In report you can use
sy-uline for horizontal line
sy-vline for vertical lines.
Check this sample report
DATA: BEGIN OF USR_TABL OCCURS 0.
INCLUDE STRUCTURE UINFO.
DATA: END OF USR_TABL.
DATA: L_LENGTH TYPE I,
T_ABAPLIST LIKE ABAPLIST OCCURS 0 WITH HEADER LINE, BEGIN OF T_USER OCCURS 0, COUNTER TYPE I, SELECTION TYPE C, MANDT LIKE SY-MANDT, BNAME LIKE SY-UNAME, NAME_FIRST LIKE V_ADRP_CP-NAME_FIRST, NAME_LAST LIKE V_ADRP_CP-NAME_LAST, DEPARTMENT LIKE V_ADRP_CP-DEPARTMENT, TEL_NUMBER LIKE V_ADRP_CP-TEL_NUMBER, END OF T_USER, L_CLIENT LIKE SY-MANDT, L_USERID LIKE UINFO-BNAME, L_OPCODE TYPE X, L_FUNCT_CODE(1) TYPE C, L_TEST(200) TYPE C.
L_OPCODE = 2.
CALL ThUsrInfo ID OPCODE FIELD L_OPCODE
ID TAB FIELD USR_TABL-*SYS*.
CLEAR T_USER. REFRESH T_USER.
LOOP AT USR_TABL.
T_USER-MANDT = USR_TABL-MANDT. T_USER-BNAME = USR_TABL-BNAME. APPEND T_USER.
ENDLOOP.
SORT T_USER.
DELETE ADJACENT DUPLICATES FROM T_USER.
LOOP AT T_USER.
T_USER-COUNTER = SY-TABIX. SELECT V~NAME_FIRST V~NAME_LAST V~DEPARTMENT V~TEL_NUMBER INTO (T_USER-NAME_FIRST, T_USER-NAME_LAST, T_USER-DEPARTMENT, T_USER-TEL_NUMBER) FROM USR21 AS U JOIN V_ADRP_CP AS V ON U~PERSNUMBER = V~PERSNUMBER AND U~ADDRNUMBER = V~ADDRNUMBER WHERE U~BNAME = T_USER-BNAME. ENDSELECT. MODIFY T_USER.
ENDLOOP.
SORT T_USER BY NAME_LAST NAME_FIRST.
PERFORM DISPLAY_LIST.
TOP-OF-PAGE.
PERFORM DISPLAY_MENU.
    * End of top-of-page
TOP-OF-PAGE DURING LINE-SELECTION.
PERFORM DISPLAY_MENU.
    * End of top-of-page during line-selection
AT LINE-SELECTION.
IF SY-CUROW = 2. IF SY-CUCOL < 19. T_USER-SELECTION = X. MODIFY T_USER TRANSPORTING SELECTION WHERE SELECTION = . PERFORM DISPLAY_LIST. ELSEIF SY-CUCOL < 36. CLEAR T_USER-SELECTION. MODIFY T_USER TRANSPORTING SELECTION WHERE SELECTION = X. PERFORM DISPLAY_LIST. ELSEIF SY-CUCOL < 50. PERFORM TRANSFER_SELECTION. PERFORM POPUP_MSG. ELSEIF SY-CUCOL < 67. PERFORM TRANSFER_SELECTION. SORT T_USER BY NAME_LAST. PERFORM DISPLAY_LIST. ELSEIF SY-CUCOL < 81. PERFORM TRANSFER_SELECTION. SORT T_USER BY NAME_FIRST. PERFORM DISPLAY_LIST. ELSEIF SY-CUCOL < 93. PERFORM TRANSFER_SELECTION. SORT T_USER BY MANDT. PERFORM DISPLAY_LIST. ENDIF. ENDIF.
    * End of line-selection
*& Form DISPLAY_LIST
FORM DISPLAY_LIST.
SY-LSIND = 0.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
LOOP AT T_USER.
WRITE: / SY-VLINE, T_USER-SELECTION AS CHECKBOX, SY-VLINE, T_USER-MANDT, SY-VLINE, T_USER-BNAME, SY-VLINE, T_USER-NAME_FIRST(15), SY-VLINE, T_USER-NAME_LAST(15), SY-VLINE, T_USER-DEPARTMENT, SY-VLINE, T_USER-TEL_NUMBER(20), SY-VLINE. HIDE: T_USER-COUNTER, T_USER-SELECTION.
ENDLOOP.
FORMAT COLOR OFF.
WRITE: /(108) SY-ULINE.
ENDFORM. DISPLAY_LIST
*& Form DISPLAY_MENU
FORM DISPLAY_MENU.
FORMAT COLOR COL_HEADING HOTSPOT. WRITE: (91) SY-ULINE, / SY-VLINE NO-GAP, (4) ICON_SELECT_ALL NO-GAP, Select All, SY-VLINE NO-GAP, (4) ICON_DESELECT_ALL NO-GAP, Deselect All, SY-VLINE NO-GAP, (4) ICON_SHORT_MESSAGE NO-GAP, Send Popup, SY-VLINE NO-GAP, (4) ICON_SORT_UP NO-GAP, Last Name NO-GAP, SY-VLINE NO-GAP, (4) ICON_SORT_UP NO-GAP, First Name NO-GAP, SY-VLINE NO-GAP, (4) ICON_SORT_UP NO-GAP, Client NO-GAP, SY-VLINE, /(91) SY-ULINE, /(108) SY-ULINE. FORMAT HOTSPOT OFF. WRITE: / SY-VLINE, , SY-VLINE, Cli, SY-VLINE, User , SY-VLINE, First Name , SY-VLINE, Last Name , SY-VLINE, Department , SY-VLINE, Telephone , SY-VLINE, /(108) SY-ULINE. FORMAT COLOR OFF.
ENDFORM. DISPLAY_MENU
*& Form TRANSFER_SELECTION
FORM TRANSFER_SELECTION.
DO. READ LINE SY-INDEX FIELD VALUE T_USER-SELECTION. IF SY-SUBRC <> 0. EXIT. ENDIF. MODIFY T_USER TRANSPORTING SELECTION WHERE COUNTER = T_USER-COUNTER. ENDDO. CLEAR T_USER.
ENDFORM. TRANSFER_SELECTION
*& Form POPUP_MSG
FORM POPUP_MSG.
DATA: L_MSG LIKE SM04DIC-POPUPMSG VALUE Experimental Message, L_LEN TYPE I, L_RET TYPE C. LOOP AT T_USER WHERE SELECTION = X. PERFORM GET_MESSAGE CHANGING L_MSG L_RET. EXIT. ENDLOOP. IF L_RET = A. User cancelled the message EXIT. ENDIF.
    * Get the message text
L_LEN = STRLEN. LOOP AT T_USER WHERE SELECTION = X. CALL FUNCTION TH_POPUP EXPORTING CLIENT = T_USER-MANDT USER = T_USER-BNAME MESSAGE = L_MSG MESSAGE_LEN = L_LENGTH
    * CUT_BLANKS =
EXCEPTIONS USER_NOT_FOUND = 1 OTHERS = 2. IF SY-SUBRC <> 0. WRITE: User , T_USER-BNAME, not found.. ENDIF. ENDLOOP. IF SY-SUBRC <> 0.
    * Big error! No user has been selected.
MESSAGE ID AT TYPE E NUMBER 315 WITH No user selected!. EXIT. ENDIF.
ENDFORM. POPUP_MSG
*& Form GET_MESSAGE
FORM GET_MESSAGE CHANGING P_L_MSG LIKE SM04DIC-POPUPMSG
P_RETURNCODE TYPE C.
DATA: BEGIN OF FIELDS OCCURS 1. INCLUDE STRUCTURE SVAL.
DATA: END OF FIELDS, RETURNCODE TYPE C.
FIELDS-TABNAME = SM04DIC.
FIELDS-FIELDNAME = POPUPMSG.
FIELDS-FIELDTEXT = Message :. CONCATENATE Msg from SY-UNAME . INTO FIELDS-VALUE SEPARATED BY . APPEND FIELDS.
CALL FUNCTION POPUP_GET_VALUES
EXPORTING POPUP_TITLE = Supply the popup message
IMPORTING RETURNCODE = P_RETURNCODE
TABLES FIELDS = FIELDS.
IF P_RETURNCODE = A.
EXIT.
ELSE.
READ TABLE FIELDS INDEX 1.
P_L_MSG = FIELDS-VALUE.
ENDIF.
ENDFORM. GET_MESSAGE
*End of Program
Regards
Pavan

Negative quantity in deliver field in production order - CO02

Hi All,
I am doing production confirmation and goods receipt for production order through back ground using standard BAPI.While doing GR for production order in background the following error occured.
System is throughing dump - Arithmatical logical conversion problem.when we analysed through ST22 we came to know that negative quantity appearing in field of delivered in production order.
Screen name.............. "SAPLCOKO1"
Screen number............ 0120
Screen field............. "CAUFVD-GWEMG"
As per standard, delivered field in production order is always in display mode only. So there will not be any chance for user to change the delivered field.
Pls guide me how to overcome the above issue and what is exact root cause for the above problem.
System is throwing error in change mode ( Co02) and display mode ( CO03 ) for the respective production order number
Thanks
P.Srinivasan

Hi,
This inconsistency can be solved with the following correction report. If you want to try by yourself, then implement it manually in transaction SE38 and execute in test mode first to check if the inconsistency is found. And obviously, in a TEST system first.
If you are NOT confident about it, I recommend you to submit a support message for SAP for further investigation since this is a database inconsistency.
Regards,
Marcelo
<pre>
*& Report ZPCON_076B                                                  *
*& This report checks goods receipt quantity (WEMNG) and value (WEWRT) *
*& of an order item for consistency with the corresponding material    *
*& documents. In UPDATE mode, the quantity and the value calculated    *
*& from the material documents will be written to database table AFPO. *
REPORT zpcon_076b LINE-SIZE 90.
INCLUDE lcokotyp.
TABLES: afpo.
SELECTION-SCREEN COMMENT /1(80) text1.                      "#EC NEEDED
SELECTION-SCREEN COMMENT /1(80) text2.                      "#EC NEEDED
SELECTION-SCREEN COMMENT /1(80) text3.                      "#EC NEEDED
SELECTION-SCREEN COMMENT /1(80) text4.                      "#EC NEEDED
SELECTION-SCREEN COMMENT /1(80) text5.                      "#EC NEEDED
SELECTION-SCREEN ULINE.
SELECTION-SCREEN COMMENT /1(80) texta.                      "#EC NEEDED
SELECT-OPTIONS r_aufnr FOR afpo-aufnr.
SELECTION-SCREEN ULINE.
SELECTION-SCREEN BEGIN OF BLOCK block WITH FRAME TITLE title."#EC NEEDED
SELECTION-SCREEN COMMENT /1(72) texty.                      "#EC NEEDED
SELECTION-SCREEN BEGIN OF BLOCK block2 WITH FRAME.
PARAMETERS: testmode RADIOBUTTON GROUP mode DEFAULT 'X'.
PARAMETERS: update RADIOBUTTON GROUP mode.
SELECTION-SCREEN END OF BLOCK block2.
SELECTION-SCREEN COMMENT /1(72) textz.                      "#EC NEEDED
SELECTION-SCREEN END OF BLOCK block.
DATA: BEGIN OF ls_afpo.
        INCLUDE STRUCTURE afpo.
DATA: END OF ls_afpo.
DATA lt_afpo LIKE ls_afpo OCCURS 0.
DATA: BEGIN OF ls_mseg.
        INCLUDE STRUCTURE mseg.
DATA: END OF ls_mseg.
DATA ls_mseg2 LIKE ls_mseg.
DATA lt_mseg LIKE ls_mseg OCCURS 0.
DATA ls_mkpf TYPE mkpf.
DATA l_initial_ltrmi TYPE co_ltrmi VALUE IS INITIAL.
DATA l_orders TYPE sytabix.
DATA l_entries TYPE sytabix.
DATA l_sum_wemng TYPE wemng.
DATA l_sum_wewrt TYPE wewrt.
DATA l_error TYPE xfeld.
INITIALIZATION.
text1 = 'This report checks goods receipt quantity (WEMNG) and'.
text2 = 'value (WEWRT) of an order item for consistency with the '.
text3 = 'corresponding material documents. In UPDATE mode, the'.
text4 = 'quantity and the value calculated from the material'.
text5 = 'documents will be written to database table AFPO.'.
texta = 'Please specify order numbers of orders to be processed.'.
texty = 'If TESTMODE is set, no database update will occur.'.
textz = 'Set radio button UPDATE for updating the database entries.'.
title = 'Mode'.
AT SELECTION-SCREEN.
orders specified?
IF r_aufnr IS INITIAL.
    MESSAGE e889(co) WITH 'Please specify order numbers'.
ENDIF.
START-OF-SELECTION.
select order items
SELECT *
         FROM afpo
         INTO TABLE lt_afpo
         WHERE aufnr IN r_aufnr
         AND ( dauty = auftragstyp-fert
            OR dauty = auftragstyp-netw
            OR dauty = auftragstyp-inst
            OR dauty = auftragstyp-rma
            OR dauty = auftragstyp-bord ).
DESCRIBE TABLE lt_afpo LINES l_orders.
check order items
LOOP AT lt_afpo INTO ls_afpo.
    REFRESH lt_mseg.
    CLEAR l_sum_wemng.
    CLEAR l_sum_wewrt.
    CLEAR l_error.
    SELECT *
           FROM mseg
           INTO TABLE lt_mseg
           WHERE matnr = ls_afpo-matnr
             AND werks = ls_afpo-pwerk
             AND aufnr = ls_afpo-aufnr
             AND aufps = ls_afpo-posnr
             AND kzbew = 'F'
           %_HINTS ORACLE 'rule'.
    IF NOT sy-subrc IS INITIAL.
    no goods movements --> nothing to do.
      DELETE lt_afpo.
      CONTINUE.
    ENDIF.
    LOOP AT lt_mseg INTO ls_mseg.
      IF ls_mseg-shkzg ='S'.
      inward movement
        IF NOT ls_mseg-dmbtr IS INITIAL.
          l_sum_wewrt = l_sum_wewrt + ls_mseg-dmbtr.
        ENDIF.
        IF NOT ls_mseg-bstmg IS INITIAL.
          l_sum_wemng = l_sum_wemng + ls_mseg-bstmg.
        ELSE.
          IF ls_mseg-erfme = ls_afpo-amein.
            l_sum_wemng = l_sum_wemng + ls_mseg-erfmg.
          ELSE.
            IF ls_mseg-meins = ls_afpo-amein.
              l_sum_wemng = l_sum_wemng + ls_mseg-menge.
            ELSE.
              WRITE: 'ERROR - Order', ls_afpo-aufnr COLOR 6.
              DELETE lt_afpo.
              l_error = 'X'.
              EXIT.
            ENDIF.
          ENDIF.
        ENDIF.
        ls_mseg2 = ls_mseg.
      ELSE.
      outward movement
        IF NOT ls_mseg-dmbtr IS INITIAL.
          IF ls_mseg-dmbtr NE ls_mseg-bualt AND
             NOT ls_mseg-bualt IS INITIAL.
            l_sum_wewrt = l_sum_wewrt - ls_mseg-bualt.
          ELSE.
            l_sum_wewrt = l_sum_wewrt - ls_mseg-dmbtr.
          ENDIF.
        ENDIF.
        IF NOT ls_mseg-bstmg IS INITIAL.
          l_sum_wemng = l_sum_wemng - ls_mseg-bstmg.
        ELSE.
          IF ls_mseg-erfme = ls_afpo-amein.
            l_sum_wemng = l_sum_wemng - ls_mseg-erfmg.
          ELSE.
            IF ls_mseg-meins = ls_afpo-amein.
              l_sum_wemng = l_sum_wemng - ls_mseg-menge.
            ELSE.
              WRITE: 'ERROR - Order', ls_afpo-aufnr COLOR 6.
              DELETE lt_afpo.
              l_error = 'X'.
              EXIT.
            ENDIF.
          ENDIF.
        ENDIF.
      ENDIF.
    ENDLOOP. "AT lt_mseg
only continue if no error in the calculation occurred
    CHECK l_error IS INITIAL.
    IF ls_afpo-wemng = l_sum_wemng AND
       ls_afpo-wewrt = l_sum_wewrt.
    values are correct, no update necessary
      DELETE lt_afpo.
      CONTINUE.
    ENDIF.
    FORMAT: COLOR 1.
    WRITE: / 'Order', ls_afpo-aufnr, 'material', ls_afpo-matnr.
    FORMAT: COLOR OFF.
    WRITE: /3 'Order item data   : quantity',
              ls_afpo-wemng UNIT ls_afpo-amein, ls_afpo-amein, 'value',
              ls_afpo-wewrt CURRENCY ls_mseg-waers, ls_mseg-waers.
    WRITE: /3 'Material documents: quantity',
              l_sum_wemng UNIT ls_afpo-amein, ls_afpo-amein, 'value',
              l_sum_wewrt CURRENCY ls_mseg-waers, ls_mseg-waers.
    FORMAT: COLOR 2.
    WRITE: /3 'Material doc. BWART', 30 'stock qty UoM',
           52 'entry qty UoM', 77 'value Curr'.
    FORMAT: COLOR OFF.
    LOOP AT lt_mseg INTO ls_mseg.
      WRITE: /3 ls_mseg-mblnr, ls_mseg-zeile, ls_mseg-bwart,
               ls_mseg-menge UNIT ls_mseg-meins, ls_mseg-meins,
               ls_mseg-bstmg UNIT ls_mseg-bstme, ls_mseg-bstme,
               ls_mseg-dmbtr CURRENCY ls_mseg-waers, ls_mseg-waers.
    ENDLOOP.
    IF NOT update IS INITIAL.
    set delivery date
      IF l_sum_wemng IS INITIAL.
      initial delivery quantity --> initial delivery date
        UPDATE afpo SET   ltrmi = l_initial_ltrmi
                    WHERE aufnr = ls_afpo-aufnr
                      AND posnr = ls_afpo-posnr.
      ELSE.
      read posting date from last valid goods receipt
        SELECT SINGLE * FROM mkpf
                        INTO ls_mkpf
                        WHERE mblnr = ls_mseg2-mblnr
                          AND mjahr = ls_mseg2-mjahr.
        IF sy-subrc IS INITIAL.
          UPDATE afpo SET   ltrmi = ls_mkpf-budat
                      WHERE aufnr = ls_afpo-aufnr
                        AND posnr = ls_afpo-posnr.
        ELSE.
        leave LTRMI untouched
        ENDIF.
      ENDIF.
    set quantity and value
      UPDATE afpo SET   wemng = l_sum_wemng
                        wewrt = l_sum_wewrt
                  WHERE aufnr = ls_afpo-aufnr
                    AND posnr = ls_afpo-posnr.
      FORMAT: COLOR COL_POSITIVE.
      WRITE: /3 'Order item data corrected from material documents.'.
      FORMAT: COLOR OFF.
    ENDIF.
    ULINE.
ENDLOOP. "AT lt_afpo
WRITE: / 'Number of checked order items     :', l_orders.
DESCRIBE TABLE lt_afpo LINES l_entries.
WRITE: / 'Number of inconsistent order items:', l_entries.
IF NOT update IS INITIAL    AND
     NOT l_entries IS INITIAL.
    WRITE: / 'Inconsistencies were corrected from material documents.'
              COLOR COL_POSITIVE.
ENDIF.
ULINE.
</pre>
Edited by: Wilian Segatto on Jan 25, 2011 12:27 PM

How to de-activate Qty and Price fields for Service purchase requisition

Dear all,
We have a request to de-activate (leave it as "Display") the fields of quantity and gross price when changing a service purchase requisition of a specific document type.
In example: We want that purchase requisition type NB, allows in change mode (ME52 or ME52N) to change the quantity and gross price of the services. On the other hand, these two fields must be only visible for order type ZNB. Besides this must be happening only for services.
Changing PT9 or PT9B will affect also the creation, and if we only configure based on transacction and document type does not work.
Any help will be highly appreciatted.
Cheers

Hi,
You may have to write a output requirement routine and assign the same to the output type in NACE.
But i don't think you will get the old and new data of Purchase order in requirement routine (program : SAPLV61B). You may have to export the data into memory from either a BADI method or User exit and then import the same in requirement routine.
Regards
Vinod

Material Confirmed quantity and Open quantity

Hi All,
I am working on a report where the user wants the material confirmed quantity and open quantity at the batch level. I know for open quantity VBBE-OMENG can work. Just need confirmation that this is the correct field. However for confirmed quantity I am not able to narrow it down to one field. I have the following fields as possibilities but not sure which is the right one.
1) VBBE-VMENG
2) VBEP-BMENG (This is the at the sales order level though. We need it at the batch level)
Can you please let me know if i have the right approach here? The report has Material, plant, sloc and batch along with a bunch of other fields.
Regards.
Sid

Hello,
you should extract the quantities from all the deliveries selected for material and batch, and selecting only open deliveries.
Use a selection like this:
    SELECT lips~MATNR lips~WERKS
           lips~CHARG lips~LFIMG
      INTO TABLE lt_lips
      from lips as lips
      INNER JOIN vbup as vbup
        on lips~VBELN = vbup~VBELN AND
           lips~POSNR = vbup~POSNR
     WHERE lips~MATNR = p_matnr
       AND lips~WERKS = P_WERKS
       AND lips~CHARG = P_CHARG
       AND ( vbup~WBSTA eq 'A' or
             vbup~WBSTA eq 'B' ).
Best regards,
Andrea

Negative sign display for CURR field in ALV grid report

I have a field BETRG defined as CURR field of length 15, decimal places 2. The value may be negative or positive. In case of negative values I am using EDIT_MSK option in the field catalog to bring the negative sign to the left of the value as shown below.
Quote
CALL FUNCTION 'REUSE_ALV_FIELDCATALOG_MERGE'
    EXPORTING
      i_program_name         = sy-repid
      i_internal_tabname     = 'LT_FINAL'
      i_inclname             = sy-repid
    CHANGING
      ct_fieldcat            = fieldcat[]
    EXCEPTIONS
      inconsistent_interface = 1
      program_error          = 2
      OTHERS                 = 3.
LOOP AT fieldcat.
    CASE fieldcat-fieldname.
        WHEN 'BETRG'.
        fieldcat-ctabname = ' '.
        fieldcat-cfieldname = ' '.
        fieldcat-edit_mask = 'RRV_______________.__'.
    ENDCASE.
    MODIFY fieldcat.
ENDLOOP.
CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
    EXPORTING
      i_buffer_active    = 'X'
      i_callback_program = sy-repid
      i_grid_title       = 'ABCD'
      is_layout          = gs_layout
      it_fieldcat        = fieldcat[]
      i_save             = 'A'
      is_variant         = gs_save
      it_events          = gs_events
    TABLES
      t_outtab           = lt_final
    EXCEPTIONS
      program_error      = 1
      OTHERS             = 2.
Unquote
On displaying the report using 'REUSE_ALV_GRID_DISPLAY' as shown above, when the value of BETRG is a smaller number like say 624, then the ALV output appears as '-            624.00' instead of '-624.00'.
Is there any way that I can remove the space in between the negative sign and the number before displaying the ALV output using 'REUSE_ALV_GRID_DISPLAY'?

Hi Deepak,
I tried this and found that this doesn't work in case of currency field. Once you move back the char field (with negative sign to the left and condensed) to the currency field, the negative sign again moves back to the right.
I think that the only way a negative sign can be brought to the left of the currenct field is by using edit_mask of field catalog as I have shown above.
Regards,
Shayeree.

Dump when summing up CURR field in ALV GRID display

Hi All,
I am getting dump when I try to sum the CURR field in my ALV Grid Display. The field is of CURR 23. I am using classes and methods to display alv grid.
I tried passing <fs_fieldcat>-do_sum = 'X'. When I did this, it is dumping without even displaying the alv grid.
Here is the part it is throwing dump:
        ls_lvc_data-value = space.
        clear ls_lvc_data-style.
        loop at it_fcat_local assigning <ls_fcat>
                where tech ne 'X' and no_out ne 'X'.
          if l_invisible eq 'X'.
            clear l_invisible.
            if <ls_fcat>-do_sum is initial.
              continue.
            else.
              clear ls_lvc_data-col_pos.
            endif.
          endif.
          add 1 to ls_lvc_data-col_pos.
          assign component <ls_fcat>-fieldname
                           of structure <ls_data> to <l_field_value>.
          _if sy-subrc ne 0.
            message x000(0k).
          endif._
Regards,
Guru

Thomas,
Here is the dump:
Runtime Errors         MESSAGE_TYPE_X
Date and Time          10/22/2010 23:30:53
Short text
The current application triggered a termination with a short dump.
What happened?
The current application program detected a situation which really
should not occur. Therefore, a termination with a short dump was
triggered on purpose by the key word MESSAGE (type X).
Error analysis
Short text of error message:
Long text of error message:
Technical information about the message:
Message class....... "0K"
Number.............. 000
Variable 1.......... " "
Variable 2.......... " "
Variable 3.......... " "
Variable 4.......... " "
How to correct the error
Probably the only way to eliminate the error is to correct the program.
If the error occures in a non-modified SAP program, you may be able to
find an interim solution in an SAP Note.
If you have access to SAP Notes, carry out a search with the following
keywords:
"MESSAGE_TYPE_X" " "
"SAPLSLVC" or "LSLVCF36"
"FILL_DATA_TABLE"
If you cannot solve the problem yourself and want to send an error
notification to SAP, include the following information:
1. The description of the current problem (short dump)
To save the description, choose "System->List->Save->Local File
(Unconverted)".
2. Corresponding system log
Display the system log by calling transaction SM21.
Restrict the time interval to 10 minutes before and five minutes
after the short dump. Then choose "System->List->Save->Local File
(Unconverted)".
3. If the problem occurs in a problem of your own or a modified SAP
program: The source code of the program
In the editor, choose "Utilities->More
Utilities->Upload/Download->Download".
4. Details about the conditions under which the error occurred or which
actions and input led to the error.
Source Code Extract
Line
SourceCde
2708
is_subtottxt_info = ls_subtot_info
2709
ip_subtot_line    = lr_data
2710
changing
2711
c_subtottxt       = l_subtottxt.
2712
ls_lvc_data-value = l_subtottxt.
2713
2714
append ls_lvc_data to ct_lvc_data.
2715
endif.
2716
2717
2718
Column per Fieldcat Entry
2719
2720
ls_lvc_data-value = space.
2721
clear ls_lvc_data-style.
2722
loop at it_fcat_local assigning <ls_fcat>
2723
where tech ne 'X' and no_out ne 'X'.
2724
if l_invisible eq 'X'.
2725
clear l_invisible.
2726
if <ls_fcat>-do_sum is initial.
2727
continue.
2728
else.
2729
clear ls_lvc_data-col_pos.
2730
endif.
2731
endif.
2732
2733
add 1 to ls_lvc_data-col_pos.
2734
2735
assign component <ls_fcat>-fieldname
2736
of structure <ls_data> to <l_field_value>.
2737
if sy-subrc ne 0.
>>>>>
message x000(0k).
2739
endif.
2740
2741
*... work on average
2742
if <ls_fcat>-do_sum eq 'C'.
2743
          Initialize average result and entries
2744
<l_field_value> = 0.
2745
clear l_entries.
2746
2747
          retrive unit from fieldcatalog
2748
assign space to <l_unit>.
2749
if not <ls_fcat>-cfieldname is initial.
2750
assign component <ls_fcat>-cfieldname
2751
of structure <ls_data> to <l_unit>.
2752
endif.
2753
if not <ls_fcat>-qfieldname is initial.
2754
assign component <ls_fcat>-qfieldname
2755
of structure <ls_data> to <l_unit>.
2756
endif.
2757

Regarding QUANTITY AND CURR FIELD

Similar Messages

Maybe you are looking for