Save Dialog input field too short

When i save documents in any app, the save dialog appears. The input field for the file name in very short, meaning, with long filenames you have to scroll and move your mouse in this tiny field?
Why does OSX not use more space for this input field, there is so much more horizontal space left???
Any ideas how to fix this with a workaround?
Apple, please fix this in future updates.
Thanks!

Sandeep,
It is working fine for all the dates,but going giving dump only for a particular date.
KURSF is of length 9.Is it including decimal places.
So,if i declare a varibale of type p decimals 5 and then move actual kursf value to this variable and then SUM,it will work fine.
data:kursf1 type p decimals 5.
move it_header-kursf to it_header-kursf1.
or
just declare the existing kursf as type p decimals 5
But why it is not giving dump for other dates.
Thanks,
K.Kiran.

Similar Messages

  • Field too short-DUMP

    Hi Folks,
    I am getting the following dump error.Can any one here please throw some light on this.
    Field too small when calculating totals in internal table.
    <b>In the internal table "\PROGRAM=ZFI\DATA=IT_HEADER[]", a SUM statement is used to calculate totals. However, the values are too large for the designated field.
    The name of the field is "KURSF".
    The name of the field is "KURSF".</b>
    The field "KURSF" in the program "ZFIR_IMPORT_REGISTER"
    be a different
    type (e.g. type P of appropriate length).
    REPORT  ZFI.
    TABLES: rbkp,
            rseg,
            bset,
            mara,
            lfa1,
            ekko,
            t161t.
    TYPE-POOLS: slis.
    TYPES: BEGIN OF TY_CUSTOM,
              WRBTR TYPE RSEG-WRBTR,
              KSCHL TYPE RSEG-KSCHL,
              EBELN TYPE RSEG-EBELN,
              EBELP TYPE RSEG-EBELP,
           END OF TY_CUSTOM.
    TYPES: BEGIN OF ty_itab,
          lfbnr LIKE rseg-lfbnr,               " GR NO
          belnr LIKE rbkp-belnr,               " MIRO doc.no.
          buzei LIKE rseg-buzei,               " MIRO line item number
          fidoc LIKE bkpf-belnr,               " accounting doc.no.
          matnr LIKE rseg-matnr,               " Material number
          maktx LIKE makt-maktx,               " material description
          xblnr LIKE rbkp-xblnr,               " Reference Document Number
          budat LIKE rbkp-budat,               " Posting Date in Document
          mwskz LIKE rseg-mwskz,               " Tax Code
          bklas LIKE rseg-bklas,               " Valuation Class
          menge LIKE rseg-menge,               " Quantity
          gjahr LIKE rseg-gjahr,               " Fiscal Year
          bldat LIKE rbkp-bldat,               " Document Date
          lifnr TYPE rbkp-lifnr,                "Vendor Code
          stcd1 TYPE lfa1-stcd1,                "Tin number
          matkl TYPE mara-matkl,                "Mat Desc
          name1 TYPE lfa1-name1,                "Vendor Name
          awkey TYPE bkpf-awkey,                "Reference Key
          str_suppl1 TYPE adrc-str_suppl1,      "Street
          post_code1 TYPE adrc-post_code1,      "Pincode
          city1 TYPE adrc-city1,                "City
          region TYPE adrc-region,              "Region
          adrnr TYPE lfa1-adrnr,                "Address Number
          dms(3) TYPE c,                        "DMS
          werks TYPE rseg-werks,                "PLANT
          bukrs TYPE rseg-bukrs,                "COMPANY CODE
          stblg TYPE rbkp-stblg,                "DOCUMENT REVERSAL INDICATOR
          mtart TYPE mara-mtart,                "MATERIAL TYPE
          wrbtr TYPE rseg-wrbtr,                "Base Amount
          tax_amount TYPE konv-kwert,           "Tax amount for summary
          vgart TYPE rbkp-vgart,                "Transaction Type
          ivtyp TYPE rbkp-ivtyp,                "Invoice Category
          reverse(2),                           "Invoice Reversed
          land1 TYPE lfa1-land1,                "Country Key
    *Fields added for customs
          BED TYPE RSEG-WRBTR,                  "BASIC ED FOR CUSTOMS
          CVD TYPE RSEG-WRBTR,                  "CVD FOR CUSTOMS
          ECVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          ECED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          lfgja type rseg-lfgja,                "Mat Doc Year
          frbnr type mkpf-frbnr,                "Bill of Lading No
          waers type rbkp-waers,
          txz01 TYPE ekpo-txz01,                "Short Text for Material
          ebeln TYPE rseg-ebeln,                "Purchasing Doc
          bsart type ekko-bsart,                "Pur.Doc Type
          batxt type t161t-batxt,               "Desc for Pur Doc.Type
          ebelp TYPE ekpo-ebelp,                "Purchase Ord Ln Item
          NCVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          SBED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          TEXT(30),
          qtr_yr(4),
          qtr_mth(10),
    *Fields added for Inr Value for exchange rate
          kursf type rbkp-kursf,
          inrval type rseg-wrbtr,
          BELNR1 TYPE RBKP-BELNR,
          remarks(15),
    END OF ty_itab.
    TYPES: BEGIN OF ty_header,
          belnr LIKE rbkp-belnr,               " MIRO doc.no.
          fidoc LIKE bkpf-belnr,               " accounting doc.no.
          xblnr LIKE rbkp-xblnr,               " Reference Document Number
          budat LIKE rbkp-budat,               " Posting Date in Document
          mwskz LIKE rseg-mwskz,               " Tax Code
          bklas LIKE rseg-bklas,               " Valuation Class
          gjahr LIKE rseg-gjahr,               " Fiscal Year
          bldat LIKE rbkp-bldat,               " Document Date
          lifnr TYPE rbkp-lifnr,                "Vendor Code
          stcd1 TYPE lfa1-stcd1,                "Tin number
          name1 TYPE lfa1-name1,                "Vendor Name
          awkey TYPE bkpf-awkey,                "Reference Key
          str_suppl1 TYPE adrc-str_suppl1,      "Street
          post_code1 TYPE adrc-post_code1,      "Pincode
          city1 TYPE adrc-city1,                "City
          region TYPE adrc-region,              "Region
          adrnr TYPE lfa1-adrnr,                "Address Number
          dms(3) TYPE c,                        "DMS
          werks TYPE rseg-werks,                "PLANT
          bukrs TYPE rseg-bukrs,                "COMPANY CODE
          stblg TYPE rbkp-stblg,                "DOCUMENT REVERSAL INDICATOR
          mtart TYPE mara-mtart,                "MATERIAL TYPE
          wrbtr TYPE rseg-wrbtr,                "Base Amount
          tax_amount TYPE konv-kwert,           "Tax amount for summary
          vgart TYPE rbkp-vgart,                "Transaction Type
          ivtyp TYPE rbkp-ivtyp,                "Invoice Category
          reverse(2),                           "Invoice Reversed
          land1 TYPE lfa1-land1,                "Country Key
          BED TYPE RSEG-WRBTR,                  "BASIC ED FOR CUSTOMS
          CVD TYPE RSEG-WRBTR,                  "CVD FOR CUSTOMS
          ECVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          ECED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          lfgja type rseg-lfgja,                "Mat Doc Year
          frbnr type mkpf-frbnr,                "Bill of Lading No
          waers type rbkp-waers,
          txz01 TYPE ekpo-txz01,                "Short Text for Material
          NCVD TYPE RSEG-WRBTR,                 "CESS ON VD FOR CUSTOMS
          SBED TYPE RSEG-wrbtr,                 "CESS ON DUTIES
          TEXT(30),
          qtr_yr(4),
          qtr_mth(10),
    *Fields added for Inr Value for exchange rate
          kursf type rbkp-kursf,
          inrval type rseg-wrbtr,
          BELNR1 TYPE RBKP-BELNR,
          remarks(15),
    END OF ty_header.
    types: begin of ty_pohistory,
            xblnr type ekbe-xblnr,
            bewtp type ekbe-bewtp,
            belnr type ekbe-belnr,
            gjahr type ekbe-gjahr,
           end of ty_pohistory.
    TYPES: BEGIN OF ty_temp,
            fidoc TYPE bkpf-belnr,              "FIDOC No
            awkey TYPE bkpf-belnr,              "Reference Key
            gjahr TYPE bkpf-gjahr,              "Fiscal Year
            budat TYPE bkpf-budat,              "Posting Date
            belnr TYPE rbkp-belnr,              "Doc No
            blart TYPE bkpf-blart,              "Document Type
           END OF ty_temp.
    *Internal Table
    DATA: itab TYPE ty_itab OCCURS 0 WITH HEADER LINE.
    DATA: itab_temp TYPE ty_temp OCCURS 0 WITH HEADER LINE.
    DATA : IT_CUSTOM TYPE TY_CUSTOM OCCURS 0 WITH HEADER LINE.
    data: it_pohistory type ty_pohistory occurs 0 with header line.
    data : it_header type ty_header occurs 0 with header  line.
    data : it_temp14 type ty_header occurs 0 with header  line.
    *Data Declaration
    DATA: BKTXT TYPE MKPF-BKTXT.
    DATA: FRBNR TYPE MKPF-FRBNR.
    data: budat type mkpf-budat.
    DATA: BELNR TYPE RSEG-BELNR.
    data: gjahr type rseg-gjahr.
    data: date1(10).
    data: date2(10).
    data: title(70).
    DATA : adrnr1 LIKE t001w-adrnr.
    DATA: plant_name1 LIKE adrc-name1.
    DATA: plant_name2 type adrc-name2.
    data: plant_name(70).
    DATA: comp_name1 LIKE adrc-name1.
    DATA: comp_name2 type adrc-name2.
    data: comp_name(70).
    DATA: month(2).
    For ALV display
    DATA: itfieldcat TYPE slis_t_fieldcat_alv WITH HEADER LINE,
          gd_layout TYPE slis_layout_alv,
          itsort TYPE slis_t_sortinfo_alv WITH HEADER LINE.
    DATA: gd_prntparams TYPE slis_print_alv.
    DATA : it_data TYPE slis_t_listheader,
           wa_data LIKE LINE OF it_data.
    **ALV Declaration
    DATA: it_alv1 LIKE TABLE OF itab WITH HEADER LINE.
    DATA : i TYPE n.
    DATA : col_name(10) TYPE c.
    data: text(70).
    *Selection Screen
    SELECTION-SCREEN BEGIN OF BLOCK block1 WITH FRAME TITLE text-001.
    PARAMETERS:p_bukrs LIKE rbkp-bukrs OBLIGATORY.
    SELECT-OPTIONS: s_werks FOR rseg-werks NO INTERVALS OBLIGATORY.
    SELECT-OPTIONS: s_regio FOR lfa1-regio NO INTERVALS.
    SELECT-OPTIONS: s_lifnr FOR lfa1-lifnr NO INTERVALS.
    select-options: s_bsart for ekko-bsart no intervals.
    SELECT-OPTIONS:s_bldat FOR rbkp-bldat.
    SELECT-OPTIONS:s_budat FOR rbkp-budat OBLIGATORY.
    SELECTION-SCREEN END OF BLOCK block1.
    SELECTION-SCREEN BEGIN OF BLOCK block2 WITH FRAME TITLE text-002.
    PARAMETERS : R1  RADIOBUTTON GROUP G1.
    PARAMETERS : R2  RADIOBUTTON GROUP G1.
    SELECTION-SCREEN END OF BLOCK block2.
    SELECT-OPTIONS: s_mwskz FOR rseg-mwskz NO-DISPLAY.
    SELECT-OPTIONS: s_land1 FOR lfa1-land1 NO-DISPLAY.
    START-OF-SELECTION.
    PERFORM get_data.
    **Filtering the Data based on the Document Type and Document Status in the Internal Table
    LOOP AT itab_temp.
    IF itab_temp-blart = 'RE'.
    itab_temp-belnr = itab_temp-awkey+0(10).
    MODIFY itab_temp.
    ELSE.
    DELETE itab_temp.
    ENDIF.
    ENDLOOP.
    WRITE : s_budat-low TO date1,
             s_budat-high TO date2.
    CONCATENATE 'Import Purchase Register From :' date1 ' To : '   date2 INTO text.
    if r1 = 'X'.
    PERFORM taxvalues.
    PERFORM filtering.
    PERFORM CUSTOMS.
    perform filtering2.
    PERFORM build_layout.
    PERFORM build_fieldcat.
    PERFORM alv_display.
    endif.
    if r2 = 'X'.
    PERFORM taxvalues.
    PERFORM filtering.
    PERFORM CUSTOMS.
    perform filtering2.
    PERFORM importheader.
    PERFORM build_layout.
    PERFORM build_fieldcat1.
    PERFORM alv_display_header.
    endif.
    *&      Form  get_data
          text
    -->  p1        text
    <--  p2        text
    FORM get_data .
    SELECT belnr AS fidoc
           awkey
           budat
           gjahr
           blart
           FROM bkpf INTO CORRESPONDING FIELDS OF TABLE itab_temp
           WHERE bukrs = p_bukrs
           AND budat IN s_budat
           AND bstat = space.
    IF sy-subrc NE 0.
      MESSAGE 'No Values exist for the Selection.' TYPE 'S'.
      STOP.
    ENDIF.
    ENDFORM.
    *&      Form  taxvalues
          text
    -->  p1        text
    <--  p2        text
    FORM taxvalues .
    LOOP AT itab_temp.
    MOVE-CORRESPONDING itab_temp TO itab.
      SELECT SINGLE
              lifnr
              xblnr
              belnr
              gjahr
              stblg
              bldat
              vgart
              ivtyp
              waers
              kursf
              FROM rbkp INTO CORRESPONDING FIELDS OF itab
                 WHERE belnr = itab_temp-belnr
                   AND gjahr = itab_temp-gjahr.
      SELECT  menge
              bklas
              matnr
              lfbnr
              werks
              mwskz
              buzei
              wrbtr
              pstyp
              kschl
              ebeln
              ebelp
              lfgja
              shkzg FROM rseg INTO CORRESPONDING FIELDS OF itab
              WHERE belnr = itab_temp-belnr
              AND gjahr = itab_temp-gjahr.
    APPEND itab.
    ENDSELECT.
    CLEAR itab.
    CLEAR itab_temp.
    ENDLOOP.
    LOOP AT itab .
    *Purchase Order Document Type.
    select single bsart from ekko into corresponding fields of itab
    where ebeln = itab-ebeln.
    select single batxt from t161t into corresponding fields of itab
    where spras = 'EN' AND
          bsart = itab-bsart.
    *Material Details
    SELECT SINGLE  matkl mtart FROM mara
                    INTO CORRESPONDING FIELDS OF itab
                    WHERE mara~matnr = itab-matnr.
    SELECT SINGLE name1 adrnr land1 FROM lfa1 INTO
                    (itab-name1,itab-adrnr,itab-land1) WHERE lifnr = itab-lifnr.
    *Short Text
    SELECT SINGLE txz01 INTO itab-maktx FROM ekpo
                WHERE ebeln = itab-ebeln
                and ebelp = itab-ebelp.
    **Vendor Address
    SELECT SINGLE str_suppl1
           post_code1
           city1
           region
           FROM adrc INTO CORRESPONDING FIELDS OF itab
                 WHERE addrnumber = itab-adrnr.
    itab-qtr_yr = itab-bldat+0(4).
    month = itab-bldat+4(2).
    CASE month.
      WHEN '01'.
        itab-qtr_mth = 'JAN'.
      WHEN '02'.
        itab-qtr_mth = 'FEB'.
      WHEN '03'.
        itab-qtr_mth = 'MAR'.
      WHEN '04'.
        itab-qtr_mth = 'APR'.
      WHEN '05'.
        itab-qtr_mth = 'MAY'.
      WHEN '06'.
        itab-qtr_mth = 'JUN'.
      WHEN '07'.
        itab-qtr_mth = 'JUL'.
      WHEN '08'.
        itab-qtr_mth = 'AUG'.
      WHEN '09'.
        itab-qtr_mth = 'SEP'.
      WHEN '10'.
        itab-qtr_mth = 'OCT'.
      WHEN '11'.
        itab-qtr_mth = 'NOV'.
      WHEN '12'.
        itab-qtr_mth = 'DEC'.
    ENDCASE.
    *INR VALUE CALCULATION
    <b>itab-inrval = itab-wrbtr * itab-kursf.</b>MODIFY itab.
    ENDLOOP.
    ENDFORM.                    " taxvalues
    *&      Form  build_layout
          text
    -->  p1        text
    <--  p2        text
    FORM build_layout .
      CLEAR itab.
      gd_layout-zebra = 'X'.
      gd_layout-colwidth_optimize = 'X'.
    ENDFORM.                    " build_layout
    *&      Form  build_fieldcat
          text
    -->  p1        text
    <--  p2        text
    FORM build_fieldcat .
    IF itab[] IS INITIAL.
      MESSAGE 'No Values exist for the Selection.' TYPE 'S'.
      STOP.
    ENDIF.
      DEFINE m_fieldcat.
        itfieldcat-fieldname = &1.
        itfieldcat-col_pos = &2.
        itfieldcat-seltext_l = &3.
        itfieldcat-do_sum = &4.
        itfieldcat-outputlen = &5.
        append itfieldcat to itfieldcat.
        clear itfieldcat.
      END-OF-DEFINITION.
      m_fieldcat 'LFBNR' '' 'GR NO' '' 10.
      m_fieldcat 'BELNR' '' 'MIRO NO' '' 10.
      m_fieldcat 'BUZEI' '' 'MIRO LN ITM' '' 10.
      m_fieldcat 'LIFNR' '' 'VENDOR CODE' '' 10.
      m_fieldcat 'NAME1' '' 'VENDOR NAME'  '' 14.
      m_fieldcat 'STR_SUPPL1' '' 'VENDOR ADDRESS' '' '15'  .
      m_fieldcat 'POST_CODE1' '' 'PINCODE' '' 6.
      m_fieldcat 'XBLNR' '' 'VEN INV NO' '' 16.
      m_fieldcat 'BLDAT' '' 'VEN INV DATE' '' 8.
      m_fieldcat 'EBELN' '' 'PUR ORD NO' '' 10.
    m_fieldcat 'BATXT' '' 'PUR ORD DOC.TYPE' '' 20.  "Pur Doc. Type Description
      m_fieldcat 'EBELP' '' 'PUR LN ITM' '' 5.
      m_fieldcat 'WERKS' '' 'PLANT' '' 8.
      m_fieldcat 'MATNR' '' 'MAT NO' '' 18.
      m_fieldcat 'MAKTX' '' 'MAT DESC' '' 15.
      m_fieldcat 'MATKL' '' 'MAT CC' '' 7.
      m_fieldcat 'MENGE' '' 'QTY' '' 13.
      m_fieldcat 'WRBTR' '' 'VAL. OF GOODS' '' 11.
      m_fieldcat 'WAERS' '' 'CURR' '' 5.
      m_fieldcat 'INRVAL' '' 'INR VALUE' '' 13.
      m_fieldcat 'BED' '' 'BED' '' 10.
      m_fieldcat 'CVD' '' 'CVD' '' 10.
      m_fieldcat 'ECVD' '' 'CESS ON CVD' '' 10.
      m_fieldcat 'ECED' '' 'CESS ON DUTIES' '' 13.
    *Bill of Lading Removed and Bill of Entry Added.
    m_fieldcat 'FRBNR' '' 'BILL OF LADING' '' 13.
      m_fieldcat 'BELNR1' '' 'BILL OF ENTRY' '' 13.
      m_fieldcat 'REVERSE' '' 'Reversed' '' 2.
      m_fieldcat 'FIDOC' '' 'FI DOC NO' '' 10.
      m_fieldcat 'MWSKZ' '' 'TC' '' 2.
      m_fieldcat 'BKLAS' '' 'VL CLS' '' 4.
      m_fieldcat 'CITY1' '' 'VENDOR CITY' '' 10.
      m_fieldcat 'QTR_MTH' '' 'MONTH' '' 10.
      m_fieldcat 'QTR_YR' '' 'YEAR' '' 4.
      m_fieldcat 'REMARKS' '' 'REMARKS' '' 15.
    ENDFORM.                    " build_fieldcat
    *&      Form  list1
          text
         -->R_UCOMM    text
         -->RS_SELFIELDtext
    FORM list1 USING r_ucomm LIKE sy-ucomm
                      rs_selfield TYPE slis_selfield.
    Check function code
      CASE r_ucomm.
        WHEN '&IC1'.
      Check field clicked on within ALVgrid report
          IF rs_selfield-fieldname = 'LFBNR'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'MBN' FIELD itab-lfbnr.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MB03' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'FIDOC'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'BLN' FIELD itab-fidoc.
            SET PARAMETER ID 'BUK' FIELD p_bukrs.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD itab-BELNR.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR1'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE itab
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD itab-BELNR1.
            SET PARAMETER ID 'GJR' FIELD itab-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
      ENDCASE.
    ENDFORM.
    *&      Form  alv_display
          text
    -->  p1        text
    <--  p2        text
    FORM alv_display .
    IF sy-batch = space.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program      = sy-repid
          is_layout               = gd_layout
          i_callback_user_command = 'LIST1'
          I_CALLBACK_TOP_OF_PAGE  = 'TOP_OF_PAGE'
          it_fieldcat             = itfieldcat[]
          i_save                  = 'A'
          is_print                = gd_prntparams
          it_sort                 = itsort[]
        TABLES
          t_outtab                = itab
          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.
    ELSEIF sy-batch = 'X'.
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
         i_callback_program             = sy-repid
         it_fieldcat                    = itfieldcat[]
          it_sort                       = itsort[]
        TABLES
          t_outtab                       = itab
       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.
    ENDIF.
    ENDFORM.                    " alv_display
    *&      Form  FILTERING
          text
    -->  p1        text
    <--  p2        text
    FORM filtering .
    Material type should be of ROH or HALB or FERT
    *CLEAR s_mtart.
    *REFRESH s_mtart.
    *s_mtart-sign = 'I'.
    *s_mtart-option = 'EQ'.
    *s_mtart-low = 'ROH'.
    *APPEND s_mtart.
    *s_mtart-low = 'HALB'.
    *APPEND s_mtart.
    *s_mtart-low = 'FERT'.
    *APPEND s_mtart.
    *CLEAR  s_mtart.
    *Tax Code for WCT should not be included.
    s_mwskz-sign = 'I'.
    s_mwskz-option = 'EQ'.
    s_mwskz-low = 'W1'.
    APPEND s_mwskz.
    s_mwskz-low = 'W2'.
    APPEND s_mwskz.
    s_mwskz-low = 'W3'.
    APPEND s_mwskz.
    s_mwskz-low = 'W4'.
    APPEND s_mwskz.
    s_mwskz-low = 'W5'.
    APPEND s_mwskz.
    s_mwskz-low = 'W6'.
    APPEND s_mwskz.
    s_land1-sign = 'I'.
    s_land1-option = 'NE'.
    s_land1-low = 'IN'.
    APPEND s_land1.
    LOOP AT itab.
        IF itab-mwskz NOT IN s_mwskz
          AND itab-shkzg EQ 'S'
           AND itab-bldat IN s_bldat
           AND itab-region IN s_regio
           AND itab-lifnr IN s_lifnr
           AND itab-land1 IN s_land1
           AND itab-werks IN s_werks
           AND itab-bsart IN s_bsart.
         ELSE.
           DELETE itab.
           CONTINUE.
        ENDIF.
        IF itab-vgart EQ 'RS'
           AND itab-ivtyp EQ '5'
           AND itab-stblg NE ' '.
             itab-reverse = 'RS'.
        ELSEIF  itab-vgart EQ 'RD'
           AND itab-ivtyp EQ ' '
           AND itab-stblg NE ' '.
             itab-reverse = 'RD'.
        ENDIF.
       MODIFY itab.
    ENDLOOP.
    ENDFORM.                    " FILTERING
    *&      Form  CUSTOMS
          text
    -->  p1        text
    <--  p2        text
    form CUSTOMS .
    LOOP AT ITAB.
    IF ITAB-LFBNR IS NOT INITIAL.
    SELECT SINGLE BKTXT
                  FRBNR
                  budat
                  FROM MKPF INTO (BKTXT,FRBNR,budat)
                  WHERE MBLNR = ITAB-LFBNR
                  and mjahr = itab-lfgja.
      move frbnr to itab-frbnr.
      perform get_custom_invoice.
    else.
    select xblnr
           bewtp
           belnr
           gjahr
           from ekbe into table it_pohistory
           where ebeln = itab-ebeln
           and ebelp = itab-ebelp.
    sort it_pohistory by xblnr.
    read table it_pohistory with key xblnr = itab-xblnr bewtp = 'E' binary search.
    if sy-subrc = 0.
        SELECT SINGLE BKTXT
                  FRBNR
                  budat
                  FROM MKPF INTO (BKTXT,FRBNR,budat)
                  WHERE MBLNR = it_pohistory-belnr
                  and mjahr = it_pohistory-gjahr.
        move it_pohistory-belnr to itab-lfbnr.
        move frbnr to itab-frbnr.
        perform get_custom_invoice.
    endif.
    ENDIF.
    MODIFY ITAB.
    clear: bktxt,frbnr,budat.
    ENDLOOP.
    SORT itab BY lfbnr belnr. " Sorting by GR no.
    endform.                    " CUSTOMS
    *&      Form  get_custom_invoice
          text
    -->  p1        text
    <--  p2        text
    form get_custom_invoice .
    CALL FUNCTION 'GET_CURRENT_YEAR'
    EXPORTING
       BUKRS         = p_bukrs
       DATE          =  budat
    IMPORTING
       CURRY         = gjahr
    determine if wrong characters were entered
    IF ( BKTXT CN '1234567890' ).
    *string contains wrong characters!
          ITAB-BELNR1 = BKTXT.
          ITAB-remarks = 'Wrng BoE Ref'.
        EXIT.
      ENDIF.
    CALL FUNCTION 'CONVERSION_EXIT_ALPHA_INPUT'
      EXPORTING
        input         = BKTXT
    IMPORTING
       OUTPUT        = BELNR
    ITAB-BELNR1 = BELNR.
    *For getting the Customs MIRO doc, it is assumed that the Fiscal Year of Customs Miro is same as Fiscal Year of Migo Posting Date
    clear it_custom.
    refresh it_custom.
    SELECT WRBTR
           KSCHL
           EBELN
           EBELP
           FROM RSEG INTO CORRESPONDING FIELDS OF IT_CUSTOM
           WHERE BELNR = BELNR
           and gjahr = gjahr.
    if sy-subrc = 0.
      APPEND IT_CUSTOM.
    endif.
    ENDSELECT.
    LOOP AT IT_CUSTOM.
        IF IT_CUSTOM-EBELN = ITAB-EBELN AND IT_CUSTOM-EBELP = ITAB-EBELP.
             CASE IT_CUSTOM-KSCHL.
                 WHEN 'JCDB'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-BED.
                 WHEN 'JCV1'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-CVD.
                 WHEN 'JECV'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-ECVD.
                 WHEN 'JEDB'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-ECED.
                 WHEN 'JCDS'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-SBED.
                 WHEN 'JCV2'.
                     MOVE IT_CUSTOM-WRBTR TO ITAB-NCVD.
              ENDCASE.
        ENDIF.
    ENDLOOP.
    endform.                    " get_custom_invoice
    *&      Form  filtering2
          text
    -->  p1        text
    <--  p2        text
    form filtering2 .
    loop at itab.
      if itab-lfbnr is initial.
          delete itab.
      endif.
    endloop.
    endform.                    " filtering2
    *& Form top_of_page
    text
    FORM top_of_page.
    CLEAR IT_DATA.
    REFRESH IT_DATA.
    *Company Details
    SELECT adrnr FROM t001 INTO adrnr1 WHERE bukrs = p_bukrs.
    ENDSELECT.
    SELECT name1 name2 FROM adrc INTO (comp_name1,comp_name2) WHERE addrnumber = adrnr1.
    ENDSELECT.
    concatenate comp_name1 comp_name2 into comp_name.
    wa_data-typ = 'H'.
    wa_data-info = comp_name.
    APPEND wa_data TO it_data.
    *Plant Details for Display
    loop at s_werks.
    SELECT single adrnr FROM t001w INTO adrnr1 WHERE werks = s_werks-low.
    SELECT single name1 name2 FROM adrc INTO (plant_name1,plant_name2) WHERE addrnumber = adrnr1.
    concatenate s_werks-low ' - ' plant_name1 ',' plant_name2 into plant_name.
    wa_data-info = plant_name.
    APPEND wa_data TO it_data.
    endloop.
    WRITE : s_budat-low TO date1,
            s_budat-high TO date2.
    if r1 = 'X'.
    CONCATENATE 'Import Purchase Register From :' date1 ' To : '   date2 INTO title.
    elseif r2 = 'X'.
    CONCATENATE 'Imp.Pur.Reg- Inv.Header From :' date1 ' To : '   date2 INTO title.
    endif.
    wa_data-info = title.
    APPEND wa_data TO it_data.
    CALL FUNCTION 'REUSE_ALV_COMMENTARY_WRITE'
    EXPORTING
    it_list_commentary = it_data
    I_LOGO =
    I_END_OF_LIST_GRID =
    CLEAR WA_DATA.
    CLEAR IT_DATA.
    ENDFORM. "top_of_page
    *&      Form  importheader
          text
    -->  p1        text
    <--  p2        text
    form importheader .
    LOOP AT itab.
      MOVE-CORRESPONDING itab TO it_header.
      APPEND it_header.
    ENDLOOP.
    SORT it_header BY belnr.
    <b>LOOP AT it_header.
    AT END OF belnr.
      READ TABLE it_header INDEX sy-tabix.
      SUM.                </b>                                      " Summing the Amount for each Vendor Invoice No.
      MOVE-CORRESPONDING it_header TO it_temp14.
      APPEND it_temp14.
      CLEAR it_temp14.
    ENDAT.
    ENDLOOP.
    SORT it_temp14  BY belnr  ASCENDING.                                 " SORTING BY MIRO NUMBER
    endform.                    " importheader
    *&      Form  build_fieldcat1
          text
    -->  p1        text
    <--  p2        text
    form build_fieldcat1 .
    IF itab[] IS INITIAL.
      MESSAGE 'No Values exist for the Selection.' TYPE 'S'.
      STOP.
    ENDIF.
      DEFINE m_fieldcat.
        itfieldcat-fieldname = &1.
        itfieldcat-col_pos = &2.
        itfieldcat-seltext_l = &3.
        itfieldcat-do_sum = &4.
        itfieldcat-outputlen = &5.
        append itfieldcat to itfieldcat.
        clear itfieldcat.
      END-OF-DEFINITION.
      m_fieldcat 'BELNR' '' 'MIRO NO' '' 10.
      m_fieldcat 'LIFNR' '' 'VENDOR CODE' '' 10.
      m_fieldcat 'NAME1' '' 'VENDOR NAME'  '' 14.
      m_fieldcat 'STR_SUPPL1' '' 'VENDOR ADDRESS' '' '15'  .
      m_fieldcat 'POST_CODE1' '' 'PINCODE' '' 6.
      m_fieldcat 'XBLNR' '' 'VEN INV NO' '' 16.
      m_fieldcat 'BLDAT' '' 'VEN INV DATE' '' 8.
      m_fieldcat 'WERKS' '' 'PLANT' '' 8.
      m_fieldcat 'WRBTR' '' 'VAL. OF GOODS' '' 11.
      m_fieldcat 'WAERS' '' 'CURR' '' 5.
      m_fieldcat 'INRVAL' '' 'INRVALUE' '' 11.
      m_fieldcat 'BED' '' 'BED' '' 10.
      m_fieldcat 'CVD' '' 'CVD' '' 10.
      m_fieldcat 'ECVD' '' 'CESS ON CVD' '' 10.
      m_fieldcat 'ECED' '' 'CESS ON DUTIES' '' 13.
    *Bill of Lading Removed and Bill of Entry Added.
    m_fieldcat 'FRBNR' '' 'BILL OF LADING' '' 13.
      m_fieldcat 'BELNR1' '' 'BILL OF ENTRY' '' 13.
      m_fieldcat 'REVERSE' '' 'Reversed' '' 2.
      m_fieldcat 'FIDOC' '' 'FI DOC NO' '' 10.
      m_fieldcat 'MWSKZ' '' 'TC' '' 2.
      m_fieldcat 'BKLAS' '' 'VL CLS' '' 4.
      m_fieldcat 'CITY1' '' 'VENDOR CITY' '' 10.
      m_fieldcat 'QTR_MTH' '' 'MONTH' '' 10.
      m_fieldcat 'QTR_YR' '' 'YEAR' '' 4.
      m_fieldcat 'REMARKS' '' 'REMARKS' '' 15.
      ENDFORM.                    " build_fieldcat
    *&      Form  alv_display_header
          text
    -->  p1        text
    <--  p2        text
    form alv_display_header .
    IF sy-batch = space.
      CALL FUNCTION 'REUSE_ALV_GRID_DISPLAY'
        EXPORTING
          i_callback_program      = sy-repid
          is_layout               = gd_layout
          i_callback_user_command = 'LIST2'
          I_CALLBACK_TOP_OF_PAGE  = 'TOP_OF_PAGE'
          it_fieldcat             = itfieldcat[]
          i_save                  = 'A'
          is_print                = gd_prntparams
          it_sort                 = itsort[]
        TABLES
          t_outtab                = it_temp14
          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.
    ELSEIF sy-batch = 'X'.
      CALL FUNCTION 'REUSE_ALV_LIST_DISPLAY'
       EXPORTING
         i_callback_program             = sy-repid
         it_fieldcat                    = itfieldcat[]
          it_sort                       = itsort[]
        TABLES
          t_outtab                       = it_temp14
       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.
    ENDIF.
    endform.                    " alv_display_header
    *&      Form  list1
          text
         -->R_UCOMM    text
         -->RS_SELFIELDtext
    FORM list2 USING r_ucomm LIKE sy-ucomm
                      rs_selfield TYPE slis_selfield.
    Check function code
      CASE r_ucomm.
        WHEN '&IC1'.
          IF rs_selfield-fieldname = 'FIDOC'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE it_temp14
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'BLN' FIELD it_temp14-fidoc.
            SET PARAMETER ID 'BUK' FIELD p_bukrs.
            SET PARAMETER ID 'GJR' FIELD it_temp14-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'FB03' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE it_temp14
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD it_temp14-BELNR.
            SET PARAMETER ID 'GJR' FIELD it_temp14-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
          IF rs_selfield-fieldname = 'BELNR1'.
       AND rs_selfield-fieldname = 'GJAHR'.
        Read data table, using index of row user clicked on
            READ TABLE it_temp14
         INTO wa_ekko
            INDEX rs_selfield-tabindex.
        Set parameter ID for transaction screen field
            SET PARAMETER ID 'RBN' FIELD it_temp14-BELNR1.
            SET PARAMETER ID 'GJR' FIELD it_temp14-gjahr.
        Sxecute transaction ME23N, and skip initial data entry screen
            CALL TRANSACTION 'MIR4' AND SKIP FIRST SCREEN.
          ENDIF.
      ENDCASE.
    ENDFORM.
    Message was edited by:
            Kiran K

    Sandeep,
    It is working fine for all the dates,but going giving dump only for a particular date.
    KURSF is of length 9.Is it including decimal places.
    So,if i declare a varibale of type p decimals 5 and then move actual kursf value to this variable and then SUM,it will work fine.
    data:kursf1 type p decimals 5.
    move it_header-kursf to it_header-kursf1.
    or
    just declare the existing kursf as type p decimals 5
    But why it is not giving dump for other dates.
    Thanks,
    K.Kiran.

  • FMDependency field too short in Sharepoint

    Hi,
    we are using FM10 with Sharepoint 2010.
    It works fine, generally speaking, but we are running into an issue with the field FMDependency.
    The field is created automatically when a FM10 file is uploaded. However it is too short for the kind of dependencies we have and it issues an error when we modify other metadata in Sharepoint and save the item.
    is it possibile to change the length of this field ? Where and how ?
    Thanks for your support
    Carlo Tognoni
    Milano - Italy

    I have not tried this myself, but I am concerned in case the problem affects us one day. If you follow this suggestion, please let us know how it goes.
    In SharePoint:
    Site Actions > Site Settings > Site Administration: Site Libraries and lists > Customize [your DITA list].
    Scroll down to the Columns section and select FMDependency.
    In the Additional Column Settings section, set Allow unlimited length in document libraries to Yes.
    My reference for this was http://sharepoint.stackexchange.com/questions/14195/more-than-255-characters-in-multiple-l ines-of-text
    Alternatively, you could try increasing the Number of lines for editing on the same page.

  • CRM replication t_other_info BAPIEXTC structure field too short

    I am using the FM to map r3 to crm and it tells us to use the structure T_other_info which has 4 fields, field 1, field 2, field 3, and field 4 each only 250 chars.
    My structure that i am passing to the function module is 300 char for field3, what can i do?   I am not able to replicate addiitional fields because when i pass it over it turns into '###' when the field is mapped.   I am assuming it is because i can only pass 250 chars to field1,2,3,4 etc.
    The fm i am using is 'Z_U_EXIT_MAT_MAP_OLTP' .
    tables
    t_int_tables = t_int_tables
    t_bapistruct = t_bapistruct
    t_messages = t_messages
    t_other_info = t_other_info.
    thank you.

    not answered

  • Authorization Object for 0TCTBISBOBJ - restriction field too short in PFCG

    Dear all,
    I created an authorization object (TA: RSSM) with the InfoObject 0TCTBISBOBJ and 1KYFNM. When I restrict my authorization object in TA: PFCG, I can only type in 11 letters for InfoObject 0TCTBISBOBJ but I need 12 because of a bad naming convention. Working with more than one asterisk (*) in this field is not working!
    Does anyone know how to manage this problem?
    Thanks in advance
    F. L.

    Martin,
    It is not possible to restrict this in CRM.  The person, organization, and group influences the type of address for the business partner.  There are no user exits available in CRM 4.0 that are at the point to perform an authorization check on this value.
    I had to unfortuantely debug and read much of BUPA_DIALOG_JOEL before reaching this conclusion.  The only way to achieve this would be to write a custom front-end to the BP transaction or PCUI screens for business partners.
    Hope this answers your question,
    Stephen

  • Hide extension in file name input field when saving?

    A few days ago in Photoshop CS6 I started automatically getting an extension in the file name input field.
    Previously, when I did a "save as" I got, for example "image01."
    A few days ago I started getting "image01.jpg."
    I have another installation of CS6 on another desktop and on that one I get simply "image01." That's the way is had been on this machine.
    This has nothing to do with file/folder options in Windows Explorer. I don't see extension names anywhere but in the Photoshop 'save as' input field.
    It is highly annoying because I process a lot of images and having to get rid of the ".jpg" wastes time.
    Anyone have any ideas?
    dg

    Thanks, everyone for your replies. Perhaps I did not explain this clearly.
    This change I experienced has nothing to do with Windows Explorer settings.
    Here's what the input looks like on my secondary machine and how Photoshop behaved on my primary machine until a few days ago:
    All that is shown is the file name: No extension.
    Here's what I'm getting now:
    Suddenly Photoshop in adding ".jpg" to the end of the file name. This happens in both 64 bit (my default) and 32 bit (I never use it but tested i)t.
    I have not changed anything yet, but could this be a Photoshop preferences issue as gener7 suggested? I made no changes to my Photoshop installation prior to this starting to happen.
    As an aside. I'm surprised people like having the extension in the file name. I have never found that to be necessary at all, since Windows Explorer shows the file type right in the window:
    And if you select an image it's also shown on the lower left:
    I use primarily .jpgs, .tiffs, and CR2 files and even without looking at the examples above, the icon alone tells me what kind of file it is.
    dg

  • Bug v4.0 - no input field for file name in export dialog

    Hello,
    I run a query, right click in the result grid and choose "Export". There is no input field to provide a file name. I can only export to the default file.
    Version 4.0.0.13 on XP
    Edit: Seems to be an issue with the settings (maybe those migrated from 3.2.2). When I install without migrating settings I get the full dialog. I will try some combinations and update this post.
    Edit: I installed again without migration my settings. When I set the preferences manually I cannot reproduce the bug. Maybe some bug in the import for the preferences? Maybe it only happens on German XPs.
    Regards
    Marcus

    Thank you, 5p given.
    However this is what I execute and in my file chooser dialog the filename field is still blank.
      ExampleFileFilter filter = new ExampleFileFilter();
        filter.addExtension("html");
        filter.addExtension("csv");
      JFileChooser chooser = new JFileChooser(new File("REPORT_ONE_"));
        chooser.setDialogTitle( "Save Report" );
        chooser.setFileSelectionMode(chooser.FILES_AND_DIRECTORIES);
        chooser.setFileFilter(filter);
        int returnVal = chooser.showSaveDialog(this);
        ...It is in try-catch, no errors are returned.
    Operating System: WindowsXP
    Java Version: 1.3.1

  • Open/save dialog boxes stuck at (too small) default size

    I've been having a relatively small issue with Mountain Lion that has become a big hassle. In past versions of OS X, whenever I'd resize an open/save dialog box in an application, it would be that size the next time I went to open/save. In Mountain Lion, however, those dialog boxes always default to the smallest possible size (which is too small to read a filename longer than a few characters). so I have to resize the dialog box — every time! I open and save a lot of files, so this gets pretty tedious. This doesn't seem to happen in apple programs, but it definitely does in the Office Suite and the Adobe Creative Suite, especially in CS4 Photoshop and Illustrator. Might be I can fix it by myself but I can't imagine where I may dig it.

    You might try looking here for the Adobe products:
    Adobe Help and Support
    Try Microsoft support for the Office Products:
    http://www.microsoft.com/mac

  • JFileChooser as save dialog clears text field on change directory

    I am trying to implement a basic save dialog using JFileChooser, which initiates with an initial file name, "untitled.txt". However, as soon as the directory is changed by the user, the text field is cleared. I want to ensure that whatever is in the text field when the user changes directories (i.e., untitled.txt may have been changed to something else by the user) stays visible throughout any kind of user navigation. I've tried all sorts of things, but nothing seems to work.
    Thanks for your help.

    Yes, it very well could be an OS/JDK issue. I'm using jdk 1.5 on Mac OS X (Tiger). Apparently, FileNameExtensionFilter is a jdk 1.6 implementation, because it doesn't work for me.
    Here's my code:
    JFileChooser fc = new JFileChooser();
    String output = outputTextArea.getText();
            String selectedFile = "untitled.txt";
            File file = new File(selectedFile);
            fc.setDialogTitle("Save");
            fc.setMultiSelectionEnabled(false);
            fc.setFileSelectionMode(JFileChooser.DIRECTORIES_ONLY);
            fc.setSelectedFile(file);
            setFileName(file.getName());
            int result = fc.showSaveDialog(this);
            if (result == JFileChooser.CANCEL_OPTION) {
                return;
            } else if (result == JFileChooser.APPROVE_OPTION) {
                file = fc.getSelectedFile();
                if (file.exists()) {
                    int response = JOptionPane.showConfirmDialog(null,
                            "Overwrite existing file?","Confirm Overwrite",
                            JOptionPane.OK_CANCEL_OPTION,
                            JOptionPane.QUESTION_MESSAGE);
                    if (response == JOptionPane.CANCEL_OPTION) return;
                if (!writeFile(file, output)) {
                    setErrorMessage(ERROR5_1); //Just a custom error message and display.
                    showErrorMessage();
                    return;
            }Is there a workaround if this is an OS or JDK issue?
    Thanks again for your help.

  • How to save changed data from a input field to the source structure

    Hi,
    I have a small problem with the onChange event with HTML input fields.
    When changing a value of a input field or by creating a new value for a field the OnChange event is called by moving away the mouse pointer....
    get_form_field( 'field_name' ).
    But is it possible to write back the new value in the source field ls_screenstructure_field1 without using the OnInputProcessing?
    I ask because my application´s structures have a lot of fields that should be filled and changed by input fields.
    It´s not comfortable to request every new value with .. = request->get_form_field(... .
    Thanks for helping.
    Cheers,
    André

    you wanted a onchange for a htmlb:inputfield which would also trigger server event. try the following code.
    <htmlb:inputField id            = "test"
                                alignment     = "LEFT"
                                size          = "6"
                                required      = "TRUE"
                                doValidate    = "TRUE"
                                type          = "INTEGER"
                                 />
    <bsp:htmlbEvent id="myid" onClick="myonclick" name="ValueChanged" />
      <script for="test" event=onchange type="text/javascript">
    alert(this.value);
    ValueChanged();
    </SCRIPT>
    if the value in the inputfield is changed it would trigger a alert at the client side and also trigger a server event. now you can caputre the value in oninputprocessing.
    Hope this helps.
    do let us know if you need help in how to capture this value in oninputprocessing.
    Regards
    Raja

  • Input field in dialog screen

    Hi all,
    I need to create an input field on screen, which would enable input not by writing but by selecting a value from a list.
    I tried to define the field as a listbox, but the FM VRM_SET_VALUES used for populating the values can contain only 2 field and I need to populate about 5 to 6 fields.
    Any ideas? is it possible?
    Thanks,
    Hagit

    Hi Hagit,
    You can attach one search help with required field and convert the field to list box.
    Message Edited
    shibu

  • I have no clue why I can't save to db if input field is empty?

    I have row generated according to the users input. But my problem is that let's say that the user leaves one input field empty. The whole row of data does not get saved into my database. Why is that so...? Is there any particular reason for this?
    Here's the code for the dynamically generated input fields.
    <%
         for (int i=1; i<=newNum; i++)
              out.println("<TR><TD>"+i+".</TD><TD><input type='TEXT' value='' name='model"+i+"' size='13'></TD><TD><input type='TEXT' value='' name='lquan"+i+"' size='5'></TD>");
              out.println("<TD><input type='TEXT' value='' name='insp"+i+"' size='6'></TD><TD><select name='rej"+i+"'><option value='Blow AAA'>AAA</option><option value='BBB'>BBB</option><option value='CCC'>CCC</option>");
              out.println("</select></TD><TD><select name='area"+i+"'><option value='A'>A</option><option value='B'>B</option><option value='C'>C</option></select></TD><TD><input type='TEXT' value='' name='loc"+i+"' size='6'></TD></TR>");
    %>I am using orion server and Mic. Access Database

    No i didn't. So. ..that's the problem is it. I will try it out and post another reply.
    Thank you Jerry Garcia

  • Dialog programming: making standard input field sensitive to double-click

    Hello,
    I'd like make standard input field sensitive to double-click. I know that I should register double-click event to input field class and write handler. But I can't find out from what class I should derive. What is class of standard input field? Can I derive from that class? Or is there another way to accomplish my requirements?
    Best regards,
    Josef Motl

    I agree with Kinshuk,  Not sure why you need this functionality.   Please implement this sample program do F4 help on the BURKS field and select a company code.  Notice that is populates all the rest of the fields.  Is this the functionality that you require?
    report zrich_0002 .
    parameters: p_bukrs type t001-bukrs,
                p_butxt type t001-butxt,
                p_ort01 type t001-ort01,
                p_land1 type t001-land1.
    data: dynfields type table of dynpread with header line.
    data: return type table of ddshretval with header line.
    at selection-screen on value-request for p_bukrs.
      call function 'F4IF_FIELD_VALUE_REQUEST'
           exporting
                tabname           = 'T001'
                fieldname         = 'BUKRS'
                dynpprog          = sy-cprog
                dynpnr            = sy-dynnr
                dynprofield       = 'P_BUKRS'
           tables
                return_tab        = return
           exceptions
                field_not_found   = 1
                no_help_for_field = 2
                inconsistent_help = 3
                no_values_found   = 4
                others            = 5.
      read table return with key fieldname = 'P_BUKRS'.
    * Add it back to the dynpro.
      dynfields-fieldname = return-retfield.
      dynfields-fieldvalue =  return-fieldval.
      append dynfields.
    * Get the company code from db and add to dynpro
      data: xt001 type t001.
      clear xt001.
      select single * into xt001
             from t001
            where bukrs = return-fieldval.
      dynfields-fieldname = 'P_BUTXT'.
      dynfields-fieldvalue = xt001-butxt.
      append dynfields.
      dynfields-fieldname = 'P_ORT01'.
      dynfields-fieldvalue = xt001-ort01.
      append dynfields.
      dynfields-fieldname = 'P_LAND1'.
      dynfields-fieldvalue = xt001-land1.
      append dynfields.
    * Update the dynpro values.
      call function 'DYNP_VALUES_UPDATE'
           exporting
                dyname     = sy-cprog
                dynumb     = sy-dynnr
           tables
                dynpfields = dynfields
           exceptions
                others     = 8.
    start-of-selection.
    Regards,
    Rich Heilman

  • Error "602" System error: AK Datapart too short

    Hi all,
    Ok, I have looked just about everywhere for an answer to this but to no avail...I even tried under a few rocks we have laying around.
    Anyway here it is:
    While running a compression in BW we get Error "602"  System error: AK Datapart too short.
    This is happening while doing a select statement during the compression of the infocube.  It does not happen all the time, just kind like when ever it feels like.  The only note I could find in OSS was one about Live Cache and it does not seem to apply.
    Here is the dump which I really hate doing this, but it gives all the info needed :
    untime Error          DBIF_DSQL2_SQL_ERROR
    Except.                CX_SY_NATIVE_SQL_ERROR
    Date and Time          08/15/2007 12:23:09
    ShrtText
    An SQL error occurred when executing Native SQL.
    What happened?
    Error "-602" occurred in the current database connection "DEFAULT".
    What can you do?
    Print out the error message (using the "Print" function)
    and make a note of the actions and input that caused the
    error.
    To resolve the problem, contact your SAP system administrator.
    You can use transaction ST22 (ABAP Dump Analysis) to view and administer
    termination messages, especially those beyond their normal deletion
    date.
    is especially useful if you want to keep a particular message.
    How to correct the error
    Database error text........: "System error: AK Datapart too short"
    Database error code .......: "-602"
    Triggering SQL statement...: "INSERT INTO "/BIC/EZPSD_C03" ( "KEY_ZPSD_C03P",
    "KEY_ZPSD_C03T", "KEY_ZPSD_C03U", "KEY_ZPSD_C031", "KEY_ZPSD_C032",
    "KEY_ZPSD_C033", "KEY_ZPSD_C034", "/BIC/ZNET_ASP" ) SELECT ? ,
    F."KEY_ZPSD_C03T", F."KEY_ZPSD_C03U", F."KEY_ZPSD_C031", F."KEY_ZPSD_C032","
    Internal call code.........: "[DBDS/NEW DSQL]"
    Please check the entries in the system log (Transaction SM21).
    You may able to find an interim solution to the problem
    in the SAP note system. If you have access to the note system yourself,
    use the following search criteria:
    "DBIF_DSQL2_SQL_ERROR" CX_SY_NATIVE_SQL_ERRORC
    "GP31VIZWJDTT90894L1IA5YAC7G" or "GP31VIZWJDTT90894L1IA5YAC7G"
    "TRANSFER_ALL"
    If you cannot solve the problem yourself and you wish to send
    an error message to SAP, include the following documents:
    1. A printout of the problem description (short dump)
    To obtain this, select in the current display "System->List->
    Save->Local File (unconverted)".
    2. A suitable printout of the system log
    To obtain this, call the system log through transaction SM21.
    Limit the time interval to 10 minutes before and 5 minutes
    after the short dump. In the display, then select the function
    "System->List->Save->Local File (unconverted)".
    3. If the programs are your own programs or modified SAP programs,
    supply the source code.
    To do this, select the Editor function "Further Utilities->
    Upload/Download->Download".
    4. Details regarding the conditions under which the error occurred
    or which actions and input led to the error.
    The exception must either be prevented, caught within the procedure
    "TRANSFER_ALL"
    "(FORM)", or declared in the procedure's RAISING clause.
    To prevent the exception, note the following:
    System environment
    SAP Release.............. "640"
    Application server....... "sdcbw03"
    Network address.......... "10.64.18.76"
    Operating system......... "Linux"
    Release.................. "2.6.9-55.ELsmp"
    Hardware type............ "x86_64"
    Character length......... 16 Bits
    Pointer length........... 64 Bits
    Work process number...... 21
    Short dump setting....... "full"
    Database server.......... "sdcbw03"
    Database type............ "ADABAS D"
    Database name............ "BWP"
    Database owner........... "SAPBWP"
    Character set............ "C"
    SAP kernel............... "640"
    Created on............... "Nov 5 2006 19:46:34"
    Created in............... "Linux GNU SLES-9 x86_64 cc3.3.3"
    Database version......... "SAPDB 7.5.0.030 "
    Patch level.............. "156"
    Patch text............... " "
    Supported environment....
    Database................. "MaxDB 7.5.0"
    SAP database version..... "640"
    Operating system......... "Linux 2.6"
    Memory usage.............
    Roll..................... 16192
    EM....................... 20949280
    Heap..................... 0
    Page..................... 24576
    MM Used.................. 9235016
    MM Free.................. 3331560
    SAP Release.............. "640"
    User and Transaction
    Client.............. 011
    User................ "ALEREMOTE"
    Language key........ "E"
    Transaction......... " "
    Program............. "GP31VIZWJDTT90894L1IA5YAC7G"
    Screen.............. "SAPMSSY0 1000"
    Screen line......... 6
    Information on where terminated
    The termination occurred in the ABAP program "GP31VIZWJDTT90894L1IA5YAC7G" in
    "TRANSFER_ALL".
    The main program was "RSPROCESS ".
    The termination occurred in line 573 of the source code of the (Include)
    program "GP31VIZWJDTT90894L1IA5YAC7G"
    of the source code of program "GP31VIZWJDTT90894L1IA5YAC7G" (when calling the
    editor 5730).
    The program "GP31VIZWJDTT90894L1IA5YAC7G" was started as a background job.
    Job name........ "BI_PROCESS_COMPRESS"
    Job initiator... "ALEREMOTE"
    Job number...... 12185102
    Processing was terminated because the exception "CX_SY_NATIVE_SQL_ERROR"
    occurred in the
    procedure "TRANSFER_ALL" "(FORM)" but was not handled locally, not declared in
    the
    RAISING clause of the procedure.
    The procedure is in the program "GP31VIZWJDTT90894L1IA5YAC7G ". Its source code
    starts in line 557
    of the (Include) program "GP31VIZWJDTT90894L1IA5YAC7G ".
    Source Code Extract
    Line
    SourceCde
    543
    ENDIF.
    544
    545
    COMMIT WORK.   " commit and close cursors
    546
    547
    l_str = i_max_requid.
    548
    PERFORM msg_append(saplrscondense)
    549
    USING    'S' '355' l_str space space space
    550
    CHANGING c_t_msg.
    551
    552
    ENDFORM.                               " CONDENSE_FACTTABLE_NEW
    553
    554
    555
         Form  TRANSFER_ALL
    556
    557
    FORM TRANSFER_ALL USING i_ref_update       TYPE rs_bool
    558
    i_pdimid           TYPE I
    559
    i_pdimid_ref_point TYPE rsd_sid
    560
    i_pdimid_normal    TYPE rsd_sid
    561
    i_recordtp         TYPE rsd_sid
    562
    CHANGING e_ref_ins_cnt TYPE I
    563
    e_ins_cnt     TYPE I
    564
    c_t_msg       TYPE rs_t_msg.
    565
    566
    CALL FUNCTION 'RSDU_INFOCUBE_INDEXES_DROP'
    567
    EXPORTING
    568
    I_INFOCUBE = 'ZPSD_C03'
    569
    I_FACTTAB  = '/BIC/EZPSD_C03'.
    570
    571
    572
    EXEC SQL.
    >>>>>
    INSERT INTO "/BIC/EZPSD_C03"
    574
    ( "KEY_ZPSD_C03P"
    575
    , "KEY_ZPSD_C03T"
    576
    , "KEY_ZPSD_C03U"
    577
    , "KEY_ZPSD_C031"
    578
    , "KEY_ZPSD_C032"
    579
    , "KEY_ZPSD_C033"
    580
    , "KEY_ZPSD_C034"
    581
    , "/BIC/ZNET_ASP"
    582
    583
    SELECT :i_pdimid_normal
    584
    , F."KEY_ZPSD_C03T"
    585
    , F."KEY_ZPSD_C03U"
    586
    , F."KEY_ZPSD_C031"
    587
    , F."KEY_ZPSD_C032"
    588
    , F."KEY_ZPSD_C033"
    589
    , F."KEY_ZPSD_C034"
    590
    , SUM( F."/BIC/ZNET_ASP" )
    591
    FROM "/BIC/FZPSD_C03" F
    592
    WHERE F."KEY_ZPSD_C03P" = :i_pdimid
    Any thoughts would be helpful,
    Thanks,
    David

    This error usually occurs when there is a database lock or no space in teh database. Got DB02 and Click on Space critical objects to see whether any entries are there. If yes contact your basis to increase the space.
    Hope this helps
    Thanks,
    Satish

  • "Save" Dialog box always opens in different sizes

    Since I upgraded to Mountain Lion, whenever I "Save" the dialog box comes up in different configurations.  Sometimes the folders section is really wide and sometimes very thin.  I usually can't see the full names of the files in the default folder and have to resize the box before browsing where to save the file. Also, the file name window at the top is too short to see all of the file name I'm working on if it's a long file name. Is there anyway to customize the "Save" dialog box for either or both ot these issues?
    I'm on a Macbook PRO (2011).
    - Mike

    YOu should be able to drag the window from the bottom right to size it. That size should stick when you save the next time. You may have to adjust it seperately for different applications.
    If it doesn't save try rebuilding Finder prefs
    Go to your Finder "Go" menu hold the option key and choose Library. Then go to Preferences folder and trash this file:
    com.apple.finder.plist
    Then, restart, or log out and in again.
    (You will have to reset a few finder prefs the way you like them.)

Maybe you are looking for