[Kuk]

Fito, puedes reducir el tamaño del código poniendo DELIMITED una sol vez

string nombres(1:l-nom) " "
         paterno(1:l-pat) " "
         materno(1:l-mat)   
    delimited by size into nombre