How to backup ABAP code and dynpros?

[Former Member]

Hey,

I wrote a program with dynpro (no web dynpro), modules and includes. I would like to save these objects. How to do this? I don't want to transport them to another system directly, but save them as file so that I have a backup.

I figure out that I have to use another ABAP program for doing this, but couldn't find a working link to such a backup program.

Thanks

chris

[Former Member]

Hey,

I wrote a program with dynpro (no web dynpro), modules and includes. I would like to save these objects. How to do this? I don't want to transport them to another system directly, but save them as file so that I have a backup.

I figure out that I have to use another ABAP program for doing this, but couldn't find a working link to such a backup program.

Thanks

chris

[Former Member]

Hello Christian,

Take a look at this link by Blag, you can copy the code and try it out.

http://atejada.blogspot.com/2006/10/backup-de-programas-en-abap.html

Regards,

Dirk.

[Former Member]

Hi

i think this code might help u plzz reward if it helpful..

***********************************************************************

• Program Name: Backup Program Creation: 11/21/2007*

• *

• SAP Name : ycl_generate_backup Application: SD *

• *

• Author : Contextlabs ABAP Team Type: 1 *

_____________________________________________________________________

• Description : This program will Creates Files in Presentation layer *

• with the name of program and this program is used to *

• Back the Programs That are Created or Changed Today *

_____________________________________________________________________

• Inputs: *

• Tables: *

• REPOSRC - Report Source Code * *

• Outputs: File Names *

_____________________________________________________________________

• Ammendments: *

• Programmer Date Req. # Action *

• ================ ========== ====== ==============================*

***********************************************************************

REPORT ycl_generate_backup.

----

---

• Parameters Declaration *

----

---

PARAMETERS: p_file(500)

DEFAULT 'D:\Backup Programs\Timesheet\Timesheet_20080108'

OBLIGATORY. " File Name

----

---

• Constants Declaration *

----

---

CONSTANTS: c_txt(6) VALUE '.txt'. " Store EXtension of file name

----

---

• Data Declaration *

----

---

DATA w_file TYPE string.

----

---

• Field Strings Declaration *

----

---

DATA: fs_prog TYPE progname.

----

---

• Internal tables Declaration *

----

---

DATA: t_prog TYPE progname OCCURS 10,

t_code(150) OCCURS 10.

----

---

• Satrt of Selection *

----

---

START-OF-SELECTION.

w_file = p_file.

PERFORM read_programs. " Read Programs

PERFORM download_programs. " Download Programs

&----

---

*& Form read_programs

&----

---

• text

----

---

FORM read_programs.

• SELECT PROGNAME

• FROM REPOSRC

• INTO TABLE T_PROG

• WHERE UDAT EQ sy-datum

• AND UNAM EQ 'CLUSER03'.

fs_prog = 'zcl_Datadec'.

APPEND fs_prog TO t_prog.

fs_prog = 'zcl_Tabcontrol'.

APPEND fs_prog TO t_prog.

fs_prog = 'zcl_startofsel'.

APPEND fs_prog TO t_prog.

fs_prog = 'zcl_Subroutines'.

APPEND fs_prog TO t_prog.

fs_prog = 'ZCL_TIMESHEET'.

APPEND fs_prog TO t_prog.

fs_prog = 'zcl_Modules_100'.

append fs_prog to t_prog.

ENDFORM. " Read_programs

----

---

*& Form Download_programs

&----

---

• Download all our programs

----

---

FORM download_programs .

LOOP AT t_prog INTO fs_prog.

READ REPORT fs_prog INTO t_code.

CONCATENATE w_file

fs_prog

c_txt

INTO w_file.

CALL FUNCTION 'GUI_DOWNLOAD'

EXPORTING

filename = w_file

TABLES

data_tab = t_code

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.

WRITE: / text-000.

ULINE.

WRITE: / fs_prog.

ELSE.

WRITE: / text-001.

ULINE.

WRITE: / w_file.

ENDIF. " IF SY-SUBRC <> 0.

ENDLOOP. " LOOP AT T_PROG

ENDFORM. " Download_programs

plzz dont forget to reward

further if u have any quiries my mail id [email protected]

[stamik]

Hi Christian,

I have been using a program called "Direct Download Enterprise version", though it seems the authors have created a new tool

called "Mass Download" - check http://www.dalestech.com/products/massdownload.htm

here's also the download link: http://www.dalestech.com/downloads/Mass%20Download.zip

Direct Download worked quite well, so I expect this new tool (with identical selection-screen btw) will work as well

regards,

Stano

[Former Member]

Thanks to all. I will test your hints.

First I tried MassDownload. Download is quiet easy. But do I have to create every

single object manually, if I like to upload the code again? Couldn't find any hints that the

program can do this. I am able to copy ABAP code manually, but the backup of the dynpros

couldn't be insert manually, or?

thx

chris

Edited by: Christian Riekenberg on Jan 9, 2008 5:39 PM

[Former Member]

Best option is [SAPLink|http://code.google.com/p/saplink/] you can make backups of Programs, Screen Painter, SmartForms, Function Modules, Classes and all you develop...I have use it many times...No better tool than that...

Greetings,

Blag.