B4J Code Snippet Get Month Short Names (according to Java SimpleDateFormat)

[CODE lang="b4x" title="GetMonthShortNames"]Private Sub GetMonthShortNames As List
Dim l As List
l.Initialize
For i=1 To 12
DateTime.DateFormat="M"
Dim longDT As Long = DateTime.DateParse(i)
DateTime.DateFormat="MMM"
l.Add(DateTime.Date(longDT))
Next
Return l
End Sub[/CODE]
Tip: They're not always what you might expect (at least in English)