Changes to an order through Call Transaction not showing up in change log

I m having a problem such that if I update an order programmatically with Call Transaction u2018VA02u2019, the order does get updated updated but I donu2019t see the changes in the change log. I m only updating the order quantities. However if I update the same order quantities manually by going to TCode VA02. The changes do get shown in the change log from the Environment u2013> Changes menu. Can you please help.
Following is the simple recorded code.
PERFORM bdc_dynpro      USING 'SAPMV45A' '0102'.
PERFORM bdc_field       USING 'BDC_CURSOR'
                              'VBAK-VBELN'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                              '/00'.
PERFORM bdc_field       USING 'VBAK-VBELN'
                              '10655'.
PERFORM bdc_dynpro      USING 'SAPMV45A' '4001'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                              '=POPO'.
PERFORM bdc_dynpro USING 'SAPMV45A' '0251'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RV45A-POSNR'.
PERFORM bdc_field USING 'BDC_OKCODE' '=POSI'.
PERFORM bdc_field USING 'RV45A-POSNR' '10'.
     PERFORM bdc_field       USING 'BDC_CURSOR'
                                   v_rowid.
PERFORM bdc_dynpro      USING 'SAPMV45A' '4001'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                              '=SICH'.
PERFORM bdc_field USING 'BDC_CURSOR' 'RV45A-KWMENG(01)'.
PERFORM bdc_field       USING 'RV45A-KWMENG(01)'
                               '7'.
PERFORM bdc_dynpro      USING 'SAPLSPO2' '0101'.
PERFORM bdc_field       USING 'BDC_OKCODE'
                              '=OPT1'.
CALL TRANSACTION 'VA02'
                 USING t_bdcdata
                 MODE   'A'
                 MESSAGES INTO t_messtab.
COMMIT WORK AND WAIT.
IF sy-subrc NE 0.
ENDIF.

Could not find answer

Similar Messages

How to rectify the errors through call transaction metod in bdc

how to rectify the errors through call transaction metod in bdc

Hi ,
View the highlited part of the below code.
REPORT ygfrivat1 NO STANDARD PAGE HEADING
                 LINE-SIZE 165
                 MESSAGE-ID yif_groc.
Program     YGFRIVAT1
Function    Report to Upload the VAT Adjustment File.
Author      ARENAPU
Date        11.05.2007
PMTS        AM12810157
Transport   G6DK937834
Description:
Modification log:
1. Changed by :
   Changed on :
   PMTS        :
   Transport   :
   Tag         :
   Description :
       T A B L E S   D E C L A R A T I O N S
TABLES: edidc, "Control record (IDoc)
        edids, "Status Record (IDoc)
        t001w.
Internal Tables Declaration.
Internal table to hold data from table EDIDS
DATA: BEGIN OF t_edids OCCURS 0,
       docnum LIKE edids-docnum,
       logdat LIKE edids-logdat,
       logtim LIKE edids-logtim,
       countr LIKE edids-countr,
       credat LIKE edids-credat,
       uname LIKE edids-uname,
      END OF t_edids,
Internal table to hold data from table EDIDC
      BEGIN OF t_edidc OCCURS 0,
       docnum LIKE edidc-docnum,
       rcvprt LIKE edidc-rcvprt,
       rcvprn LIKE edidc-rcvprn,
       credat LIKE edidc-credat,
      END OF t_edidc,
Internal table to hold data from upload file
      BEGIN OF t_tab OCCURS 0,
       cust(10),        "site/customer number
       date(10),        "transaction date
       currency(04),    "currency
       extnbr(15),      "external reference number
       pos-cont(05),    "POS controler
       pos-id(25),      "POS id
       cashier(10),     "cashier name
       qualif(04),      "qualifier of the article
       matnr(25),       "article number
       qty(10),         "quantity
       sale(16),        "sale value
       pos-tr(04),      "POS transfert type
       paymeth(04),     "payment method
       final(35),       "final price
       tarcur(04),      "target currency
       assign(35),      "assignment day
       error,
      END OF t_tab,
Internal table for Report display.
      BEGIN OF t_tab1 OCCURS 0,
       cust(10),                    "site/customer number
       date(10),                    "transaction date
       currency(04),                "currency
       extnbr(15),                  "external reference number
       pos-cont(05),                "POS controler
       pos-id(25),                  "POS id
       cashier(10),                 "cashier name
       qualif(04),                  "qualifier of the article
       matnr(25),                   "article number
       qty(16)   TYPE p DECIMALS 2, "quantity
       sale(16) TYPE p DECIMALS 2, "sale value
       pos-tr(04),                  "POS transfert type
       paymeth(04),                 "payment method
       final(16) TYPE p DECIMALS 2, "final price
       tarcur(04),                  "target currency
       assign(35),                  "assignment day
      END OF t_tab1,
      t_tab_temp LIKE t_tab OCCURS 0 WITH HEADER LINE,
Internal table to Validate Customer no.
      BEGIN OF t_check OCCURS 0,
       werks LIKE t001w-werks,
       vkorg LIKE t001w-vkorg,
       value(40),
      END OF t_check,
      t_check_temp LIKE t_check OCCURS 0 WITH HEADER LINE.
Internal table to hold data from table ZCS_PARAM.
DATA: BEGIN OF t_zcs_param OCCURS 0.
        INCLUDE STRUCTURE zcs_param.
DATA: vkorg LIKE t001w-vkorg,
      END OF t_zcs_param.
*Internal table to hold Messages.
DATA: BEGIN OF t_message OCCURS 0,
         msgnum TYPE msgnum,
         msgtyp TYPE msgtyp,
         msgtxt TYPE msgtext,
       END OF t_message.
*Work area for table t_message
DATA : w_message LIKE LINE OF t_message.
Internal table to hold BDC data
DATA: t_bdcdata LIKE bdcdata    OCCURS 0 WITH HEADER LINE,
Internal table to collect error messages
      messtab   LIKE bdcmsgcoll OCCURS 0 WITH HEADER LINE.
*Internal table to hold messages from call transaction
DATA: BEGIN OF t_text OCCURS 0,
       desc(150),
       msgtxt(100),
      END OF t_text.
       D A T A   D E C L A R A T I O N S
DATA: n TYPE i,
      gv_status(11) TYPE c, "Shows status, Production or Test
      gv_exit TYPE c, "Exit Flag
      gv_qty(16)   TYPE p DECIMALS 2, "Variable to sum Quantity
      gv_sale(16) TYPE p DECIMALS 2, "Variable to sum Amount
      gv_final(16) TYPE p DECIMALS 2. "Variable to sum Final Amount
DATA: w_text(100),
      gv_mode TYPE c,
      error TYPE c. "Flag to Indicate error.
CONSTANSTS DECLARATION
CONSTANTS : gc_fieldname LIKE dynpread-fieldname VALUE 'P_FNAME',
            gc_seq_no LIKE zcs_param-seq_no VALUE '00110',
            gc_object LIKE zcs_param-object VALUE 'YGFVAT',
            gc_paraname LIKE zcs_param-paraname VALUE 'VKORG',
            gc_back TYPE c VALUE 'N',
            gc_error TYPE c VALUE 'E',
            gc_all TYPE c VALUE 'A'.
           S E L E C T I O N   S C R E E N
SELECTION-SCREEN BEGIN OF BLOCK a1 WITH FRAME TITLE text-001.
PARAMETERS : p_fname LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN BEGIN OF LINE.
SELECTION-SCREEN COMMENT 1(31) text-002 FOR FIELD p_test.
PARAMETERS : p_test AS CHECKBOX.
SELECTION-SCREEN END OF LINE.
SELECTION-SCREEN END OF BLOCK a1.
SELECTION-SCREEN BEGIN OF BLOCK a2 WITH FRAME TITLE text-006.
PARAMETERS : rb_back RADIOBUTTON GROUP rb1 DEFAULT 'X',
             rb_error RADIOBUTTON GROUP rb1,
             rb_all RADIOBUTTON GROUP rb1.
SELECTION-SCREEN END OF BLOCK a2.
AT SELECTION SCREEN
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_fname.
*Subroutine to provide F4 help for file name
PERFORM fr_get_filename.
       I N I T I A L I Z A T I O N
INITIALIZATION.
*Subroutine to check authorization.
PERFORM fr_authority_check.
        T O P - O F - P A G E
TOP-OF-PAGE.
*Subroutine to diplay header
PERFORM fr_display_header.
         S T A R T - O F - S E L E C T I O N
START-OF-SELECTION.
*Subroutine to upload data from presentation server.
PERFORM fr_upload_data.
*Subroutine to validate records from uploaded file.
PERFORM fr_validate_data.
*Subroutine to build report internal table.
PERFORM fr_build_rep.
         E N D - O F - S E L E C T I O N
END-OF-SELECTION.
*Subroutine to display report.
PERFORM fr_write_report.
        F O R M   S U B R O U T I N E S
*&      Form fr_get_filename
      text
FORM fr_get_filename.
DATA : lv_repid LIKE sy-repid,         " Report id
         lv_file LIKE ibipparms-path.   " File Path
lv_repid = sy-repid.
F4 help for file path.
CALL FUNCTION 'F4_FILENAME'
       EXPORTING
            program_name = lv_repid
            dynpro_number = syst-dynnr
            field_name    = gc_fieldname                    " p_fname1
       IMPORTING
            file_name     = lv_file.
IF NOT lv_file EQ space.
    p_fname = lv_file.
ELSE.
    MESSAGE e999 WITH 'Invalid Path'(005).
ENDIF.
ENDFORM.                    " fr_get_filename
*&      Form fr_upload_data
      text
FORM fr_upload_data.
DATA: lv_fname TYPE string.
CLEAR lv_fname.
lv_fname = p_fname.
Uploading file from PC or presentation server to internal table.
CALL FUNCTION 'GUI_UPLOAD'
       EXPORTING
            filename            = lv_fname
            filetype            = 'ASC'
            has_field_separator = 'X'
       TABLES
            data_tab            = t_tab
       EXCEPTIONS
            file_open_error     = 1.
IF sy-subrc <> 0.
    DESCRIBE TABLE t_message LINES n.
    w_message-msgnum = n + 1.
    w_message-msgtyp = 'E'.
    MOVE text-m01 TO w_message-msgtxt.
    APPEND w_message TO t_message.
Subroutine for writing log.
    PERFORM fr_write_log.
ENDIF.
ENDFORM.                    " fr_upload_data
*&      Form fr_validate_data
      text
FORM fr_validate_data.
DATA : lv_lines1 TYPE i,
         lv_lines2 TYPE i.
*Obtain Status depending on Check box selected.
IF p_test IS INITIAL.
    gv_status = 'PRODUCTION'.
ELSE.
    gv_status = 'TEST RUN'.
ENDIF.
*Batch Mode
CLEAR gv_mode.
IF rb_back EQ 'X'.          "No Display
    MOVE gc_back TO gv_mode.
ELSEIF rb_error EQ 'X'.     "Error Only
    MOVE gc_error TO gv_mode.
ELSEIF rb_all EQ 'X'.       "All Screens
    MOVE gc_all TO gv_mode.
ENDIF.
IF NOT t_tab[] IS INITIAL.
    SORT t_tab BY cust.
    REFRESH t_tab_temp.
    t_tab_temp[] = t_tab[].
    SORT t_tab_temp BY cust.
    DELETE ADJACENT DUPLICATES FROM t_tab_temp COMPARING cust.
    IF NOT t_tab_temp[] IS INITIAL.
      SELECT werks vkorg FROM t001w
                         INTO TABLE t_check
                         FOR ALL ENTRIES IN t_tab_temp
                         WHERE werks = t_tab_temp-cust+0(4).
      IF sy-subrc = 0.
        SORT t_check BY werks.
      ENDIF.
      LOOP AT t_check.
        IF t_check-vkorg <> ' '.
          MOVE t_check-vkorg TO t_check-value.
          MODIFY t_check TRANSPORTING value.
        ENDIF.
      ENDLOOP.
    ENDIF.
    FREE t_tab_temp.
ENDIF.
IF NOT t_check[] IS INITIAL.
    REFRESH t_check_temp.
    t_check_temp[] = t_check[].
    SORT t_check_temp BY value.
    DELETE ADJACENT DUPLICATES FROM t_check_temp COMPARING value.
    IF NOT t_check_temp[] IS INITIAL.
      SELECT * FROM zcs_param INTO TABLE t_zcs_param
               FOR ALL ENTRIES IN t_check_temp
               WHERE seq_no   EQ gc_seq_no
                 AND object   EQ gc_object
                 AND paraname EQ gc_paraname
                 AND value    EQ t_check_temp-value.
      IF sy-subrc = 0.
        SORT t_zcs_param BY value.
      ENDIF.
    ENDIF.
    FREE t_check_temp.
ENDIF.
IF NOT t_tab[] IS INITIAL.
    LOOP AT t_tab.
      READ TABLE t_check WITH KEY werks = t_tab-cust BINARY SEARCH.
      IF sy-subrc <> 0.
        MOVE 'X' TO t_tab-error.
        MODIFY t_tab TRANSPORTING error.
        DESCRIBE TABLE t_message LINES n.
        w_message-msgnum = n + 1.
        w_message-msgtyp = 'E'.
        CONCATENATE t_tab-cust text-030
        INTO w_message-msgtxt SEPARATED BY space.
        APPEND w_message TO t_message.
Subroutine for writing log.
        PERFORM fr_write_log.
        EXIT.
      ELSE.
        READ TABLE t_zcs_param WITH KEY value = t_check-vkorg
                                                     BINARY SEARCH.
        IF sy-subrc <> 0.
          MOVE 'X' TO t_tab-error.
          MODIFY t_tab TRANSPORTING error.
          DESCRIBE TABLE t_message LINES n.
          w_message-msgnum = n + 1.
          w_message-msgtyp = 'E'.
          CONCATENATE text-003 t_tab-cust text-004 t_check-vkorg
          INTO w_message-msgtxt SEPARATED BY space.
          APPEND w_message TO t_message.
Subroutine for writing log.
          PERFORM fr_write_log.
          EXIT.
        ELSE.
          PERFORM fr_format_tab.
        ENDIF.
      ENDIF.
    ENDLOOP.
ENDIF.
DESCRIBE TABLE t_tab LINES lv_lines1.
IF lv_lines1 <> 0.
    DELETE t_tab WHERE error EQ 'X'.
ENDIF.
DESCRIBE TABLE t_tab LINES lv_lines2.
IF lv_lines2 <> 0.
    IF lv_lines2 <> lv_lines1.
      EXIT.
    ELSE.
      IF p_test IS INITIAL.
        LOOP AT t_tab.
*Subroutine to build BDC table
          PERFORM fr_fill_bdctab.
*Subroutine to Post Data into SAP.
          PERFORM fr_data_posting.
        ENDLOOP.
      ENDIF.
    ENDIF.
ENDIF.
ENDFORM.                    " fr_validate_data
*&      Form fr_write_log
      text
FORM fr_write_log.
CLEAR error.
error = 'X'.
WRITE:/1 'Msg No'(027), 10 'Type'(028), 20 'Text'(029).
ULINE:/1(120).
FORMAT RESET.
LOOP AT t_message.
    IF t_message-msgtyp = 'E'.
      FORMAT COLOR 6 INTENSIFIED .
    ELSEIF t_message-msgtyp = 'W'.
      FORMAT COLOR 3 INTENSIFIED .
    ELSEIF t_message-msgtyp = 'I'.
      FORMAT COLOR 5 INTENSIFIED .
    ENDIF.
    WRITE:/1 t_message-msgnum,
          10 t_message-msgtyp,
          20 t_message-msgtxt.
    FORMAT RESET.
ENDLOOP.
ULINE:/1(120).
ENDFORM.                    " fr_write_log
*&      Form fr_write_report
      text
FORM fr_write_report.
CLEAR gv_exit.
LOOP AT t_message.
    IF t_message-msgtyp = 'E'.
      gv_exit = 'X'.
      EXIT.
    ENDIF.
ENDLOOP.
IF NOT gv_exit IS INITIAL.
    EXIT.
ELSE.
    PERFORM fr_display_report.
    IF NOT t_text[] IS INITIAL.
Subroutine for Display Call Transaction messages.
      PERFORM fr_write_msg.
    ENDIF.
ENDIF.
ENDFORM.                    " fr_write_report
*&      Form fr_display_report
      text
FORM fr_display_report.
IF NOT t_tab1[] IS INITIAL.
    CLEAR: gv_qty, gv_sale, gv_final.
    LOOP AT t_tab1.
      WRITE:/1(10) t_tab1-cust,
            13(10) t_tab1-date,
            25(05) t_tab1-currency,
            32(14) t_tab1-extnbr,
            48(09) t_tab1-pos-cont,
            60(18) t_tab1-matnr,
            80(16) t_tab1-qty RIGHT-JUSTIFIED ,
            98(16) t_tab1-sale RIGHT-JUSTIFIED ,
           116(07) t_tab1-paymeth,
           125(16) t_tab1-final RIGHT-JUSTIFIED,
           143(06) t_tab1-tarcur,
           152(12) t_tab1-assign.
      gv_qty   = t_tab1-qty   + gv_qty.
      gv_sale = t_tab1-sale + gv_sale.
      gv_final = t_tab1-final + gv_final.
    ENDLOOP.
    FORMAT COLOR 3.
    ULINE: /(164).
    WRITE:/ 'TOTALS',
      80(16) gv_qty RIGHT-JUSTIFIED,
      98(16) gv_sale RIGHT-JUSTIFIED,
     125(16) gv_final RIGHT-JUSTIFIED,
     182 ''.
    ULINE: /(164).
    FORMAT RESET.
ENDIF.
ENDFORM.                    " fr_display_report
*&      Form FR_DISPLAY_HEADER
      text
FORM fr_display_header.
IF error IS INITIAL.
    FORMAT COLOR 1.
    WRITE:/ 'Date upload           :'(007),   25 sy-datum, 38 ''.
    WRITE:/ 'Production or Test Run:'(008),   25 gv_status, 38 ''.
    WRITE:/ 'Upload User Logon     :'(009),   25 sy-uname, 38 ''.
    ULINE: /(164).
    WRITE:/1(04) 'Site'(010),
          13(10) 'Date'(011),
          25(05) 'Curr.'(012),
          32(14) 'Receipt'(013),
          48(09) 'Cashier'(014),
          60(18) 'Article'(015),
          92     'Qty'(016),
          102    'Item Amount'(017),
          116(7) 'M.o.P.'(018),
          128    'Tender Amount'(019),
          143(6) 'T.Curr'(020),
         152(12) 'Assignment'(021).
    ULINE:/(164).
    FORMAT RESET.
ENDIF.
ENDFORM.                    " FR_DISPLAY_HEADER
*&      Form fr_newdynpro
      text
FORM fr_newdynpro USING program LIKE bdcdata-program
                        dynpro LIKE bdcdata-dynpro.
t_bdcdata-program = program .
t_bdcdata-dynpro = dynpro.
t_bdcdata-dynbegin = 'X'.
APPEND t_bdcdata.
CLEAR t_bdcdata.
ENDFORM.                    " fr_newdynpro
*&      Form fr_loadfield
      text
FORM fr_loadfield USING field LIKE bdcdata-fnam
                        value.
t_bdcdata-fnam = field.
t_bdcdata-fval = value.
APPEND t_bdcdata.
CLEAR t_bdcdata.
ENDFORM.                    " fr_loadfield
*&      Form fr_fill_bdctab
      text
FORM fr_fill_bdctab.
REFRESH t_bdcdata.
PERFORM fr_newdynpro USING 'SAPMWPUK' '100'.
PERFORM fr_loadfield USING 'G_FILIALE' t_tab-cust.
PERFORM fr_loadfield USING 'G_DATUM'   t_tab-date.
PERFORM fr_loadfield USING 'BDC_OKCODE' 'BON'.
PERFORM fr_newdynpro USING 'SAPMWPUK' '500'.
PERFORM fr_loadfield USING 'WPSCB01-POSKREIS'   t_tab-pos-cont.
PERFORM fr_loadfield USING 'WPSCB01-KASSID'     t_tab-pos-id.
PERFORM fr_loadfield USING 'WPSCB01-BELEGWAERS' t_tab-currency.
PERFORM fr_loadfield USING 'WPSCB01-CSHNAME'    t_tab-cashier.
PERFORM fr_loadfield USING 'WPSCB01-BONNUMMER' t_tab-extnbr.
PERFORM fr_loadfield USING 'E1WPB02-QUALARTNR(01)' t_tab-qualif.
PERFORM fr_loadfield USING 'E1WPB02-ARTNR(01)'      t_tab-matnr.
PERFORM fr_loadfield USING 'E1WPB02-MENGE(01)'      t_tab-qty.
PERFORM fr_loadfield USING 'WPSCB03-KONDVALUE(01)' t_tab-sale.
PERFORM fr_loadfield USING 'E1WPB02-VORGANGART(01)' t_tab-pos-tr.
PERFORM fr_loadfield USING 'BDC_OKCODE' 'ZAHL'.
PERFORM fr_newdynpro USING 'SAPMWPUK' '530'.
PERFORM fr_loadfield USING 'WPSCB06-ZAHLART' t_tab-paymeth.
PERFORM fr_loadfield USING 'WPSCB06-SUMME'    t_tab-final.
PERFORM fr_loadfield USING 'WPSCB06-WAEHRUNG' t_tab-tarcur.
PERFORM fr_loadfield USING 'WPSCB06-ZUONR'    t_tab-assign.
PERFORM fr_loadfield USING 'BDC_OKCODE' 'SAVE'.
PERFORM fr_newdynpro USING 'SAPMWPUK' '530'.
PERFORM fr_loadfield USING 'WPSCB06-ZAHLART' t_tab-paymeth.
PERFORM fr_loadfield USING 'WPSCB06-SUMME'    t_tab-final.
PERFORM fr_loadfield USING 'WPSCB06-WAEHRUNG' t_tab-tarcur.
PERFORM fr_loadfield USING 'WPSCB06-ZUONR'    t_tab-assign.
PERFORM fr_loadfield USING 'BDC_OKCODE' 'BACK'.
PERFORM fr_newdynpro USING 'SAPLSPO1' '0200'.
PERFORM fr_loadfield USING 'BDC_OKCODE' 'YES'.
PERFORM fr_newdynpro USING 'SAPMWPUK' '100'.
PERFORM fr_loadfield USING 'G_FILIALE' t_tab-cust.
PERFORM fr_loadfield USING 'G_DATUM'   t_tab-date.
PERFORM fr_loadfield USING 'BDC_OKCODE' 'BACK'.
ENDFORM.                    " fr_fill_bdctab
*&      Form fr_data_posting
      text
FORM fr_data_posting.
IF NOT t_bdcdata[] IS INITIAL.
    REFRESH messtab.
    CALL TRANSACTION 'WPUK' USING t_bdcdata
                            MODE gv_mode
                            UPDATE 'S'
                            MESSAGES INTO messtab.
    IF sy-subrc = 0 .
      CLEAR w_text.
      LOOP AT messtab.
        CALL FUNCTION 'FORMAT_MESSAGE'
             EXPORTING
                  id        = messtab-msgid
                  lang      = sy-langu
                  no        = messtab-msgnr
                  v1        = messtab-msgv1
                  v2        = messtab-msgv2
                  v3        = messtab-msgv3
                  v4        = messtab-msgv4
             IMPORTING
                  msg       = w_text
             EXCEPTIONS
                  not_found = 1
                  OTHERS    = 2.
        MOVE w_text TO t_text-msgtxt.
        CONCATENATE 'Site:'(031)    t_tab-cust
                    'Article:'(024) t_tab-matnr
                    'Posted Sucessfully'(032)
          INTO t_text-desc SEPARATED BY space.
        APPEND t_text.
        CLEAR t_text.
      ENDLOOP.
    ELSE.
      CLEAR w_text.
      LOOP AT messtab.
        CALL FUNCTION 'FORMAT_MESSAGE'
             EXPORTING
                  id        = messtab-msgid
                  lang      = sy-langu
                  no        = messtab-msgnr
                  v1        = messtab-msgv1
                  v2        = messtab-msgv2
                  v3        = messtab-msgv3
                  v4        = messtab-msgv4
             IMPORTING
                  msg       = w_text
             EXCEPTIONS
                  not_found = 1
                  OTHERS    = 2.
        MOVE w_text TO t_text-msgtxt.
        IF messtab-msgnr EQ '213'.
          CONCATENATE 'Site:'(031)    t_tab-cust
                      'Article:'(024) t_tab-matnr
                      'Posted Sucessfully'(032)
           INTO t_text-desc SEPARATED BY space.
          APPEND t_text.
          CLEAR t_text.
          EXIT.        ELSE.
          CONCATENATE 'Site:'(031)    t_tab-cust
                      'Article:'(024) t_tab-matnr
                      'Not Posted'(033)
           INTO t_text-desc SEPARATED BY space.
          APPEND t_text.
          CLEAR t_text.
        ENDIF.
      ENDLOOP.
    ENDIF.
ENDIF.
ENDFORM.                    " fr_data_posting
*&      Form fr_authority_check
      text
FORM fr_authority_check.
AUTHORITY-CHECK OBJECT 'Y_VATADJ'
           ID 'VKORG' FIELD t001w-vkorg
           ID 'TCD'   FIELD 'YGFVAT'.
IF sy-subrc NE 0.
    MESSAGE e999 WITH text-m02.
ENDIF.
ENDFORM.                    " fr_authority_check
*&      Form fr_write_msg
      text
FORM fr_write_msg.
SKIP.
ULINE:/(164).
WRITE:/
'Messages encountered while Calling Transaction WPUK'(025),
      90 'Message Text'(026).
ULINE:/1(164).
LOOP AT t_text.
    WRITE:/1 t_text-desc,
          90 t_text-msgtxt,
          164 ''.
ENDLOOP.
ULINE:/1(164).
ENDFORM.                    " fr_write_msg
*&      Form FR_BUILD_REP
      text
FORM fr_build_rep.
IF error IS INITIAL.
    IF NOT t_tab[] IS INITIAL.
      LOOP AT t_tab.
        MOVE:
          t_tab-cust     TO t_tab1-cust,        "site/customer number
          t_tab-date     TO t_tab1-date,        "transaction date
          t_tab-currency TO t_tab1-currency,    "currency
        t_tab-extnbr   TO t_tab1-extnbr,      "external reference number
          t_tab-pos-cont TO t_tab1-pos-cont,    "POS controler
          t_tab-pos-id   TO t_tab1-pos-id,      "POS id
          t_tab-cashier TO t_tab1-cashier,     "cashier name
         t_tab-qualif   TO t_tab1-qualif,      "qualifier of the article
          t_tab-matnr    TO t_tab1-matnr,       "article number
          t_tab-pos-tr   TO t_tab1-pos-tr,      "POS transfert type
          t_tab-paymeth TO t_tab1-paymeth,     "payment method
          t_tab-tarcur   TO t_tab1-tarcur,      "target currency
          t_tab-assign   TO t_tab1-assign.
        REPLACE ',' WITH '.' INTO t_tab-qty.
        CONDENSE t_tab-qty NO-GAPS.
        MOVE t_tab-qty TO t_tab1-qty.
        REPLACE ',' WITH '.' INTO t_tab-sale.
        CONDENSE t_tab-sale NO-GAPS.
        MOVE t_tab-sale TO t_tab1-sale.
        REPLACE ',' WITH '.' INTO t_tab-final.
        CONDENSE t_tab-final NO-GAPS.
        MOVE t_tab-final TO t_tab1-final.
        APPEND t_tab1.
        CLEAR t_tab1.
      ENDLOOP.
    ENDIF.
ENDIF.
ENDFORM.                    " FR_BUILD_REP
*&      Form fr_format_tab
      text
FORM fr_format_tab.
DATA : lv_qty TYPE string.
IF NOT t_tab-qty IS INITIAL.
    IF t_tab-qty+0(1) EQ '-'.
      CLEAR lv_qty.
      MOVE t_tab-qty TO lv_qty.
      CLEAR t_tab-qty.
      SHIFT lv_qty LEFT CIRCULAR.
      CONDENSE lv_qty NO-GAPS.
      MOVE lv_qty TO t_tab-qty.
      MODIFY t_tab TRANSPORTING qty.
    ENDIF.
ENDIF.
ENDFORM.                    " fr_format_tab

Calling FI Validation Rules in BPM server through call transaction

I m trying to call FI validation rules through call transaction (for FBV0) in BPM server but in the messages table of call transaction it does not gives us the validation rules error messages while when i run manually the transaction in R/3 system i get the validation error messages. So please tell how i can get these validation error messages when called through BPM server.

Hi madhvi,
You are using jtab within the form.. i dont think you can use it directly inside ur FORM sub1 without declaring it or without passing it. and it will give you the syntax error.
and please send me the step by step code you have written in editor so that i can check it and can reply you with proper solution'
Thanks ,
Prasanna

Posting_illegal_statement, call transaction not allowed

Hi everybody !
I'm trying to create an order and then an invoice automatically when a first invoice is saved. For that, I've got an output type in VF01 which performs special function (8). This calls my program where I used two call transactions.
I've got the error 'POSTING_ILLEGAL_STATEMENT', with the message 'call transaction not allowed'.
I saw that the same question has been asked in this forum (messageID=876563), but it is still marked as 'not answered'...
Also, someone proposed to "not use 4-immediate processing. Create an event, using tcode SM62. Raise it in your code in the special function using BP_RAISE_EVENT.
Define a job to be triggered, after the event is raised and do all that you want to do in the job."
If I don't use 4-immediate processing, which one is better to use to process VA01 immediatly after saving the billing document ?
Then, if I create a job, as it is executed in background, I don't know how to debug it and which data I can access in the program called by the job. To create the order, I need the vbeln of the billing document just created. How can I have it ? Does the table nast contain it at this moment?
Thanks in advance !
Emilie

Hi Nicole,
Here's the coding of the call function :
CALL FUNCTION 'BP_EVENT_RAISE'
    EXPORTING
      eventid                      = 'ZEVENT_FACT_TRIANG_AUTO'
*   EVENTPARM                    = ' '
*   TARGET_INSTANCE              = ' '
   EXCEPTIONS
     bad_eventid                  = 1
     eventid_does_not_exist       = 2
     eventid_missing              = 3
     raise_failed                 = 4
     OTHERS                       = 5
Regards,
Emilie

How to pass the value to the screen through call transaction

hi
i have got an requirement for which i have to call MIGO tcode through call transaction command. But here one list box GODYNPRO-ACTION (screen field) contains list of values . my requirement is when i will call the tcode MIGO it should take defaultly DISPLAY option from list of values. I have searched for parameter id but i cannot get for that list box. please help me to solve this issue.
points will be surely assigned to helpful answers.
regards
shiba dutta

just try this its working...
tables: godynpro.
GODYNPRO-ACTION = 'Display'.
call transaction 'MIGO'.
Message was edited by:
Chandrasekhar Jagarlamudi

ABAP Query - Not showing the required changes through Z T.Code

Hi,
I have a ABAP Query for OPEN DELIVERY QUANTITY (T.Code - ZABC). I change something in QUERY and activate. After that i execute it, and saw required changes.
But when i execute it with the T.Code - ZABC, it does not show the changes. Even i Save and Test with the SQ01 t.code.
Please tell me, what is the problem in it. Why not showing the required changes through T.Code - ZABC.
Regards...

HI,
Dear, it seems that you have changed the query in SQ02 and then just save it and not generated.
or may be after generation again clicked on SAVE button.
So untill unless you will not generate the query, it won't work.
Secondly, by chanegs in the query, i don't think it changes the name of the main program.
Regds,
Anil

Production Order Usage Probability should not be allowed to change after GI

Dear Gurus,
pls tell me how to do this ,Production Order Usage Probability should not be allowed to change after Goods Issue (GI) done against Prod Order . pls tell me procedure or any UserEXit for this.
Thanks in Advance,
Regards,
Dev

Hi,
Can you elaborate little bit more?
Regards,
Sankaran

I am unable to change my iCloud email address on my phone. It is changed and verified in my account. How do I change it so that my iPhone is not showing my old address? Many thanks to all in advance

I am unable to change my iCloud email address on my iphone. It is changed and verified in my account and when I log in to Cloud on my PC its fine. However when I go through the settings on my iphone (3GS) it still coming up with my now inactive old email address.
How do I change it so that my iPhone is not showing my old email address and shows my new and verified email address? Many thanks to all in advance

If you have given correct info about you ios 6.1.3 - all you need to do is delete account. You will be able to sign in with new one afterwards. Make sure you don't delete any info when you see those prompts.

When I sync my iPod Classic, the changes I made (Ratings, Last Listened) do not show up on my computer.

When I sync my iPod Classic, the changes I made (Ratings, Last Listened) do not show up on my computer.

Try another Sync. On occasions, I've know a first Sync to behave like this.

Changes I make in camera raw do not show up or update in bridge.

Greetings.
I’m working in PS CS4 in XP(government).
Changes I make in camera raw do not show up or update in bridge.
These images DO process with the changes when I run my actions.
For example: Open images in bridge. Edit. Open reaming images in camera raw. Push the images two stops in camera raw. Close camera raw. Images in bridge show no change. Run action to turn raw files into psd. Final PSD appear pushed two stops.
Purging Cache make no difference.
Thoughts?

You are using Embedded thumbnails. These are small and fast, but do not show raw edits.
You need to use one of the HQ thumb options to see the edits.

Bought a TCL Roku TV. Connection with Macbook Pro through HDMI will not show display on TV. Have tried various options with no success. Suggestions/solutions?

Bought a TCL Roku TV. Connection with Macbook Pro through HDMI will not show display on TV. Have tried various options with no success. Suggestions/solutions?

You could try updating your apple TV and then restarting it. Bit of a guess.

Custom Inserted HTTP Header not showing up in Iplanet Logs

ALL:
I have some iPlanet Enterprise/6.0 web servers sitting behind a LoadBalancer. The LoadBalancer is setup in an 'one-armed mode', and takes a client HTTP request passes it onto the server, but during this process, changes the client source IP to that of local static IP that the LoadBalancer has. Due to our setup we cannot change this.
By changing the client source IP to a local address, we have lost any useful user session tracking that was done by source IP.
To get around this, I have the LoadBalancer inserting an HTTP header with the client real source IP. Reading the NSAPI Programmer's Guide (Table 7-1 "http://docs.sun.com/source/816-5686-10/07_magnu.htm"), there is an option "%Req->headers.headername%" that can be used with 'flex-int' to log any header value.
My output from snoop looks as follows:
HTTP: ----- HyperText Transfer Protocol -----
HTTP:
HTTP: GET /plugin.do HTTP/1.1
HTTP: OrigClientAddr:10.5.4.28
HTTP: Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/vnd.ms-excel, application/vnd.ms-powerpoint, application/msword, application/x-shockwave-flash, */*
HTTP: Accept-Language: en-us
HTTP: Accept-Encoding: gzip, deflate
HTTP: User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1)
HTTP:
I have set the value to "%Req->headers.OrigClientAddr%" and it still does not show up in the log file. Any clues?
Works fine in Apache with:
LogFormat "%h %l %u %t \"%r\" %>s %b \"%{OrigClientAddr}i\" \"%{User-Agent}i\"" headerinsert
CustomLog logs/access_log headerinsert

Always nice to find resolution to one's own question.
Fix was to change the header value to all lower case.
From:
"%Req->headers.OrigClientAddr%"
To:
"%Req->headers.origclientaddr%"

Why will all the phone numbers on my phone not show up when I log into iCloud on my computer?

Why will all the phone numbers on my phone not show up when I log into iCloud on my home computer?

Hello tamivw,
I read your post and I have linked to an article that will instruct you on how to access your iCloud contacts on a computer:
This article is for Windows:
iCloud Control Panel 3.1 for Windows
http://support.apple.com/kb/DL1455
This article will help you access the iCloud preferences where you can enable contact syncing:
iCloud: Open iCloud preferences
http://support.apple.com/kb/PH12802
Thank you for contributing to Apple Support Communities.
Cheers,
BobbyD

Layout changes when see preview in SP01 through Call transaction

Hi Gurus,
I have to show Spool preview from my program I am doing this by call transaction SP01 with spool no. and mode E.
But the preview which comes is very simple, It does not have graphics and other formatting.
If i check the spool directly from SP01 , its coming fine.
Please help me on this Issue.
Regrads,
Sowmen Das

I guess you mean CALL TRANSACTION 'SP01' USING lt_bdcdata MODE 'E' (so that to remain on the last screen of the BDC data).
Probably SP01 identifies that it is called using CALL TRANSACTION and reacts differently. One possibility is that it tests SY-BINPT which is 'X' when CALL TRANSACTION is used (opposed to space when SP01 is called directly). You may use CALL TRANSACTION ... OPTIONS FROM xx, where xx-nobinpt should be initialized to 'X' (don't forget to set xx-dismode to 'E' also), so that SY-BINPT won't change.
Note: why don't you use the print preview as we do usually? (TDPREVIEW output option)

Changes to an order not showing up in change log

I m changing item quantity of sales order items by both Call Transaction as well as
'BAPI_SALESORDER_CHANGE', however in neither case if I open the changed order in VA02 and go to Environment->Changes menu. I dont see the changes at all.
What could be the problem? Because the order quantities ARE getting changed successfully.

Hi,
I am not very sure but You might need to check for the Change Pointer's activation in your SAP System globally and at the level of Sales Order.
USe Txn SALE for this.
https://help.sap.com/saphelp_nw04/helpdata/en/78/2178da51ce11d189570000e829fbbd/content.htm
how to find change in sales order

Changes to an order through Call Transaction not showing up in change log

Similar Messages

Maybe you are looking for