while exit from the dsply fiel its adding a blank record with 0'

[koti shiva <shivakk4u@xxxxxxxxxxx>]

Hi all,
   
  i am adding records to a physical file through a dsply file while exit from 
the dsply file it adding a blank record to physical file.
   
  can any body help me, bellow is my code.
   
   
  RPG Code
>   0002.00 FSTUDENT   IF A E             DISK        
> 0003.00 FSTDNTDSP  CF   E             WORKSTN     
> 0004.00 C                   DOW       *IN03=*OFF  
> 0005.00 C                   EXFMT     DSTUDENT    
> 0007.00 C                   EVAL      SID =dSID  
> 0008.00 C                   WRITE     STUDREC     
> 0010.00 C                   enddo                 
> 0011.00 C                   return                 
>    
>   PF code
>   0002.00      A          R STUDREC             
> 0003.00      A            SID            3S 0 
>    
>   Dsply file 
>                                           CA03(03 'F3=EXIT')       
>  A                                                               
>  A          R DSTUDENT                                           
>  A                                  5  5'ENTER THE STUDENT ID : '
>  A            DSID           3S 0I  5 35                         
>  A                                 22 20'F3=EXIT'        
>    
   TIA
   Shiva Shanker        



                                
---------------------------------
 Here's a new way to find what you're looking for - Yahoo! Answers 
 Send FREE SMS to your friend's mobile from Yahoo! Messenger Version 8. Get it 
NOW