Perguntas PONTO DE ENTRADA CADASTRO DE CLIENTES

bom dia !

alguem poderia me dar uma ajuda para gravar um campo do cadastro de cliente(sa1) em outra tabela (szt)

exemplo:

sa1.a1_teste gravar em szt.zt_teste

gravar na inclusão e alteração do cliente


agradeço imensamente a quem puder me ajudar.
Valter

Assim acho que vc vai ter que criar dois pontos de entrada um apos inclusão e outros apos alteração:

M030Inc = apos inclusao Cliente
MALTCLI = apos alteracao Cliente

Exemplo:

user Function M030INC() OU MALTCLI()

DbSelectArea("szt")
dbSetOrder(1)

If szt->(DbSeek( xFilial("szt") + SA1->A1_COD))
RecLock("szt",.F.)
szt->zt_teste := SA1->A1_NOME

szt->(MsUnlock())
Endif

Return NIL

André, muito obrigado
ajudou bastante.

abraço
Valter