Hola Fernando.
Arba modificó la url del servidor de negocios.
Bajá la versión 1.05 que está corregida: www.any2fe.com.ar/downloads/any2ribpba.zip
Saludos...
Ricardo Sassy
--
Has recibido este mensaje porque estás suscrito al grupo "[oohg]" de Grupos de Google.
Para cancelar la suscripción a este grupo y dejar de recibir sus mensajes, envía un correo electrónico a oohg+uns...@googlegroups.com.
Para ver este debate, visita https://groups.google.com/d/msgid/oohg/CAKrMrvyDzE5CE7xHhMDZMPN_aUCB%2BR_HxQUA029bHE1qETgifg%40mail.gmail.com.
Para ver este debate, visita https://groups.google.com/d/msgid/oohg/073301dcaa84%24004a8140%2400df83c0%24%40gmail.com.
Para ver este debate, visita https://groups.google.com/d/msgid/oohg/073301dcaa84%24004a8140%2400df83c0%24%40gmail.com.
Para ver este debate, visita https://groups.google.com/d/msgid/oohg/ca55acb8-102d-422d-873b-cf17dc927cdbn%40googlegroups.com.
Para ver este debate, visita https://groups.google.com/d/msgid/oohg/67f56895-33dd-4a0b-a6e4-0917909c807en%40googlegroups.com.
Debe utilizar los diseño actualizados, 1.7. Retenciones (excepto actividad 26, 6 de Bancos y 17 de Bancos y No Bancos) del siguiente link
https://www.arba.gov.ar/archivos/Publicaciones/Nuevo%20Disenio%20de%20Registro%20ARWeb%20Prod..pdf
El cliente probo las retenciones de febrero y con ese formato funciono. Estan revisando las percepciones, pero el error que arroja es otro.
El txt lo genere imprimiendo en una impresora definida como set printer to RRIIBB.TXT. Y el cambio de renglon con @ prow()+1,00
Paso el detalle.
Set Printer to rriibb.txt
Set Device to Print
@ Prow(),00 Say Substr(Gv10Niva,1,13)
@ Prow(),Pcol() Say Substr(Str(Gv10Cfec,8),7,2)+"/"
@ Prow(),Pcol() Say Substr(Str(Gv10Cfec,8),5,2)+"/"
@ Prow(),Pcol() Say Substr(Str(Gv10Cfec,8),1,4)
Multiplo=1
If Gv10Tcom >= 10 .And. Gv10Tcom < 20
@ Prow(),Pcol() Say "F"
Endif
If Gv10Tcom >= 20 .And. Gv10Tcom < 30
@ Prow(),Pcol() Say "D"
Endif
If Gv10Tcom >= 30 .And. Gv10Tcom < 40
@ Prow(),Pcol() Say "C"
Multiplo=-1
Endif
@ Prow(),Pcol() Say Gv10Cate
@ Prow(),Pcol() Say Substr(Str(Gv10sucu+100000,6),2,5)
@ Prow(),Pcol() Say Substr(Str(Gv10Cnro+100000000,9),2,8)
If Gv10Cate="A"
@ Prow(),Pcol() Say Zerostr((Gv10IGT2+Gv10ITC)*Multiplo,14,2)
Else
@ Prow(),Pcol() Say Zerostr((Gv10IMPO+Gv10ITC)*Multiplo,14,2)
Endif
@ Prow(),Pcol() Say Zerostr(Gv10coefi,5,2)
@ Prow(),Pcol() Say Zerostr(Gv10Perc*multiplo,13,2)
@ Prow(),Pcol() Say Substr(Str(Gv10Cfec,8),7,2)+"/"
@ Prow(),Pcol() Say Substr(Str(Gv10Cfec,8),5,2)+"/"
@ Prow(),Pcol() Say Substr(Str(Gv10Cfec,8),1,4)
@ PROW(),pCOL() SAY "a"
@ Prow()+1,00 Say ""
Set Device to Screen
Saludos
Para ver este debate, visita https://groups.google.com/d/msgid/oohg/67f56895-33dd-4a0b-a6e4-0917909c807en%40googlegroups.com.