<pre>function addDays pDate,pDays  get empty  if pDate is not a date then somethingWrongIn "addDays", pDate && "n'est pas une date valide!"  else if pDays is not an integer then somethingWrongIn "addDays", pDays && "n'est pas un nombre valide!"  else    put the itemDelimiter into oldDel    set the itemDelimiter to ","    get pDate    convert it to dateItems    add pDays to item 3 of it    convert it to short date    set the itemDelimiter to oldDel  end if  return itend addDays</pre>