Documentation View

We are hiring and constantly growing! Have a look through our vacancies to find the right role for you!

00723 - APAP to lock all user

00723 - APAP to lock all user

rdisp/max_wprun_time - Maximum work process run time   Addresses (Business Address Services)  
This documentation is copyright by SAP AG.
SAP E-Book

APAP to lock all user

Volker,
here is my solution:

************************************************************************
* Funktion.......: Sperren/entsperren Benutzer
* Ersteller......: K. Grauer
* Erstelldatum...: 02.10.2000
* Letzte Änderung:
************************************************************************
report zate_bcr_0003 line-size 132 line-count 65
no standard page heading
message-id: zz.
*
tables: usr02. " Benutzerstamm

* Daten-Definitionen

*-----------------------------------------------------------------------
* Selektionsparameter *
*-----------------------------------------------------------------------
* Funktion auswählen
selection-screen begin of block sel1 with frame.

selection-screen begin of line.
selection-screen comment 01(35) text-s01.
selection-screen position 37.
parameters: p_lock radiobutton group g1. " sperren
selection-screen end of line.

selection-screen begin of line.
selection-screen comment 01(35) text-s02.
selection-screen position 37.
parameters: p_unlock radiobutton group g1. " entsperren
selection-screen end of line.

selection-screen skip 2.

selection-screen comment 01(35) text-s03.
select-options: p_bname for usr02-bname. "Benutzername


selection-screen end of block sel1.
************************************************************************
* Verarbeiten Benutzerstamm
************************************************************************
select * from usr02 where bname not in p_bname.
if p_lock = 'X'.
usr02-uflag = 64. "Sperrcode
endif.
if p_unlock = 'X'.
usr02-uflag = 00. "Sperrcode
endif.
update usr02.
endselect.

Textsymbols:
s01Benutzer sperren
s02Benutzer entsperren
s03folgende Benutzer nicht:


Textelements:
P_BNAME Benutzername
P_LOCK
P_UNLOCK



You should create a variant with selected users for lock/unlock.

kind regards.
Karl Grauer
Amphenol-Tuchel Electronics
August-Haeusser-Str. 10
DE 74080 Heilbronn
phone: +49 (0)7131/929327
mailto:karl.grauerZa...







Durban Tours - Südafrika Safari

Fill RESBD Structure from EBP Component Structure   General Data in Customer Master  
This documentation is copyright by SAP AG.

Length: 2707 Date: 20230207 Time: 134525     sap01-206 ( 5 ms )