Is there a transaction to compile all programs after upgrade?

Question

Hi all,
Does anyone know of a transaction to compile all programs after an upgrade? One thing our users hate is that little clock in the lower left corner that says 'Compiling...' and after an upgrade this happens for every single program and transaction they start... is there a way to avoid this?
thanks in advance,
Ioana

Answer 1

Hi Ioana,
if you would to generate custom code as well I can offer you this report.
The output list shows only objects with generation errors.
This might interesting in case of a release change because ABAP is getting always more strict ...
<pre>
Report  YYQB0095
Author: F. Meyer
Generate program code
REPORT  YYQB0095
            line-size 255
            NO STANDARD PAGE HEADING.
TABLES: TADIR, TRDIR.
DATA: BEGIN OF T_TRDIR OCCURS 0.
        INCLUDE STRUCTURE TRDIR.
DATA: END OF T_TRDIR.
DATA: LINE_COUNT TYPE I,
      ERROR_COUNT TYPE I.
DATA: SYN_INCLUDE LIKE SY-REPID,
      SYN_LINE    LIKE SY-TABIX,
      SYN_WORD(10),
      SYN_OFFS    LIKE SY-TABIX,
      SYN_MESS(240),
      SYN_SUBRC   LIKE SY-SUBRC.
data: g_field(16).
data: ctr0 type i, ctr1 type i.
SELECT-OPTIONS: S_NAME FOR TRDIR-NAME obligatory,
                S_SUBC FOR TRDIR-SUBC,
                S_APPL FOR TRDIR-APPL,
                S_CNAM FOR TRDIR-CNAM.
START-OF-SELECTION.
  SELECT * FROM  TRDIR INTO TABLE T_TRDIR
         WHERE  NAME        IN S_NAME
         AND    SUBC        IN S_SUBC
         AND    APPL        IN S_APPL
         AND    CNAM        IN S_CNAM.
  LOOP AT T_TRDIR.
    PERFORM GENERATE_REPORT.
  ENDLOOP.
  write: / '**** End-of-Generate ****', ctr0, ctr1, at sy-linsz space.
FORM GENERATE_REPORT                                          *
FORM GENERATE_REPORT.
  IF T_TRDIR-SUBC = 'I' OR             "Include-Programm
    T_TRDIR-SUBC = 'P'.                "Prolog-Programm
    EXIT.
  ENDIF.
  add 1 to ctr0.
  GENERATE REPORT T_TRDIR-NAME
                  MESSAGE SYN_MESS
                  LINE    SYN_LINE
                  WORD    SYN_WORD
                  INCLUDE SYN_INCLUDE.
  IF SY-SUBRC = 0.                     "Generation OK.
do nothing
  ELSEIF SY-SUBRC = 04 OR              "Cancel because of syntax error
         SY-SUBRC = 08
         or sy-subrc = 12
         or sy-subrc = 16.
         add 1 to ctr1.
    SELECT SINGLE * FROM  TADIR
           WHERE  PGMID       = 'R3TR'
           AND    OBJECT      = 'PROG'
           AND    OBJ_NAME    = T_TRDIR-NAME.
    WRITE: /(9) T_TRDIR-NAME, SPACE,
                T_TRDIR-SUBC, SPACE,
                T_TRDIR-APPL, SPACE,
            (5) TADIR-DEVCLASS, SPACE,
           (10) T_TRDIR-CNAM,
                T_TRDIR-CDAT, SPACE,
           (10) T_TRDIR-UNAM,
                T_TRDIR-UDAT,
                space.
    WRITE: (9) SYN_INCLUDE, (140) SYN_MESS.
    hide t_trdir-name.
   SKIP 1.
  ENDIF.
ENDFORM.
TOP OF PAGE
TOP-OF-PAGE.
CALL FUNCTION 'Y_ZQX_LIST_HEADER'.
                <b>write you own header line here ..</b>
AT LINE SELECTION
at line-selection.
  get cursor field g_field.
  if g_field = 'T_TRDIR-NAME'.
    SET PARAMETER ID 'RID' FIELD T_TRDIR-NAME.
    CALL TRANSACTION 'SE38'.
  endif.
</pre>
Regards
Ferdi