>>close data all >>open data (cStruDBC) && source of stored procedures >>cStruTimeStamp = dbgetprop('strudbc','database','comment') >>copy procedures to 'struprocs.txt' >>close database all >>open data (cDataDBC) && target database >>set database to (cDataDBC) >>=dbsetprop('datadbc','database','comment',cStruTimeStamp) >>*-- check if the procedure is null or empty >>struContents = filetostr('struprocs.txt') >>if empty(struContents) or isnull(struContents) >>else >> append procedures from 'struprocs.txt' overwrite && error occurs here!!! >>endif >>erase struprocs.txt >>>