Bases de Datos :: Factura

Portal

Foro

Buscar

FAQ

Registrarse

Conectarse

Fecha y hora actual: Sabado, 27 Abril 2024, 12:02 • Todas las horas son UTC + 1 Hora

Factura

Página 1 de 2
Ir a la página 1, 2 Siguiente

Factura

Autor	Mensaje
psycopata3 Usuario Registrado: Noviembre 2011 Mensajes: 5 Edad: 36	Factura Hola nuevamente... tengo un pequeño inconveniente necesito almacenar en un textlabel un dato obtenido de una tabla de postgre aqui esta el codigo Código: [Descargar] [Ocultar] [Seleccionar] Código: [Descargar] [Mostrar] PUBLIC SUB factura() DIM ruta AS String DIM archivo AS File DIM captura AS Integer DIM Qry AS String DIM resul AS Result Qry = "SELECT MAX(pk_cod_cliente),MAX(pk_num_fac) from t_factura" 'Qry = "Select pk_num_fac FROM t_factura where pk_num_fac=Max(pk_num_fac)" '=(SELECT Max(pk_num_fac) FROM t_factura)" resul = db.EXEC(Qry) TextLabel3.Text = resul["pk_cod_cliente"] EL PROBLEMA ES AQUI, ME DICE QUE DESCONOCE EL CAMPO. Conexion.resul = Conexion.db.Exec("select * from t_clientes where fk_cod_cliente='" & TextLabel3.Text & "'") Conexion.resul.MoveFirst captura = Conexion.resul.Count ruta = User.Home &/ "Factura.html" OPEN ruta FOR CREATE AS #archivo PRINT #archivo, "<html>" PRINT #archivo, " <head><title>Factura</title></head>" PRINT #archivo, " <body>" PRINT #archivo, " <table>" PRINT #archivo, " <tr>" PRINT #archivo, " <td align='center'><h2>SENIAT</h2></td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td align='center'><h5>RIF: J-29364248-5<h5></td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td align='center'><h5>Emisora Feliz 104.7fm</h5></td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " </td><h5>CARUPANO - ESTADO SUCRE<h5></td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>Cliente: </td>" PRINT #archivo, " <td>" & Conexion.resul!nombre_apellido & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>RIF: </td>" PRINT #archivo, " <td>" & Conexion.resul!pk_rif_cliente & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>Dir: </td>" PRINT #archivo, " <td>" & Conexion.resul!domicilio_fiscal & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td align='center'><h3>FACTURA<h3></td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>Factura: </td>" PRINT #archivo, " <td>" & resul!pk_num_fac & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>Fecha: </td>" PRINT #archivo, " <td>" & resul!fecha_emision & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td colspan='2'>Publicidad Correspondiente al mes</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td colspan='2'>de" & resul!mes_facturar & "del 2011 </td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>Monto: </td>" PRINT #archivo, " <td>" & resul!sub_total & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>IVA: </td>" PRINT #archivo, " <td>" & resul!iva & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td>TOTAL: </td>" PRINT #archivo, " <td>" & resul!monto_total & "</td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr><td> </td>" PRINT #archivo, " </tr>" PRINT #archivo, " <tr>" PRINT #archivo, " <td align='center''><h5>Original<h5></td>" PRINT #archivo, " </tr>" PRINT #archivo, " </table>" PRINT #archivo, " </body>" PRINT #archivo, "</html>" EXEC ["firefox", User.Home &/ "Factura.html"] CLOSE #archivo END TextLabel3.Text = resul["pk_cod_cliente"] EL PROBLEMA ES AQUI, ME DICE QUE DESCONOCE EL CAMPO. Y Necesito almacenar en ese label el cod del cliente para realizar la siguiente busqueda, la custion es q necesito todos los datos del ultimo registro de las 2 tablas. supoongo q buscando todos los datos del ultimo registro de la primera tabla obtendre el campo para buscar en la otra tabla... no se si me explique, espero puedan ayudarme... ahh si el comando SELECT TOP 1 * FROM t_factura ORDER BY pk_num_fac DESC; me da error de syntaxys cerca del <1> última edición por psycopata3 el Jueves, 10 Noviembre 2011, 10:59; editado 2 veces
#1 Jueves, 10 Noviembre 2011, 10:53

shordi Analista Programador Registrado: Septiembre 2009 Mensajes: 4982 Edad: 64 Ubicación: Albacete	Re: Factura Citar: TextLabel3.Text = resul["pk_cod_cliente"] EL PROBLEMA ES AQUI, ME DICE QUE DESCONOCE EL CAMPO. Conexion.resul = Conexion.db.Exec("select * from t_clientes where fk_cod_cliente='" & TextLabel3.Text & "'") En el select lo llamas fk_cod_cliente y en la linea de arriba pk_cod_cliente. A parte de eso, si todavía no has hecho el Exec ¿cómo va a conocer el campo? Cambia el orden de las líneas y ya está (espero) Respecto al Select top 1 prueba con select miscampos from mitabla order by miscampos LIMIT 1 Suerte última edición por shordi el Jueves, 10 Noviembre 2011, 12:08; editado 1 vez
#2 Jueves, 10 Noviembre 2011, 12:08

netking86 Técnico Programador Registrado: Septiembre 2009 Mensajes: 159 Edad: 38 Ubicación: Málaga	Re: Factura Un consejo: No uses tanto PRINT. Es un incordio. En mi programa uso plantillas. ¿Cómo? Creo el HTML sin los datos, y allí donde deben estar los datos, coloco claves: por ejemplo $$cliente$$ Luego, para personalizar el documento, lo abro con File.Load, y sustituyo la clave por el valor adecuado usando la funcion Replace. Esto te da dos ventajas: Es más fácil trabajar con documentos HTML más grandes y puedes cambiar el aspecto de la plantilla sin tener que editar tu programa. Por ejemplo, puedes seleccionar distintas plantillas (a gusto del usuario) y cosas así... Suerte =================== Proyecto Open Media Manager -> http://www.OpenMediaManager.com
#3 Jueves, 10 Noviembre 2011, 14:09

david Programador Registrado: Septiembre 2009 Mensajes: 110 Edad: 47 Ubicación: puerto de santa maria (Cadiz)	Re: Factura netking86 podrias hacer un pequeño lugar en tu tiempo y hacer un manual de esos rapidos para torpes, por que me interesa esa idea, porque me e quedado flipado cuando dices lo de la palabra clave enlazarla con los resultados, y te lo agradeceria un monton, gracias
#4 Jueves, 10 Noviembre 2011, 23:58

netking86 Técnico Programador Registrado: Septiembre 2009 Mensajes: 159 Edad: 38 Ubicación: Málaga	Re: Factura A ver, sería una cosa así: Necesitamos una plantilla. Esta es muy simple, pero la mecánica es la misma si es más grande: Código: [Descargar] [Ocultar] [Seleccionar] Código: [Descargar] [Mostrar] <html> <head> <title>$titulo$</title> <head> <body> <p>$comentario$</p> </body> <html> Código: [Descargar] [Ocultar] [Seleccionar] Código: [Descargar] [Mostrar] DIM texto as STRING texto = file.load("direccion donde se aloje la plantilla") texto = replace(texto, "$titulo$", "Ejemplo de plantilla") texto = replace(texto, "$comentario$", "Esto es un ejemplo de plantilla para el foro de gambas. Bla bla bla bla...." ' Ya tenemos la plantilla HTML valida. La podemos guardar en disco, imprimirla,... PRINT texto A simple vista es un coñazo, pero los ficheros HTML se agrandan mucho cuando pones tablas y cosas así, y escribirlo desde gambas como lo hacía nuestro compañero se convierte en una tarea muy pesada. Un saludo =================== Proyecto Open Media Manager -> http://www.OpenMediaManager.com
#5 Viernes, 11 Noviembre 2011, 11:35

netking86 Técnico Programador Registrado: Septiembre 2009 Mensajes: 159 Edad: 38 Ubicación: Málaga	Re: Factura Si quieres un ejemplo más completo, el programa que estoy haciendo usa ese mismo sistema. Le puedes echar un vistazo a la web de mi firma, allí puedes bajarte el fuente (GAMBAS3) =================== Proyecto Open Media Manager -> http://www.OpenMediaManager.com
#6 Viernes, 11 Noviembre 2011, 11:36

jsbsan Analista Programador Registrado: Septiembre 2009 Mensajes: 4175 Edad: 51 Ubicación: dos hermanas, sevilla	Re: Factura netking86: Esta muy interesante lo de las plantillas en HTML, gracias por el aporte. Una sugerencia para tu web, pon una pestaña de "pantallazos" o/y algun video de como se usa el programa. Saludos Julio =================== Blog personal Web: SoloGambas seleccion de articulos dedicados a Gambas Visita el Curso de Gambas3 ¡¡¡Gratuito!!!
#7 Viernes, 11 Noviembre 2011, 17:43

netking86 Técnico Programador Registrado: Septiembre 2009 Mensajes: 159 Edad: 38 Ubicación: Málaga	Re: Factura Citar: Esta muy interesante lo de las plantillas en HTML, gracias por el aporte. Gracias a ti Citar: Una sugerencia para tu web, pon una pestaña de "pantallazos" o/y algun video de como se usa el programa. Pues justamente me pillas haciendolo jeje =================== Proyecto Open Media Manager -> http://www.OpenMediaManager.com
#8 Viernes, 11 Noviembre 2011, 18:31

david Programador Registrado: Septiembre 2009 Mensajes: 110 Edad: 47 Ubicación: puerto de santa maria (Cadiz)	Re: Factura como siempre me as dejado anonadado
#9 Viernes, 11 Noviembre 2011, 20:20

Fenriz07 Programador Registrado: Agosto 2010 Mensajes: 118 Edad: 32 Ubicación:	Re: Factura Excelente! estare al tanto, orita estoy acostumbrado a los reportes por el gestor de gambas, pero probare tu idea última edición por Fenriz07 el Viernes, 11 Noviembre 2011, 22:08; editado 1 vez
#10 Viernes, 11 Noviembre 2011, 22:07

Mostrar mensajes anteriores:

Temas parecidos

	Autor	Foro	Respuestas	último mensaje
Simple Ejemplo Para Añadir Conceptos A Un...	jsbsan	Aplicaciones/Fragmentos de Código	0	Jueves, 26 Enero 2012, 20:07 jsbsan
Impuestos En Factura[SOLUCIONADO]	marcopc	Aplicaciones/Fragmentos de Código	6	Viernes, 14 Diciembre 2012, 18:11 Fenriz07
Imprimir Una Factura	jj231089	General	3	Martes, 09 Septiembre 2014, 00:22 jguardon
Factura Digital	Ricardo Prieto	General	4	Lunes, 11 Marzo 2019, 09:20 Shell

Página 1 de 2
Ir a la página 1, 2 Siguiente

Fecha y hora actual: Sabado, 27 Abril 2024, 12:02 • Todas las horas son UTC + 1 Hora

Usuarios navegando en este tema: 0 registrados, 0 ocultos y 1 invitado
Usuarios registrados conectados: Ninguno

Lista de permisos

No puede crear mensajes
No puede responder temas
No puede editar sus mensajes
No puede borrar sus mensajes
No puede votar en encuestas
No puede adjuntar archivos
Puede descargar archivos
No puede publicar eventos en el calendario

Versión reducida del foro - (Lo-Fi)
Página generada en:: 0.7058s (PHP: -78% SQL: 178%)
Consultas SQL: 48 - Debug off - GZIP Activado

Design by Mighty Gorgon