Imprime el objeto previamente obtenido o creado mediante código.
Definición:
Item.Objeto.Imprimir [listado] as string, [ver] as Byte
Colección
Item.Imprimir [listado] as string, [ver] as Byte
* Listado: Referencia al campo "Listado" de la tabla ceesi_listados del objeto/colección
* Ver: 0-selector de listados; 1-Presentación en pantalla; 2-Envío a impresora
Código VB6:
'Ejemplo 1. Abre el formulario de selección de listados para un pedido set lObjeto = gcn.obj.dameObjeto ("Pedidos", "Where idpedido=12345") if not lObjeto is nothing then lObjeto.Imprimir end if 'Ejemplo 2. Abre un listado de los disponibles en el objeto. Debemos hacer referencia a la propiedad "Listado" (en tabla ceesi_listados) gcn.obj.dameObjeto ("Pedidos", "Where idpedido=12345").Objeto.imprimir "Pedido de cliente" 'Ejemplo 3. Abre la presentación directamente sin pasar por el selector gcn.obj.dameObjeto ("Albaranes", "Where IdAlbaran=1").Objeto.imprimir "Albaran1",1 'Ejemplo 4. Envía el listado directamente a la impresora desde la impresión de la colección. Esta colección sí que está preparada: gcn.obj.dameColeccion ("Albaranes", "Where IdAlbaran<>0").imprimir "albaranes1",2
Código en C#:
IItem lObjeto = (IItem)gCn.Obj.DameObjeto("Pedidos", "Where idpedido=12345"); if (lObjeto != null) { lObjeto.Imprimir(); } gCn.Obj.DameColeccion("Albaranes", "Where IdAlbaran<>0").Imprimir();
Otros ejemplos para lanzar listados específicos de objeto desde programación.
También podemos realizar lo mismo desde los objetos
- Ofertas, Ofertas de Contratos, Ofertas de Proveedor, Partes y Albaranes de envío.
- Así como desde los objetos Factura, Factura deudor, Factura Proveedor, Factura Acreedor, Contrato y Contrato de Cuotas
A continuación algunos ejemplos ilustrativos:
Código en VB6:
gcn.obj.dameObjeto("Ofertas", "Where IdOferta = 22 AND Revision = 1").Objeto.imprimir "Oferta1",1 gcn.obj.dameObjeto("Albaranes_envio", "Where IdEnvio = 1").Objeto.imprimir "Albaran_Envio1",1 gcn.obj.dameObjeto("Contratos", "Where IdContrato = 1").Objeto.imprimir "Contrato1",1 gcn.obj.dameObjeto("Partes", "Where IdParte = 1").Objeto.imprimir "Parte1",1 gcn.obj.dameObjeto("Facturas", "Where IdFactura = 1").Objeto.imprimir "Factura1",1
Código en C#:
gCn.Obj.DameObjeto("Ofertas", "Where IdOferta = 22 AND Revision = 1").Imprimir(); gCn.Obj.DameObjeto("Albaranes_envio", "Where IdEnvio = 1").Imprimir(); gCn.Obj.DameObjeto("Contratos", "Where IdContrato = 1").Imprimir(); gCn.Obj.DameObjeto("Partes", "Where IdParte = 1").Imprimir(); gCn.Obj.DameObjeto("Facturas", "Where IdFactura = 1").Imprimir();