Checking Records in multiple screens using module pool programming

Question

Hi,
    I created student registration form using module pool programming.In first SCREEN i designed like the Below.
          Name:     <INPUT/OUTPUT Field>
         Emailid:    <INPUT/OUTPUT Field>
         Password:<INPUT/OUTPUT Field>
          CREATE<Push Button>    SIGNIN<Push Button>       cancel<Push Button>
in  screen 1000 I created like the above screen and i wrote the code for it.It's successfully inserted records in ZSTUDENT database.
BUT
    when i call the second screen 2000.I design the screen like below.And database table is ZSTU_LOGIN.
      username : <INPUT/OUTPUT Field>
     password  : <INPUT/OUTPUT Field>
         LOGIN<push Button>   EXIT<Push Button>
AND i created Third screen 3000.Like full of detail of student details like First Name,Last Name,DOB,Education Details,Contact Details etc...
BUT I'm facing the pbm is
              whatever the record is stored in table ZSTUDENT-Name & password when i call the screen 2000 that USERNAME & PASSWORD are same
Then go to THIRD screen 3000.BUT i wrote the code for second screen 2000 by using SELECT statement.without my code check it will go to third
screen 3000 By the Statement of Call screen 3000.
PLZ any one help me HOW to CHECK the Exact Record From second Screen 2000 to First Screen 1000.
HOW to Check the code AND can u provide me any code available.
thanks,
Anusha

Answer 1

Hi vikram,
    I wrote the code for screen 2000 like below.
MODULE STATUS_2000 OUTPUT.
*  SET PF-STATUS 'xxxxxxxx'.
*  SET TITLEBAR 'xxx'.
   TABLES : ZSTUDENT_ENTER.
  TYPES: BEGIN OF ST_TAB1,
      USERNAME TYPE ZSTUDENT_ENTER-USERNAME,
     PASSWORD1 TYPE ZSTUDENT_ENTER-PASSWORD1,
     END OF ST_TAB1.
   DATA : W_TAB1 TYPE ZSTUDENT_ENTER.
   DATA : IT_TAB1 TYPE STANDARD TABLE OF ZSTUDENT_ENTER.
   DATA : USERNAME TYPE CHAR50,
         PASSWORD1 TYPE CHAR25.
ENDMODULE.                 " STATUS_2000  OUTPUT
*&      Module  USER_COMMAND_2000  INPUT
*       text
MODULE USER_COMMAND_2000 INPUT.
CLEAR W_TAB1.
   MOVE-CORRESPONDING W_TAB TO W_TAB1.
IF SY-SUBRC EQ 0.
   SELECT SINGLE MAILID PASSWORD
     INTO CORRESPONDING FIELDS OF W_TAB
       FROM ZSTUDENT_INFO
       WHERE USERNAME = W_TAB-MAILID AND
            PASSWORD1 = W_TAB-PASSWORD.
       CALL SCREEN 2000.
       ENDSELECT.
             ELSEIF SY-SUBRC NE 0.
           MESSAGE 'INVALID USERNAME/PASSWORD'.
           ELSEIF SY-UCOMM = 'LOGIN'.
             CALL SCREEN 3000.
             ENDIF.
ENDMODULE.                 " USER_COMMAND_2000  INPUT
But i could not found whether code is write or not.
syntax error is USERNAME is Unknown.
could solve me my pbm anybody.....
Thanks,
Anusha