Header with Gui_download

Hi,
I am downloading the data into excel using GUI_DOWNLOAD.
I have header information. When i checked the data the header information is condensing with respect to data.
Even i increased the length specification still it is condensing with respect to data. I have used File Type as DBF becuase ASC is not working.
I would like to have without condensing the descriptions.
Is there any alternative to download the datawithout this FM or any class available.
Please do the needful ASAP.
Thanks,
Krishna.

Hi Try this...
    PERFORM SET_IS_LIST_DOWNLOAD(SAPLGRAP) USING 'x'.
    PERFORM GET_LISTLEVEL_TABLES USING
                                 PAGES[]
                                 LIST[]
                                 FMBS[]
                                 FMBX[]
                                 FSEL[]
                                 LIST_INDEX.
    CALL FUNCTION 'LIST_CONVERT_TO_DAT'
      TABLES
        LIST = LIST[]
        FMBS = FMBS[]
        FMBX = FMBX[]
        FSEL = FSEL[].
    PERFORM SET_IS_LIST_DOWNLOAD(SAPLGRAP) USING ' '.
FORM SET_IS_LIST_DOWNLOAD USING TAG TYPE C.
GLOBAL_IS_LIST_DOWNLOAD = TAG.
ENDFORM.
form get_listlevel_tables using
                           pages    type slist_pagedescr_tab
                           lines    type slist_list_tab
                           fmbs     type slist_fmbs_tab
                           fmbx     type slist_fmbs_tab
                           fsel     type slist_fsel_tab
                           list_index type i.
data: stack type slist_listlevel_stack with header line,
        listlevel type slist_listlevel.
data tab_index_liststack type i.
field-symbols: <tabh>.
if list_index < 0.
    raise list_index_invalid.
endif.
system-call load listlevel-stack into stack.
tab_index_liststack = list_index + 1.
read table stack index tab_index_liststack into listlevel
                                 transporting listobject-listtab
                                              listobject-fmbstab
                                              listobject-fmbxtab
                                              listobject-fseltab
                                              listobject-pagetab.
if sy-subrc <> 0.
    raise list_index_invalid.
endif.
system-call assign lines[] to <tabh> type 'X'.
<tabh> = listlevel-listobject-listtab.
system-call assign fmbs[] to <tabh> type 'X'.
<tabh> = listlevel-listobject-fmbstab.
system-call assign fmbx[] to <tabh> type 'X'.
<tabh> = listlevel-listobject-fmbxtab.
system-call assign fsel[] to <tabh> type 'X'.
<tabh> = listlevel-listobject-fseltab.
system-call assign pages[] to <tabh> type 'X'.
<tabh> = listlevel-listobject-pagetab.
endform.                    "GET_LISTLEVEL_TABLES
FORM SET_IS_LIST_DOWNLOAD USING TAG TYPE C.
GLOBAL_IS_LIST_DOWNLOAD = TAG.
ENDFORM.
Thanks,
Gaurav J.

Similar Messages

Download a zip file with gui_download = CRC error

Hello erverybody,
I download a zip compressed file with gui_download (cl_gui_interface_services) in binary mode.
When I try to open it, I have a crc error. Does anybody has any idea why?
here the code:
       TYPES: begin of t_zip,
             text(1024) type c,
             end of t_zip.
      DATA: itab_zip type table of t_zip,
            wa_zip type t_zip.
      OPEN DATASET p_fileon IN BINARY MODE FOR INPUT.
      IF sy-subrc <> 0.
        MESSAGE text-e01 TYPE 'E'.
      ENDIF.
      DO.
        READ DATASET p_fileon INTO wa_zip MAXIMUM LENGTH 1024.
        APPEND wa_zip TO itab_zip.
        IF sy-subrc <> 0.
          EXIT.
        ENDIF.
      ENDDO.
      CLOSE DATASET p_fileon.
      MOVE p_filedw TO filename.
      CALL METHOD cl_gui_frontend_services=>gui_download
        EXPORTING
          filename                  = filename
          FILETYPE                  = 'BIN'
        CHANGING
          data_tab                  = itab_zip
Thanks
Joachim

Hi Joachim,
1. use this code (just copy paste in new program)
2. It will download from SERVER to front-end.
3.
*& Report YBCR_FILEDOWNLOAD                                           *
REPORT ybcr_filedownload                       .
DATA
DATA : file_name TYPE string.
DATA : BEGIN OF itab OCCURS 0,
       ln(255) TYPE c,
       END OF itab.
SCREEN
SELECTION-SCREEN BEGIN OF BLOCK b1 WITH FRAME TITLE text-001.
PARAMETERS : appfn(150) TYPE c LOWER CASE OBLIGATORY.
PARAMETERS : p_file LIKE rlgrap-filename OBLIGATORY.
SELECTION-SCREEN END OF BLOCK b1.
AT SELECTION SCREEN
AT SELECTION-SCREEN ON VALUE-REQUEST FOR p_file.
CLEAR p_file.
CALL FUNCTION 'F4_FILENAME'
    IMPORTING
      file_name = p_file.
file_name = p_file.
START-OF-SELECTION
START-OF-SELECTION.
OPEN DATASET appfn FOR INPUT IN TEXT MODE ENCODING DEFAULT .
IF sy-subrc <> 0.
    MESSAGE s999(yhr) WITH 'COULD NOT OPEN FILE ON APP SERVER'.
    LEAVE LIST-PROCESSING.
ENDIF.
DO.
    READ DATASET appfn INTO itab.
    IF sy-subrc = 0.
      APPEND itab.
    ELSE.
      EXIT.
    ENDIF.
ENDDO.
file_name = p_file.
CALL FUNCTION 'GUI_DOWNLOAD'
    EXPORTING
BIN_FILESIZE                    =
      filename                        = file_name
FILETYPE                        = 'ASC'
APPEND                          = ' '
WRITE_FIELD_SEPARATOR           = ' '
HEADER                          = '00'
TRUNC_TRAILING_BLANKS           = ' '
WRITE_LF                        = 'X'
COL_SELECT                      = ' '
COL_SELECT_MASK                 = ' '
DAT_MODE                        = ' '
CONFIRM_OVERWRITE               = ' '
NO_AUTH_CHECK                   = ' '
CODEPAGE                        = ' '
IGNORE_CERR                     = ABAP_TRUE
REPLACEMENT                     = '#'
WRITE_BOM                       = ' '
TRUNC_TRAILING_BLANKS_EOL       = 'X'
WK1_N_FORMAT                    = ' '
WK1_N_SIZE                      = ' '
WK1_T_FORMAT                    = ' '
WK1_T_SIZE                      = ' '
IMPORTING
FILELENGTH                      =
    TABLES
      data_tab                        = itab
FIELDNAMES                      =
EXCEPTIONS
FILE_WRITE_ERROR                = 1
NO_BATCH                        = 2
GUI_REFUSE_FILETRANSFER         = 3
INVALID_TYPE                    = 4
NO_AUTHORITY                    = 5
UNKNOWN_ERROR                   = 6
HEADER_NOT_ALLOWED              = 7
SEPARATOR_NOT_ALLOWED           = 8
FILESIZE_NOT_ALLOWED            = 9
HEADER_TOO_LONG                 = 10
DP_ERROR_CREATE                 = 11
DP_ERROR_SEND                   = 12
DP_ERROR_WRITE                  = 13
UNKNOWN_DP_ERROR                = 14
ACCESS_DENIED                   = 15
DP_OUT_OF_MEMORY                = 16
DISK_FULL                       = 17
DP_TIMEOUT                      = 18
FILE_NOT_FOUND                  = 19
DATAPROVIDER_EXCEPTION          = 20
CONTROL_FLUSH_ERROR             = 21
OTHERS                          = 22
IF sy-subrc <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
        WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
regards,
amit m.

Replacing download with gui_download

Hi,
as part of upgradation i am trying to replace Download fm with Gui_download but the problem is in download function i have exp parameter filemask_mask but its not available in gui_download. Is there any way to down load? Please help me out!!
Thanks and Reg,
Archana
Edited by: archana pakanati on Feb 9, 2009 8:14 AM

Hi,
Refer to the following code:
*& Report ZDOWNLOAD_PROGRAM
report zdownload_program.
parameter : p_path type rlgrap-filename default 'C:\Pdata.xls'.
data : gt_output   type standard table of trdirt,
       wa_output   type trdirt,
       p_filen     type string.
at selection-screen on value-request for p_path.
clear p_path.
call function 'F4_FILENAME'
    importing
      file_name = p_path.
start-of-selection.
select * from trdirt
           into table gt_output
           where name like 'Z%'
              or name like 'Y%'.
end-of-selection.
move : p_path to p_filen.
call function 'GUI_DOWNLOAD'
    exporting
BIN_FILESIZE                    =
      filename                        = p_filen
   filetype                        = 'ASC'
APPEND                          = ' '
   write_field_separator           =
cl_abap_char_utilities=>horizontal_tab
HEADER                          = '00'
TRUNC_TRAILING_BLANKS           = ' '
WRITE_LF                        = 'X'
COL_SELECT                      = ' '
COL_SELECT_MASK                 = ' '
DAT_MODE                        = ' '
CONFIRM_OVERWRITE               = ' '
NO_AUTH_CHECK                   = ' '
CODEPAGE                        = ' '
IGNORE_CERR                     = ABAP_TRUE
REPLACEMENT                     = '#'
WRITE_BOM                       = ' '
TRUNC_TRAILING_BLANKS_EOL       = 'X'
WK1_N_FORMAT                    = ' '
WK1_N_SIZE                      = ' '
WK1_T_FORMAT                    = ' '
WK1_T_SIZE                      = ' '
WRITE_LF_AFTER_LAST_LINE        = ABAP_TRUE
IMPORTING
FILELENGTH                      =
    tables
      data_tab                        = gt_output
FIELDNAMES                      =
   exceptions
     file_write_error                = 1
     no_batch                        = 2
     gui_refuse_filetransfer         = 3
     invalid_type                    = 4
     no_authority                    = 5
     unknown_error                   = 6
     header_not_allowed              = 7
     separator_not_allowed           = 8
     filesize_not_allowed            = 9
     header_too_long                 = 10
     dp_error_create                 = 11
     dp_error_send                   = 12
     dp_error_write                  = 13
     unknown_dp_error                = 14
     access_denied                   = 15
     dp_out_of_memory                = 16
     disk_full                       = 17
     dp_timeout                      = 18
     file_not_found                  = 19
     dataprovider_exception          = 20
     control_flush_error             = 21
     others                          = 22
if sy-subrc <> 0.
message id sy-msgid type sy-msgty number sy-msgno
         with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
Regards
Rajesh Kumar

Is there a way to create a heading with shading behind the text and thin lines above and below?

I'm working with InDesign CS6, Windows 7.
Is there a way, using paragraph rules, to create a heading with shading behind the text and thin lines above and below the text?
I'd like to create headings that look like these:
Thank you!

I have a document where I almost do such, but without the fill. I use a Head Style which Spans Columns for this instance; it allows the haeds to flow and fill the width.
Paragraph Rules above and below are turned on with plenty of offset.
I tweaked my setting to accomodate your need - It required only one instance, not above and below, and changing the stroke to a double stroke.
It may be necessary to create a custom stroke to modify the proportion of stroke vs fill. There is a difference of thin-thin and thick-thick, neither of which seemed perfect but might be dependent on the Character height.
Creating custom strokes is accomplished via the Strokes Panel.

Do I need to have my site uploaded to a remote host for embeded formscentral form to work? I am getting a broken section of header with a warning sign on top corner saying "!Local host." Cheers

Hey there all.
I am wondering if there is something wrong with my embedded form or if it is simply because
I have not uploaded my site to remote host yet? I am only getting a broken part of the header with
no actual form, with a warning "!local host" in top left hand corner. If anyone could enlighten
me on this problem it would be greatly appreciated, it is my first time making forms

Cheers, I noticed some browsers were treating the form differently. I am uploading to a test server tomorrow, hopefully all goes well, thanks for your reply

How to assgn charge head with GL and Sales order

Dear Exparts'
I am a new user of SD module .I have created a charge head but stuck in GL assignment and Assign the charge head with Sales order.(sales order is already created)
Can any one tell me any direct transaction code or SPRO for the said problem.
Yeasin

hi,
maintain condition type kf00 in pricing procedure and assign G/L account, maintain the condition record in vk11,now goto sales order change(va02),goto contion tab and press update,new pricing will be carried out
regards
senya

Issue with gui_download function module

Hi All,
         I have an issue with gui_download function module that it is creating one extra line while downloading my internal table data into text file,which i donot want.i have searched for various threads but couldnot get the proper reply.Or please provide me some other Function Module which will not create one extra line.Please help.

part 2
INCLUDE RPPPXD00.
DATA : BEGIN OF COMMON PART A.
INCLUDE RPPPXD10.
DATA : END OF COMMON PART.
INCLUDE PC2RXTW0.
INCLUDE RPC2RX00.
DATA : BEGIN OF COMMON PART B.
INCLUDE RPC2CD00.
DATA : END OF COMMON PART.
INCLUDE RPPPXM00.
INCLUDE RPCMGR00.
AT SELECTION-SCREEN OUTPUT.
CONCATENATE SY-DATUM2(6) SY-UZEIT0(4) INTO REF_NO.
LOOP AT SCREEN.
    IF R1 = 'X'.
      IF SCREEN-NAME = 'FLN' OR SCREEN-NAME = '%_FLN_%_APP_%-TEXT' OR
         SCREEN-NAME = 'BTC' OR SCREEN-NAME = '%_BTC_%_APP_%-TEXT' OR
        SCREEN-NAME = 'PY_DT' OR SCREEN-NAME = '%_PY_DT_%_APP_%-TEXT'"SOC BY ANKITA"
       OR SCREEN-NAME = 'ORG_ID' OR SCREEN-NAME = '%_ORG_ID_%_APP_%-TEXT'
       OR SCREEN-NAME = 'ORG_AC' OR SCREEN-NAME = '%_ORG_AC_%_APP_%-TEXT'
       OR SCREEN-NAME = 'DEPT_CD' OR SCREEN-NAME = '%_DEPT_CD_%_APP_%-TEXT'
       OR SCREEN-NAME = 'REF_NO' OR SCREEN-NAME = '%_REF_NO_%_APP_%-TEXT'
       OR SCREEN-NAME = 'PRS_BNK' OR SCREEN-NAME = '%_PRS_BNK_%_APP_%-TEXT'
       OR SCREEN-NAME = 'TRANS_TY' OR SCREEN-NAME = '%_TRANS_TY_%_APP_%-TEXT'
       OR SCREEN-NAME = 'TRANS_ID' OR SCREEN-NAME = '%_TRANS_ID_%_APP_%-TEXT'
       OR SCREEN-NAME = 'TRANS_RK' OR SCREEN-NAME = '%_TRANS_RK_%_APP_%-TEXT'."EOC BY ANKITA
        SCREEN-ACTIVE = 0.
      ENDIF.
    ENDIF.
    IF R2 = 'X'.
      IF SCREEN-NAME = 'FLN' OR SCREEN-NAME = '%_FLN_%_APP_%-TEXT' OR
         SCREEN-NAME = 'BTC' OR SCREEN-NAME = '%_BTC_%_APP_%-TEXT' OR
         SCREEN-NAME = 'PREPBY' OR SCREEN-NAME = '%_PREPBY_%_APP_%-TEXT'
         OR SCREEN-NAME = 'APROBY' OR SCREEN-NAME = '%_APROBY_%_APP_%-TEXT'
         OR SCREEN-NAME = 'PY_DT' OR SCREEN-NAME = '%_PY_DT_%_APP_%-TEXT' "SOC BY ANKITA
         OR SCREEN-NAME = 'ORG_ID' OR SCREEN-NAME = '%_ORG_ID_%_APP_%-TEXT'
         OR SCREEN-NAME = 'ORG_AC' OR SCREEN-NAME = '%_ORG_AC_%_APP_%-TEXT'
         OR SCREEN-NAME = 'DEPT_CD' OR SCREEN-NAME = '%_DEPT_CD_%_APP_%-TEXT'
         OR SCREEN-NAME = 'REF_NO' OR SCREEN-NAME = '%_REF_NO_%_APP_%-TEXT'
         OR SCREEN-NAME = 'PRS_BNK' OR SCREEN-NAME = '%_PRS_BNK_%_APP_%-TEXT'
         OR SCREEN-NAME = 'TRANS_TY' OR SCREEN-NAME = '%_TRANS_TY_%_APP_%-TEXT'
         OR SCREEN-NAME = 'TRANS_ID' OR SCREEN-NAME = '%_TRANS_ID_%_APP_%-TEXT'
         OR SCREEN-NAME = 'TRANS_RK' OR SCREEN-NAME = '%_TRANS_RK_%_APP_%-TEXT'."EOC BY ANKITA
        SCREEN-ACTIVE = 0.
      ENDIF.
    ENDIF.
    IF R3 = 'X'.
      IF SCREEN-NAME = 'PREPBY' OR SCREEN-NAME = '%_PREPBY_%_APP_%-TEXT'
        OR SCREEN-NAME = 'APROBY' OR SCREEN-NAME = '%_APROBY_%_APP_%-TEXT'
        OR SCREEN-NAME = 'PY_DT' OR SCREEN-NAME = '%_PY_DT_%_APP_%-TEXT' "SOC BY ANKITA
        OR SCREEN-NAME = 'ORG_ID' OR SCREEN-NAME = '%_ORG_ID_%_APP_%-TEXT'
        OR SCREEN-NAME = 'ORG_AC' OR SCREEN-NAME = '%_ORG_AC_%_APP_%-TEXT'
        OR SCREEN-NAME = 'REF_NO' OR SCREEN-NAME = '%_REF_NO_%_APP_%-TEXT'
        OR SCREEN-NAME = 'DEPT_CD' OR SCREEN-NAME = '%_DEPT_CD_%_APP_%-TEXT'
        OR SCREEN-NAME = 'PRS_BNK' OR SCREEN-NAME = '%_PRS_BNK_%_APP_%-TEXT'
        OR SCREEN-NAME = 'TRANS_TY' OR SCREEN-NAME = '%_TRANS_TY_%_APP_%-TEXT'
        OR SCREEN-NAME = 'TRANS_ID' OR SCREEN-NAME = '%_TRANS_ID_%_APP_%-TEXT'
        OR SCREEN-NAME = 'TRANS_RK' OR SCREEN-NAME = '%_TRANS_RK_%_APP_%-TEXT'."EOC BY ANKITA
        SCREEN-ACTIVE = 0.
      ENDIF.
    ENDIF.
    IF R4 = 'X'.
      IF SCREEN-NAME = 'PREPBY' OR SCREEN-NAME = '%_PREPBY_%_APP_%-TEXT'"SOC BY ANKITA
         OR SCREEN-NAME = 'APROBY' OR SCREEN-NAME = '%_APROBY_%_APP_%-TEXT'
         OR SCREEN-NAME = 'BTC' OR SCREEN-NAME = '%_BTC_%_APP_%-TEXT'."EOC BY ANKITA
        SCREEN-ACTIVE = 0.
      ENDIF.
    ENDIF.
    MODIFY SCREEN.
ENDLOOP.
START-OF-SELECTION.
SELECT SINGLE * FROM T549Q WHERE PERMO = '01'
                             AND   PABRJ = PRD+0(4)
                             AND   PABRP = PRD+4(2).
FR_DT = T549Q-BEGDA.
TO_DT = T549Q-ENDDA.
CONCATENATE FR_DT0(4) FR_DT4(2) INTO FR_P.
CONCATENATE TO_DT0(4) TO_DT4(2) INTO TO_P.
PN-PAPER = PRD.
PN-PERMO = '01'.
GET PERNR.
RP-PROVIDE-FROM-LAST P0003 SPACE PN-BEGDA PN-ENDDA.
RP_PROVIDE_FROM_LAST P0001 SPACE PN-BEGDA PN-ENDDA.
IF PNP-SW-FOUND EQ 1.
   SN = SN + 1.
   ITAB1-SNO = SN.
   ITCC-SNO = SN.
    ITAB1-ENO = PERNR-PERNR.
    ITAB1-NAM = PERNR-ENAME.
ELSE.
    REJECT.
ENDIF.
RP-INIT-BUFFER.
RP-SEL-CALC.
CALL FUNCTION 'RP_EVALUATION_PERIODS'
    EXPORTING
      LAST_CALCULATED_DAY = P0003-ABRDT
      LAST_DAY_IN_PERIOD = TO_DT
      RETROCALCULATED_DAY = RP-SEL-CALC-RRDAT
    TABLES
      DIR                 = RGDIR
      EVP                 = EVP
    EXCEPTIONS
      RGDIR_EMPTY         = 1
      INTERNAL_ERROR      = 2
      OTHERS              = 3.
DESCRIBE TABLE EVP LINES LIN.
IF LIN > 0.
    LOOP AT EVP.
      IF EVP-IAPER = TO_P AND EVP-PAPER = TO_P.
        RX-KEY-PERNR = PERNR-PERNR.
        UNPACK EVP-SEQNR TO RX-KEY-SEQNO.
        RP-IMP-C2-TN.
        READ TABLE BT INDEX 1.
        READ TABLE WPBP INDEX 1.
        READ TABLE TAX INDEX 1."CHANGES BY ANKITA
        ITAB1-BAC = BT-BANKN.
        ITAB1-BKEY = BT-BANKL .
        ITAB1-DEP = WPBP-KOSTL.
        ITAB1-BETRG = BT-BETRG."CHANGES BY ANKITA
        ITAB1-TAXID = TAX-TAXID."CHANGES BY ANKITA
        YEAR = VERSC-PAYDT+0(4) - 11.
        MONTH = VERSC-PAYDT+4(2).
        DAY = VERSC-PAYDT+6(2).
        CONCATENATE YEAR MONTH DAY INTO ITAB1-PDT.
       ITAB1-PDT = VERSC-PAYDT - 110000.
        ITCC-DEP = WPBP-KOSTL.
        LOOP AT RT WHERE LGART = '/559'.
          ITAB1-BTFR = RT-BETRG.
          ITCC-BTFR = RT-BETRG.
         IF EVP-SRTZA = 'P'.
           ITAB1-BTFR = ITAB1-BTFR - RT-BETRG.
         ELSE.
           ITAB1-BTFR = ITAB1-BTFR + RT-BETRG.
         ENDIF.
        ENDLOOP.
      ENDIF.
    ENDLOOP.
ENDIF.
APPEND: ITAB1, ITCC.
CLEAR: ITAB1, ITCC.
END-OF-SELECTION.
CONCATENATE 'Prepared By:' ` ` PREPBY INTO PREPBY.
CONCATENATE 'Approved By:' ` ` APROBY INTO APROBY.
IF R1 = 'X'.
    FORMAT COLOR 2.
    ULINE (127).
    NEW-LINE.
    WRITE: 2 'Sr No.', 10 'Emp Num', 27 'Name'.
    WRITE: 57 'Department'.
    WRITE: 72 ' Transfer Amount' RIGHT-JUSTIFIED.
    WRITE: 92 'Bank Key', 107 'Bank AC. Number'.
    WRITE:1 '|', 8 '|', 25 '|', 55 '|', 70 '|', 90 '|', 105 '|', 127 '|'.
    NEW-LINE.
    ULINE (127).
    NEW-LINE.
    FORMAT COLOR OFF.
    LOOP AT ITAB1.
      SN = SY-TABIX.
      WRITE: 2 SN, 10 ITAB1-ENO, 27 ITAB1-NAM.
      WRITE: 57 ITAB1-DEP.
      WRITE: 72 ITAB1-BTFR.
      WRITE: 92 ITAB1-BKEY, 107 ITAB1-BAC.
      WRITE: 1 '|', 8 '|', 25 '|', 55 '|', 70 '|', 90 '|', 105 '|', 127 '|'.
      ULINE (127).
      NEW-LINE.
    ENDLOOP.
    SKIP 4.
    ULINE 90(32).
    NEW-LINE.
    WRITE: 90 PREPBY.
    SKIP 4.
    ULINE 90(32).
    NEW-LINE.
    WRITE: 90 APROBY.
ENDIF.
IF R2 = 'X'.
    LOOP AT ITCC.
      COLLECT ITCC INTO ITCOL.
    ENDLOOP.
    FORMAT COLOR 2.
    ULINE (44).
    NEW-LINE.
    WRITE:2 'Sr No.', 9 'Department'.
    WRITE: 27 'Transfer Amount ' RIGHT-JUSTIFIED.
    WRITE:1 '|', 8 '|', 25 '|', 44 '|'.
    NEW-LINE.
    ULINE (44).
    NEW-LINE.
    FORMAT COLOR OFF.
    LOOP AT ITCOL.
      SN = SY-TABIX.
      WRITE: 2 SN, 9 ITCOL-DEP, 27 ITCOL-BTFR.
      WRITE:1 '|', 8 '|', 25 '|', 44 '|'.
      NEW-LINE.
      ULINE (44).
      NEW-LINE.
    ENDLOOP.
ENDIF.
IF R3 = 'X'.
    LOOP AT ITAB1.
      CLEAR: ITTF, P3, P11, P13, P6, V_BAC.
      LEN = STRLEN( ITAB1-BKEY ).
      IF LEN < 3.
        CONCATENATE ITAB1-BKEY '***' INTO P3.
      ELSE.
      LEN = LEN - 3.
        LEN = 3.
        P3 = ITAB1-BKEY+LEN(3).
      ENDIF.
      CLEAR LEN.
      V_BAC = ITAB1-BAC.
      REPLACE ALL OCCURRENCES OF '-' IN ITAB1-BAC WITH ''.
      CONDENSE ITAB1-BAC NO-GAPS.
      LEN = STRLEN( ITAB1-BAC )."if length of acc num > limit
      IF LEN > 11.
        IT_FAIL-EN = ITAB1-ENO.
        IT_FAIL-BA = V_BAC.
        APPEND IT_FAIL.
        CLEAR: IT_FAIL.
        CONTINUE.
      ENDIF.
      P11 = ITAB1-BAC.
      CONCATENATE P11 '***********' INTO P11.
above step is for putting '' in place of unfilled chars of P11.
      P13 = ITAB1-BTFR * 100.
      P6 = ITAB1-PDT+2(6).
      CONCATENATE ` ` P3 P11 BTC P13 P6 INTO STR.
      ITTF-ROW = STR.
      APPEND ITTF.
    ENDLOOP.
    IF ITTF[] IS NOT INITIAL.
      CONCATENATE FLN SY-DATUM SY-UZEIT '.txt' INTO FILEPATH.
      CALL FUNCTION 'GUI_DOWNLOAD'
      EXPORTING
        FILENAME                        = FILEPATH
        FILETYPE                        = 'ASC'
     WRITE_FIELD_SEPARATOR           = 'X'
        TABLES
        DATA_TAB                        = ITTF
     OTHERS                          = 22
      SKIP 2.
      IF SY-SUBRC <> 0.
        WRITE:/ 'Unable to Download file at ', FILEPATH.
      ELSE.
        WRITE:/ 'File with following data downloaded at ', FILEPATH.
        NEW-LINE.
        SKIP 2.
        LOOP AT ITTF.
          WRITE:/ ITTF.
        ENDLOOP.
      ENDIF.
    ELSE.
      WRITE 'No Data, no file was downloaded'.
    ENDIF.
    IF IT_FAIL[] IS NOT INITIAL.
      SKIP 2.
      FORMAT COLOR 2.
      WRITE 'Acc. No. of following employees exceeded the length limit'.
      WRITE:/ 'So their entry was not created in the file'.
      SKIP 1.
      WRITE : 'Employee Number', 20 'Bank Acc. No.'.
      FORMAT COLOR OFF.
      LOOP AT IT_FAIL.
        NEW-LINE.
        WRITE : IT_FAIL-EN, 20 IT_FAIL-BA.
      ENDLOOP.
    ENDIF.
ENDIF.
IF R4 = 'X'."CHANGES BY ANKITA
    WRITE:/ 'ERROR LOG - BANK A/C NO. CONTAINS ALPHANUMERIC'.
    WRITE:/ 'EMPID' COLOR COL_POSITIVE,12 '|',15 'Receiving Bank Code' COLOR COL_POSITIVE,
                                                                  40 '|','Receiver A/C No' COLOR COL_POSITIVE.
    PERFORM EXTRACT_DATA.
    SKIP 2.
ENDIF."EOC
RP-READ-PAYROLL-DIR.
Edited by: ANKITA BHARDWAJ on Dec 9, 2009 10:36 AM

CONTROL_FLUSH_ERROR with GUI_DOWNLOAD

Dear All
My report throws "CONTROL_FLUSH_ERROR with GUI_DOWNLOAD "   even though i am using it in foreground .
Any help will be rewarded .
Regards
Jaman

Check out this thread
https://forums.sdn.sap.com/click.jspa?searchID=875715&messageID=2952760
You will get "CONTROL_FLUSH_ERROR " error when there is some problem with SAP GUI. Check your Gui installation and if possible uninstall the exixting GUI and reinstall the new GUI from fresh.
or use
   CALL METHOD cl_gui_frontend_services=>gui_download
      EXPORTING
        bin_filesize = l_xml_size
        filename     = 'c:tempflights.xml'
        filetype     = 'BIN'
      CHANGING
        data_tab     = l_xml_table
      EXCEPTIONS
        OTHERS       = 24.
    IF sy-subrc <> 0.
      MESSAGE ID sy-msgid TYPE sy-msgty NUMBER sy-msgno
                 WITH sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
    ENDIF.
Regards,
Santosh

How create header with user id time date to VC-report's output as display ?

How create header with user id time date to VC-report's output as display ?
This info should come from the VC - not all the way from R3-side via FunctionModule/BABI. So only userid, date, time to output as normal text (which is not editable of course). Thanks =)

Hi ann-mari
Go through following link may it help u
Form Item disabled based on portal role
/people/community.user/blog/2007/01/17/visual-composer-explorations-using-portal-roles-to-influence-ui-element-behavior
https://www.sdn.sap.com/irj/sdn/wiki?path=/display/vc/usingrolestoinfluenceapplication&
https://www.sdn.sap.com/irj/sdn/wiki?path=/display/vc/passingvaluesvia+URL&
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/docs/library/uuid/ad182ac7-0a01-0010-4fb8-8a4d217b19c1
Best Regards
````Satish````

I want to cut out a head from a photo and insert it into another photo again. In the head hair flying in the wind and the blue sky can be seen between the hairs. This blue sky I want to remove, so I can only use the head with hair flying in another photo.

I want to cut out a head from a photo and insert it into another photo again. In the head hair flying in the wind and the blue sky can be seen between the hairs. This blue sky I want to remove, so I can only use the head with hair flying in another photo. Is it possible to simply delete this blue color of the sky?

Make your selection and then use Refine Edge.
See this video tutorial from Bob Gager.
https://www.youtube.com/watch?v=xrl3Qwg6zSc

JTable - Check box in column header with sorting

Hello
I have 3 problems/questions.
1. When adding sorting to a table with
setAutoCreateRowSorter(true);and you click on a column header, normally a sorting arrow will appear, and indicate in what direction its sorting,
but in the column head with the checkbox, even though the sorting works, the arrow will never appear. Is there anyway to fix this?
2. Is there anyway to get the checkboxes in the table cells to be aligned left (I dont mean the columnheader checkbox, but the ones below)?
3. When you click on the columnheader to either sort or check the checkbox, you will have to wait about a second between each click, or else it won't react and won't sort. sometimes you will have to click twice for it to react. If you click a lot of times fast, then it won't react until you stop for a second, and click again, though it will react only on the first click, but not the secont, third, fourh, and so on, until you stop for a second. Is there anyway to fix this, or atleast make it have a better reaction time?
This is the code for creating the table:
public class Example extends JFrame{
    private Container container;
    private JTable exampleTable;
    public Example(){
        container = getContentPane();
        ExamleTableModel examleTableModel = new ExamleTableModel();
        exampleTable = new JTable(examleTableModel);
        TableColumn tc = exampleTable.getColumnModel().getColumn(0);
        tc.setCellEditor(exampleTable.getDefaultEditor(Boolean.class));
        tc.setCellRenderer(exampleTable.getDefaultRenderer(Boolean.class));
        tc.setHeaderRenderer(new CheckBoxHeader(new MyItemListener()));
        container.add(new JScrollPane(exampleTable), BorderLayout.SOUTH);
        exampleTable.setAutoCreateRowSorter(true);
        setDefaultCloseOperation( JFrame.EXIT_ON_CLOSE );
        this.pack();
        setSize(500,500);
        setVisible(true);
    }This is the code for the checkboxheader:
    class MyItemListener implements ItemListener
            public void itemStateChanged(ItemEvent e) {
                Object source = e.getSource();
                if (source instanceof AbstractButton == false) return;
                boolean checked = e.getStateChange() == ItemEvent.SELECTED;
                for(int a = 0, b = exampleTable.getRowCount(); a < b; a++) {
                    for(int c = 0, d = exampleTable.getRowCount(); c < d; c++) {
                        if(exampleTable.getColumnName(c).equals("")){
                            exampleTable.setValueAt(new Boolean(checked),a,c);
    class CheckBoxHeader extends JCheckBox
        implements TableCellRenderer, MouseListener {
        protected CheckBoxHeader rendererComponent;
        protected int column;
        protected boolean mousePressed = false;
        public CheckBoxHeader(ItemListener itemListener) {
            rendererComponent = this;
            this.setHorizontalAlignment(JLabel.LEFT);
            rendererComponent.addItemListener(itemListener);
        public Component getTableCellRendererComponent(
                JTable table, Object value,
                boolean isSelected, boolean hasFocus, int row, int column) {
            if (table != null) {
                JTableHeader header = table.getTableHeader();
                if (header != null) {
                    rendererComponent.setForeground(header.getForeground());
                    rendererComponent.setBackground(header.getBackground());
                    rendererComponent.setFont(header.getFont());
                    header.addMouseListener(rendererComponent);
            setColumn(column);
            rendererComponent.setText("");
            setBorder(UIManager.getBorder("TableHeader.cellBorder"));
            return rendererComponent;
        protected void setColumn(int column){this.column = column;}
        public int getColumn(){return column;}
        protected void handleClickEvent(MouseEvent e) {
            if (mousePressed) {
                mousePressed=false;
                JTableHeader header = (JTableHeader)(e.getSource());
                JTable tableView = header.getTable();
                TableColumnModel columnModel = tableView.getColumnModel();
                int viewColumn = columnModel.getColumnIndexAtX(e.getX());
                int column = tableView.convertColumnIndexToModel(viewColumn);
                if (viewColumn == this.column && e.getClickCount() == 1 && column != -1) {
                    doClick();
        public void mouseClicked(MouseEvent e) {
            boolean active=true;
            JTableHeader header = (JTableHeader)(e.getSource());
            switch (e.getID()) {
            case MouseEvent.MOUSE_CLICKED:
            case MouseEvent.MOUSE_PRESSED:
            case MouseEvent.MOUSE_RELEASED:
                JTable tableView = header.getTable();
                TableColumnModel columnModel = tableView.getColumnModel();
                int viewColumn = columnModel.getColumnIndexAtX(e.getX());
                int column = tableView.convertColumnIndexToModel(viewColumn);
                Rectangle bounds = tableView.getCellRect(-1, column, false);
                if (e.getX() > bounds.x + 16) { // only if one the checkbox
                    if (e.getID() == MouseEvent.MOUSE_CLICKED) {active = false;}
                }else{active=true;}
            if(active){
                handleClickEvent(e);
                ((JTableHeader)e.getSource()).repaint();
        public void mousePressed(MouseEvent e){mousePressed = true;}
        public void mouseReleased(MouseEvent e){}
        public void mouseEntered(MouseEvent e){}
        public void mouseExited(MouseEvent e){}
}If you want the code for the ExamleTableModel, I will post it if you ask (having trouble with the character limit).

What are you supposed to cast it to? I might have tried to cast it to something wrong.
I tried
TableCellRenderer tcr = table.getDefaultRenderer(Boolean.class);
((DefaultTableCellRenderer)tcr).setHorizontalAlignment(SwingConstants.LEFT);and that gave me a ClassCastException. But I might have been trying to cast it to the wrong thing.

Creating PS Network header with one activity

I need to create to a projekt the network header with one activity. so I want top proceed the following coding:
     CALL FUNCTION 'BAPI_PS_INITIALIZATION'.
      CALL FUNCTION 'BAPI_BUS2002_CREATE'
        EXPORTING
          i_network = gs_network
        TABLES
          et_return = et_return.
      CALL FUNCTION 'BAPI_PS_PRECOMMIT'
      CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
        IMPORTING
          return = es_return.
        CALL FUNCTION 'BAPI_PS_INITIALIZATION'.
        CALL FUNCTION 'BAPI_BUS2002_ACT_CREATE_MULTI'
          EXPORTING
            i_number    = ls_number
          TABLES
            it_activity = gt_activity.
        CALL FUNCTION 'BAPI_PS_PRECOMMIT'
        CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
          IMPORTING
            return = es_return.
But I get an Runtime Error with "MESSAGE_TYPE_X" because the PRECOMMIT was not successful.
Has anyone an idea how to handle that ??
thx a lot
Edited by: Rob Burbank on Nov 18, 2009 9:42 AM

DATA: lt_return   TYPE TABLE OF bapiret2,
        l_wa_return TYPE bapiret2.
CALL FUNCTION 'BAPI_PS_INITIALIZATION'
CALL FUNCTION 'BAPI_BUS2002_CREATE'
    EXPORTING
      i_network = pi_wa_aufnr
    TABLES
      et_return = lt_return.
READ TABLE lt_return WITH KEY type = 'S'
                       TRANSPORTING NO FIELDS.
IF sy-subrc = 0.
    REFRESH lt_return.
    CALL FUNCTION 'BAPI_PS_PRECOMMIT'
      TABLES
        et_return = lt_return.
    READ TABLE lt_return WITH KEY type = 'S'
                       TRANSPORTING NO FIELDS.
    IF sy-subrc = 0.
      READ TABLE lt_return INTO l_wa_return INDEX 3.
      pc_aufnr_new = l_wa_return-message_v2.
    ENDIF.
    CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'
      IMPORTING
        return = l_wa_return.
ENDIF.
this is the sample code to create network & to get the network number created

Dual-head with Radeon HD 2400LE not working/behaving strangely

I have a Radeon HD 2400LE video card. and I'm attempting to set up dual-head with a 17" (1280x1024) scree and a 24" (1920x1200) screen. I originally tried fglrx, and it worked mostly, but caused partial lockups every few hours (the mouse cursor would move, but didn't seem to pass any events to anything - even hover wouldn't work). I'd like to use the radeonhd driver in any case, and I'm currently trying it from git/AUR, version 20090116-1. I'll post my xorg.conf here shortly, once I've cleaned it up a bit. Anyhow, I'm running KDE 4.2, and the display settings list VGA (my second monitor), DVI-digital (my first monitor), DVI-analog (the same port), and TV (S-Video - not used). However, clicking "Identify Outputs" displays the VGA output properly, but the DVI-digital output indicator is shown halfway off the top-left corner of the VGA-connected screen. Enabling the DVI monitor's output does something, because the monitor recognizes that it's connected, but it won't display anything, and changing the DVI settings causes various weird issues with the VGA-connected screen. I'm not using Xinerama, as I was planning on doing the whole thing with KDE and the help of XRandR. I could really use some help with this, as I've been fighting with dual-head all week.
Thanks

Here is my xorg.conf, it sounds like you are trying to acheive a similar setup to what I have, maybe you'll find this helpful
let me know if you have anyquestions on it.
Section "Module"
Load "dbe"
SubSection "extmod"
Option "omit xfree86-DGA"
EndSubSection
Load "glx"
Load "freetype"
#Load "type1"
Load "dri"
Load "drm"
EndSection
Section "Files"
FontPath "/usr/share/fonts/misc"
FontPath "/usr/share/fonts/100dpi:unscaled"
FontPath "/usr/share/fonts/75dpi:unscaled"
FontPath "/usr/share/fonts/TTF"
FontPath "/usr/share/fonts/Type1"
EndSection
Section "Server Flags"
Option "AutoAddDevices" "false"
EndSection
Section "Input Device"
Identifier "Keyboard1"
Driver "kbd"
Option "AutoRepeat" "500 30"
Option "XkbRules" "xorg"
Option "XkbModel" "microsoft"
Option "XkbLayout" "us"
EndSection
Section "Input Device"
Identifier "Mouse1"
Driver "mouse"
Option "Protocol" "Auto"
Option "Device" "/dev/input/mice"
Option "ZAxisMapping" "4 5 6 7"
Option "Emulate3Buttons"
EndSection
Section "Monitor"
Identifier "monitor0"
Option "DPMS" "true"
EndSection
Section "Monitor"
Identifier "monitor1"
Option "DPMS" "true"
Option "RightOf" "monitor0"
EndSection
Section "Device"
Identifier "device0"
Driver "radeonhd"
BusID "PCI:1:5:0"
Option "monitor-DVI-D_1" "monitor0"
Option "monitor-VGA_1" "monitor1"
Option "RROutputOrder" "DVI-D_1"
EndSection
Section "Screen"
Identifier "Screen0"
Device "device0"
DefaultDepth 24
SubSection "Display"
Depth 24
EndSubSection
EndSection
Section "ServerLayout"
Identifier "Multihead Layout"
Screen "Screen0" 0 0
InputDevice "Mouse1" "CorePointer"
InputDevice "Keyboard1" "CoreKeyboard"
EndSection
Section "DRI"
Group "video"
Mode 0666
EndSection
Last edited by Cyrusm (2009-01-25 04:34:14)

Fillable header with adobe livecycle -form design

I have created a from with adobe livecyle. Unfortunately the header I inserted in the master page contained fillable fields and this does not seem to work. How can I create a header with fillable fields that will repeat on subsequent pages as a heading?
Thanks for your attention.
Mayka

I'm actually having the exact same problem. I imported a form into Designer 7.0 as an Adobe Reader 6.0 "compatible" form. At first, there were several warning messages in various fields but I changed all of these fields so that they would be compatible. The form works in 6.0, however, whenever a user initially opens the form in 6.0 a message pops up promting the user to upgrade to 7.0 for the form to work. Over half of our users are running Adobe Reader 6.0 so any information on how to prevent this dialouge from coming up would be very appreciated.
Thank you,
Jeff

TS3276 On the left side of the mail page there is an "On My Mac" header with several folders included. One of the folders, in white, is one called "recovered mail" I don't know how this got there and am not able to delete it. Not receiving any email now.

On the left side of the mail page there is an "On My Mac" header with several folders included. One of the folders, in white, is one called "recovered mail" with 843 messages in it. I don't know how this got there and am not able to delete it. I am also no longer receiving any email now. Help!

set the wake-on lan on the main computer
The laptop's too far away from the router to be connected by ethernet. It's all wifi.
No separate server app on the laptop, it's all samba
The files are on a windows laptop and a hard drive hooked up to the windows laptop. The windows share server is pants, so I'd need some sort of third party server running. Maybe you weren't suggesting to use Samba to connect to the windows share though?
I'm glad that you've all understood my ramblings and taken and interest, thanks The way I see it, I can't be the only netbook user these days looking for this kind of convenience, and I certainly won't be once chrome and moblin hit the market.
Last edited by saft (2010-03-18 20:38:08)

Header with Gui_download

Similar Messages

Maybe you are looking for