forgot to write the data at the end

Code:
' Sector 0 should now have a complete copy of the data + changed data from the orginal selected sector 
   
      SDC_sector = Flash_Addr_Copy.byte2
      gosub Flash_Sec_Erase              ' erase orginal sector 
      
      for SDC_PAGE = 0 to 255                                          '  copy sector 0 pages to selected sector 0 ( 256bytes at a time) 
           SDC_Sector  = 0                                             ' use sector 0 
           SDC_byte    = 0
           Data_Length = 255
           gosub Flash_Read                                             ' read the data  
           SDC_Sector  = Flash_Addr_Copy.byte2                          ' use selected sector  
           SDC_byte    = 0
           Data_Length = 255
           gosub Flash_write                                           ' write the data 
       next SDC_PAGE                                                      
      SDC_sector = 0                     ' clean up sector 0 
      gosub Flash_Sec_Erase               
 return