Rabu, 06 Juli 2011

from produk, from pelanggan, from penjualan



Pelanggan

Sub hapus()
kd_pelanggan.Enabled = True
ClearFORM Me
Call RubahCMD(Me, True, False, False, False)
cmdproses(1).Caption = "&baru"
End Sub

Sub prosesDB(Log As Byte)
Select Case Log
Case 0
SQL = "INSERT INTO pelanggan(kd_pelanggan, nama, alamat, telp)" & _
" values('" & kd_pelanggan.Text & _
"','" & nama.Text & _
"','" & alamat.Text & _
"','" & telp.Text & "')"
Case 1

SQL = "UPDATE pelanggan SET Nama ='" & nama.Text & "'," & _
" alamat = '" & alamat.Text & "'," & _
" telp = '" & telp.Text & "'," & _
" where kd_pelanggan ='" & kd_pelanggan.Text & "'"
Case 2
SQL = "DELETE FROM pelanggan WHERE kd_pelanggan='" & kd_pelanggan.Text & "'"
End Select
MsgBox "Pemorosesan RECORD Database telah berhasil...!", vbInformation, "Data pelanggan"
Db.Execute SQL, adCmdTable
Call hapus
Adodc1.Refresh
kd_pelanggan.SetFocus
End Sub

Sub Tampilpelanggan()
On Error Resume Next
kd_pelanggan.Text = RS!kd_pelanggan
nama.Text = RS!nama
alamat.Text = RS!alamat
telp.Text = RS!telp

End Sub

Private Sub Cmdproses_Click(Index As Integer)
Select Case Index
Case 0
Call hapus
kd_pelanggan.SetFocus
Case 1
If cmdproses(1).Caption = "&baru" Then
Call prosesDB(0)
Else
Call prosesDB(1)
End If
Case 2
X = MsgBox("Yakin RECORD produk Akan Dihapus...!", vbQuestion + vbYesNo, "pelanggan")
If X = vbYes Then prosesDB 2
Call hapus
kd_pelanggan.SetFocus
Case 3
Call hapus
kd_pelanggan.SetFocus
Case 4
Unload Me
End Select
End Sub

Private Sub Form_Load()
Call OPENDB
Call hapus
End Sub

Private Sub kd_pelanggan_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If kd_pelanggan.Text = "" Then
MsgBox "Masukkan kd_pelanggan produk !", vbInformation, "pelanggan"
kd_pelanggan.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM pelanggan WHERE kd_pelanggan='" & kd_pelanggan.Text & "'"
If RS.State = adStateOpen Then RS.Close
RS.Open SQL, Db, adOpenDynamic, adLockOptimistic
If RS.RecordCount <> 0 Then
Tampilpelanggan
Call RubahCMD(Me, False, True, True, True)
cmdproses(1).Caption = "&Edit"
kd_pelanggan.Enabled = False
Else
X = kd_pelanggan.Text
Call hapus
kd_pelanggan.Text = X
Call RubahCMD(Me, False, True, False, True)
cmdproses(1).Caption = "&baru"
End If
nama.SetFocus
End If
End Sub

Produk

Sub hapus()
kd_produk.Enabled = True
ClearFORM Me
Call RubahCMD(Me, True, False, False, False)
cmdproses(1).Caption = "&baru"
End Sub

Sub prosesDB(Log As Byte)
Select Case Log
Case 0
SQL = "INSERT INTO produk(kd_produk, nama, satuan, jumlah)" & _
" values('" & kd_produk.Text & _
"','" & nama.Text & _
"','" & satuan.Text & _
"','" & jumlah.Text & "')"
Case 1

SQL = "UPDATE produk SET Nama ='" & nama.Text & "'," & _
" Satuan = '" & satuan.Text & "'," & _
" Jumlah = '" & jumlah.Text & "'," & _
" Where kd_produk ='" & kd_produk.Text & "'"
Case 2
SQL = "DELETE FROM produk WHERE kd_produk='" & kd_produk.Text & "'"
End Select
MsgBox "Pemorosesan RECORD Database telah berhasil...!", vbInformation, "Data produk"
Db.Execute SQL, adCmdTable
Call hapus
Adodc1.Refresh
kd_produk.SetFocus
End Sub

Sub Tampilproduk()
On Error Resume Next
kd_produk.Text = RS!kd_produk
nama.Text = RS!nama
satuan.Text = RS!satuan
jumlah.Text = RS!jumlah

End Sub

Private Sub Cmdproses_Click(Index As Integer)
Select Case Index
Case 0
Call hapus
kd_produk.SetFocus
Case 1
If cmdproses(1).Caption = "&baru" Then
Call prosesDB(0)
Else
Call prosesDB(1)
End If
Case 2
X = MsgBox("Yakin RECORD produk Akan Dihapus...!", vbQuestion + vbYesNo, "produk")
If X = vbYes Then prosesDB 2
Call hapus
kd_produk.SetFocus
Case 3
Call hapus
kd_produk.SetFocus
Case 4
Unload Me
End Select
End Sub

Private Sub Form_Load()
Call OPENDB
Call hapus


End Sub

Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)

End Sub

Private Sub kd_produk_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If kd_produk.Text = "" Then
MsgBox "Masukkan Kd_produk produk !", vbInformation, "produk"
kd_produk.SetFocus
Exit Sub
End If
SQL = "SELECT * From produk WHERE kd_produk='" & kd_produk.Text & "'"
If RS.State = adStateOpen Then RS.Close
RS.Open SQL, Db, adOpenDynamic, adLockOptimistic
If RS.RecordCount <> 0 Then
Tampilproduk
Call RubahCMD(Me, False, True, True, True)
cmdproses(1).Caption = "&Edit"
kd_produk.Enabled = False
Else
X = kd_produk.Text
Call hapus
kd_produk.Text = X
Call RubahCMD(Me, False, True, False, True)
cmdproses(1).Caption = "&baru"
End If
nama.SetFocus
End If
End Sub

penjualanan

Sub hapus()
no_bukti.Enabled = True
ClearFORM Me
Call RubahCMD(Me, True, False, False, False)
cmdproses(1).Caption = "&baru"
End Sub

Sub prosesDB(Log As Byte)
Select Case Log
Case 0
SQL = "INSERT INTO penjualan(no_bukti, tgl, kd_pelanggan,kd_produk,jumlah)" & _
" values('" & no_bukti.Text & _
"','" & tgl.Text & _
"','" & kd_pelanggan.Text & _
"','" & kd_produk.Text & _
"','" & jumlah.Text & "')"
Case 1

SQL = "UPDATE produk SET tgl ='" & tgl.Text & "'," & _
" kd_pelanggan = '" & kd_pelanggan.Text & "'," & _
" kd_produk = '" & kd_produk.Text & "'," & _
" jumlah = '" & jumlah.Text & "'," & _
" where no_bukti ='" & no_bukti.Text & "'"
Case 2
SQL = "DELETE FROM penjualan WHERE no_bukti='" & no_bukti.Text & "'"
End Select
MsgBox "Pemorosesan RECORD Database telah berhasil...!", vbInformation, "Data penjualan"
Db.Execute SQL, adCmdTable
Call hapus
Adodc1.Refresh
no_bukti.SetFocus
End Sub

Sub Tampilpenjualan()
On Error Resume Next
no_bukti.Text = RS!no_bukti
tgl.Text = RS!tgl
kd_pelanggan.Text = RS!kd_pelanggan
kd_produk.Text = RS!kd_produk
jumlah.Text = RS!jumlah

End Sub

Private Sub Cmdproses_Click(Index As Integer)
Select Case Index
Case 0
Call hapus
no_bukti.SetFocus
Case 1
If cmdproses(1).Caption = "&baru" Then
Call prosesDB(0)
Else
Call prosesDB(1)
End If
Case 2
X = MsgBox("Yakin RECORD produk Akan Dihapus...!", vbQuestion + vbYesNo, "penjualan")
If X = vbYes Then prosesDB 2
Call hapus
no_bukti.SetFocus
Case 3
Call hapus
no_bukti.SetFocus
Case 4
Unload Me
End Select
End Sub

Private Sub Form_Load()
Call OPENDB
Call hapus


End Sub

Private Sub Frame1_DragDrop(Source As Control, X As Single, Y As Single)

End Sub

Private Sub no_bukti_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If no_bukti.Text = "" Then
MsgBox "Masukkan no_bukti penjualan !", vbInformation, "penjualan"
no_bukti.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM produk WHERE no_bukti='" & no_bukti.Text & "'"
If RS.State = adStateOpen Then RS.Close
RS.Open SQL, Db, adOpenDynamic, adLockOptimistic
If RS.RecordCount <> 0 Then
Tampilpenjualan
Call RubahCMD(Me, False, True, True, True)
cmdproses(1).Caption = "&Edit"
no_bukti.Enabled = False
Else
X = no_bukti.Text
Call hapus
no_bukti.Text = X
Call RubahCMD(Me, False, True, False, True)
cmdproses(1).Caption = "&baru"
End If
tgl.SetFocus
End If
End Sub

Jawaban no 3

Sub hapus()
kd_pelanggan.Enabled = True
ClearFORM Me
Call RubahCMD(Me, True, False, False, False)
cmdproses(1).Caption = "&baru"
End Sub

Sub prosesDB(Log As Byte)
Select Case Log
Case 0
SQL = "INSERT INTO pelanggan(kd_pelanggan, nama, alamat, telp)" & _
" values('" & kd_pelanggan.Text & _
"','" & nama.Text & _
"','" & alamat.Text & _
"','" & telp.Text & "')"
Case 1

SQL = "UPDATE pelanggan SET Nama ='" & nama.Text & "'," & _
" alamat = '" & alamat.Text & "'," & _
" telp = '" & telp.Text & "'," & _
" where kd_pelanggan ='" & kd_pelanggan.Text & "'"
Case 2
SQL = "DELETE FROM pelanggan WHERE kd_pelanggan='" & kd_pelanggan.Text & "'"
End Select
MsgBox "Pemorosesan RECORD Database telah berhasil...!", vbInformation, "Data pelanggan"
Db.Execute SQL, adCmdTable
Call hapus
Adodc1.Refresh
kd_pelanggan.SetFocus
End Sub

Sub Tampilpelanggan()
On Error Resume Next
kd_pelanggan.Text = RS!kd_pelanggan
nama.Text = RS!nama
alamat.Text = RS!alamat
telp.Text = RS!telp

End Sub

Private Sub Cmdproses_Click(Index As Integer)
Select Case Index
Case 0
Call hapus
kd_pelanggan.SetFocus
Case 1
If cmdproses(1).Caption = "&baru" Then
Call prosesDB(0)
Else
Call prosesDB(1)
End If
Case 2
x = MsgBox("Yakin RECORD produk Akan Dihapus...!", vbQuestion + vbYesNo, "pelanggan")
If x = vbYes Then prosesDB 2
Call hapus
kd_pelanggan.SetFocus
Case 3
Call hapus
kd_pelanggan.SetFocus
Case 4
Unload Me
End Select
End Sub

Private Sub Form_Load()
Call OPENDB
Call hapus
End Sub

Private Sub kd_pelanggan_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
If kd_pelanggan.Text = "" Then
MsgBox "Masukkan kd_pelanggan produk !", vbInformation, "pelanggan"
kd_pelanggan.SetFocus
Exit Sub
End If
SQL = "SELECT * FROM pelanggan WHERE kd_pelanggan='" & kd_pelanggan.Text & "'"
If RS.State = adStateOpen Then RS.Close
RS.Open SQL, Db, adOpenDynamic, adLockOptimistic
If RS.RecordCount <> 0 Then
Tampilpelanggan
Call RubahCMD(Me, False, True, True, True)
cmdproses(1).Caption = "&Edit"
kd_pelanggan.Enabled = False
Else
x = kd_pelanggan.Text
Call hapus
kd_pelanggan.Text = x
Call RubahCMD(Me, False, True, False, True)
cmdproses(1).Caption = "&baru"
End If
nama.SetFocus
End If
End Sub

Selasa, 05 Juli 2011

Pentingnya Berorganisasi Dalam Kehidupan Kampus

Sebagai makhluk sosial, setiap manusia senantiasa berinteraksi dengan manusia lainnya, bahkan cenderung hidup berkelompok atau berorganisasi untuk mencapai tujuan bersama yang tidak mungkin dicapai bila ia sendiri. Interaksi dan kerja sama ini akan terus berkembang dengan teratur sehingga membentuk wadah yang disebut dengan organisasi. Interaksi atau hubungan antar individu-individu dan kelompok/tim dalam setiap organisasi akan memunculkan harapan-harapan. Harapan ini kemudian akan menimbulkan peranan-peranan tertentu yang harus diemban oleh masing-masing individu untuk mewujudkan visi, misi, dan tujuan organisasi/kelompok. Sebuah organisasi memang dibentuk sebagai wadah yang didalamnya berkumpul sejumlah orang yang menjalankan serangkaian aktivitas tertentu secara teratur guna tercapainya tujuan yang telah disepakati bersama. Terlebih dalam kehidupan masyarakat modern, manusia merasa bahwa selain mengatur dirinya sendiri, ia juga perlu mengatur lingkungannya, memelihara ketertiban, mengelola dan mengontrolnya lewat serangkaian aktifitas yang kita kenal dengan manajemen dan organisasi.

Bagi beberapa kalangan mahasiswa, kegiatan organisasi merupakan kegiatan yang membosankan, terlalu ribet, banyak waktu terbuang, dan alasan-alasan lainnya. Mereka kebanyakan tidak suka dengan aturan-aturan yang akan mengikat mereka ketika mereka bergabung dalam organisasi tersebut. Padahal, disamping hal itu semua banyak manfaat yang dapat kita ambil dari kegiatan berorganisasi. Diantaranya yang bisa kita dapatkan dari berorganisasi dalam kampus adalah ;
1. Mahasisiwa dapat bersosialisasi dangan baik
2. Mahasiswa dapat belajar bekerjasama
3. Mahasiswa bisa sling menghormati dan saling menghargai antar mahasisawa
4. Mahasiswa dqpqt mempersiapkan diri untuk masa depan
Bagi kalangan mahasiswa seperti kita, organisasi merupakan wadah kita untuk mengembangkan skill di dalam dunia kerja kelak. Tentunya kita semua tidak pernah tahu kedepannya kita akan bekerja dalam bidang apa dan pada bagian apa. Tetapi paling tidak kita telah siap dengan itu semua. Apa saja yang harus kita lakukan didalam bekerja dalam tim, bagaimana cara kita menangani dan mengendalikan suatu permasalahan secara bersama-sama. Hal itu semua akan sangat berguna bagi kita dalam menghadapi dunia pekerjaan.

Seperti contoh, ketika kita turun didalam dunia kerja, tiba-tiba kita mendapatkan amanat dari pemimpin untuk menjadi seorang ketua team dalam suatu kelompok kerja. Nah, disinilah pengalaman berorganisasi kita akan sangat dibutuhkan. Sebagai seorang Leader, kita harus dapat memimpin rekan-rekan kerja kita yang lain untuk selalu kompak. Kitapun akan dituntut untuk berani mengambil suatu keputusan dengan cepat dan tepat tetapi tetap menitikberatkan kepada apa yang dituju.

Dengan terjun dalam kegiatan organisasipun kita juga akan dapat belajar bagaimana cara berkomunikasi dengan orang lain yang baru saja kita kenal. Metode-metode komunikasi pun akan kita dapatkan dalam berorganisasi.

MENJADI MAHASISWA KREATIF

Mahasiswa selalu identik dengan kaum intelektual, idealis, dan obsesi. Sebagai elemen elite masyarakat, mahasiswa diharapkan tidak hanya sekedar pintar, namun juga peka terhadap apa yang terjadi di sekitarnya. Selain itu, karakteristik mahasiswa yang berjiwa dinamis, keratif, serta inovatif juga menjadi gambaran mahasiswa idaman.

Namun sayang, tak banyak kita temui mahasiswa yang intelek sekaligus kreatif. Banyak mahasiswa yang hanya pintar dalam bidang akademis, tetapi tidak mampu menciptakan sesuatu yang baru sebagai aplikasi dari apa yang sudah diperolehnya selama menuntut ilmu di perguruan tinggi. Maka tidak mengherankan kalau perguruan tinggi (PT) yang setiap tahunnya melahirkan sarjana-sarjana ber-IPK di atas 3,0, namun tak dapat berkompetisi di lapangan. Ini dapat dilihat dengan semakin bertambahnya jumlah pengangguran dari kalangan sarjana. Mereka tidak mampu bersaing dengan baik untuk mendapatkan tempat pekerjaan. Tetapi, jika mahasiswa memiliki kreatifitas, merupakan sebuah nilai tambah untuk mendapatkan pekerjaan yang mereka inginkan.

Mahasiswa yang kreatif adalah mahasiswa yang senantiasa memiliki daya cipta terhadap sesuatu. Ia selalu memiliki gagasan atau ide-ide baru yang menarik. Di tangannya, sebuah kertas polos yang amat sederhana pun dapat di sulap menjadi sesuatu yang menarik dan mempunyai nilai jual. Oleh karena itulah banyak perusahaan-perusahaan yang lebih senang mempekerjakan mahasiswa atau sarjana yang kreatif.

Kreatif sendiri dapat dimiliki oleh setiap orang, bisa melalui bakat atau bawaan dari lahir. Artinya, orang tersebut memang sudah mempunyai bakat kreatif dalam mengerjakan segala sesuatu. Ada pula yang memiliki kreatif dari karena selalu mengasah dan melatih diri untuk kreatif.

Bagi orang-orang yang memang sudah sejak lahir memiliki bakat sebagai orang yang kreatif tentu idak mendapatkan masalah yang berarti. Namun, bagi orang yang tidak mempunyai bakat kreatif tersebut, maka ia harus rajin melatih dan mengasah ke-kreatifannya.

Banyak cara yang dapat dilakukan untuk menjadi mahasiswa yang kreatif, salah satunya adalah selalu memiliki gagasan atau ide-ide baru setiap hari. Seorang mahasiswa harus selalu berfikir untuk mendapatkan sesuatu yang baru (inovatif), apapun itu. Untuk membiasakan diri mencari gagasan atau ide-ide baru, dapat dilakukan dengan pada saat akhir jam kerja dengan merenung kira-kira 10 menit. Pikirkan apa saja yang telah dilakukan pada hari itu. Lalu pikirkan cara yang lebih baik untuk pekerjaan esok hari. Ciptakan gagasan yang berbeda karena sesuatu yang berbeda akan lebih tampak menarik. Kumpulkan semua gagasan dan ide-ide tersebut. Dengan begitu, mahasiswa akan terbiasa memikirkan dan mencari ide-de atau gagasan yang baru.

Selain itu, mahasiswa juga harus jeli menangkap peluang yang ada di sekitarnya agar dapat mengembangkan keterampilannya (life skill) yang dimilikinya. Peluang-peluang itu dapat berupa dunia bisnis, seperti usaha bersama, menjadi tenaga kerja part-time, meluangkan waktu khusus di perpustakaan, membuat artikel/opini untuk dikirim ke media cetak, atau yang lainnya. Dengan menekuni dunia kerja sambil kuliah, mahasiswa mendapat keuntungan ganda, yaitu financial sekaligus mengasah keterampilannya (life skill).

Bagi seorang mahasiswa, mengenal dunia bisnis akan semakin mengasah mental bisnisnya serta semakin jeli melihat peluang-peluang yang ada di sekitarnya. Mahasiswa yang kreatif, akan lebih memilih berfikir dengan memaksimalkan fungsi otak, guna meraih apa yang diinginkannya. Mengenal dunia kerja lebih dini juga membuat mahasiswa mampu berkompetisi saat berada pada kenyataan di lapangan. Pengalaman dan keterampilan yang dimiliki akan mempermudah mereka menghadapi tantangan-tantangan yang menghadang. Kreatifitas yang akan lahir dari keterampilan itu juga akan semakin lengkap, dengan demikian masalah pengangguran yang selalu dialami oleh para sarjana-sarjana muda, karena sedikitnya lahan pekerjaan, akan teratasi dengan baik.

Kejelian terhadap peluang yang ada juga berguna ketika mahasiswa tidak mendapatkan kesempatan untuk bekerja di perusahaan. Artinya, mereka sudah mampu melirik peluang bisnis apa yang ada untuk menciptakan lapangan baru.

Namun ada satu faktor penting lagi yang harus dimiliki oleh mahasiswa yang kreatif, yaitu MOTIVASI. Walaupun banyak ide-ide atau gagasan yang dimiliki serta peluang usaha yang ada, semua itu masih tetap terkendala apabila tidak ada motivasi dari diri sendiri.

GURU IDAMAN…

Ki Hajar Dewantoro yang lahir pada 2 Mei 1899dan tiap tanggal 2 Mei kita memperingati Hari Pendidikan Nasional (Hardiknas), telah mengambarkan tentang sosok guru idaman nan ideal. Saya yakin kata-kata beliau tidak asing lagi di telingga kita. Menurut beliau seorang guru harus:

1. Ing Ngarso Sung Tulodho
Kunci sukses pendidikan yang pertama dan utama adalah Akhlaq. Guru benar–benar harus bisa menjadi teladan dalam berakhlaq. Anak didik kebanyakan lebih percaya dengan gurunya daripada orangtuanya, karena guru dianggap tahu segala-galanya. Untuk itu segala tingkah laku, sopan santun guru akan menjadi panutan muridnya. Guru kencing berdiri, murid kencing berlari.

2. Ing Madyo Mangun Karso
Kunci sukses kedua adalah Minat dan Semangat Belajar. Guru harus benar–benar menjadi penggali minat dan pemompa semangat belajar anak sehingga setiap anak mampu berpikir kritis dan belajar mandiri.
Jadi sebetulnya guru tidak perlu banyak mengajar, justru lebih perlu banyak menggagas tentang beragam bintang prestasi di langit yang perlu setiap siswa gapai.

Seorang bijak berpendapat bahwa tugas guru itu ibaratnya bercerita tentang enaknya ilmu dan membangkitkan selera anak untuk melahap ilmu tersebut. Keberhasilan tertinggi guru adalah jika mampu mengubah siswa yang mogok belajar menjadi siswa lebih pandai dari dirinya. Ini bukan tidak mungkin, karena otak anak dalam golden-age sedang otak gurunya sudah mulai telmi, waktu belajar anak lebih luas, sementara waktu belajar guru lebih terbatas, sumber belajar saat ini lebih banyak daripada sumber belajar ketika guru kuliah.

3. Tut Wuri Handayani
Kunci sukses ketiga adalah Pengasuhan dan Pengayoman. Guru harus benar–benar pengganti orang tua yang menerapkan Asah, Asih, Asuh, namun sekali lagi bukan dalam arti mengajar tapi mendidik.

Pentingnya organisasi dalam kalangan mahasiswa

Di kampus baru, dimanapun itu kita akan banyak mendapat tawaran-tawaran agar mau bergabung dengan salah satu organisasi yang ada.
Banyak dari kita yang langsung menolak bergabung dengan alasan takut nilai IP-nya jeblok, padahal menurut saya di kampus itu hanya ada 3 kegiatan utama yang seharusnya dilakukan oleh para mahasiswa/mahasiswi.

1.Mencari nilai
Menurut saya sudah sangat jelas bahwa setiap mahasiswa ingin mendapat nilai sebaik-baiknya dengan cara apapun ( sebaiknya halal agar tidak menambah dosa ) karena kebanyakan orang lebih percaya dengan pembuktian apakah seseorang mampu atau tidak biasanya dilihat dari statistik nilai yang diperolehnya

2.Mencari ilmu
Seharusnya ilmu yang dicari oleh para mahasiswa/mahasiswi tidak hanya teori dari buku, disinilah pentingnya mengikuti organisasi kemahasiswaan karena banyak ilmu tambahan terutama prakteknya yang tidak bisa didapatkan bila hanya belajar text book saja di dalam kelas, contohnya adalah bagaimana caranya membuat suatu rapat menjadi efektif.

3.Mencari rekan
Dalam point ini berorganisasi juga sangat penting karena dengan bergabung di satu atau lebih organisasi maka akses yang dipunyai untuk berhubungan dengan orang lain akan bertambah berlipat-lipat karena dalam organisasi biasanya akan banyak kerjasama-kerjasama lintas kampus bahkan daerah, salah satu contohnya adalah studi banding dengan universitas lain.
Kenapa kita berorganisasi? Pertanyaan ini mungkin sudah basi kedengarannya di telinga mahasiswa. Jawaban yang ada mungkin berbeda-beda sesuai dengan redaksi jawaban dari yang ditanya,namun intinya adalah bahwa organisasi adalah wadah pengembangan diri,wadah – dimana mahasiswa yang secara psikologi perkembangan telah memasuki taraf kedewasaan- membutuhkan semacam “simulasi kehidupan” untuk menghadapi kehidupan nyata di luar,wadah dimana para aktifis organisasi mengimplementasikan apa yang mereka dapatkan di bangku pendidikan kedalam objek nyata di kehidupan mereka,dan lain-lain sebagainya.
Banyak sekali pelajaran dan pendidikan yang didapatkan dalam berorganisasi.Didalam organisasi kita bisa belajar disiplin,menghargai waktu,menghargai orang lain,kita dapat mempelajari teknik berkomunikasi dan bersosialisasi dengan berbagai macam tipe manusia dan budaya yang kelak akan berguna bagi diri kita,kita juga dapat mengaplikasikan segala ilmu yang telah kita dapatkan,implementasi ilmu dalam bentuk konkrit bukan sekedar teori dan masih banyak lagi manfaat organisasi.
Positifnya bisa saling bertukar pikiran antar sesama mahasiswa, melatih kepercayaan diri, meningkatkan solidaritas, memupuk rasa tanggung jawab dan dengan berorganisasi, maka para mahasiswa akan mampu dan lebih siap untuk menghadapi kehidupan yang sebenarnya, kehidupan setelah lulus dan berhadapan dengan masyarakat.

Kampus Idaman? Bagaimana sih?

Mengenakan jas almamater kebanggan, turun ke jalan dan berkoar di belakang megaphone untuk orasi aksi di sela kesibukan ngerjain tugas akhir/skripsi, dan dinyatakan loeloes dengan mengenakan toga kebesaran. Hal-hal itulah yang pertama kali melintas di benak sebagian besar orang ketika mendengar kata ‘mahasiswa’.
Masuk perguruan tinggi yang bonafid dan ‘tidak dipandang sebelah mata’ adalah idaman semua siswa sekolah menengah yang akan segera lulus setelah melewati tiga hari yang menentukan masa depan mereka. Siapa sih yang gak bangga dibilang gini, “Wih, anak kampus anu ya. Pasti pinter nih. Ajarin gue soal ini dong.”Dambakan”.
Ada pendapat lain? Kalau anda Nah, kalau boleh berpendapat, boleh kan saya mengutarakan uneg-uneg dan pendapat pribadi tentang kampus idaman yang selama ini menari-nari di benak saya?

1.Ada rupa ada harga, ada harga ada rupa. Pepatah tersebut menunjukkan pada kita bahwa untuk kualitas terbaik tentu kita harus ‘berkorban’ lebih. Daripada menekan biaya pendidikan dengan konsekuensi menurunnya kualitas, kenapa tidak dengan usaha peningkatan kesejahteraan rakyat yang tentunya akan berimbas positif pada semua sektor lain selain pendidikan? Untuk soal ini, penawaran beasiswa pendidikan dari perguruan tinggi yang bersangkutan menjadi nilai plus terutama untuk segmen masyarakat yang sensitif terhadap urusan finansial.

2. prestise sebuah kampus juga menjadi tolak ukur. Klise memang, tapi itulah realita. Kampus yang sudah ‘memiliki nama’ tentu akan lebih diminati ketimbang kampus lain yang namanya masih asing di telinga masyarakat (Maaf, tidak ada maksud mendiskreditkan kampus-kampus lain).
3.faktor jurusan kadang mengalahkan faktor sebelumnya yaitu prestise kampus. . Hal ini terbukti dengan kampus-kampus yang berlomba-lomba mendirikan jurusan yang ‘komersil‘ karena pasti diminati banyak calon mahasiswa. Kadang hal seperti ini membuat miris juga, mengingat keberadaan jurusan-jurusan lain menjadi termarginalkan. Pada intinya, para calon mahasiswa cenderung memilih untuk kuliah pada bidang ilmu yang diminatinya. Terlepas dari masalah kenapa mereka menyukai bidang itu.
4.soal kualitas. Sebenarnya untuk poin ini sifatnya berbanding lurus dengan poin sebelumnya yaitu biaya dan prestise. Kualitas pendidikan yang sempurna tentu memerlukan ‘pengorbanan’ yang tidak sedikit untuk mendapatkannya, dan juga berimbas pada naiknya prestise dan nilai kebonafitan kampus tersebut. Akreditasi dan sertifikasi bertaraf internasional konon dipercaya sebagai salah satu hal yang dilihat masyarakat untuk nge-judge kualitas suatu institusi pendidikan.
Demikian hal-hal yang saya rasa menjadi kriteria perguruan tinggi idaman. Kombinasi dari ketiganya dengan proporsi tepat dan tetap memperhatikan situasi dan kondisi para mahasiswa dan latar belakang keluarganya tentu bisa menjadi nilai tambah yang membuat prioritas nama institusi tersebut naik dalam daftar “Perguruan Tinggi yang Saya tertarik, silahkan berdiskusi di kolom komentar di bawah. Semoga bermanfaat.