Unlock SAP Users

1-) Getting blocked user list 2-) Unblock user accounts. Selection Screen:   Codes:   report  zanil. * This Program Unblocks Users SAP Accounts * Block values: * 1. 32   – Locked Globally By Administrator * 2. 64   – Locked Locally By Administrator * 3. 128 – Locked Due To Incorrect Logons (Limited Term) tables: usr02. select–options: s_bname for usr02–bname. parameters: p_32  as checkbox. parameters: p_64  as checkbox. parameters: p_128 as checkbox. start–of–selection. data lt_return  type table of bapiret2. data lt_usr02   type table of usr02. data ls_usr02   type          usr02. data ls_return  type          bapiret2. data lv_message type          string. * Getting all blocked user list select * from usr02   into corresponding fields of table lt_usr02   where bname in s_bname     and uflag ne ‘0’. * Deleting globally data if not checked. if p_32 is initial.    delete lt_usr02 where uflag eq ’32’. endif. * Deleting locally data if not checked. if p_64 is initial.    delete lt_usr02 where uflag eq ’64’. endif. * Deleting incorrect data if not checked. if p_128 is initial.    delete lt_usr02 where uflag eq ‘128’. endif. if lt_usr02[] is initial.    message ‘No data found!’ type ‘W’.    exit. endif. loop at lt_usr02 into ls_usr02.  clear: lt_return, ls_return, lv_message.  call function ‘BAPI_USER_UNLOCK’… Continue reading Unlock SAP Users

FM to create background job

FM to create a background job: Imports:   Result: Source Code: FUNCTION ZTB_CREATE_JOB. *”———————————————————————- *”*”Local Interface: *”  IMPORTING *”     REFERENCE(I_JOBNAME) TYPE  STRING *”     REFERENCE(I_REPORT) TYPE  STRING *”     REFERENCE(I_VARIANT) TYPE  STRING OPTIONAL *”     REFERENCE(I_UNAME) TYPE  STRING OPTIONAL *”  EXPORTING *”     REFERENCE(E_RETURN) TYPE  BAPIRET2 *”———————————————————————- data: lv_jobname  like tbtcjob–jobname, lv_report   like sy–repid, lv_variant  like raldb–variant, lv_uname    like sy–uname, lv_jobcount like tbtcjob–jobcount, lv_released type c. lv_jobname = i_jobname. lv_report  = i_report. lv_variant = i_variant. lv_uname   = i_uname. if lv_uname is initial.    lv_uname = sy–uname. endif. * Step 1 call function ‘JOB_OPEN’   exporting     jobname         = lv_jobname   importing     jobcount        = lv_jobcount  exceptions    cant_create_job  = 1    invalid_job_data = 2    jobname_missing  = 3    others           = 4           . if sy–subrc <> 0.    e_return–type = ‘E’.    e_return–message = ‘Error!’.    exit. endif. * Step 2 call function ‘JOB_SUBMIT’… Continue reading FM to create background job