URGENT : FORM6i & W2K & WNT4 : USER.EXE

HI,
I've got a big application in forms 4.5 with Oracle 7 and Oracle 8i. I transform this application in Forms 6i, my application can run and the communication with the database is OK, but i can't close it (any form) this error system message appear immidiately
ifrun60.exe - Image incorrecte (i'm french)
the application or the dll :c:\WINNT\System32\user.exe is not a valid Windows picture. Virify with your installation floppy. (Sorry for my translation.)
This message appear when i want to do an exit_form with this application by some function. The application test Bankapp run normally, and this message appear with an OS W2K or Win NT4 pack6. When i try to do an DO_KEY('EXIT_FORM') the application run with the CPU at 100 % and never stop. When i try to do an EXIT_FORM without passing to my function, the application do nothing.
I don't know what to do.
thanks for your help

hi rajesh,
this might help:
Re: brconnect.exe exits with errors
regards
jo

Similar Messages

URGENT!Can I user a THIN jdbc driver to access a CLOB field from oracle 8.0.5 DB?

URGENT!Can I user a THIN jdbc driver to access a CLOB field from oracle 8.0.5 DB?

I think you'd need to contact Oracle support to get access to older versions of the driver.
Since 8.0.5 isn't supported any longer, however, is it possible for you to update your Oracle client to one of the supported releases-- 8.1.7 or 9i?
Justin

URGENT: Impact on renaming user "Groups" in Siebel Web

Hi All,
I have a requirement to change couple of user "Groups" from old one ("ABC Team") to new one ("XYZ Region Team").
Can anyone tell me what kind of impact will be on the existing system by renaming web "Groups" in Siebel Analytics?
Which are the area i need to consider while doing impact analysis?
Thanks in advance. Plz Help.
Sudipta

First: http://catb.org/esr/faqs/smart-questions.html#urgent
It depends, are you using SSO? If not groups names shouldn't matter unless you are using them in filters or in the narrative view.

Urgent - no listener: no TNSLSNR.exe

Hello,
I had a probem with ODBC in that I couldn't do anything with it, nothing at all, so I had to reinstall the net8 tools for Oracle8i on a W2K server platform. While ODBC is now up and running the listener has now disappeared: the file TNSLSNR.exe is missing.
Any advice would very appreciated...

Hi,
I don't know too much about this to be honest but I have some suggestions so I'll throw my two cents worth in. A few things come to mind, first I'd check the client, the issue looks like its there, second check the local security setup and third if your using Active Directory there are special directory issues.
Hope this helps

Need urgent help. Calling of exe files from java program

This program can execute small .exe files that donot take inputs but doesn't work for exe files that takes input. what could be the problem.
Server code :-
import java.io.*;
import java.net.*;
public class Server1 {
 private Player[] players;
 private ServerSocket server;
 private ExecHelper exh;
 String command = null;
 String message = null;
 public Server1() {
 players = new Player[5];
 try {
 server = new ServerSocket( 12345, 5 );
 System.out.println("Server started...");
 System.out.println("Waiting for request...");
 catch( IOException ioe ) {
 ioe.printStackTrace();
 System.exit( 1 );
 } //end Server constructor
 public void execute() {
 for( int i = 0; i < players.length; i++ )
 try {
 players[i] = new Player( server.accept() );
 players.start();
 catch( IOException ioe ) {
 ioe.printStackTrace();
 System.exit( 1 );
 public static void main( String args[] ) {
 Server1 ser = new Server1();
 ser.execute();
 System.exit( 1 );
 private class Player extends Thread {
 private Socket connection;
 private ObjectOutputStream output;
 private ObjectInputStream input;
 public Player( Socket socket ) {
 connection = socket;
 try {
 input = new ObjectInputStream( connection.getInputStream());
 output = new ObjectOutputStream( connection.getOutputStream());
 output.flush();
 catch( IOException ioe ) {
 ioe.printStackTrace();
 System.exit( 1 );
 public void run() {
 try {
 message = "Enter a command:";
 output.writeObject( message );
 output.flush();
 do {
 command = ( String ) input.readObject();
 String osName = System.getProperty( "os.name" );
 String[] cmd = new String[3];
 if( osName.equals( "Windows 2000" )) {
 cmd[0] = "cmd.exe";
 cmd[1] = "/c";
 cmd[2] = command;
 else if( osName.equals( "Windows NT" ) ) {
 cmd[0] = "cmd.exe" ;
 cmd[1] = "/C" ;
 cmd[2] = command ;
 Runtime rt = Runtime.getRuntime();
 Process proc = rt.exec( cmd );
 exh = new ExecHelper( proc, output, input);
 } while( !command.equals( "TERMINATE" ) );
 catch( Throwable t ) {
 t.printStackTrace();
 } //end class Player
 public class ExecHelper implements Runnable {
 private Process process;
 private InputStream pErrorStream;
 private InputStream pInputStream;
 private OutputStream pOutputStream;
 private InputStreamReader isr;
 private InputStreamReader esr;
 private PrintWriter outputWriter;
 private ObjectOutputStream out;
 private ObjectInputStream in;
 private BufferedReader inBuffer;
 private BufferedReader errBuffer;
 private Thread processThread;
 private Thread inReadThread;
 private Thread errReadThread;
 private Thread outWriteThread;
 public ExecHelper( Process p, ObjectOutputStream output, ObjectInputStream input ) {
 process = p;
 pErrorStream = process.getErrorStream();
 pInputStream = process.getInputStream();
 pOutputStream = process.getOutputStream();
 outputWriter = new PrintWriter( pOutputStream, true );
 in = input;
 out = output;
 processThread = new Thread( this );
 inReadThread = new Thread( this );
 errReadThread = new Thread( this );
 outWriteThread = new Thread( this );
 processThread.start();
 inReadThread.start();
 errReadThread.start();
 outWriteThread.start();
 public void processEnded( int exitValue ) {
 try {
 Thread.sleep( 1000 );
 catch( InterruptedException ie ) {
 ie.printStackTrace();
 public void processNewInput( String input ) {
 try {
 out.writeObject( "\n" + input );
 out.flush();
 catch( IOException ioe ) {
 ioe.printStackTrace();
 public void processNewError( String error ) {
 try {
 out.writeObject( "\n" + error );
 out.flush();
 catch( IOException ioe ) {
 ioe.printStackTrace();
 public void println( String output ) {
 outputWriter.println( output + "\n" );
 public void run() {
 if( processThread == Thread.currentThread()) {
 try {
 processEnded( process.waitFor());
 catch( InterruptedException ie ) {
 ie.printStackTrace();
 else if( inReadThread == Thread.currentThread() ) {
 try {
 isr = new InputStreamReader( pInputStream );
 inBuffer = new BufferedReader( isr );
 String line = null;
 while(( line = inBuffer.readLine()) != null ) {
 processNewInput( line );
 catch( IOException ioe ) {
 ioe.printStackTrace();
 else if( outWriteThread == Thread.currentThread() ) {
 try {
 String nline = null;
 nline = ( String ) in.readObject();
 println( nline );
 catch( ClassNotFoundException cnfe ) {
 // cnfe.printStackTrace();
 catch( IOException ioe ) {
 ioe.printStackTrace();
 else if( errReadThread == Thread.currentThread() ) {
 try {
 esr = new InputStreamReader( pErrorStream );
 errBuffer = new BufferedReader( esr );
 String nline = null;
 while(( nline = errBuffer.readLine()) != null ) {
 processNewError( nline );
 catch( IOException ioe ) {
 ioe.printStackTrace();
Client code :-
// client.java
import java.io.*;
import java.net.*;
public class Client {
 private ObjectOutputStream output;
 private ObjectInputStream input;
 private String chatServer;
 private String message = "";
 private Socket client;
 public Client( String host ) {
 chatServer = host;
 private void runClient() {
 try {
 connectToServer();
 getStreams();
 processConnection();
 catch( EOFException eofe ) {
 System.err.println( "Client terminated connection ");
 catch( IOException ioe ) {
 ioe.printStackTrace();
 finally {
 closeConnection();
 } //end method runClient
 private void connectToServer() throws IOException {
 System.out.println( "Attempting connection...\n");
 client = new Socket( InetAddress.getByName( chatServer ), 12345);
 System.out.println( "Connected to : "+ client.getInetAddress().getHostName());
 private void getStreams() throws IOException {
 output = new ObjectOutputStream( client.getOutputStream());
 output.flush();
 input = new ObjectInputStream( client.getInputStream());
 private void processConnection() throws IOException {
 while( true ){
 try {
 message = ( String ) input.readObject();
 System.out.print( message );
 InputStreamReader isr = new InputStreamReader( System.in);
 BufferedReader br = new BufferedReader( isr );
 String line = null ;
 line = br.readLine();
 output.writeObject(line);
 output.flush();
 catch( ClassNotFoundException cnfe) {
 System.out.println( "\nUnknown object type received");
 } //end processConnection
 private void closeConnection() {
 System.out.println( "\nClosing connection");
 try {
 output.close();
 input.close();
 client.close();
 catch( IOException ioe ) {
 ioe.printStackTrace();
 public static void main( String args[] ) {
 Client c;
 if( args.length == 0 )
 c = new Client( "127.0.0.1" );
 else
 c = new Client( args[0] );
 c.runClient();

maybe you should
1. Use code tags so the posted code is understandable
2. Stop marking your post urgent, that just puts peoples backs up
3. Stop posting the question every couple of hours on every imaginable forum.. Post it once and start a single dialog

Urgent - problem with multiple users on same page

Hi all,
I have got an big problem with my app:
when several users are using the same page, the action launched by USER_A affects the page displayed and used for USER_B.
If there is only one user using the page, there is no problem at all.
The webapp is deployed on Tomcat or JBoss and the problem remains the same on both.
Thank you for your help.
PS: I am not accurate because I don't know what to paste here.

In fact, all my page beans are in REQUEST scope...
The only bean in Application scope is the standard applicationBean created by Creator itself.
We use one Bean in session scope which contains another class.
I will try to explain our common process:
- when logging into the app, the session Bean stores user data (rights for using app,...);
- when navigating in the app, the user can search data, modify them and create one (if he has the right to do it);
- to define the screen, we use a lot the beforeRenderResponse();
- when viewing a data, the user can choose to modify it, so depending on the action, the page is in "CONSULT" mode or "MODIFY" mode. In the second one, he can display new gridPanel (as a subform) to populate datatable.
The problem is obvious while using this grid: my grid can disappear if someone else has validated his form before me and if my page goes trough the beforeRender of my page.
It is not really clear. If needed, i can give access to our application to show the problem (and msn adress too to talk about it).
Thank you

Urgent : Get OS login user in the report

FACTS
D.B 9i
AS 10g
Report 10g
PROBLEM
I implement a report where it generate a PDF output contain private employee Details and send it to his email
But I want to run this report in our internal web site,
Where user login by his ID to the network and then open the internal web site, where he can ask for his details by click a link that will open/call the report Directly
(without using a form to call that report ).
When report is called the connection to DB is done by a guest user which have a required roles to get the employee details.
NOW:
my report should get the login user to network ( Windows OS user ).
And base on it Query for his details and send it to his email.
Note that : Login user to network = his ID in D.B = email ID
And since the report is run in the AS (mid tire) then I can't get OS user login.
Is there a way that in the report it self I can get the OS login ID of the client. ???
Note:
I don't want to user Developer forms.
Where I can use the webutil to get user login ID of the Client and pass it to the report and run the Report.
My requirement is to run the report direct ( URL ).
Therefore :
Is there a way that in the report it self I can get the OS login ID of the client. ???
Or any idea can help in my issue/ case
Plz help.

i use it but since my report run in the AS (mid tire) then
it will return the user of AS not the Client OS user.

Urgent !!! User exits or badi for purchase info records

Hi all,
In purchase info records that is through tcode ME11, ME12 I need to validate order unit field. When you go to tcode ME12 in the second screen you will find order unit field. Now the thing is I need to validate this field. For example when the user selects any unit type I need to pass value to a custom field based on the value of order unit field. Please let me know who to carry out this process.
Thanks in advance.
Andy
Message was edited by: Andy V

Hi Andy,
I'm not sure is those transactions has Badis, but if you want to make sure of it (I can't do it right now), go to SE80 transaction and select the class/interface CL_EXITHANDLER, then you have to select the Get_Instance method and put a break-point in the following call:
call method cl_exithandler=>get_class_name_by_interface
exporting
instance = instance
importing
class_name = class_name
changing
exit_name = exit_name
exceptions
no_reference = 1
no_interface_reference = 2
no_exit_interface = 3
data_incons_in_exit_managem = 4
class_not_implement_interface = 5
others = 6.
the value of exit_name will give you the name of the BADI that is been call from the transaction.
Note: This method will show you every Badi that is being activated since you put the break-point.
Regards,
Eric

Urgent help need for user exit

Hi all,
i have just did one user exit but in RSA3 field is not coming. in step 1 i modified the extract structure. in step 2 in added field in include program ,saved and activated it. but field is not coming in RSA3. can anyone plese help me what should i do now or what has went wrong.
in RSA3 update mode is 'F'
thanks in advance

hi,
Have you created a project in CMOD and included your User exit component(RSAP0001) and activated it?.
check that. otherwise give some more details reg. your problem.
rgrds,
v.sen.
Message was edited by:
Senthilkumar Viswanathan

URGENT HELP: When some users submit, application carries empty fields from html components to plsql code

Hi APEX users and developer, especially forum's active users, please get me rid of this problem because it is really very bad situation.
I have a real trouble with application. It behaves unusual. Application is used by 60 users but only 3 of them have these problem and they can not use the application anymore.
Application is
http://apex.oracle.com/pls/apex/f?p=70547
After fields are filled and some rows checked from tabular form in page, user submits the page. Process called newReyestr calls plsql procedure from package with inputs from page. But only same 3 users get empty fields in plsql code. I see it just after when the first line stepped in procedure.
So, "what is the problem?"

Hi NoGot,
you know, I have not written big quote. The code was big. But it has no any meaning. Because problem is in first line. No need to understand it.
There is no any difference between those users. They also tried it from different browser and even computers.
BTW: I am not russian.

URGENT: issue while creating user through reconciliation of AD

Hi,
We have a requirement where we need to create users in IDM through reconcilition against Active Directory. For certain type of account Ids I want to trigger a custom workflow used for user creation. So I set "viewOptions.Process" to my custom workflow in the user form assigned to the admin who is the proxy admin for the reconcilaition process. But it doesn't seem to kick off my custom workflow. Will this work? Is this the correct form to specify the custom workflow to be triggered?
Also I tried putting some trace satements in the default "Create User" workflow to see that if it is being called during user creation by recon. In the logs I don't see my trace statements. So the question is: Which is the workflow that is called when a user is created through reconciliation? How to specify a custom workflow name in this regard?
Thanks,
kIDMan.

I'm wondering if you have an answer to this?
I need to do a similar thing. For me, I reconcile against an oracle DB and there are Active and Inactive users. I only want to reconcile Active users. I put the following code in the user form but it still created Inactive users. "Exclude Inactive User" is an empty WF that has only start and end activities.
<Field name='viewOptions.Process'>
<Expansion>
<s>Exclude Inactive User</s>
</Expansion>
<Disable>
<neq>
<ref>global.status</ref>
<s>I</s>
</neq>
</Disable>
</Field>

Urgent. Badi or user exit for ML81N transaction

Hi!
 Currently I am working on the transaction LM81N. I am looking for a user exit or BADI before save (commit work). I need to modify the XIMSEG table where this table is updated in the code:
FORM SET_XIMSEG_ACC using p_rcode.
*& Form SET_XIMSEG_ACC
 ximseg fuellen - Buchung auf Ebene Kontierung
p_rcode = 0.
CLEAR XIMSEG.
XIMSEG-BWART = T156N-BWART_NEXT.
XIMSEG-EBELN = XESSR-EBELN.
XIMSEG-EBELP = XESSR-EBELP.
XIMSEG-KZBEW = 'B'.
XIMSEG-LFBJA = XESSR-ERDAT.
XIMSEG-LFBNR = XESSR-LBLNI.
XIMSEG-ELIKZ = XESSR-FINAL. "set ELIKZ
IF XESSR-KZABN EQ KZABN_S. "Storno
XIMSEG-XSTOB = 'X'.
XIMSEG-ELIKZ = SPACE. "reset ELIKZ
ENDIF.
XIMSEG-ERFMG = 1.
XIMSEG-ERFME = XEKPO-MEINS.
XIMSEG-BPMNG = 1.
XIMSEG-BPRME = XEKPO-MEINS.
XIMSEG-SGTXT = XESSR-TXZ01.
LOOP AT XESKN WHERE PACKNO EQ XESSR-LBLNI
 AND LOEKZ IS INITIAL
 AND NETWR > 0.
XIMSEG-LFPOS = XESKN-ZEKKN.
APPEND XIMSEG.
ENDLOOP.
IF SY-SUBRC > 0.
p_rcode = 8.
REFRESH: XIMSEG, XEMSEG.
exit.
ENDIF.
ENDFORM. " SET_XIMSEG_ACC
I need to modify
XIMSEG-SGTXT = XESSR-TXZ01 with ESSL-KTEXT1
I found that use ATP_PUBLISH_RESULTS BADI after the call SET_XIMSEG_ACC . But I didn't found it.
Thanks in advance.

Hi Diana,
these are the available exits for this t.code:
Enhancement/ Business Add-in Description
Enhancement
SRV_FRM SRV: Formula calculation (obsolete since 4.0A!)
SRVSEL Service selection from non-SAP systems
SRVREL Changes to comm. structure for release of entry sheet
SRVQUOT Service export/import for inquiry/quotations
SRVPOWEB Purchase order for service entry in Web
SRVMSTLV Conversion of data during importing of standard service cat.
SRVMAIL1 Processing of mail before generation of sheet
SRVLIMIT Limit check
SRVKNTTP Setting the account assgnmt category when reading in, if "U"
SRVEUSCR User screen on entry sheet tabstrip
SRVESSR Set entry sheet header data
SRVESLL Service line checks
SRVESKN Set account assignment in service line
SRVESI Data conversion entry sheet interface
SRVENTRY Unplanned part of entry sheet (obsolete since Rel. 3.1G)
SRVEDIT Service list control (maintenance/display)
SRVDET User screen on tab strip of service detail screen
INTERFAC Interface for data transfer
o.of Exits: 18
o.of BADis: 0
Try to found the correct exits and provide the and activate the exits.
If u wan to where the exits is working put the breakpoint.
***********Rewords some points if it is useful.
Rgds,
P.Naganjana Reddy

[urgent]sql plus 's user login

how do i know my sql plus login name and password? when i install...they never ask me to set my own login name and password...

Hi 489652,
Which version of oracle you are using?
Oracle 8i & below sys password is change_on_install & system password is manager
You can even login as internal with a password oracle.
if 9i & above you need to provide oracle password for sys & system and no internal login.
What ever version you use this should work as generic
01. Login as oracle user in unix box in windows as admin.
02. export ORACLE_SID=dbname in unix . set ORACLE_SID=dbname in windows
03. sqlplus "/ as sysdba" you should be loggin as sys ..(as oracle admin)
Moreover, please remember when you raise this kind of question try to include the version of oracle and OS.
Cheers,
kamalesh jk

Urgent: change/read HU user status

Hi people,
I'm required to read and change the user status on handling units. I've been looking into the STATUS_* function modules (fgroup BSVA) but they don't seem to pick up the status I'm looking for.
I also can't find where the status is saved in the database (it isn't in table JSTO where I'd expected it would be).
Help would be appreciated (will reward points)
Thanks,
Rob

Hi Rob Smeets,
 below is the code to get the status number....
data: v_stonr like TJ30-STONR.
CLEAR : v_stonr.
CALL FUNCTION 'STATUS_TEXT_EDIT'
 EXPORTING
 client = sy-mandt
 flg_user_stat = 'I'
 objnr = vbak-objnr
 only_active = 'X'
 spras = sy-langu
* BYPASS_BUFFER = ' '
IMPORTING
* ANW_STAT_EXISTING =
 E_STSMA = GV_USERSTATUS
* line = v_flag2
* USER_LINE = v_user1
 stonr = v_stonr
EXCEPTIONS
 object_not_found = 1
 OTHERS = 2.
IF sy-subrc <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
ENDIF.
below is the code with function modules to select the status to change the user status....
 CALL FUNCTION 'I_STATUS_SELECT'
 EXPORTING
 OBJNR = vbak-objnr
 SENT_USER_STATUS = 'RJCT'
 IMPORTING
 SELECTED = E_SELECT
 CURRENT_USER_STATUS = E_CUR_STUS
 NEXT_USER_STATUS = E_NEX_STUS
 USER_STATUS_PROFILE = E_USR_PROF
 TABLES
 SYST_STATUS_INCL = SYS_ISTATUS_RANGE1
 SYST_STATUS_EXCL = SYS_ISTATUS_RANGE2
 USER_STATUS_INCL = USR_ISTATUS_RANGE1
 USER_STATUS_EXCL = USR_ISTATUS_RANGE2
 CALL FUNCTION 'I_CHANGE_STATUS'
 EXPORTING
 OBJNR = vbak-objnr
 ESTAT_INACTIVE = E_CUR_STUS
 ESTAT_ACTIVE = E_NEX_STUS
 STSMA = E_USR_PROF
 EXCEPTIONS
 CANNOT_UPDATE = 1
 OTHERS = 2
 IF SY-SUBRC <> 0.
* MESSAGE ID SY-MSGID TYPE SY-MSGTY NUMBER SY-MSGNO
* WITH SY-MSGV1 SY-MSGV2 SY-MSGV3 SY-MSGV4.
 ENDIF.
 CLEAR : E_SELECT,
 E_CUR_STUS,
 E_NEX_STUS,
 E_USR_PROF.
This logic I have used in UserExit MV45AFZZ to change the user status to "REJECTed" when Net Selling Price is less than Cost......
In this first I am getting the active user status number.....
for Created = 10,
for approved = 20,
and for rejected = 30..
based on this I am changing the status if net price is lower then cost price to Rejected......And if the the user or approval authorithy apporves the same then it he have to maintain a text in the header text for approval...
If any other help please let me know.....
Reward the point...
Cheers,
Enjoy,
Sagun Desai.....

URGENT! BADIs or USER EXITS !

Do u know any BADI's or User Exits for SAVE EVENT in transaction me21n??

Hi Julia,
Copy this program in SE38 and execute. Will get all list of existing Exits and
Badis for a particular Transaction code.
very useful program
Below code will give a list of BADIs for particular transaction.
*& Report ZNEGI16 *
REPORT ZNEGI16 .
TABLES : TSTC,
TADIR,
MODSAPT,
MODACT,
TRDIR,
TFDIR,
ENLFDIR,
SXS_ATTRT ,
TSTCT.
DATA : JTAB LIKE TADIR OCCURS 0 WITH HEADER LINE.
DATA : FIELD1(30).
DATA : V_DEVCLASS LIKE TADIR-DEVCLASS.
PARAMETERS : P_TCODE LIKE TSTC-TCODE,
P_PGMNA LIKE TSTC-PGMNA .
DATA wa_tadir type tadir.
START-OF-SELECTION.
IF NOT P_TCODE IS INITIAL.
SELECT SINGLE * FROM TSTC WHERE TCODE EQ P_TCODE.
ELSEIF NOT P_PGMNA IS INITIAL.
TSTC-PGMNA = P_PGMNA.
ENDIF.
IF SY-SUBRC EQ 0.
SELECT SINGLE * FROM TADIR
WHERE PGMID = 'R3TR'
AND OBJECT = 'PROG'
AND OBJ_NAME = TSTC-PGMNA.
MOVE : TADIR-DEVCLASS TO V_DEVCLASS.
IF SY-SUBRC NE 0.
SELECT SINGLE * FROM TRDIR
WHERE NAME = TSTC-PGMNA.
IF TRDIR-SUBC EQ 'F'.
SELECT SINGLE * FROM TFDIR
WHERE PNAME = TSTC-PGMNA.
SELECT SINGLE * FROM ENLFDIR
WHERE FUNCNAME = TFDIR-FUNCNAME.
SELECT SINGLE * FROM TADIR
WHERE PGMID = 'R3TR'
AND OBJECT = 'FUGR'
AND OBJ_NAME EQ ENLFDIR-AREA.
MOVE : TADIR-DEVCLASS TO V_DEVCLASS.
ENDIF.
ENDIF.
SELECT * FROM TADIR INTO TABLE JTAB
WHERE PGMID = 'R3TR'
AND OBJECT in ('SMOD', 'SXSD')
AND DEVCLASS = V_DEVCLASS.
SELECT SINGLE * FROM TSTCT
WHERE SPRSL EQ SY-LANGU
AND TCODE EQ P_TCODE.
FORMAT COLOR COL_POSITIVE INTENSIFIED OFF.
WRITE:/(19) 'Transaction Code - ',
20(20) P_TCODE,
45(50) TSTCT-TTEXT.
SKIP.
IF NOT JTAB[] IS INITIAL.
WRITE:/(105) SY-ULINE.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
Sorting the internal Table
sort jtab by OBJECT.
data : wf_txt(60) type c,
wf_smod type i ,
wf_badi type i ,
wf_object2(30) type C.
clear : wf_smod, wf_badi , wf_object2.
Get the total SMOD.
LOOP AT JTAB into wa_tadir.
at first.
FORMAT COLOR COL_HEADING INTENSIFIED ON.
WRITE:/1 SY-VLINE,
2 'Enhancement/ Business Add-in',
41 SY-VLINE ,
42 'Description',
105 SY-VLINE.
WRITE:/(105) SY-ULINE.
endat.
clear wf_txt.
at new object.
if wa_tadir-object = 'SMOD'.
wf_object2 = 'Enhancement' .
elseif wa_tadir-object = 'SXSD'.
wf_object2 = ' Business Add-in'.
endif.
FORMAT COLOR COL_GROUP INTENSIFIED ON.
WRITE:/1 SY-VLINE,
2 wf_object2,
105 SY-VLINE.
endat.
case wa_tadir-object.
when 'SMOD'.
wf_smod = wf_smod + 1.
SELECT SINGLE MODTEXT into wf_txt
FROM MODSAPT
WHERE SPRSL = SY-LANGU
AND NAME = wa_tadir-OBJ_NAME.
FORMAT COLOR COL_NORMAL INTENSIFIED OFF.
when 'SXSD'.
For BADis
wf_badi = wf_badi + 1 .
select single TEXT into wf_txt
from SXS_ATTRT
where sprsl = sy-langu
and EXIT_NAME = wa_tadir-OBJ_NAME.
FORMAT COLOR COL_NORMAL INTENSIFIED ON.
endcase.
WRITE:/1 SY-VLINE,
2 wa_tadir-OBJ_NAME hotspot on,
41 SY-VLINE ,
42 wf_txt,
105 SY-VLINE.
AT END OF object.
write : /(105) sy-ULINE.
ENDAT.
ENDLOOP.
WRITE:/(105) SY-ULINE.
SKIP.
FORMAT COLOR COL_TOTAL INTENSIFIED ON.
WRITE:/ 'No.of Exits:' , wf_smod.
WRITE:/ 'No.of BADis:' , wf_badi.
ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(105) 'No userexits or BADis exist'.
ENDIF.
ELSE.
FORMAT COLOR COL_NEGATIVE INTENSIFIED ON.
WRITE:/(105) 'Transaction does not exist'.
ENDIF.
AT LINE-SELECTION.
data : wf_object type tadir-object.
clear wf_object.
GET CURSOR FIELD FIELD1.
CHECK FIELD1(8) EQ 'WA_TADIR'.
read table jtab with key obj_name = sy-lisel+1(20).
move jtab-object to wf_object.
case wf_object.
when 'SMOD'.
SET PARAMETER ID 'MON' FIELD SY-LISEL+1(10).
CALL TRANSACTION 'SMOD' AND SKIP FIRST SCREEN.
when 'SXSD'.
SET PARAMETER ID 'EXN' FIELD SY-LISEL+1(20).
CALL TRANSACTION 'SE18' AND SKIP FIRST SCREEN.
endcase.
Reward points if this helps.
Manish

URGENT : FORM6i & W2K & WNT4 : USER.EXE

Similar Messages

Maybe you are looking for