Lotus Approach - factura electronica

   
Vista:

factura electronica

Publicado por atilio atiliogonzalez04@gmail.com (6 intervenciones) el 03/07/2017 13:30:51
Buen dia ,el tema es asì , en mi intento de implementar factura electronica para argentina , me encuentro en la necesidad de enviar x correo la factura en pdf en forma automatizada y me encuentro con que el codigo utilizado no me trae los registros de la factura:

Tengo un generador propio de pdf que es un ocx. No voy a usar una impresora de pdf.

Estoy conectandome al dbf para leer los articulos . Al hacer la quiery filtrando por una condicion desde el codigo me trae 0 registros. la condicion esta bien.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim con As New Connection
Dim qry As New Query
Dim rs As New ResultSet
If (con.connectto ("dbase IV")<>False) Then
    Set qry.connection = con
    qry.tablename = "h:\ventasde.dbf"
    Qry.SQL="SELECT * FROM"""& qry.tablename &""" WHERE ID=81500"
    Set rs.query = qry
    If ((rs.execute)<>False) Then
        NUMCURR = (rs.numrows) 'number of records in current with
the same action reference
    End If
End If
con.disconnect


En el codigo NUMCURR= 0. No deberia ser asi, deberia ser 3.

Sin la condicion trae todos los registros, cuando la añado sin embargo
no. Existen registros que cumplen la condicion.

Gracias

Saludos , Atilio
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder