Abap Forum on Gate²App

Skip to content

Benutzer Massenanlage

Alle Fragen rund um Basisthemen
Post a reply

Benutzer Massenanlage

Postby Isabella600 » Thu Mar 24, 2011 6:29 pm

Hallo zusammen,

ich muss demnächst 800 Benutzer anlegen, gibt es ne eleganze Möglichkeit um das automatisiert zu machen?

Vielen Dank
Isabella600
...
...
 
Posts: 139
Joined: Thu Feb 15, 2007 10:14 am
Top

Postby Katharina759 » Thu Mar 24, 2011 6:42 pm

Hi BlueMc,

mit FB BAPI_USER_CREATE1 oder einem klassischen Bätsch Input solltest Du das machen können.
Katharina759
...
...
 
Posts: 250
Joined: Thu Jun 12, 2008 5:58 pm
Top

Postby Tron » Thu Mar 24, 2011 7:50 pm

Moin BlueMc,
wir haben das auch mit BAPI_USER_CREATE und BAPI_USER_GET_DETAIL
gelöst für einen Systemumstieg von Rel 4.7 zu ECC6. Dabei haben wir eine RFC-Verbindung vom Entwicklungssystem zum Altsytem und zum Neusystem verwendet. Das hat super geklappt.
Aufpassen mussten wir nur bei Z Userparametern die das "Neue" System noch nicht kannte.
gruß TRon
(Achja, das Programm wurde nur im Entwicklungsystem angelegt und NIE transportiert !)
Tron
.....
.....
 
Posts: 1112
Joined: Sat Aug 04, 2007 10:21 pm
Top

Postby Isabella600 » Fri Mar 25, 2011 9:06 am

Ah danke, das is ne gute idee.
Isabella600
...
...
 
Posts: 139
Joined: Thu Feb 15, 2007 10:14 am
Top

Postby Tron » Fri Mar 25, 2011 9:48 am

Moin,
anbei die Umsetzung der Idee:
Code: [Select all] [Expand/Collapse] [Download] (Untitled.txt)
  1. *&---------------------------------------------------------------------*
  2. *& Report  YXXXXX
  3. *&
  4. *&---------------------------------------------------------------------*
  5. *&
  6. *&
  7. *&---------------------------------------------------------------------*
  8.  
  9. REPORT  yxxxxx.
  10.  
  11.  
  12.  
  13. TABLES: sscrfields,usr02.
  14.  
  15. TYPE-POOLS: icon.
  16. * Info Destinationen
  17. DATA: des1_info TYPE rfcsi,
  18.       des2_info TYPE rfcsi.
  19.  
  20.  
  21. PARAMETERS p_des1 TYPE rfcdes-rfcdest OBLIGATORY DEFAULT 'NONE'.
  22.  
  23. PARAMETERS p_des2 TYPE rfcdes-rfcdest OBLIGATORY DEFAULT 'NONE'.
  24.  
  25. PARAMETERS password TYPE bapipwd OBLIGATORY LOWER CASE
  26. DEFAULT 'TRon@007'.
  27.  
  28. SELECT-OPTIONS bname FOR usr02-bname NO INTERVALS.
  29.  
  30.  
  31. LOOP AT bname.
  32.   PERFORM copy_user USING bname-low.
  34.  
  36.  
  37.  
  38.  
  39.  
  40.  
  41.  
  42. *&---------------------------------------------------------------------*
  43. *&      Form  copy_user
  44. *&---------------------------------------------------------------------*
  45. *       text
  46. *----------------------------------------------------------------------*
  47. FORM copy_user USING uname TYPE usr02-bname.
  48.   DATA  msg_text(80) TYPE c. "Message text
  49.   DATA  dummy(80) TYPE c. "Message text
  50.  
  51. * Input
  52.   DATA username TYPE bapibname-bapibname.
  53.  
  54. * Output
  55.   DATA:
  56.   logondata LIKE bapilogond,
  57.   defaults LIKE   bapidefaul,
  58.   address LIKE bapiaddr3,
  59.   company LIKE bapiuscomp,
  60.   snc LIKE bapisncu,
  61.   ref_user LIKE bapirefus,
  62.   alias LIKE bapialias,
  63.   uclass TYPE bapiuclass,
  64.   lastmodified TYPE bapimoddat,
  65.   islocked TYPE bapislockd.
  66.  
  67. *Tables
  68.   DATA:
  69.   parameter TYPE TABLE OF bapiparam,
  70.   profiles TYPE TABLE OF bapiprof,
  71.   activitygroups TYPE TABLE OF bapiagr,
  72.   return TYPE TABLE OF bapiret2,
  73.   addtel TYPE TABLE OF bapiadtel,
  74.   addfax TYPE TABLE OF bapiadfax,
  75.   addttx TYPE TABLE OF bapiadttx,
  76.   addtlx TYPE TABLE OF bapiadtlx,
  77.   addsmtp TYPE TABLE OF bapiadsmtp,
  78.   addrml TYPE TABLE OF bapiadrml,
  79.   addx400 TYPE TABLE OF bapiadx400,
  80.   addrfc TYPE TABLE OF bapiadrfc,
  81.   addprt TYPE TABLE OF bapiadprt,
  82.   addssf TYPE TABLE OF bapiadssf,
  83.   adduri TYPE TABLE OF bapiaduri,
  84.   addpag TYPE TABLE OF bapiadpag,
  85.   addcomrem TYPE TABLE OF bapicomrem,
  86.   parameter1 TYPE TABLE OF bapiparam1,
  87.   groups TYPE TABLE OF bapigroups,
  88.   uclasssys TYPE TABLE OF bapiuclasssys,
  89.   extidhead TYPE TABLE OF bapiusextidhead,
  90.   extidpart TYPE TABLE OF bapiusextidpart,
  91.   systems TYPE TABLE OF bapircvsys.
  92.  
  93. * RC
  94.   DATA lret1 TYPE bapiret2.
  95.  
  96.   username = uname.
  97.  
  98.   CALL FUNCTION 'BAPI_USER_GET_DETAIL' DESTINATION p_des2
  99.     EXPORTING
  100.       username             = username
  101. *       CACHE_RESULTS        = 'X'
  102.    IMPORTING
  103.      logondata            = logondata
  104.      defaults             = defaults
  105.      address              = address
  106.      company              = company
  107.      snc                  = snc
  108.      ref_user             = ref_user
  109.      alias                = alias
  110.      uclass               = uclass
  111.      lastmodified         = lastmodified
  112.      islocked             = islocked
  113.     TABLES
  114.      parameter            = parameter
  115.      profiles             = profiles
  116.      activitygroups       = activitygroups
  117.      return               = return
  118.      addtel               = addtel
  119.      addfax               = addfax
  120.      addttx               = addttx
  121.      addtlx               = addtlx
  122.      addsmtp              = addsmtp
  123.      addrml               = addrml
  124.      addx400              = addx400
  125.      addrfc               = addrfc
  126.      addprt               = addprt
  127.      addssf               = addssf
  128.      adduri               = adduri
  129.      addpag               = addpag
  130.      addcomrem            = addcomrem
  131.      parameter1           = parameter1
  132.      groups               = groups
  133.      uclasssys            = uclasssys
  134.      extidhead            = extidhead
  135.      extidpart            = extidpart
  136.      systems              = systems
  137.   EXCEPTIONS
  138.     communication_failure = 1  MESSAGE msg_text
  139.     system_failure        = 2  MESSAGE msg_text.
  140.  
  141.   IF sy-subrc NE 0.
  142.     EXIT.
  143.   ENDIF.
  144.  
  145.   LOOP AT return INTO lret1.
  146.     MESSAGE i398(00) INTO dummy  WITH lret1-message ' ' ' ' ' ' .
  148.  
  149.   CLEAR lret1.
  150.   LOOP AT return INTO lret1 WHERE type = 'E'.
  151.     EXIT.
  153.  
  154.   CHECK lret1 IS INITIAL.
  155.  
  156.  
  157.   CLEAR logondata-class.
  158.   DELETE parameter  WHERE parid(1) = 'Z' OR parid(1) = 'Y'.
  159.   DELETE parameter1 WHERE parid(1) = 'Z' OR parid(1) = 'Y'.
  160.  
  161.   CALL FUNCTION 'BAPI_USER_CREATE1' DESTINATION p_des1
  162.     EXPORTING
  163.       username                      = username
  164. *   NAME_IN                       =
  165.       logondata                     = logondata
  166.       password                      = password
  167.       defaults                      = defaults
  168.       address                       = address
  169.      company                       = company
  170.      snc                           = snc
  171.      ref_user                      = ref_user
  172.      alias                         = alias
  173. *   EX_ADDRESS                    =
  174.       uclass                        = uclass
  175.     force_system_assignment       = 'X'
  176. *   SELF_REGISTER                 = ' '
  177.    TABLES
  178.        parameter            = parameter
  179.        return               = return
  180.        addtel               = addtel
  181.        addfax               = addfax
  182.        addttx               = addttx
  183.        addtlx               = addtlx
  184.        addsmtp              = addsmtp
  185.        addrml               = addrml
  186.        addx400              = addx400
  187.        addrfc               = addrfc
  188.        addprt               = addprt
  189.        addssf               = addssf
  190.        adduri               = adduri
  191.        addpag               = addpag
  192.        addcomrem            = addcomrem
  193. *       groups               = groups
  194.        parameter1           = parameter1
  195.        extidhead            = extidhead
  196.        extidpart            = extidpart
  197.     EXCEPTIONS
  198.       communication_failure = 1  MESSAGE msg_text
  199.       system_failure        = 2  MESSAGE msg_text.
  200.  
  201.  
  202.   CALL FUNCTION 'BAPI_TRANSACTION_COMMIT'.
  203.  
  204.   LOOP AT return INTO lret1.
  205.     MESSAGE i398(00) INTO dummy  WITH lret1-message ' ' ' ' ' ' .
  207.  
  208. ENDFORM.                    "copy_user
GeSHi ©

Einfach eine Variante anlegen und als Job starten. :wink:
gruß TRon
Tron
.....
.....
 
Posts: 1112
Joined: Sat Aug 04, 2007 10:21 pm
Top
Post a reply

Return to Basis

Who is online

Users browsing this forum: No registered users and 20 guests

Powered by phpBB® Forum Software © phpBB Group
  • Latest Topics