Rabu, 23 Mei 2012

Trik Merubah Nama Bulan English menjadi Versi Idonesia pada Cristal Report 8.5


1. Buka File Laporan
2. Klik Menu Insert >> Field Object

3. Klik Kanan Formula Field >> New





4. Ketik Nama Formula (Misalnya TempatBln)


5. Klik Ok
6. Ketiklah Rumus Di Bawah Ini

7. Klik Ikon Check

8. Jika Tidak Ada Yang Salah Klik Ok

9. Klik Ikon Save And Close

10. Drag Rumus Bulan Ke Dalam Laporan


 Hasilnya adalah :


Code Cristal Report:
================================================================
'++++++++++++++     TEMPAT & TAANGGAL SURAT ++++++++++++++++++++
================================================================

"Banjarmasin, " +  ToText(CurrentDate, "dd")  +

If Month (CurrentDate)=1 Then
" Januari " +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=2 Then
" Februari " +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=3 Then
" Maret " +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=4 Then
" April " +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=5 Then
" Mei " +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=6 Then
" Juni "  +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=7 Then
" Juli "  +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=8 Then
" Agustus "  +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=9 Then
" September "  +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=10 Then
" Oktober "  +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=11 Then
" November "  +  ToText(CurrentDate, "yyyy") 
Else
If Month (Currentdate)=12 Then
" Desember "  +  ToText(CurrentDate, "yyyy")


Hasilnya Ex : Banjarmasin, 22 Mei 2012

Download Articlle : Conversi Mount Name to Indonesia Versition in Crisal Report.pdf 

Tidak ada komentar:

Posting Komentar