Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- select his_modi
- set order to clave
- if seek(str(docufia.documento,8)+"SUELDO")
- do while not eof() and his_modi.documento=docufia.documento and upper(allt(his_modi.campobase))="SUELDO"
- replace viesuesol with val(his_modi.viejo)
- select his_modi
- skip
- enddo
- endif
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement