Fixed it!
This is what was happening ...
The array ptra2tCellStylesHeader-> has two rows x 7 columns.
So after the second iteration, the first Case option
*:* (($hbf="h") & (ptra2tCellStylesHeader->{$row}{$ElementOrder}#$t))is erroneous because $row>2. So rather than give an error, it just skips through the whole Case statement. I've installed an error handler now :) Pat On Fri, 4 Oct 2019 at 23:06, Pat Bensky <[email protected]> wrote: > Good suggestion Tim. I tried that but I am still getting bizarre results. > This is what I'm doing: > > 225 $t:="<CellStyle:"+tTableCellStyleOverride+">" > > 226 $t2:=ptra2tCellStylesBody->{$row}{$ElementOrder} > > 227 *Case of* // 04/10/19 > > 228 *:* (($hbf="h") & (ptra2tCellStylesHeader->{$row}{$ElementOrder}#$t)) > > 229 ptra2tCellStylesHeader->{$row}{$ElementOrder}:=$t > > 230 //: (($hbf="b") & (ptra2tCellStylesBody->{$row}{$ElementOrder}#$t)) > > 231 *:* (($hbf="b") & ($t2#$t)) > > 232 ptra2tCellStylesBody->{$row}{$ElementOrder}:=$t > > 233 *:* (($hbf="f") & (ptra2tCellStylesFooter->{$row}{$ElementOrder}#$t)) > > 234 ptra2tCellStylesFooter->{$row}{$ElementOrder}:=$t > > 235 *End case* > > > The Expression window shows that: > > $t="<CellStyle:gray fill>" > > $t2="" > > ptra2tCellStylesBody->{$row}{$ElementOrder}="" > > ($hbf="b")=True > > ($t2#$t)=True > > (($hbf="b") & ($t2#$t))=True > > > So it should pop into line 232. But it doesn't. It pops out of the Case > statement to line 236. > > Screen shot here: > > https://www.dropbox.com/s/roryl0rykuohd8k/4D004.png?dl=0 > > > Very confusing! > > And annoying :) > > > Pat > > > > > On Fri, 4 Oct 2019 at 20:22, Tim Nevels via 4D_Tech <[email protected]> > wrote: > >> On Oct 4, 2019, at 2:00 PM, Pat Bensky wrote: >> >> > So the first 2 times through, when $hbf="b" and >> ptra2tCellStylesBody->{$row}{$ElementOrder}#$t, it populates the cell: >> > ptra2tCellStylesBody->{$row}{$ElementOrder}:=$t >> > >> > Subsequently, it just pops through the Case statement and doesn't >> populate >> > the cell, even though those 2 test are both True. >> > >> > In all cases the two tests evaluate to True. >> > What can't I see? >> >> Maybe the 4D interpreter is getting confused with the rather complex 2D >> array pointer thing "ptra2tCellStylesBody->{$row}{$ElementOrder}#$t” >> expression. You might try setting a simple boolean variable before the case >> statement and see if that makes it work. >> >> $theThing_b:=(ptra2tCellStylesBody->{$row}{$ElementOrder}#$t) >> >> Tim >> >> ***************************************** >> Tim Nevels >> Innovative Solutions >> 785-749-3444 >> [email protected] >> ***************************************** >> >> ********************************************************************** >> 4D Internet Users Group (4D iNUG) >> Archive: http://lists.4d.com/archives.html >> Options: https://lists.4d.com/mailman/options/4d_tech >> Unsub: mailto:[email protected] >> ********************************************************************** > > > > -- > ************************************************* > CatBase - Top Dog in Data Publishing > tel: +44 (0) 207 118 7889 > w: http://www.catbase.com > skype: pat.bensky > ************************************************* > -- ************************************************* CatBase - Top Dog in Data Publishing tel: +44 (0) 207 118 7889 w: http://www.catbase.com skype: pat.bensky ************************************************* ********************************************************************** 4D Internet Users Group (4D iNUG) Archive: http://lists.4d.com/archives.html Options: https://lists.4d.com/mailman/options/4d_tech Unsub: mailto:[email protected] **********************************************************************
