Mengubah format tanggal ‘dd-mmm-yyyy’ di SESAM

Sesam tidak bisa mengenali format tanggal jika data field tanggal berformat mmm atau "Jan, Feb, dll" contoh 01-Jan-2008 tidak akan bisa dikenali oleh SESAM

Agar bisa dikenali sebagai tanggal satu2nya cara adalah menjadikannya sebagai text field lalu kita manipulasi dengan virtual field

Disini kita asumsikan bahwa data kita berisi data "01-Jan-2008" atau "dd-mmm-yyyy", dengan nama field "DATE1"

1. Kita buat dulu virtual field dengan type data "text", kita beri nama saja "DATE2"
2. Kita isikan di rumusnya

'Mengubah 01-Jan-2008 menjadi 20080101
cdate(right(DATE1,4)+Vb.MonthConv1(mid(DATE1,4,3))+left(DATE1,2),'yyyymmdd')

 

3.Klik Ok

Penjelasan

  • Fungsi Cdate mengubah text menjadi date sesuai format (bisa 'yyyymmdd','yymmdd','mm/dd/yy', dll)
  • format 'dd-mmm-yyyy' tidak bisa dikenali oleh SESAM (why???)
  • SESAM tidak bisa me-replace suatu kata tertentu dengan kata lainnya, fungsi chrtran mengubah suatu urutan character dengan urutan character lainnya, misalnya ChrTran Function
    ChrTran("Hello World", "eo", "au")               ' Returns "Hallu Wurld"
    ChrTran("Hello World", "Heo", "Kau", 5, 8, 0)    ' Returns "Hellu Wurld"
  • Untuk mengubah Jan,JAN,jan (tanpa melihat huruf besar/kecil/no case sensitif) hanya bisa menggunakan fungsi tambahan dari sesam yang bisa dibuat dengan VB/VFP, disini kita pake "Vb.MonthConv1"
Bookmark the permalink.

Leave a Reply

Your email address will not be published. Required fields are marked *