Program to download SAP ABAP source code

Job: Downloading source code to local or under AL11 Selection-Screen     Codes:   report  zanil   . * Job: Downloading and Uploading ABAP Source Codes tables: dokil   ,         trdir   . * Download selection-screen begin of block b11 with frame title text–tb2. select–options:   s_name  for trdir–name no intervals, “Program Name   s_subc  for trdir–subc no intervals, “Program Type   s_cnam  for trdir–cnam no intervals, “Created Person   s_unam  for trdir–unam no intervals, “Last Changed   s_cdat  for trdir–cdat no intervals, “Create Date   s_udat  for trdir–udat no intervals. “Update selection-screen end of block b11. selection-screen begin of block dest with frame title text–des. parameters:   p_loc   radiobutton group fil default ‘X’, “Local   p_al11  radiobutton group fil,       ” Under AL11   p_path  like rlgrap–filename         ” Destination           default ‘C:TEMP’. selection-screen end of block dest. data: lt_trdir    like trdir occurs 0 with header line      . data: lt_p_texts  like textpool occurs 0 with header line   . data: ls_trdir    like trdir                                . data: ls_p_texts  like textpool                             . data: begin of p_source occurs 0                            ,       line(150)   type c                                    ,       end of p_source                                       . Click here to download full code

Uploading file under AL11 directory

Import Parameters:   Codes:   *&———————————————————————* *& Report  ZANIL *& *&———————————————————————* *& *& *&———————————————————————* report  zanil. * Job: uploading files(pdf, xlsx, txt, docx, png) *      from local pc to under AL11 directory.. * 1. Data data  p_upload     type rlgrap–filename. data  ld_file      type char255. data  filename     type authb–filename . data  activity(20) value ‘WRITE’. data  lv_extension type char10. data  lv_val1      type string. data  lv_val2      type string. data  length       like sy–tabix. data  lengthn      like sy–tabix. data  gui_xstring  type xstring. data: begin of itab occurs 0,       field(256),       end of itab. data lt_itab like table of itab. data ls_itab like line of  itab. * 2. Parameters parameters: p_fname type string                     obligatory. parameters: p_fnamc type authb–filename             default ‘e:usrsapdata’             obligatory. start–of–selection. * 3. Getting file source destination… call function ‘/SAPDMC/LSM_F4_FRONTEND_FILE’   changing     pathfile         = p_upload   exceptions     canceled_by_user = 1     system_error     = 2     others           = 3. ld_file = p_upload. if ld_file is initial.    message ‘No file selected!’ type ‘W’.    exit. endif. * 4. Getting file extension… call function ‘TRINT_FILE_GET_EXTENSION’  exporting    filename        = ld_file… Continue reading Uploading file under AL11 directory