Applies to:

ABAP Developers

Summary:

  To check “Remote Version Comparison” of a ABAP Objects on Multiple systems at a time

Author(s): 

Company:   Mouritech LLC
Created on: 02-20-2015
Author(s)  : Kiran Singh, Senior SAP Technical Consultant

Table of Contents

1) Overview

2) Attachment to create ABAP program/Function Module and steps  involved

3) Examples

Overview:

I was wondering to check how far my previous code changes moved in my SAP landscape before taking up new code changes in Development Environment while working on the Production Support.

A typical SAP landscape we usually work DEVELOPMENT => QUALITY => PRODUCTION, I’ve also seen landscape like DEVELOPMENT=>SANDBOX=>QUALITY=>PRODUCTION.

When ABAPer made code changes per say incident INCIDENT#1 while changes are on the flow to Production, my biz team created INCIDENT#2 if ABAPer start working on code changes for INCIDENT#2 before making sure INCIDENT#1 already reached to Production and fix assured.

To assure this ABAP objects are in synchronization throughout the landscape, ABAPer can compare the object system by system. This Multi Version Compare tools helps to compare all the system in the landscape at once.

You can run this tool to check Remote versions in you landscape.

I’ve tested for below Objects:

  1) ABAP Program(Type 1, I, M, F and S)

  2) ABAP Dictionary Objects(Table, View, Data Element, Structure, Table Type, Search Help and Lock Objects)

  3) Function Group and Function Modules

  4) Web Dynpro Component Controller, VIEW and Window


      Example#1. Enter object which you want to validate into Selection screen.

Image 1.png

 

The list of version from SandBox(S), Quality(Q) and Production(P). Not all the systems in the Landscape have same version of the Function Module. 


Image 2.png


    Example#2. If there are more than one Object by same name a pop-up with List Box selection appears for the selection.


Image 3.png

  This Object has the same active version throughout the landscape.

 

Image 4.png


    Example#3. For all Web Dynpro Components user can enter Component name directly.

      But for sub objects Components for WINDOW/VIEW user must enter

    <ZCOMPONENT> <SPACE> <WINDOW/VIEW> OR

    <ZCOMPONENT> <*> <WINDOW/VIEW>

 


Image 5.png


Image 6.png



    Example#4. For Web Dynpro Window/View


    Here my Web  Dynpro Component Z****DISP_CMP and View VW_HEADER


Image 7.png 

    Can choose one Controller OR VIEW.

 

  Image 8.png

  Image 9.png


__________________________________________________________________________________________________

Download the attached programs


CLICK HERE


OR


https://drive.google.com/folderview?id=0B-K87T3z8Y3sfnM4NEFDLWhCblRFd05weVNqTURmeXVEZFVBUE1mOEpnQlRNdWNxQ0dzem8&usp=sharing

______________________________________________________________________________________________________________________________

1. Create a executable ABAP Program; by name Z_MULTI_SYST_REMOTE_COMPARE(or you wish to use). Copy the code from attachment Z_MULTI_SYST_REMOTE_COMPARE.txt.

Pls Note: you have to enter you Remote systems list

<SSS> you Sand Box ,

<QQQ> your Quality and

<PPP> your Production, you may add or remove to a list.

************************************************************************
* You must define your remote system’s RFC destinations with Admin Access, if not you may have to enter the password for Super User access.

You can access list of RFC destination from Transaction Code SM59

Code Change#1

Line#46 in the program MULTI_SYST_REMOTE_COMPARE
CONSTANTS: lc_sand TYPE rfcdest VALUE ‘TMSADM@<SSS>.DOMAIN_CSP’,
lc_qlty
TYPE rfcdest VALUE ‘TMSADM@<QQQ>.DOMAIN_CSP’,
lc_prod
TYPE rfcdest VALUE ‘TMSADM@<PPP>.DOMAIN_CSP’.

Code Change#2

Line#151 in the program MULTI_SYST_REMOTE_COMPARE

**********************************************************************
* List all the system in the Landscape exept the DEvelopment where you
* are intend to run the program
**********************************************************************

lwa_destinationsrfcdest      = lc_sand.
APPEND lwa_destinations TO t_destinations.

lwa_destinationsrfcdest      = lc_qlty.
APPEND lwa_destinations TO t_destinations.

lwa_destinationsrfcdest      = lc_prod.
APPEND lwa_destinations TO t_destinations.
*************************************************************

You may want to give some meaning full text to you input parameters:

 

Image 10.png

2. Create a Function Group: ZK_REMOTE_SYS(or you wish to use).

3. Create a Function Module: Z_FUNC_MULTI_SYST_REMOTE_COMP and assign it to Function Group created in Step(2).

  Image 11.png

3.1 Define Import parameters.

  Image 12.png

Import Parameters:


DESTINATION          LIKE  RFCDES-RFCDEST(OPTIONAL)(PASS BY VALUE)                       

OBJECT_NAME        LIKE  VRSD-OBJNAME          (PASS BY VALUE)

OBJECT_TYPE          LIKE  VRSD-OBJTYPE            (PASS BY VALUE)                 

IM_DEV_TRANS      TYPE VERSKORRNO              (PASS BY VALUE)           

 

3.2 Define Table parameters as below

 

Image 13.png


Tables Parameters:


T_VRSDYNPRO LIKE  VRSDYNPRO(OPTIONAL)

T_DESTINATIONS    TYPE  STCC_RFCDEST_TAB(OPTIONAL)

3.3 Define Exceptions as below

 

Image 14.png

Exceptions:


NO_DIRECTORY

NO_SELECTION

3.4 Copy and paste the code from file Z_FUNC_MULTI_SYST_REMOTE_COMP.txt


 

3.5 Copy TOP include LZK_REMOTE_SYSTOP from file LZK_REMOTE_SYSTOP.txt.

3.6 Copy SUB include LZK_REMOTE_SYSSUB from file LZK_REMOTE_SYSSUB.txt.

 

4. Activate the above created Program and Function Module.

ABAP Program: Z_MULTI_SYST_REMOTE_COMPARE

Function Group: ZK_REMOTE_SYS

Function Group Includes:  LZK_REMOTE_SYSSUB

                                          LZK_REMOTE_SYSTOP

                                          LZK_REMOTE_SYSUXX

Function Module: Z_FUNC_MULTI_SYST_REMOTE_COMP

To report this post you need to login first.

Be the first to leave a comment

You must be Logged on to comment or reply to a post.

Leave a Reply