CADASTRO_GERAL LER

CADASTRO_GERAL LER

        HReadSeekFirst(cadastro_geral,cadastro_geral.id_cadastro_geral,gdsQry.cli_id_cadastro_geral)
        IF HFound(cadastro_geral) THEN
            sNome_empresa=cadastro_geral.id_razao_social_nome
        ELSE
            sNome_empresa=gdsQry.cli_fantasia // Nao existe no cadastro geral
        END