Representante Chave Composta

Representante Chave composta

                    //representante
                    HReset(representante)
                    HReadSeekFirst(representante,representante.chave_empresa_representante,[cliente.id_empresa,cliente.id_representante_empresa])
                    IF HFound(representante) THEN
                        cliente.id_representante=representante.id_representante
                    ELSE
                        cliente.id_representante=cliente.id_representante_empresa
                    END
                    //representante

---