To Get Different Version of program through programatically.

[Former Member]

Hi Experts,

My requirement is to find no. of line changes betwwen two version of program.

I did the following steps

i) Got the Transport request number from table e070 for corresponding users.

ii) Got the pgmid object obj_name from table E071.

iii) Got the remaining details from TADIR and trdir table.

And for Each name file from TADIR table,

By using Read Report statement I got the program in Internal table and able to count the no of lines,

But how i can retrieve the different/old version of program.

Your early reply would be highly appreciated.

Thanks

James

[Former Member]

Hi James,

please take a look at Form "compare_versions" in Include LSVRLF04.

Maybe you will find a suggestion to solve your problem.

Regards

Markus

[Former Member]

Hi Markus,

I am looking into the compare_versions form, but its clueless for me!,

How it works any idea?

Regards

James

[Former Member]

Hello James,

There is a easier and a better way to do this. You dont have to read the multiple tables and use read report statement. Just use the Function module SVRS_GET_REPS_FROM_OBJECT. Pass the program name and the corresponding version number from the table VRSD. You will get the corresponding program code in the export internal table and using describe statement you find the difference in lines

Vikranth

[Former Member]

Hello,

Check the table VRSD to get the transport requests of the older versions of the object. Using these older transport requests follow the same procedure for reading the corresponding program version code and compare

Vikranth

[Former Member]

Hi Vikranth,

I know VRSD is the table we can get the version number, but for both version the

Program/object number will be the same. So we cannot achive my requirement.

Hi Markus,

I am looking into the compare_versions form, but its clueless for me!,

How it works any idea?

Regards

James

[Former Member]

Answered