Ler Empresa_parametro_iss

Ler Empresa_parametro_iss

HReadSeekFirst(empresa_parametro_iss,empresa_parametro_iss.id_empresa, ...
                           TABLE_empresas.COL_id_empresa)
IF HFound(empresa_parametro_iss) THEN
ELSE
END