{
--------------------------------------------------------------------------
FORMULARIO    : ACFMMT007
OBJETIVO      : IMPRESION ETIQUETAS ACTIVOS
REALIZADO POR : Ing. Juan Fco. Soto.
FECHA         : AGOSTO 20, 2010
--------------------------------------------------------------------------
}
ACTION DEFAULTS
 ACTION cancel (TEXT="Cancela operacion",IMAGE="cancel")
 ACTION busca   (TEXT="Busca informacion", IMAGE="find")
 ACTION imprime (TEXT="Imprimir",IMAGE="printer")
 
END 
LAYOUT (TEXT="ETIQUETAS", STYLE="basic")
GRID
{
 <G "INFORMACIONES SOBRE EL TAMANO DE LA ETIQUETA E INVENTARIO"                                    >
  INVENTARIO        [inv                                        ]
  TEMPLATE          [tm                                         ]
  LOGO              [lg                ]            
  
  MONEDA            [mo                                         ]
  LISTA PRECIOS     [cod                                        ]
  VALOR             [va                                         ]
  
<G "PARAMETROS PARA LA BUSQUEDA"                                 >
  CODIGO DEL ACTIVO [ac     ]
  CODIGO PRODUCTO   [a   ][b   ][c   ][d1  ]
  DESCRIPCION       [d                                          ]
  DEPARTAMENTO      [dp     ]  

<G "MEDIDAS, SOLO PARA MATERIA PRIMA O PRODUCTOS TERMINADOS"                                                                                                  >
 <t                                                                                                                                                          >
  [i1 ][pc  ][x1                   ][x2                                          ][x3  ][c1           ][l1       ][l2       ][l3       ][m           ][x4]
  [i1 ][pc  ][x1                   ][x2                                          ][x3  ][c1           ][l1       ][l2       ][l3       ][m           ][x4]
  [i1 ][pc  ][x1                   ][x2                                          ][x3  ][c1           ][l1       ][l2       ][l3       ][m           ][x4]
  [i1 ][pc  ][x1                   ][x2                                          ][x3  ][c1           ][l1       ][l2       ][l3       ][m           ][x4]
  
}
END
end
ATTRIBUTES
pc = formonly.pcodid;
RADIOGROUP lg = formonly.cia_logo,ITEMS=(("1","DISIGN CENTER"),("2","MARMOTECH")),DEFAULT='1';
a            = formonly.cod_n;
b            = formonly.cod_grupo;
c            = formonly.cod_tipo;
d1           = formonly.cod_Sec;
COMBOBOX     cod = formonly.codlista,ITEMS=(("1","GENERAL")),DEFAULT=1;
RADIOGROUP va=formonly.valor,ITEMS=(("1","CON PRECIOS"),("2","SIN PRECIOS")),DEFAULT=2;    
COMBOBOX mo           = formonly.moneda,ITEMS=(("1","VENTAS RD$"),("2","VENTAS USD$"),("3","VENTAS LOCALES USD$"),("4","VENTAS EURO")),DEFAULT=3;
COMBOBOX inv = formonly.inventario, include=("ACTIVOS FIJOS","PRODUCTOS TERMINADOS","MATERIA PRIMA","REPUESTOS"),DEFAULT="PRODUCTOS TERMINADOS";
COMBOBOX tm  = formonly.salida, ITEMS=(("acprrp010.4rp","ETIQUETA ACTIVO FIJO 4 X 4"),("ipprrp010a.4rp","ETIQUETA PRODUCTOS TERMINADOS 4 X 3"),("ipprrp010f.4rp","ETIQUETA PRODUCTO TERMINADOS 2.5 X 1.5"),("ipprrp010g.4rp","ETIQUETA 3X3")),DEFAULT="ipprrp010f.4rp",
comment="Cuando El Inventario es Activo Fijo debe utilizar el template 4X4";      
ac = formonly.codigo_act;
d  = formonly.descripcion_act,scroll;
dp = formonly.codigo_dp;
CHECKBOX i1 = formonly.imp,NOT NULL,TITLE="IMPRIME",default="NO",VALUECHECKED="SI",VALUEUNCHECKED="NO";

c1 = formonly.cantidad,TITLE="CANTIDAD";
l1 = formonly.lado1,TITLE="LADO1";
l2 = formonly.lado2,TITLE="LADO2";
l3 = formonly.lado3,TITLE="LADO3";
m  = formonly.medida,TITLE="MEDIDA";
x1 = formonly.codigo, TITLE="CODIGO";
x2 = formonly.descripcion,TITLE="DESCRIPCION",scroll;
x3 = formonly.unidad;
x4 = formonly.chdespiece;

instructions
 screen record smedida(imp,pcodid,codigo,descripcion,unidad,cantidad,lado1,lado2,lado3,medida,chdespiece)
END