De momento lo dejo así. Me sirve, me lo deja en la medida que deseo (3,5cm), y me parece incluso que está bien que vea lo que va a copiar, y en vez de preguntarle si realmente lo quiere copiar, pues ha de pulsar un botón.
Copia el QR con un marco negro fino que no toca el QR en si, y que ...
... y 75 y lo muestra n1 (73) ? deta[1]:= substr(cstring , 1, n1) Aqui extraigo la cadena desde el 1 (primer caracter hasta n1 que es 73 Esto lo hace bien.
Pero si hago para probar deta[2]:= substr(cstrings , 74, 160) Muestra el strings desde el 74 hasta el 200.
... y 75 y lo muestra n1 (73) ? deta[1]:= substr(cstring , 1, n1) Aqui extraigo la cadena desde el 1 (primer caracter hasta n1 que es 73 Esto lo hace bien.
Pero si hago para probar deta[2]:= substr(cstrings , 74, 160) Muestra el strings desde el 74 hasta el 200.
... VISIBLE ,307,211,60,12 CONTROL "Tipo de Registro :",IDC_STATIC,"STATIC",SS_RIGHT |WS_CHILD |WS_GROUP |WS_VISIBLE ,10,250,100,8 CONTROL "Código de Bien/Servicio :",65535,"STATIC",SS_RIGHT |WS_CHILD |WS_GROUP |WS_VISIBLE ,10,265,100,8 CONTROL "Base Imponible Documto ;",65535,"STATIC",SS_RIGHT |WS ...
... VISIBLE ,307,211,60,12 CONTROL "Tipo de Registro :",IDC_STATIC,"STATIC",SS_RIGHT |WS_CHILD |WS_GROUP |WS_VISIBLE ,10,250,100,8 CONTROL "Código de Bien/Servicio :",65535,"STATIC",SS_RIGHT |WS_CHILD |WS_GROUP |WS_VISIBLE ,10,265,100,8 CONTROL "Base Imponible Documto ;",65535,"STATIC",SS_RIGHT |WS ...
... vaya ingresando los datos, luego el campo orden que va a ser unico para que el usuario pueda darle un orden, y un campo nombre (por el cual tambien se puede ordernar si quieres en xbrowse agregando la clausula AUTOSORT) por si lo quiere ordenarlo por ese campo. Seguramente no estoy comprendiendo ...
... Pues deberiamos publicarla cuanto antes, estoy pendiente de que Rao me confirme que estamos preparados. Por mi parte las clases para IA funcionan bien y de hecho las hemos publicado aqui en los foros para que podais ir usándolas ya.
> y por otro lado me gustaría realmente recibir una capacitación ...