```
ret = {};
For[i = 1, i <= Length@x, i++, 
  AppendTo[ret, {idNum = x[[i, 1]] , a = x[[i, 2]], b = x[[i, 3]], 
     c = x[[i, 4]], d = x[[i, 5]], e = x[[i, 6]], f = x[[i, 7]], 
     g = DateDifference[{d, e, f}, {currYear, currMonth, currDay}], 
     If[g > 90, Y, N]}];];
Print@ret

```

How do i output a list in to text file which has no bracket and braces, also need new line after each line.