XLSheet.Cells(i+1,21).VALUE = "7x24" IF INLIST(UPPER(tablest.dia), "SATURDAY", "SUNDAY") XLSheet.Cells(i+1,21).VALUE = "7x24" ELSE IF HOUR(tablest.finicio)>=8 AND HOUR(tablest.finicio)<17 XLSheet.Cells(i+1,21).VALUE = "5x8" &&tablest.jornada ENDIF ENDIF * or DO CASE CASE INLIST(UPPER(tablest.dia), "SATURDAY", "SUNDAY") XLSheet.Cells(i+1,21).VALUE = "7x24" CASE HOUR(tablest.finicio)>=8 AND HOUR(tablest.finicio)<17 XLSheet.Cells(i+1,21).VALUE = "5x8" &&tablest.jornada ENDCASE>with this code i'm trying to do the next thing:
> if upper(tablest.dia)="MONDAY" OR upper(tablest.dia)="TUESDAY" OR upper(tablest.dia)="WEDNESDA" OR upper(tablest.dia)="THURSDAY" OR UPPER(tablest.dia)="FRIDAY" then > if hour(tablest.finicio)>=8 and hour(tablest.finicio)<17 then > XLSheet.Cells(i+1,21).value = "5x8" &&tablest.jornada > endif > ELSE > *if UPPER(tablest.dia)="SATURDAY" or UPPER(tablest.dia)="SUNDAY" then > if hour(tablest.finicio)>=8 and hour(tablest.finicio)<17 then > XLSheet.Cells(i+1,21).value = "7x24" > endif > * else > if (hour(tablest.finicio)>=17 and hour(tablest.finicio)<0) or (hour(tablest.finicio)>=0 and hour(tablest.finicio)<8) then > XLSheet.Cells(i+1,21).value = "7x24" > endif > endif >