Algum tempo atrás após alguma pesquisa, resolvi desta forma:
As fotos (JPG) ficam entre 100 e 250k
COLOCAR NO EVENTO onAfterInsert
$pasta = “…/_lib/file/img”.{numero}."/"; //REMOTA
#$pasta = “/xampp/scv6/wwwroot/sc7/app/crm/_lib/file/img”.{numero}."/"; //LOCAL
$maxdim=400;
if (strlen(trim({foto_01})) > 0)
{
$foto1_nomeold = {foto_01};
$foto1_extensao = strtolower(end(explode(".", $foto1_nomeold)));
$foto1_nomenew = “foto1.”.$foto1_extensao;
$foto1_caminhocompleto_old = $pasta.$foto1_nomeold;
$foto1_caminhocompleto_new = $pasta.$foto1_nomenew;
list($larg_orig, $alt_orig) = @getimagesize($foto1_caminhocompleto_old);
if ($larg_orig > $maxdim)
{
#Se a largura for maior que maxdim
$razao_orig = $larg_orig/$alt_orig;
$alt = $maxdim/$razao_orig; #Define a altura proporcional à largura
$larg = $maxdim;
$imagem_nova1 = imagecreatetruecolor($larg, $alt); #Cria o objeto imagem
$imagem1 = @imagecreatefromjpeg($foto1_caminhocompleto_old); #Carrega o arquivo
@imagecopyresampled($imagem_nova1, $imagem1, 0, 0, 0, 0, $larg, $alt, $larg_orig, $alt_orig); #Redimensiona
@imagejpeg($imagem_nova1, $foto1_caminhocompleto_new); #Salva com novo nome
unlink($foto1_caminhocompleto_old); #Apaga arquivo com nome antigo
}
else
{
#Se a imagem for menor ou igual a maxdim, apenas padronizo o nome
rename($foto1_caminhocompleto_old, $foto1_caminhocompleto_new);
}
sc_exec_sql(“UPDATE imoveis SET foto_01 = '” . $foto1_nomenew . “’ WHERE numero = ‘{numero}’”);
}