Its alreqdy 8:30am here but it might still be too early to understand your sample. The result shown indicates that you implemented an "append", which of course is equal to "insert after last record". Not what the OP wanted.
But why are you reading the data set in first? ALLOC with MOD followed by EXECIO DISKW accomplishes the same. I don't understand what the do loop is for. -- Peter Hunkeler CREDIT SUISSE ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [EMAIL PROTECTED] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
