Conexión Balanza Dibal (mal suma lógica XOR de los números)
Publicado por gonzalo (15 intervenciones) el 17/04/2019 12:08:38
Hola, tengo un problema con mi función en vfp con la conexión de balanzas (protocolo tipsa), resulta que cuando mando un precio como 9,50 no se me comunica con la balanza y con el resto me funciona correctamente. He estado informándome por foros y he encontrado este hilo el cual dice que el problema es que hace mal la suma lógica XOR: http://www.clubdelphi.com/foros/showthread.php?t=63904
Es el mismo problema que me ocurre a mi pero no soy capaz de seguir los pasos indicados y realizarlo en visual fox pro 9. Por favor necesito ayuda de como hacerlo, el código que uso es el siguiente:
A=VAL(SUBSTR(STR(PRECIO,6,2),1,1))
B=VAL(SUBSTR(STR(PRECIO,6,2),2,1))
C=VAL(SUBSTR(STR(PRECIO,6,2),3,1))
D=VAL(SUBSTR(STR(PRECIO,6,2),5,1))
E=VAL(SUBSTR(STR(PRECIO,6,2),6,1))
thisform.oleBascula.output=ALLTRIM("98"+ALLTRIM(STR(A))+ALLTRIM(STR(B))+ALLTRIM(STR(C))+ALLTRIM(STR(D))+ALLTRIM(STR(E))+ALLTRIM(STR(BITXOR(9,8,a,b,c,d,e))))+chr(13)+chr(10)
Gracias por vuestra atención, saludos
Es el mismo problema que me ocurre a mi pero no soy capaz de seguir los pasos indicados y realizarlo en visual fox pro 9. Por favor necesito ayuda de como hacerlo, el código que uso es el siguiente:
A=VAL(SUBSTR(STR(PRECIO,6,2),1,1))
B=VAL(SUBSTR(STR(PRECIO,6,2),2,1))
C=VAL(SUBSTR(STR(PRECIO,6,2),3,1))
D=VAL(SUBSTR(STR(PRECIO,6,2),5,1))
E=VAL(SUBSTR(STR(PRECIO,6,2),6,1))
thisform.oleBascula.output=ALLTRIM("98"+ALLTRIM(STR(A))+ALLTRIM(STR(B))+ALLTRIM(STR(C))+ALLTRIM(STR(D))+ALLTRIM(STR(E))+ALLTRIM(STR(BITXOR(9,8,a,b,c,d,e))))+chr(13)+chr(10)
Gracias por vuestra atención, saludos
Valora esta pregunta
0