assim, funciona.
Código: Selecionar todos
str:="UPDATE pagard001 p ";
+"SET p.coddesp = ( SELECT first 1 s.coddesp FROM pagar_simples001 s WHERE p.docum||p.codfor = s.docum||s.codfor )";
+", p.cencusto = ( SELECT first 1 s.cencusto FROM pagar_simples001 s WHERE p.docum||p.codfor = s.docum||s.codfor );"
assim dá erro, s.cencusto não existe, ou é assim mesmo?
não precisaria de dois selects, pois já estou no registro correto com o select.
Código: Selecionar todos
str:="UPDATE pagard001 p ";
+"SET p.coddesp = ( SELECT first 1 s.coddesp FROM pagar_simples001 s WHERE p.docum||p.codfor = s.docum||s.codfor ) ";
+", p.cencusto = s.cencusto;"
Poka

