Hi
The following line does not match the brackets correctly when the split over multiple lines. It works fine if the code is all on one line. I am using PB6.03 64bit
https://www.dciphercomputing.com/update ... ntinue.png
Simon
[Done] Is this a Line Continuation Bug?
[Done] Is this a Line Continuation Bug?
Simon White
dCipher Computing
dCipher Computing
Re: Is this a Line Continuation Bug?
It's hard to copy and try from the screenshot
My Projects ThreadToGUI / OOP-BaseClass / EventDesigner V3
PB v3.30 / v5.75 - OS Mac Mini OSX 10.xx - VM Window Pro / Linux Ubuntu
Downloads on my Webspace / OneDrive
PB v3.30 / v5.75 - OS Mac Mini OSX 10.xx - VM Window Pro / Linux Ubuntu
Downloads on my Webspace / OneDrive
Re: Is this a Line Continuation Bug?
The first Bool() identifies matching brackets. The second version has problems.
Code: Select all
Bool(""=taRcvd(#KA_EMAIL) And Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,10),"KHCard","PID",KHCard()) And Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,9),"KHCard","PID",KHCard()) And Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,6),"KHCard","PID",KHCard()) And Not SQLSeek(KHSite("pid")\ValueS+LSet(taRcvd(#KA_ISO),6,"?"),"KHCard","PID",KHCard()) And Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,3)+"000","KHCard","PID",KHCard()) And Not SQLSeek(Left(lcCard,10),"KHCard","CardNo",KHCard()) And Not SQLSeek(Left(lcCard,9),"KHCard","CardNo",KHCard()) And Not SQLSeek(Left(lcCard,6),"KHCard","CardNo",KHCard()) And Not SQLSeek(LSet(taRcvd(#KA_ISO),6,"?"),"KHCard","CardNo",KHCard())) ; Card ISO must exist in IPN Database (Kardall can have 9 Or 10 digits i.e. 6 digit ISO plus 3 Or 4 digit account#)
Bool(""=taRcvd(#KA_EMAIL) And Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,10),"KHCard","PID",KHCard()) And Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,9),"KHCard","PID",KHCard()) And
Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,6),"KHCard","PID",KHCard()) And Not SQLSeek(KHSite("pid")\ValueS+LSet(taRcvd(#KA_ISO),6,"?"),"KHCard","PID",KHCard()) And
Not SQLSeek(KHSite("pid")\ValueS+Left(lcCard,3)+"000","KHCard","PID",KHCard()) And Not SQLSeek(Left(lcCard,10),"KHCard","CardNo",KHCard()) And Not SQLSeek(Left(lcCard,9),"KHCard","CardNo",KHCard()) And
Not SQLSeek(Left(lcCard,6),"KHCard","CardNo",KHCard()) And Not SQLSeek(LSet(taRcvd(#KA_ISO),6,"?"),"KHCard","CardNo",KHCard())) ; Card ISO must exist in IPN Database (Kardall can have 9 Or 10 digits i.e. 6 digit ISO plus 3 Or 4 digit account#)
Simon White
dCipher Computing
dCipher Computing
Re: Is this a Line Continuation Bug?
Here is a less mind boggling version:
the first parenthesis of the 2nd line get's the wrong color
Norm.
Code: Select all
If ((2 = 21) And
(( Not 86) = (a )))
Norm.
google Translate;Makes my jokes fall flat- Fait mes blagues tombent à plat- Machte meine Witze verpuffen- Eh cumpari ci vo sunari
Re: Is this a Line Continuation Bug?
Seems to work as expected, can anybody confirm ?
Re: Is this a Line Continuation Bug?
Works for me, too.