Na OPUS indica a opção de execução da função fmodify:
SET FMODIFY TO CASCADE | SETNULLS | KEYINFO
r=fopen("EXEMPLO","
",1,2)
decl na[1]=space(12)
na[1]="IDADEF"
decl va[1]=space(5)
r=fseek("FILHOS","NOMEP1","a",na,va)
va[1]="2"
set fmodify to cascade
r=fmodify("FILHOS",na,va)