ValidaCFD

HOLA QUE TAL DE NUEVO YO DISCULPA LAS MOLESTIAS
UNA PREGUNTA LO QUE PASA ESQUE YA DESCARGUE LA NUEVA ACTUALIZACION DE CFDlib.dll QUE ADQUIRI Y MI DUDA ES QUE MI PROGRAMA SIGUE TOMANDO SOLO UN PEDIMENTO SERA QUE ME FALTA POR ACTUALIZAR ALGO EN MI PROGRAMA??' O SERA MI CODIGO MIRA ASI LO TENGO ESTO ES EN CLARION
GRACIAS POR TU TIEMPO Y APOYO LO QUE ESTA EN COLOR AZUL ES LA PARTE DE LOS PEDIMENTOS

Case Fad:Partida

of 1 ! Partida 1

PUTINI('Concepto1','Cantidad',Fad:Canti,'.\Factura.ini')
PUTINI('Concepto1','Unidad',Part:Unidad,'.\Factura.ini')
PUTINI('Concepto1','NoIdentificacion',Fad:NumParte,'.\Factura.ini')
PUTINI('Concepto1','Descripcion',Part:DescriParte,'.\Factura.ini')
PUTINI('Concepto1','ValorUnitario',Fad:PUnit,'.\Factura.ini')
PUTINI('Concepto1','Importe',Fad:Importe,'.\Factura.ini')


if Fad:Pedimento<>'' and Fad:Pedimento<>'ENSAMBLE' then
PUTINI('Concepto1','AduanaNumero',Fad:Pedimento,'.\Factura.ini')
PUTINI('Concepto1','AduanaFecha',format(APMFD:FechaEntrada,@D10-),'.\Factura.ini')
PUTINI('Concepto1','Aduana','AEROPUERTO INTERNACIONAL MIGUEL HIDALGO','.\Factura.ini')

elsif Fad:Pedimento='ENSAMBLE' then

APMPED:FolioEntrada=Fad:FolioEntrada
Set(APMPED:KeyFolioEntrada,APMPED:KeyFolioEntrada)
loop
next(APMPED)

if errorcode() or APMPED:FolioEntrada<>Fad:FolioEntrada then break.

PUTINI('Concepto1','AduanaNumero',APMPED:Pedimento,'.\Factura.ini')
PUTINI('Concepto1','AduanaFecha',format(APMPED:FechaEntrada,@D10-),'.\Factura.ini')
PUTINI('Concepto1','Aduana','AEROPUERTO INTERNACIONAL MIGUEL HIDALGO','.\Factura.ini')
end
end Y ASI ES PARA LOS DEMAS CONCEPTOS GRACIAS

No programo en Clarion

Por favor revisa DOS VECES el mail que te envie al ultimo.

El mail que tienes que revisar es aquel en donde recibista la actualizacion de la libreria.

si de hecho lo descargue ya ves que viene en archivo .rar y copie CFDlib.dll a mi carpeta de mi programa reemplaze el existente por este nuevo dll
asi era como tenia que hacerle o me falto algun paso??? gracias

Mmmmh, te puse un ejemplo pero no lo analizaste.................

Como programador debes saber que NO PUEDE HABER DOS VARIABLES DISTINTAS CON EL MISMO NOMBRE, debes usarlo asi :

[Concepto2]
Cantidad=5
Unidad=PZA
NoIdentificacion=29845798357
Descripcion=Piña dulce del bajio
ValorUnitario=18.90
Importe=94.50

AduanaNumero=348759
AduanaFecha=2011-01-08
Aduana=Aeropuerto Internal. de México

AduanaNumero1=1348759
AduanaFecha1=1111-11-11
Aduana1=Aeropuerto Internal. de México1

AduanaNumero2=2348759
AduanaFecha2=2222-01-08
Aduana2=Aeropuerto Internal. de México2

etc

OK MUCHAS GRACIAS LO QUE PASA ESQUE SOY NUEVO EN ESTO HACE UN MES QUE ENTRO A PROGRAMAR SOLO TENIA LO BASICO Y MENOS DE CLARION
OYE YA LO IMPRIMIO PEOR UNA ULTIMA PREGUNTA NO SOY EXPERIMENTADO EN ESTO Y ME FALTA LOGICA SOLO EL PROBLEMA ESQUE ME IMPRIME LAS 3 VECES PERO REPITE LO MISMO OSEA NO IMPRIME LOS REGISTROS QUE DEBERIAN SEGUIR
PERDON POR LAS MOLESTIAS
GRACIAS POR TU APOYO

Sube aqui al foro tu archivo ini y el XML resultante para analizarlo

Solo por afinar los detalles, hablas de "imprimirlo", te refiers imprimirlo en papel o solo estas usando mal el termino para tratar de decir que lo "convirtio" de ini a XML, porque mi libreria no impre, convierte de ini a XML asi que no se si te refieres a mi libreria o a tu codigo

si mira utiliso mal los terminos me refiero a imprime en pantalla o imprime en cadena o imprime en xml
asi
<Concepto cantidad="1" unidad="PZA" noIdentificacion="R6-2-J10-6" descripcion="CABLE ARMADO C/CONECTORES 6 FT" valorUnitario="94" importe="94">
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
la informacion aduanera debe de tener difernete numero de pedimento el problema esque pone el primer registro en todos espero y me haya hecho entender disculpa mi ignorancia

.....te solicitaba que subieras tambien el archivo ini.........

gracias
te comennto apenas hace un mes entre a este trabajo por lo tanto ya el sistema estaba creado asi como el archivo ini mira te lo mando asi esta el ini
[Parametros]
Certificado=.\Certificados\APM880603NB101615263.cer
LavePrivada=.\Certificados\APM880603NB4_1005070913S.key
[Comprobante]
Folio=487
NoAprobacion=267328
AnoAprobacion=2011
FormadePago=1
CondicionesDePago=CONTADO
Subtotal=loc:subtotalini
Descuento=loc:descuentoini
Total=18560
[Receptor]
Rrc=IVM860930KT6
Nombre=INDUSTRIAS VAGO DE MEXICO, S.A DE C.V.
Calle=HIDALGO 743-A
Colonia=LA FAMA
Municipio=STA. CATARINA
Estado=N.L.
Pais=MEX
Codigopostal=66100
es el unico que encontre espero y me puedas ayudar creo yo puede ser en el codigo que no esta tomando valor por valor de la tabla solo toma uno y es el ultimo siento que si hace el recorrido pero no puedo encontrar la forma de que en

AduanaNumero=xxxxx
AduanaFecha=xxxx-xx-xx
Aduana=Aeropuerto Internal.


AduanaNumero1=xxxxx
AduanaFecha1=xxxx-xx-xx
Aduana1=Aeropuerto Internal.

ps genere en cada aduana el valor de cada columna correposndiente al mismo folio del articulo con diferente aduana
espero y me haya hecho entender disculpa mi forma de expicar gracias
Dios te bendiga y te de Sabiduria

Deja ver porque mi libreria pasa de esto :

lpulido escribió: DOS NODOS ADUANDA CON DATOS "xxxxx"

AduanaNumero=xxxxx
AduanaFecha=xxxx-xx-xx
Aduana=Aeropuerto Internal.

AduanaNumero1=xxxxx
AduanaFecha1=xxxx-xx-xx
Aduana1=Aeropuerto Internal.

A esto: ( )

CUATRO!!! NODOS ADUANA CON DATOS SACADOS DE LAS ENTRAÑAS DE LA COMPUTADORA.

<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>
<InformacionAduanera numero="074838617062735" fecha="2007-03-08" aduana="AEROPUERTO INTERNACIONAL MIGUEL HIDALGO"/>

Mi libreria debe tener un error muy grave, inventa datos.

Mientras reviso mi libreria tu revisa por tu lado tambien.

Por cierto, revisa tambien como formas tu ini :

Subtotal=loc:subtotalini ????
Descuento=loc:descuentoini ????

[Receptor]
Rrc=IVM860930KT6 Rrc?????