String to oscript Date

Tom_Lunding

Hello,

I'm quite new to oscript and have the following question.

We have a webreport with a DUE DATE Column.

We want to filer this column based on a start date and an end date without prompting.

The filter value in this case is a string because it is written in the URL. after applying the filter.

For Example Filter column DATE (with Date objects in the format dd-mm-yyyy) from "18-04-2013" to "30-06-2013"

In fact we need to:

convert DATE from date object to integer

convert filter 1 from String to date object to integer

convert filter 2 from String to date object to integer

Any help is very welcome!

Find more posts tagged with

Comments

Ferdinand Prantl

String to date:

Date dateValue = Date.StringToDate(stringValue, "%d-%m-%Y")

Not sure what is the integer for you; number of days relative to October 15, 1582:

Integer days = Date.DateInteger(dateValue)

Have a look at .../packages/date_class.html#StringToDate() in your Builder documentation.

--- Ferda

Tom_Lunding

Hello Ferdinand, thank you very much for your reply.

We have tried a lot but we could not get it work.

We have two functions wich handles the filter:

First, the docols, and second the filterSource.

Isn't there an easier way to filter a column based on a FROM DATE and TO DATE without prompting?

The column numer = 9

And we have created a function to get a int value of a date:

Quoted Ferdinand Prantl on 2013-07-24 15:56:

function Integer getintvalueDate( String date1)
   Date theDate
   Integer days = 0
   theDate = Date.StringToDate(date1, "%d-%m-%Y" )
   days = Date.DateInteger(theDate)
   return days
end

Quoted Ferdinand Prantl on 2013-07-24 15:56:

Function Assoc doCols (Dynamic c, Integer row )
   Integer col, compResult, intDueDate, intFilterDueDate
   Assoc   retVal
   String   s =''
   String   filterValue
   String   columnDueValue = ""
   Boolean   include = true
   intDueDate = 0
   intFilterDueDate = 0
   filterValue = ''
   if isDefined(row)
       // we skip the first 5 columns as, in a form, they don't contain user data
       for col=Str.StringToInteger(.getCols(c)) to length(c.data[1])

       end
       for col=Str.StringToInteger(.getCols(c)) to length(c.data[1])
           if col >= 3 && col <= 9
               filterValue = ._repTag('&filter' + Str.String(col))
               if (Str.Trim(Str.String(c.data[row][col])) == filterValue) || filterValue == ""
                   if(col >= 3)
                       s += '<TD><IMG HEIGHT="24" SRC="' + ._repTag('SUPPORTDIR') + 'px.gif" WIDTH="2" BORDER="0"></TD>'
                   end
                   if(col == 3)
                       s += '<TD> ' + '<a target="_blank" href="http://*****/livelink/llisapi.dll?func=ll&objId=' + Str.String(c.data[row][1]) + '&objAction=BrowseTaskList">' + Str.String(c.data[row][col]) + '<a></TD>'
                   elseif(col==4)
                       s += '<TD> ' + '<a target="_blank" href="http://*****/livelink/llisapi.dll?func=ll&objId=' + Str.String(c.data[row][2]) + '&objAction=BrowseTask&sorttasks=name">' + Str.String(c.data[row][col]) + '<a></TD>'
                   else
                       s += '<TD> ' + Str.String(c.data[row][col]) + '</TD>'
                   end
               else
                   s = ""
                   include = false
               end
           end
           elseif col == 9
               filterValue = Str.Trim(._repTag('&filter' + Str.String(col)))
               if Str.Trim(Str.String(c.data[row][col])) != ""
                   if Str.String(._repTag('&filter' + Str.String(col))) != ""
                       columnDueValue = Str.Trim(Str.String(c.data[row][col]))
                       intDueDate = .getintvalueDate(columnDueValue)
                       intFilterDueDate = .getintvalueDate(._repTag('&filter' + Str.String(col)))
                   else
                       intFilterDueDate = 0
                   end
                   if intDueDate >= intFilterDueDate
                       s += '<TD><IMG HEIGHT="24" SRC="' + ._repTag('SUPPORTDIR') + 'px.gif" WIDTH="2" BORDER="0"></TD>'
                       s += '<TD> ' + Str.String(c.data[row][col]) + '</TD>'
                   else
                       s = ""
                       include = false
                   end
               else
                   s += '<TD><IMG HEIGHT="24" SRC="' + ._repTag('SUPPORTDIR') + 'px.gif" WIDTH="2" BORDER="0"></TD>'
                   s += '<TD> ' + Str.String(c.data[row][col]) + '</TD>'
               end
           end
       end
   end

   retVal.s = s
   retVal.include = include

   return retVal
end

Quoted Ferdinand Prantl on 2013-07-24 15:56:

And second the Function Void filterSource (Dynamic c)
   Integer col, row, compResult, intDueDate, intFilterDueDate
   String   filterValue
   String   columnDueValue = ""
   intDueDate = 0
   intFilterDueDate = 0
   row = 1
   compResult = 0

   While ( row <= Length(c.data) )
       // we skip the first 5 columns as, in a form, they don't contain user data
       for col=Str.StringToInteger(.getCols(c)) to length(c.data[1])
           if col > 3
               filterValue = ._repTag('&filter' + Str.String(col))
               if (Str.Trim(Str.String(c.data[row][col])) != filterValue) && filterValue != ""
                   // drop the row
                   RecArray.Droprecord(c.data, row)
                   row -= 1
                   break
               end
           end
       end

       row +=1
   end
end