loading table of contents...

2.9. FOREST_CREAR_BORRADOR_ADJUNTO()

 
FOREST_CREAR_BORRADOR_ADJUNTO
inserta a un borrador documentos adjuntos.
Retorna: void 
Esta función no retorna valor
Parámetros:
integer  codborr
Código del borrador, obligatorio
string  nombre
Nombre del borrador, obligatorio
integer  bytes
Bytes del borrador, obligatorio
Versión: 3.0+
 
Ejemplo:
En este ejemplo, se toma los adjuntos de un borrador de un proceso y los pasa a otro borrador que se crea:
var borr = FOREST_SQL_MAP("select b.nombre, t.codfile, t.ext, t.codtraborr from gdo_grl_borrador b, gdo_tra_borrador_doc t, gdo_sgc_edit_form e, gdo_sgc_formato f, gdo_tra_instancia i where i.numpro = ? and b.codinst = i.codinst and b.codborr = t.codborr and b.version = t.version and b.codtpl = e.codeditform and e.codform = f.codform and f.codigo = ? order by b.codinst", CurrentProcess.numeroProceso, "minuta_contrato");
var bytes = FOREST_GET_FILE(borr.codfile);
var params = MAKE_OBJECT("ParametrosBorrador");
params.codigoPlantilla = 'minuta_contrato';
params.bytes = bytes;
params.fileExtension = borr.ext;
params.marcas = MAKE_OBJECT();
var codBorr = FOREST_CREAR_BORRADOR(borr.nombre, CurrentDesktop.codInst, params);
var adjs = FOREST_SQL_MAP_LIST("SELECT NOMBRE, CODFILE FROM GDO_TRA_BORRADOR_ADJUNTO WHERE CODTRABORR = ?", borr.codtraborr);
for (var i = 0; i < adjs.length; i++) {
bytes = FOREST_GET_FILE(adjs[i].codfile);
FOREST_CREAR_BORRADOR_ADJUNTO(codBorr, adjs[i].nombre, bytes); }