Hi
Check out this procedure...
Regards,
Raj
<b>Creating an Infotype</b>
Using the TCODE PM01 you can create an Infotype. As per SAP standard you can use only 9000 series. The below procedure explains you how to create an Infotype.
Go the transaction PM01 and give the Infotype Number lets say 9999 and press button. It will ask you a messaging window,
Press create button to continue further. It will take you to create the structure.
Give the components and SAVE & ACTIVATE the structure and come back.
An Infotype attributes window will appear; you create a new entry with the Infotype No and give the appropriate description.
and give the data and press ENTER key. The Technical data will appear automatically, here you have to maintain the Single screen as ‘2000’ and List screen as ‘3000’ and then SAVE the info and press BACK button, you will reach the main screen.
After that using the Menu option Infotype
Generate the structure, dialog module and include.
Click the button from application tool bar to check the Infotype attributes. Select the 9999 Infotype and check the data.
If every thing is error free, you can use the Infotype using PA30 transaction.
Use the Create button you can create New Entries for the Infotype.
You can view the entries in table PA9999 using the TCODE SE11/SE16.
Validating Code in Module pool: - If you want to validate the user inputs,
You need to write the validate code procedure in the module program MPXXXX00 screen 2000 (here XXXX is user Infotype, in our case 9999).
In PAI.
MODULE P9999.
*
MODULE HIDDEN_DATA.
FIELD P9909-PRATE MODULE PRATE. “ Create a module routines.
In PBO
MODULE PRE_INPUT_CHECKS.
----
----
CHAIN.
FIELD P9909-PRATE MODULE PRATE.
ENDCHAIN.
Double click on PRATE it will ask you the include name, SELECT the include MP999930 from the input window.
&----
*& Module PRATE OUTPUT
&----
----
MODULE prate OUTPUT.
IF NOT p9909-prate IS INITIAL.
PERFORM check_prate.
ENDIF.
ENDMODULE. " PRATE9 OUTPUT
Again check_prate subroutine, write down the below code in MP999940 include.
&----
*& Form check_prate
&----
*
----
FORM check_prate .
CLEAR zprate_t.
SELECT SINGLE * FROM zprate_t WHERE prate = p9909-prate.
IF sy-subrc > 0.
CLEAR zprate_t.
MESSAGE e016(rp) WITH 'Entry does not exist in ZPRATE_T table'.
ENDIF.
ENDFORM. " check_prate
After that check the module, if it is error free then ACTIVATE the same. You can check the Infotype validations using the PA30 transaction.
Bluesky
