Traerte los nombres de los ficheros de una carpeta por FTP

conex is int

conex = FTPConnect("ftp.myweb.com", "myuser", "mykey")

IF conex < 0 THEN
   //info("no hay conexion")
   RETURN
END

// se usa para preparar la cadena de devolucion
cCadena is string

FTpFileList is string = FTPListFile(conex, "/www/ots/201705/*.PDF",FileList,ftpFile)

afile is string

FOR EACH STRING afile OF ResName SEPARATED BY CR
    Info(afile)
END

//******* Procedures
PROCEDURE FileList(name)
     cCadena = cCadena + name + CR
RESULT True

Del procedure sólo tomamos el nombre... pero se podrian poner todas las opciones:

PROCEDURE FileList(Name, nSize, sAttribute, sDate, sTime, nParam)

Combos

Cuando llenas un combo con el comando ListAdd y usas GLINK, como por ejemplo:

ListAdd(COMBO_TiposDoc,dsTiposDoc.cdescdoc+gLink(dsTiposDoc.ccodtipo))

Se Añade descripción del tipo de documento y código del tipo de documento
Si luego quieres recuperar el código de la selección que ha realizado el usuario, tienes que usar el modo:
sTipoDoc = COMBO_TiposDoc[COMBO_TiposDoc]..StoredValue
en vez de usar el nombre del combo, ya que te devolvería el número de línea de la selección.
Ahora bien, si las propiedades del combo marcas la opción:

Podrás usar el nombre del combo para que te devuelva el código en vez del número de línea. Por Ejemplo:

sTipoDoc = COMBO_TiposDoc

Por cierto, si lo que quieres es obtener el texto que se está mostrando en el combo, puedes usar esto:

sTipoDocDesc = COMBO_TiposDoc..DisplayedValue

Invocar REST con curl

$url = «http://www.miweb.com/REST/getdoc/2956» ;

$curl = curl_init();

curl_setopt($curl, CURLOPT_HTTPHEADER, array(‘Content-type: application/xml’));
curl_setopt($curl, CURLOPT_HTTPHEADER, array(‘Authorization:Js3RXX15’));

curl_setopt($curl, CURLOPT_URL, $url);
curl_setopt($curl, CURLOPT_RETURNTRANSFER, 1);

$result = curl_exec($curl);

curl_close($curl);

$xml = new SimpleXMLElement($result);

print_r($xml);

IIF

En WinDev no existe la función IIF

Pero se puede imitar de una forma parecida a como se hace en PHP

expresión a evaluar ? Valor verdadero ELSE Valor falso

Ejemplo:

Elderly = Customer.CalculatedAge > 60? Elderly +1 ELSE Elderly

Zoom

Tenemos asociado el zoom para las imagenes… pero los chicos de WinDev lo usan también para redimensionar los objetos y sus fonts.

Si miras en la ayuda: http://doc.windev.com/en-US/?1000017201&verdisp=210

Verás que en la version 20 ya se tiene para muchos objetos… pero en la 21 han incluido el form principal.

Esta propiedad es mas importante de lo que muchos se piensan… pues con los años la gente va perdiendo vista y quiere ver la aplicación con las letras más grandes.

Si quieres, puedes bajarte esto que lo he realizado con la version 21 y pulsar en el boton del zoom para ver como crecen los objetos y los font.

https://drive.google.com/file/d/0Bwf43lxlsw5IcmR6NG1fdzRKTGc/view?usp=sharing