How to download es workspace BPM application

Hello,
I have recently registered myself on es workspace. I have also configured my CE server with es workspace server in sap. I have also successfully tested VC and webdynpro applications but some where in Insurance branch I have seen BPM model on es workspace and I like to deploy them on my CE server as I did webdynpro and VC application. But I do not find any BPM DC to download.
Does any one has any idea how can I do this.
Regards,
Naeem

thank. I closed the thread.

Similar Messages

How to download from spool to application server

Hi all,
   Can any one tell me how to download from spool to application server. Quick response would be appreciated.
thanks
mahesh

Hi Kilaru,
Please find the sample code for your req,t and let me know if you found any difficulty on the same.
<b>Just copy paste the code :</b>
This will Convert spool to PDF format and download.
data: w_ident     like tsp01-rqident,
      w_doctype   like tsp01-rqdoctype,
      w_bytecount type i.
data: itab_pdf    like tline occurs 0 with header line.
parameter spoolnum like tsp01-rqident obligatory.
selection-screen begin of block a2 with frame.
parameters: to_pc   radiobutton group a2 default 'X',
             pcfile like rlgrap-filename lower case,
             to_unix radiobutton group a2,
             unixfile(255) lower case.
selection-screen end of block a2.
at selection-screen on block a2.
if to_pc = 'X' and pcfile is initial.
    message e398(00) with 'Enter PC File Name.'.
elseif to_unix = 'X' and unixfile is initial.
    message e398(00) with 'Enter Unix File Name.'.
endif.
at selection-screen on spoolnum.
select single rqident rqdoctype
         into (w_ident, w_doctype)
         from tsp01
         where rqident = spoolnum.
if sy-subrc ne 0.
    message e398(00) with 'Spool' spoolnum 'not found'.
endif.
at selection-screen on value-request for pcfile.
call function 'WS_FILENAME_GET'
       exporting
            mask     = ',.,..'
       importing
            filename = pcfile
       exceptions
            others   = 1.
if sy-subrc <> 0.
    message id sy-msgid type 'I' number sy-msgno
            with sy-msgv1 sy-msgv2 sy-msgv3 sy-msgv4.
endif.
start-of-selection.
if w_doctype = 'LIST'.
    perform get_abap_spool_in_pdf.
elseif w_doctype = 'OTF'.
    perform get_otf_spool_in_pdf.
endif.
if to_pc = 'X'.
    perform write_pdf_spool_to_pc.
else.
    perform write_pdf_spool_to_unix.
endif.
message i398(00) with 'Completed OK'.
form get_abap_spool_in_pdf.
refresh itab_pdf.
call function 'CONVERT_ABAPSPOOLJOB_2_PDF'
       exporting
            src_spoolid              = w_ident
       importing
            pdf_bytecount            = w_bytecount
       tables
            pdf                      = itab_pdf
       exceptions
            err_no_abap_spooljob     = 1
            err_no_spooljob          = 2
            err_no_permission        = 3
            err_conv_not_possible    = 4
            err_bad_destdevice       = 5
            user_cancelled           = 6
            err_spoolerror           = 7
            err_temseerror           = 8
            err_btcjob_open_failed   = 9
            err_btcjob_submit_failed = 10
            err_btcjob_close_failed = 11
            others                   = 12.
if sy-subrc ne 0.
message e398(00) with 'Cannot convert to PDF. Error =' sy-subrc.
endif.
endform.
*********************************************************form get_otf_spool_in_pdf.
refresh itab_pdf.
call function 'CONVERT_OTFSPOOLJOB_2_PDF'
       exporting
            src_spoolid              = w_ident
       importing
            pdf_bytecount            = w_bytecount
       tables
            pdf                      = itab_pdf
       exceptions
            err_no_otf_spooljob      = 1
            err_no_spooljob          = 2
            err_no_permission        = 3
            err_conv_not_possible    = 4
            err_bad_dstdevice        = 5
            user_cancelled           = 6
            err_spoolerror           = 7
            err_temseerror           = 8
            err_btcjob_open_failed   = 9
            err_btcjob_submit_failed = 10
            err_btcjob_close_failed = 11
            others                   = 12.
if sy-subrc <> 0.
message e398(00) with 'Cannot convert to PDF. Error =' sy-subrc.
endif.
endform.
*********************************************************form write_pdf_spool_to_unix.
open dataset unixfile for output in binary mode.
if sy-subrc ne 0 .
    message e398(00) with 'Cannot open unix file for output:' unixfile.
endif.
loop at itab_pdf.
    transfer itab_pdf to unixfile.
    if sy-subrc ne 0 .
      message e398(00) with 'Cannot write to unix file:' unixfile.
    endif.
endloop.
close dataset unixfile.
endform.
*********************************************************form write_pdf_spool_to_pc.
call function 'WS_DOWNLOAD'
       exporting
            bin_filesize            = w_bytecount
            filename                = pcfile
            filetype                = 'BIN'
       tables
            data_tab                = itab_pdf
       exceptions
            file_open_error         = 1
            file_write_error        = 2
            invalid_filesize        = 3
            invalid_type            = 4
            no_batch                = 5
            unknown_error           = 6
            invalid_table_width     = 7
            gui_refuse_filetransfer = 8
            customer_error          = 9
            others                  = 10.
if sy-subrc <> 0.
message e398(00) with 'Cannot download to PC. Error =' sy-subrc.
endif.
endform.
Hope this will help you.
Cheers
Sunny
Rewrd points, if found helpful

How to download a file from Application Sever to Client Workstation?

Hi All,
I know how to move a file from client workstation to Application server.
How to download that uploaded file from Application file (AL11) directory to local desktop?
Regards,
Arun.M.D

Hi Arun,
Goto AL11 - > click on the directory path and select your file -open the file - > click on menu item List - >save/send -> file
-> select the type of file.
Or you can write a small abap code using DATASETS. If you require I will post the code.
Hope it helps you.
Regards,
Rajani.

How to download a file from application server to presentation server

Hi experts,
I want to download a file from application server to presentaion server, file contaims three fields customer name, customer email id and status..
help me out i m new into sap.

Dear Aditya,
Please check below thread
http://scn.sap.com/thread/1010164
it will help you.
BR
Atul

How to download and update Adobe Application Manager

Hi, I have been attempting to update my ACC application manager but it fails to install. I was instructed to download Adobe Support Advisor but all it said was to contact support which led me in a circuitous route back to my original enquiry for help. Meanwhile my present application manager is reported as corrupt. I have a window telling me to contact support. Hence this call. Previously, in connection with this issue, I have been informed to go to a page with an APPS navigation tab but I can't find it. Your help would be greatly appreciated. Regards Bill Watters

I was in a similar situation. AAM attempted to update itself but failed repeatedly. Downloading and installing a fresh AAM from the above link (Windows) resolved it and restored full functionality.
However: I have two Win 7 machines, both with master collection CS6 already installed, and the AAM failure occurred on one of them when attempting to download Photoshop CC (single app subscription). On the other machine, AAM updated without problems and transformed into the CC desktop app, as it should:
But on the "problem" machine I'm still stuck with the Application Manager. There's no way to update further:
Now, it apparently works as it should and I'm able to download and install the apps included in the subscription. But IME anything that doesn't update when it should is a problem waiting to happen. So how can I get the CC desktop app on this second machine?
I did find a standalone CC download on the ProDesign Tools site (along with a backup PS CC installer). Can I just run that, or is there a risk of messing up anything? I need to stress that this is a production machine at work and I simply cannot have any extended down time.
Specs for the "problem" machine: Windows 7 professional x64, i7-3820, 32 GB RAM, SSD boot/system 250 GB, 4TB spinning disks, CS6 Master collection, Photoshop CC, Lightroom 4.4, Lightroom 5.0.
I also need to mention that this machine is on a network domain, and the user account had to be changed since CS6 was installed (due to server/network problems). But everything on the machine runs locally.

How to download a file from application server in webdynpro

Hi Experts,
                   I am trying to download a file through Web Dynpro file download UI element..The file is stored in application server in binary format ..in my code i am reading the file in binary mode,converting Binary File into Xstring(Using FM SCMS_BINARY_TO_XSTRING) ..getting its Mime type and binding the UI element properties (data with XString, Mime type and file name) with respective context attributes..But the problem is file is getting opened but Junk data is getting displayed on it..Not sure where i am making the mistake.

Hi Lukas,thanks for the reply..please find the code
here '/tmp/accenturedocs' is the folder name on application server,and zdocs_list_tab is the table that contains file URL.File upload is on the BSP page (custom logic to upload the file ) where they are storing local file path in ztable.Same i am extracting in my code to get File URL.
DATA: i_file TYPE rlgrap-filename .
DATA:v_path TYPE zlist.
DATA:i_datatab TYPE STANDARD TABLE OF tbl1024,
       wa_datatab TYPE   tbl1024.
DATA file TYPE string.
DATA dot_offset TYPE i.
DATA extension TYPE mimetypes-extension.
DATA mimetype TYPE mimetypes-type.
SELECT SINGLE description
    FROM zdocs_list_tab
    INTO v_path.
CONCATENATE '/tmp/accenturedocs' v_path INTO i_file.
FIELD-SYMBOLS <hex_container> TYPE x.
OPEN DATASET i_file FOR INPUT IN LEGACY BINARY MODE.
IF sy-subrc NE 0.
    MESSAGE e999(00) WITH 'Error opening file' .
ENDIF.
ASSIGN wa_datatab TO <hex_container> CASTING.
DO.
    READ DATASET i_file INTO <hex_container>.
    IF sy-subrc = 0.
      APPEND wa_datatab TO i_datatab.
    ELSE.
      EXIT.
    ENDIF.
ENDDO.
CLOSE DATASET i_file.
DATA:l_count TYPE i,
        l_len TYPE i.
DESCRIBE TABLE i_datatab LINES l_count.
READ TABLE i_datatab INTO wa_datatab INDEX l_count.
l_len = XSTRLEN( wa_datatab-line ).
l_len = l_len + ( l_count - 1 ) * 1022.
DATA: v_xstring TYPE xstring.
CALL FUNCTION 'SCMS_BINARY_TO_XSTRING'
    EXPORTING
      input_length = l_len
    IMPORTING
      buffer       = v_xstring
    TABLES
      binary_tab   = i_datatab
    EXCEPTIONS
      failed       = 1
      OTHERS       = 2.
IF sy-subrc <> 0.
ENDIF.
file = i_file.
" Find out file name extension
FIND FIRST OCCURRENCE OF REGEX '\.[^\.]+$' IN file MATCH OFFSET
dot_offset.
ADD 1 TO dot_offset.
extension = file+dot_offset.
" Get mime type
CALL FUNCTION 'SDOK_MIMETYPE_GET'
    EXPORTING
      extension = extension
    IMPORTING
      mimetype = mimetype.
DATA lv_file_content TYPE wd_this->element_context-file_content.
get element via lead selection
lo_el_context = wd_context->get_element( ).
set single attribute
lo_el_context->set_attribute(
    name = `FILE_CONTENT`
    value = v_xstring ).
same way i am assigning file name and file mime type to context attributes.
please suggest where is the mistake.

How to download a WebDynpro ABAP Application?

Hi,
I have created a Webdynpro ABAP application from SE80.
now I want to move this same application to another SAP system.
Is it possible via downloading to flat file and uploading from flat file to destination system or something like that?
can anyone suggest some solution to this please?
Helpful answers will be rewarded with points.
Regards,
Tejas

Hi Tejas.
Check <a href="https://forums.sdn.sap.com/click.jspa?searchID=2403670&messageID=2905500">this thread</a> out.
Cheers,
Sascha

How to download the Create Suite applications onto another computer?

Hello, i was wondering if you can help.
I have the creative suite on my main computer, where i use indesign , illustrator and photoshop on a daily basis for designing. However i would also like to install this on another apple Mac computer i have in the house,
Is this possible? How do i do it?
Thanks in advance!
All the best
S

Yes, you mis-explained when you said you have a Creative Suite installed on one machine and you are trying to install it on another. You cannot get Creative Suites thru the Cloud, though you can get individual Creative Suite 6 products.
It appears you mean you have a Creative Cloud subscription and you want to use it on a second machine. If you already have the Creative Cloud application installed then you should just need to sign in and then choose the programs you want to install.
Creative Cloud Help / Sign out, Sign in | Creative Cloud desktop app
http://helpx.adobe.com/creative-cloud/kb/sign-in-out-creative-cloud-desktop-app.html
Creative Cloud Help / Install, update, or uninstall apps
http://helpx.adobe.com/creative-cloud/help/install-apps.html
Installing Creative Cloud Apps
http://tv.adobe.com/watch/cs6-creative-cloud-feature-tour-for-video/installing-desktop-app s-from-creative-cloud/

How I download twitter as an application ? Thank you

Solved!
Go to Solution.

UberTwitter is very good, and is available at AppWorld.
Alternatively, there's TwitterBerry, and others too.
It depends how much functionality you need / want.
Love Me - Love My BlackBerry
Z10 OS Version: 10.0.10.690
Z10 Software Release: 10.10.90
PlayBook - 2.1.0.1526

How to Download CS6 applications from the Cloud

Does anyone know how to download the older CS6 applications from the cloud?
I cnat find them. They are on the Adobe site, but if you click "download" is says "download them from the cloud... I go to the cloud and dont see them anywhere... What am I missing?

http://helpx.adobe.com/encore/kb/encore-cs6-installed-cc.html is about Premiere Pro and Encore... I do NOT know if any other CS6 programs are available "free" with CC
If you wish to BUY any or all CS6 programs go to http://www.adobe.com/products/catalog/cs6._sl_id-contentfilter_sl_catalog_sl_software_sl_c reativesuite6.html?promoid=KFPMZ

How to download and install application via desktop software?

Hello everybody.
I'd like to know how to download and then, install applications on my Bold 9700 using desktop manager (version 6.1).
Can someone enlighten me about it please?

The easiest way to install apps is to use either App World on your phone (available from mobile.blackberry.com if not installed on your phone) or via the web front end of App World (http://appworld.blackberry.com/webstore/) , plugging your phone in via USB.

How to download nwds deployed local deployed appluication from server,

Dear all,
how to download nwds local deployed application from server please specify the path(if is not a par application and it ia not a dc component)it is a simple webdynpro application i lot my backup in development and quality and the application now exists in PRODUCTION. please help me in resolving this issue.
Regards.

Hi Kishore,
You can't download the full nwds project source. You can get the Java source code only.Select the app.jar file from your project path and it will give all java program code.First You should copy the .jar from (/usr/sap/<SID>/JC<xx>/j2ee/cluster/server<x>/apps/local/ProjectName(x)/webdynpro/public/lib/app.jar)
Some free Decompiler tool are available in online to extract the app.jar source (Tool Name DJ Java Decompiler or unzip the app.jar).
Thanks in advance.

Process is not visible in BPM Workspace in Application panel 2

Hi dear developers,
I had a problem about BPM process. I was trying to implement this tutorial -> http://st-curriculum.oracle.com/obe/fmw/obpm/11g/r1/firstProcess/firstprocess_obpm11g.htm#t3
And all the steps had been done. But the deployment step, i couldn't see my process on the BPM Workspace. I searched the other opinions in the forum. It's completely same with this thread -> Process is not visible in BPM Workspace in Application panel
Nevertheless, couldn't find anything helpful. Could you help me please?
Thanks in advance.
Erdo

Hi Erdo
I hope you already ran the demo community seed app to create all the test users and groups etc in the default authenticator. If not, please see this below post:
Re: New to BPM: How to get the tasks in the Workspace
1. First login into bpm/workspace with domain adminstrator username/password. Then on right side, click on Adminstration link and see if you could see all the roles related to hello world app and also the users that you added to those roles.
One other very basic thing is, you should and must deploy the TaskForms project that has all the taskdetails UI pages. I hope you did this while deploying the workflow and checking the check boxes to deploy other ui projects also.
If seeding and getting demo uses is confusing, you can always use your own users. From weblogic console, create some extra users like weblogic1, weblogic2, weblogic3 etc with some password. Then use these users to assign to the roles from hello world app. Then login with these users. This will also work.
Thanks
Ravi Jegga

Re: How to download an internal table to application server.. Unicode

Hi..
i have populated an internal table of a big structure (custom table) which has more than 100 fields.
i wanted to download it into the application server.. as a tab de-limited file..
Can anyone guide me how to proceed with
Thanks In Advance
Guhapriyan..

HI
this program will convert the internal table to the xml document
Report ZPRUEBA_MML_13 *
Export an internal table to XML document *
NO BORRAR ESTE CODIGO *
REPORT Z_table_xml.
PARAMETERS: GK_RUTA TYPE RLGRAP-FILENAME.
TYPES: BEGIN OF TURNOS,
LU LIKE T552A-TPR01,
MA LIKE T552A-TPR01,
MI LIKE T552A-TPR01,
JU LIKE T552A-TPR01,
VI LIKE T552A-TPR01,
SA LIKE T552A-TPR01,
DO LIKE T552A-TPR01,
END OF TURNOS.
TYPE SOCIO *
TYPES: BEGIN OF SOCIO,
NUMERO LIKE PERNR-PERNR,
REPOSICION LIKE PA0050-ZAUVE,
NOMBRE LIKE PA0002-VORNA,
TURNOS TYPE TURNOS,
END OF SOCIO.
TYPE SOCIO *
ESTRUCTURA ACCESOS *
DATA: BEGIN OF ACCESOS OCCURS 0,
SOCIO TYPE SOCIO,
END OF ACCESOS.
ESTRUCTURA ACCESOS *
START OF SELECTION *
START-OF-SELECTION.
PERFORM LLENA_ACCESOS.
PERFORM DESCARGA_XML.
END-OF-SELECTION.
END OF SELECTION *
FORM LLENA_ACCESOS *
FORM LLENA_ACCESOS.
REFRESH ACCESOS.
CLEAR ACCESOS.
MOVE: '45050' TO ACCESOS-SOCIO-NUMERO,
'MOISES MORENO' TO ACCESOS-SOCIO-NOMBRE,
'0' TO ACCESOS-SOCIO-REPOSICION,
'T1' TO ACCESOS-SOCIO-TURNOS-LU,
'T2' TO ACCESOS-SOCIO-TURNOS-MA,
'T3' TO ACCESOS-SOCIO-TURNOS-MI,
'T4' TO ACCESOS-SOCIO-TURNOS-JU,
'T5' TO ACCESOS-SOCIO-TURNOS-VI,
'T6' TO ACCESOS-SOCIO-TURNOS-SA,
'T7' TO ACCESOS-SOCIO-TURNOS-DO.
APPEND ACCESOS.
CLEAR ACCESOS.
MOVE: '45051' TO ACCESOS-SOCIO-NUMERO,
'RUTH PEÑA' TO ACCESOS-SOCIO-NOMBRE,
'0' TO ACCESOS-SOCIO-REPOSICION,
'T1' TO ACCESOS-SOCIO-TURNOS-LU,
'T2' TO ACCESOS-SOCIO-TURNOS-MA,
'T3' TO ACCESOS-SOCIO-TURNOS-MI,
'T4' TO ACCESOS-SOCIO-TURNOS-JU,
'T5' TO ACCESOS-SOCIO-TURNOS-VI,
'T6' TO ACCESOS-SOCIO-TURNOS-SA,
'T7' TO ACCESOS-SOCIO-TURNOS-DO.
APPEND ACCESOS.
ENDFORM.
FORM LLENA_ACCESOS *
FORM DESCARGA_XML *
FORM DESCARGA_XML.
DATA: L_DOM TYPE REF TO IF_IXML_ELEMENT,
M_DOCUMENT TYPE REF TO IF_IXML_DOCUMENT,
G_IXML TYPE REF TO IF_IXML,
W_STRING TYPE XSTRING,
W_SIZE TYPE I,
W_RESULT TYPE I,
W_LINE TYPE STRING,
IT_XML TYPE DCXMLLINES,
S_XML LIKE LINE OF IT_XML,
W_RC LIKE SY-SUBRC.
DATA: XML TYPE DCXMLLINES.
DATA: RC TYPE SY-SUBRC,
BEGIN OF XML_TAB OCCURS 0,
D LIKE LINE OF XML,
END OF XML_TAB.
CLASS CL_IXML DEFINITION LOAD.
G_IXML = CL_IXML=>CREATE( ).
CHECK NOT G_IXML IS INITIAL.
M_DOCUMENT = G_IXML->CREATE_DOCUMENT( ).
CHECK NOT M_DOCUMENT IS INITIAL.
WRITE: / 'Converting DATA TO DOM 1:'.
CALL FUNCTION 'SDIXML_DATA_TO_DOM'
EXPORTING
NAME = 'ACCESOS'
DATAOBJECT = ACCESOS[]
IMPORTING
DATA_AS_DOM = L_DOM
CHANGING
DOCUMENT = M_DOCUMENT
EXCEPTIONS
ILLEGAL_NAME = 1
OTHERS = 2.
IF SY-SUBRC = 0.
WRITE 'Ok'.
ELSE.
WRITE: 'Err =',
SY-SUBRC.
ENDIF.
CHECK NOT L_DOM IS INITIAL.
W_RC = M_DOCUMENT->APPEND_CHILD( NEW_CHILD = L_DOM ).
IF W_RC IS INITIAL.
WRITE 'Ok'.
ELSE.
WRITE: 'Err =',
W_RC.
ENDIF.
CALL FUNCTION 'SDIXML_DOM_TO_XML'
EXPORTING
DOCUMENT = M_DOCUMENT
IMPORTING
XML_AS_STRING = W_STRING
SIZE = W_SIZE
TABLES
XML_AS_TABLE = IT_XML
EXCEPTIONS
NO_DOCUMENT = 1
OTHERS = 2.
IF SY-SUBRC = 0.
WRITE 'Ok'.
ELSE.
WRITE: 'Err =',
SY-SUBRC.
ENDIF.
LOOP AT IT_XML INTO XML_TAB-D.
APPEND XML_TAB.
ENDLOOP.
CALL FUNCTION 'WS_DOWNLOAD'
EXPORTING
BIN_FILESIZE = W_SIZE
FILENAME = GK_RUTA
FILETYPE = 'BIN'
TABLES
DATA_TAB = XML_TAB
EXCEPTIONS
OTHERS = 10.
IF SY-SUBRC <> 0.
MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
ENDFORM.
FORM DESCARGA_XML *
u can check the link
https://www.sdn.sap.com/irj/servlet/prt/portal/prtroot/com.sap.km.cm.docs/library/abap/abap-code-samples/conversion of abap data to xml.doc
Regards,
Naveen

How to download file from application server

Hi Experts,
              I developed report and execute in background mode. for this i used Open dataset transfer and close dataset . i got the requried output . But in this case user want downloaded file on presentation server so can anyone tell me How to download file from application server?
i know it is possible through Tcode CG3Y. but i want code in program.

This code will download a file to your Client package by package, so it will also work for huge files.
*& Report ZBI_DOWNLOAD_APPSERVER_FILE
REPORT zbi_download_appserver_file.
PARAMETERS: lv_as_fn TYPE sapb-sappfad
DEFAULT '/usr/sap/WBP/DVEBMGS00/work/ZBSPL_R01.CSV'.
PARAMETERS: lv_cl_fn TYPE string
DEFAULT 'C:\Users\atsvioli\Desktop\Budget Backups\ZBSPL_R01.CSV'.
START-OF-SELECTION.
CONSTANTS blocksize TYPE i VALUE 524287.
CONSTANTS packagesize TYPE i VALUE 8.
TYPES ty_datablock(blocksize) TYPE x.
DATA lv_fil TYPE epsf-epsfilnam.
DATA lv_dir TYPE epsf-epsdirnam.
DATA ls_data TYPE ty_datablock.
DATA lt_data TYPE STANDARD TABLE OF ty_datablock.
DATA lv_block_len TYPE i.
DATA lv_package_len TYPE i.
DATA lv_subrc TYPE sy-subrc.
DATA lv_msgv1 LIKE sy-msgv1.
DATA lv_processed_so_far TYPE p.
DATA lv_append TYPE c.
DATA lv_status TYPE string.
DATA lv_filesize TYPE p.
DATA lv_percent TYPE i.
"Determine size
SPLIT lv_as_fn AT '/' INTO lv_dir lv_fil.
CALL FUNCTION 'EPS_GET_FILE_ATTRIBUTES'
    EXPORTING
      file_name      = lv_fil
      dir_name       = lv_dir
    IMPORTING
      file_size_long = lv_filesize.
"Open the file on application server
OPEN DATASET lv_as_fn FOR INPUT IN BINARY MODE MESSAGE lv_msgv1.
IF sy-subrc <> 0.
    MESSAGE e048(cms) WITH lv_as_fn lv_msgv1 RAISING file_read_error.
    EXIT.
ENDIF.
lv_processed_so_far = 0.
DO.
    REFRESH lt_data.
    lv_package_len = 0.
    DO packagesize TIMES.
      CLEAR ls_data.
      CLEAR lv_block_len.
      READ DATASET lv_as_fn INTO ls_data MAXIMUM LENGTH blocksize LENGTH lv_block_len.
      lv_subrc = sy-subrc.
      IF lv_block_len > 0.
        lv_package_len = lv_package_len + lv_block_len.
        APPEND ls_data TO lt_data.
      ENDIF.
      "End of file
      IF lv_subrc <> 0.
        EXIT.
      ENDIF.
    ENDDO.
    IF lv_package_len > 0.
      "Put file to client
      IF lv_processed_so_far = 0.
        lv_append = ' '.
      ELSE.
        lv_append = 'X'.
      ENDIF.
      CALL FUNCTION 'GUI_DOWNLOAD'
        EXPORTING
          bin_filesize         = lv_package_len
          filename             = lv_cl_fn
          filetype             = 'BIN'
          append               = lv_append
          show_transfer_status = abap_false
        TABLES
          data_tab             = lt_data.
      lv_processed_so_far = lv_processed_so_far + lv_package_len.
      "Status display
      lv_percent = lv_processed_so_far * 100 / lv_filesize.
      lv_status = |{ lv_percent }% - { lv_processed_so_far } bytes downloaded of { lv_filesize }|.
      CALL FUNCTION 'SAPGUI_PROGRESS_INDICATOR'
        EXPORTING          "percentage = lv_percent - will make it fash
          text = lv_status.
    ENDIF.
    "End of file
    IF lv_subrc <> 0.
      EXIT.
    ENDIF.
ENDDO.
"Close the file on application server
CLOSE DATASET lv_as_fn.

How to download es workspace BPM application

Similar Messages

Maybe you are looking for