3.6

   

Private Sub Command1_Click()

Dim K, J, P, H, G As String

K = Mid(text1, 3, 3)

If K = "SIM" Or K = "sim" Then

J = "Sistem Informasi Manajemen"

P = "Andra Setiawan"

H = "75900"

ElseIf K = "EDP" Or K = "edp" Then

J = "Elektronik Data Procesing"

P = "Desi Istiqomah"

H = "62000"

ElseIf K = "MNJ" Or K = "mnj" Then

J = "Manajemen"

P = "Sandy Fitrajaya"

H = "42000"

ElseIf K = "cdr" Or K = "CDR" Then

J = "Corel Draw"

P = "Tri Indah Sari"

H = "53000"

ElseIf K = "rpl" Or K = "RPL" Then

J = "Rekayasa Perangkat Lunak"

P = "Ernita Sari"

H = "83000"

End If

text2.Text = J

text3.Text = P

text6.Text = H

K = Left(text1, 1)

If K = "A" Or K = "a" Then

G = "Andi Offset Yogyakarta"

ElseIf K = "i" Or K = "I" Then

G = "Indah Surabaya"

ElseIf K = "S" Or K = "s" Then

G = "Salemba Empat"

ElseIf K = "E" Or K = "e" Then

G = "Elek Media Komputindo"

ElseIf K = "M" Or K = "m" Then

G = "maxicom"

End If

text5.Text = G

text4.Text = "20" & Right(text1, 2)

End Sub

Private Sub Command2_Click()

text1.SetFocus

text1 = ""

text2 = ""

text3 = ""

text4 = ""

text5 = ""

text6 = ""

End Sub

Private Sub Command3_Click()

text1.SetFocus

text1 = ""

text2 = ""

text3 = ""

text4 = ""

text5 = ""

text6 = ""

End Sub

Private Sub Command4_Click()

End

End Sub

3.2

Private Sub cmdbatal_Click()
Text1.SetFocus
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
End Sub

Private Sub cmdKeluar_Click()
End
End Sub

Private Sub cmdlagi_Click()
Text1.SetFocus
Text1 = ""
Text2 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
End Sub

Private Sub cmdproses_Click()
Dim ps, jr As String
Text3 = jr
Text4 = ps
Text5 = "20" & Left(Text2, 2)
Text6 = Right(Text2, 3)

ps = Mid(Text2, 4, 2)
If ps = "01" Then
Text4 = "Strata Satu"
ElseIf ps = "02" Then
Text4 = "Diploma Empat"
ElseIf ps = "03" Then
Text4 = "Diploma Tiga"
ElseIf ps = "04" Then
Text4 = "Diploma Dua"
End If

jr = Mid(Text2, 3, 1)
If jr = "1" Then
Text3 = "Sistem Informasi"
ElseIf jr = "2" Then
Text3 = "Diploma Empat"
ElseIf jr = "3" Then
Text3 = "Diploma Tiga"
ElseIf jr = "4" Then
Text3 = "Diploma Dua"
End If
End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text2.SetFocus
End If
End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Text3.SetFocus
End If
Dim ps, jr As String
Text3 = jr
Text4 = ps
Text5 = "20" & Left(Text2, 2)
Text6 = Right(Text2, 3)

ps = Mid(Text2, 4, 2)
If ps = "01" Then
Text4 = "Strata Satu"
ElseIf ps = "02" Then
Text4 = "Diploma Empat"
ElseIf ps = "03" Then
Text4 = "Diploma Tiga"
ElseIf ps = "04" Then
Text4 = "Diploma Dua"
End If

jr = Mid(Text2, 3, 1)
If jr = "1" Then
Text3 = "Sistem Informasi"
ElseIf jr = "2" Then
Text3 = "Teknik Informatika"
ElseIf jr = "3" Then
Text3 = "Manajemen Informatika"
ElseIf jr = "4" Then
Text3 = "Komputer Akuntansi"
End If
End Sub

Private Sub Combo1_Click()
Dim gapok, pajak, tunjangan, total As Variant
    Select Case Combo1.Text
    Case "I"
    Text1 = "14100411"
    Text2 = "OVITRIA NINGSIH"
    gapok = 2500000
    tunjangan = 250000
   
    Case "II"
    Text1 = "14100525"
    Text2 = "MAI INDAH"
    gapok = 3000000
    tunjangan = 300000
   
    Case "III"
    Text1 = "14100213"
    Text2 = "ANGGEL"
    gapok = 4500000
    tunjangan = 450000
   
    Case "IV"
    Text1 = "14100214"
    Text2 = "ANISA"
    gapok = 4000000
    tunjangan = 400000
   
    Case Else
    gapok = 0
    tunjangan = 0
End Select
    total = gapok + tunjangan
    pajak = total * 0.1
    Text3 = gapok
    Text4 = tunjangan
    Text5 = pajak
    Text6 = total - pajak
End Sub

Private Sub Command1_Click()
Text1 = ""
Text2 = ""
Combo1 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
End Sub

Private Sub Command2_Click()
Text1 = ""
Text2 = ""
Combo1 = ""
Text3 = ""
Text4 = ""
Text5 = ""
Text6 = ""
End Sub

Private Sub Command3_Click()
End
End Sub

Private Sub Form_Load()
Combo1.AddItem "I"
Combo1.AddItem "II"
Combo1.AddItem "III"
Combo1.AddItem "IV"
End Sub

3.5

Tiket penjualan kereta api

Private Sub cmdkeluar_Click()

End

End Sub

Private Sub cmdlagi_Click()

txtkt.SetFocus

txtkt.Text = ""

txtht.Text = ""

txtjk.Text = ""

txtjb.Text = ""

txtjt.Text = ""

txttotalp.Text = ""

End Sub

Private Sub cmdproses_Click()

Dim kt, jk, jb As String

Dim ht As Currency

kt = Left(txtkt.Text, 3)

If kt = "BIM" Then

ht = "50000"

jk = "BIMA"

jb = "16.00"

ElseIf kt = "EKO" Then

ht = "35000"

jk = "EKONOMI"

jb = "19.00"

ElseIf kt = "MUT" Then

ht = "23000"

jk = "MUTIARA"

jb = "17.00"

ElseIf kt = "SEN" Then

ht = "15000"

jk = "SENJA"

jb = "20.00"

End If

txtht.Text = ht

txtjk.Text = jk

txtjb.Text = jb

txtjt.Text = jt

txtjt.SetFocus

End Sub

Private Sub txtjt_keypress(keyascii As Integer)

If keyascii = 13 Then

txttotalp.Text = Val(txtht.Text) * Val(txtjt.Text)

End If

End Sub

Data buku

Private Sub Command1_Click()

Dim K, J, P, H, G As String

K = Left(text1.Text, 3)

If K = "SIM" Or K = "sim" Then

J = "Sistem Informasi Manajemen"

P = "Fadiya Ulfa"

H = "75900"

ElseIf K = "EDP" Or K = "edp" Then

J = "Elektronik Data Procesing"

P = "Nurul Agustina"

H = "62000"

ElseIf K = "MNJ" Or K = "mnj" Then

J = "Manajemen"

P = "Rian Hidayat"

H = "42000"

ElseIf K = "cdr" Or K = "CDR" Then

J = "Corel Draw"

P = "Siti Nur Khotimah"

H = "53000"

ElseIf K = "rpl" Or K = "RPL" Then

J = "Rekayasa Perangkat Lunak"

P = "Winda Erlianti"

H = "83000"

End If

text2.Text = J

text3.Text = P

text6.Text = H

K = Right(text1.Text, 1)

If K = "A" Or K = "a" Then

G = "Andi Offset Yogyakarta"

ElseIf K = "i" Or K = "I" Then

G = "Indah Surabaya"

ElseIf K = "S" Or K = "s" Then

G = "Salemba Empat"

ElseIf K = "E" Or K = "e" Then

G = "Elek Media Komputindo"

ElseIf K = "M" Or K = "m" Then

G = "maxicom"

End If

text5.Text = G

text4.Text = "20" & Mid(text1.Text, 4, 2)

End Sub

Private Sub Command2_Click()

text1.SetFocus

text1 = ""

text2 = ""

text3 = ""

text4 = ""

text5 = ""

text6 = ""

End Sub

Private Sub Command3_Click()

text1.SetFocus

text1 = ""

text2 = ""

text3 = ""

text4 = ""

text5 = ""

text6 = ""

End Sub

Private Sub Command4_Click()

Unload Me

End Sub

3.3

Entry penjualan laptop

Private Sub cbokode_Click()

Dim hs, merk As String

Select Case cbokode.Text

Case "Asus A43SA"

merk = "Asus A43SA-VX090D"

hs = "5500000"

Case "Asus A43SD"

merk = "Asus A43SD-VX052D"

hs = "4500000"

Case "Asus A43SJ"

merk = "Asus A43SJ-VX792D"

hs = "4300000"

Case "Asus A43TA"

merk = "Asus A43TA-VX034D"

hs = "4900000"

Case "Asus N43SL"

merk = "Asus N43SL-VX264D"

hs = "4300000"

Case "Apple MD311"

merk = "Apple MacBook Pro MD311"

hs = "19300000"

Case "Apple MD313"

merk = "Apple MacBook Pro MD313"

hs = "24200000"

Case "Apple MD314"

merk = "Apple MacBook Pro MD314"

hs = "11900000"

Case "Apple MD322"

merk = "Apple MacBook Pro MD322"

hs = "14700000"

Case "Apple MC965"

merk = "Apple MacBook Air MC965"

hs = "21300000"

End Select

txtmerk.Text = merk

txths.Text = hs

txtjj.SetFocus

End Sub

Private Sub cmdhitunglagi_Click()

cbokode.SetFocus

cbokode.Text = ""

txtmerk.Text = ""

txths.Text = ""

txtjj.Text = ""

txthp.Text = ""

txtdis.Text = ""

txttb.Text = ""

End Sub

Private Sub cmdkeluar_Click()

End

End Sub

Private Sub cmdproses_Click()

txthp.Text = Val(txtjj.Text) * Val(txths.Text)

If txthp.Text > 140000000 Then

txtdis.Text = Val(txthp.Text) * 0.15

ElseIf txthp.Text > 135000000 Then

txtdis.Text = Val(txthp.Text) * 0.1

ElseIf txthp.Text > 130000000 Then

txtdis.Text = Val(txthp.Text) * 0.05

ElseIf txthp.Text > 125000000 Then

txtdis.Text = Val(txthp.Text) * 0.02

End If

txttb.Text = Val(txthp.Text) - Val(txtdis.Text)

End Sub

Private Sub Form_Load()

cbokode.AddItem "Asus A43SA"

cbokode.AddItem "Asus A43SD"

cbokode.AddItem "Asus A43SJ"

cbokode.AddItem "Asus A43TA"

cbokode.AddItem "Asus N43SL"

cbokode.AddItem "Apple MD311"

cbokode.AddItem "Apple MD313"

cbokode.AddItem "Apple MD314"

cbokode.AddItem "Apple MD322"

cbokode.AddItem "Apple MC965"

End Sub

pt pulang petang

Private Sub cmdkeluar_Click()

End

End Sub

Private Sub cmdlagi_Click()

TXTMNK.SetFocus

TXTMNK.Text = ""

TXTMN.Text = ""

TXTG.Text = ""

TXTKS.Text = ""

TXTS.Text = ""

TXTT.Text = ""

TXTJ.Text = ""

TXTB.Text = ""

TXTGP.Text = ""

TXTTN.Text = ""

TXTTG.Text = ""

End Sub

Private Sub cmdproses_Click()

Dim r As String

r = Mid(TXTMN.Text, 5, 1)

If r = "A" Then

TXTG = "A"

TXTJ.Text = "MANAGER"

TXTGP.Text = "4000000"

TXTTN.Text = "1025000"

ElseIf r = "B" Then

TXTG.Text = "B"

TXTJ.Text = "Ka.SEKSI"

TXTGP.Text = "3500000"

TXTTN.Text = "975000"

ElseIf r = "C" Then

TXTG.Text = "C"

TXTJ.Text = "STAFF"

TXTGP.Text = "3000000"

TXTTN.Text = "925000"

End If

r = Right(TXTMN.Text, 3)

If r = "KEU" Then

TXTB.Text = "ACCOUNTING"

ElseIf r = "ADM" Then

TXTB.Text = "ADMINISTRASI"

ElseIf r = "SDM" Then

TXTB.Text = "GENERAL AFFAIR"

ElseIf r = "EDP" Then

TXTB.Text = "IT UNIT"

ElseIf r = "SPM" Then

TXTB.Text = "SECURITY"

End If

r = Mid(TXTMN.Text, 7, 1)

If r = "S" Then

kode = "S"

Status = "SINGEL"

ElseIf r = "M" Then

kode = "M"

Status = "MENIKAH"

ElseIf r = "J" Then

kode = "J"

Status = "JANDA"

ElseIf r = "D" Then

kode = "D"

Status = "DUDA"

End If

TXTKS.Text = kode

TXTS.Text = Status

TXTT.Text = Left(TXTMN.Text, 4)

TXTTG.Text = Val(TXTGP.Text) + Val(TXTTN.Text)

End Sub

Private Sub form_activate()

TXTMNK.SetFocus

End Sub

Private Sub txtmnk_KeyPress(keyascii As Integer)

If keyascii = 13 Then

TXTMN.SetFocus

End If

End Sub

Private Sub cmdbatal_Click()

TXTMNK.SetFocus

TXTMNK.Text = ""

TXTMN.Text = ""

TXTG.Text = ""

TXTKS.Text = ""

TXTS.Text = ""

TXTT.Text = ""

TXTJ.Text = ""

TXTB.Text = ""

TXTGP.Text = ""

TXTTN.Text = ""

TXTTG.Text = ""

End Sub

tugas 2.8

PERKALIAN DUA BILANGAN

Private Sub Command1_Click()

Text3.Text = Val(Text1) * Val(Text2)

End Sub

Private Sub Command2_Click()

Text1.SetFocus

Text1 = ""

Text2 = ""

Text3 = ""

End Sub

Private Sub Command3_Click()

Unload Me

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text2.SetFocus

End If

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text3.Text = Val(Text1) * Val(Text2)

End If

End Sub

tugas 2.7

HURUF MUTU

Private Sub cbonpm_Click()

Dim nama, Jurusan, hm As String

    Select Case cbonpm.Text

        Case "14100413"

        nama = "AGUNG TRIAWAN"

        Jurusan = "Sistem Informasi"

       

        Case "14100419"

        nama = "Steven Coconut"

        Jurusan = "Manajemen Informasi"

       

        Case "14200409"

        nama = "Alex"

        Jurusan = "Tekhnik Informasi"

       

        Case "14200419"

        nama = "Steven Coconut"

        Jurusan = "Manajemen Informasi"

       

        Case "14200509"

        nama = "Painah"

        Jurusan = "Manajemen Informasi"

       

        Case "14200001"

        nama = "ferdi syahid"

        Jurusan = "tekhnik Informatika"

       

        Case "14100030"

        nama = "desi ningsih"

        Jurusan = "sistem Informasi"

       

        Case "14100919"

        nama = "Steven Coconut"

        Jurusan = "Tekhnik Informasi"

       

        Case "14100410"

        nama = "Steven Coconut"

        Jurusan = "sistem Informasi"

       

        Case "14100459"

        nama = "alan ramadhan"

        Jurusan = "Manajemen Informasi"

    End Select

    txtnama.Text = nama

    txtJurusan.Text = Jurusan

    txtquis.SetFocus

End Sub

Private Sub Cmdbatal_Click()

cbonpm.SetFocus

cbonpm = ""

    nama = ""

    Jurusan = ""

    quis = ""

    tugas = ""

    uts = ""

    uas = ""

    na = ""

    hm = ""

End Sub

Private Sub cmdKeluar_Click()

End

End Sub

Private Sub cmdProses_Click()

Dim na As Integer

Dim hm As String

    quis = Val(txtquis.Text)

    tugas = Val(txttugas.Text)

    uts = Val(txtuts.Text)

    uas = Val(txtuas.Text)

    txtna.Text = na

    na = (quis + tugas + uts + uas) / 4

End Sub

Private Sub Form_Load()

cbonpm.AddItem "14100413"

cbonpm.AddItem "14100410"

cbonpm.AddItem "14100419"

cbonpm.AddItem "14200409"

cbonpm.AddItem "14100459"

cbonpm.AddItem "14200419"

cbonpm.AddItem "14200509"

cbonpm.AddItem "14200001"

cbonpm.AddItem "14100030"

cbonpm.AddItem "14100919"

End Sub

tugas 2.6

APLIKASI PERHITUNGAN GAJI

Private Sub Command1_Click()

Text4.Text = Val(Text1) + Val(Text2) - Val(Text3)

Text5.Text = Val(Text4) * 0.1

Text6.Text = Val(Text4) - Val(Text5)

End Sub

Private Sub Command2_Click()

Text1.SetFocus

Text1 = ""

Text2 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

End Sub

Private Sub Command3_Click()

End

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text2.SetFocus

End If

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text3.SetFocus

End If

End Sub

Private Sub Text3_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text4.Text = Val(Text1) + Val(Text2) - Val(Text3)

Text5.Text = Val(Text4) * 0.1

Text6.Text = Val(Text4) - Val(Text5)

End If

End Sub

tugas 2.5

FONT COLOR

Private Sub chkbold_Click()

If chkbold.Value = 1 Then

lbljudul.FontBold = True

Else

lbljudul.FontBold = False

End If

End Sub

Private Sub Chkitalic_Click()

If Chkitalic.Value = 1 Then

lbljudul.FontItalic = True

Else

lbljudul.FontItalic = False

End If

End Sub

Private Sub Chkstrikeout_Click()

If Chkstrikeout.Value = 1 Then

lbljudul.FontStrikethru = True

Else

lbljudul.FontStrikethru = False

End If

End Sub

Private Sub Chkunderline_Click()

If Chkunderline.Value = 1 Then

lbljudul.FontUnderline = True

Else

lbljudul.FontUnderline = False

End If

End Sub

Private Sub Cmdexit_Click()

Unload Me

End Sub

Private Sub lbljudul_Click()

End Sub

Private Sub OptBlue_Click()

lbljudul.ForeColor = vbBlue

End Sub

Private Sub OptGreen_Click()

lbljudul.ForeColor = vbGreen

End Sub

Private Sub OptRed_Click()

lbljudul.ForeColor = vbRed

End Sub

Private Sub OptYellow_Click()

lbljudul.ForeColor = vbYellow

End Sub

tugas 2.4

TULIS NAMA ANDA

Private Sub Chkbold_Click()

Label2.FontBold = Chkbold.Value

End Sub

Private Sub Chkitalic_Click()

Label2.FontItalic = Chkitalic.Value

End Sub

Private Sub Chkstrikethru_Click()

Label2.FontStrikethru = Chkstrikethru.Value

End Sub

Private Sub Chkunderline_Click()

Label2.FontUnderline = Chkunderline.Value

End Sub

Private Sub Cmdok_Click()

Label2.Caption = Text1.Text

End Sub

Private Sub Cmdselesai_Click()

Unload Me

End Sub

Private Sub Optbiru_Click()

Label2.ForeColor = vbBlue

End Sub

Private Sub Opthijau_Click()

Label2.ForeColor = vbGreen

End Sub

Private Sub Optkuning_Click()

Label2.ForeColor = vbYellow

End Sub

Private Sub Optmerah_Click()

Label2.ForeColor = vbRed

End Sub

tugas 2.3

KETERANGAN NAMA

Private Sub cmdbatal_Click()

Text1.SetFocus

Text1 = ""

Text2 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

End Sub

Private Sub cmdKeluar_Click()

End

End Sub

Private Sub cmdlagi_Click()

Text1.SetFocus

Text1 = ""

Text2 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

End Sub

Private Sub cmdproses_Click()

Dim ps, jr As String

Text3 = jr

Text4 = ps

Text5 = "20" & Left(Text2, 2)

Text6 = Right(Text2, 3)

ps = Mid(Text2, 4, 2)

If ps = "01" Then

Text4 = "Strata Satu"

ElseIf ps = "02" Then

Text4 = "Diploma Empat"

ElseIf ps = "03" Then

Text4 = "Diploma Tiga"

ElseIf ps = "04" Then

Text4 = "Diploma Dua"

End If

jr = Mid(Text2, 3, 1)

If jr = "1" Then

Text3 = "Sistem Informasi"

ElseIf jr = "2" Then

Text3 = "Tehnik Informatika"

ElseIf jr = "3" Then

Text3 = "Manajemen Informatika"

ElseIf jr = "4" Then

Text3 = "Komputer Akuntansi"

End If

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text1.SetFocus

End If

End Sub

tugas 2.2

 NIDN

Private Sub Combo1_Click()

Dim gapok, pajak, tunjangan, total As Variant

    Select Case Combo1.Text

    Case "I"

    Text1 = "14100411"

    Text2 = "OVITRIA NINGSIH"

    gapok = 2500000

    tunjangan = 250000

   

    Case "II"

    Text1 = "14100525"

    Text2 = "MAI INDAH"

    gapok = 3000000

    tunjangan = 300000

   

    Case "III"

    Text1 = "14100213"

    Text2 = "ANGGEL"

    gapok = 4500000

    tunjangan = 450000

   

    Case "IV"

    Text1 = "14100214"

    Text2 = "ANISA"

    gapok = 4000000

    tunjangan = 400000

   

    Case Else

    gapok = 0

    tunjangan = 0

End Select

    total = gapok + tunjangan

    pajak = total * 0.1

    Text3 = gapok

    Text4 = tunjangan

    Text5 = pajak

    Text6 = total - pajak

End Sub

Private Sub Command1_Click()

Text1 = ""

Text2 = ""

Combo1 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

End Sub

Private Sub Command2_Click()

Text1 = ""

Text2 = ""

Combo1 = ""

Text3 = ""

Text4 = ""

Text5 = ""

Text6 = ""

End Sub

Private Sub Command3_Click()

End

End Sub

Private Sub Form_Load()

Combo1.AddItem "I"

Combo1.AddItem "II"

Combo1.AddItem "III"

Combo1.AddItem "IV"

End Sub  

tugas 2 1

PERHITUNGAN HARGA SETELAH 10%

Private Sub Command1_Click()

Text2.Text = Val(Text1) * 0.1

Text3.Text = Val(Text1) - Val(Text2)

End Sub

Private Sub Command2_Click()

Text1.SetFocus

Text1 = ""

Text2 = ""

Text3 = ""

End Sub

Private Sub Command3_Click()

Unload Me

End Sub

Private Sub Text1_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text2.Text = Val(Text1) * 0.1

Text3.Text = Val(Text1) - Val(Text2)

End If

End Sub

Private Sub Text2_KeyPress(KeyAscii As Integer)

If KeyAscii = 13 Then

Text2.Text = Val(Text1) * 0.1

Text3.Text = Val(Text1) - Val(Text2)

End If

End Sub

BAHAYA NARKOBA BAGI KESEHATAN

Written by admin | June 13, 2016 | 0

STMIK Pringsewu – Sabtu, (11/9) Fhata Zafalaus, S.I.Kom., (Penyuluh Narkoba BNN Provinsi Lampung) pria kelahiran Palembang, 23 Mei 1989 dalam acara Program Orientasi Studi Pendidikan Tinggi (POSDIKTI) STMIK Pringsewu menyampaikan “Bahaya Narkoba bagi Kesehatan”. Narkoba adalah singkatan dari narkotika dan obat/bahan berbahaya.

Selain “narkoba”, istilah lain yang diperkenalkan khususnya oleh Departemen Kesehatan Republik Indonesia adalah Napza yang merupakan singkatan dari Narkotika, Psikotropika dan Zat Adiktif.

Semua istilah ini, baik “narkoba” atau napza, mengacu pada sekelompok zat yang umumnya mempunyai risiko kecanduan bagi penggunanya. Menurut pakar kesehatan narkoba sebenarnya adalah psikotropika yang biasa dipakai untuk membius pasien saat hendak dioparasi atau obat-obatan untuk penyakit tertentu. Namun kini presepsi itu disalah gunakan akibat pemakaian yang telah di luar batas dosis.

Beliau mengatakan, permasalahan Penyalahgunaan dan Peredaran gelap Narkoba (Narkotika, Psikotropika dan Bahan adiktif lainnya) di Indonesia sejak lama telah menjadi hambatan dalam pembangunan kualitas sumber daya manusia, khususnya generasi muda bangsa.

Narkoba memang sudah menjadi momok yang menakutkan bagi masyarakat. Berbagai kampanye anti narkoba dan penanggulangan terhadap orang-orang yang ingin sembuh dari ketergantungan narkoba semakin banyak didengung-dengungkan. Sebab, penyalahgunaan narkoba bisa membahayakan bagi keluarga, masyarakat, dan masa depan bangsa.

Hingga kini penyebaran narkoba sudah hampir tak bisa dicegah. Mengingat hampir seluruh penduduk dunia dapat dengan mudah mendapat narkoba dari oknum-oknum yang tidak bertanggung jawab. Misalnya saja dari bandar narkoba yang senang mencari mangsa didaerah sekolah, diskotik, tempat pelacuran, dan tempat-tempat perkumpulan genk.

Tentu saja hal ini bisa membuat para orang tua, ormas, pemerintah khawatir akan penyebaran narkoba yang begitu meraja rela. Upaya pemberantas narkoba pun sudah sering dilakukan, namun masih sedikit kemungkinan untuk menghindarkan narkoba dari kalangan remaja maupun dewasa, bahkan anak-anak usia SD dan SMP pun banyak yang terjerumus narkoba. Hingga saat ini upaya yang paling efektif untuk mencegah penyalahgunaan Narkoba pada anak-anak yaitu dari pendidikan keluarga. Orang tua diharapkan dapat mengawasi dan mendidik anaknya untuk selalu menjauhi Narkoba.

Beliau menegaskan kepada peserta POSDIKTI STMIK Pringsewu, bijaklah sebagai mahasiswa dan generasi muda yang hebat, tidak perlu mencoba menyalahgunakan narkoba karena rasa penasaran dan ingin tahu. Cukup gunakan pengalaman orang-orang sebelum kita menderita sebagai pelajaran bagi kita. Ucapnya. (*na)

SERAH TERIMA MAHASISWA KKN STMIK & STIT PRINGSEWU

Written by admin | July 29, 2016 | 0

STMIK PRINGSEWU – Sehubungan dengan pelaksanaan kegiatan Kuliah Kerja nyata (KKN) STMIK & STIT Pringsewu yang menempati lokasi di 40 pekon di wilayah Kabupaten Pringsewu, Pada hari senin 25 Juli 2016 telah diadakan serah terima mahasiswa Kuliah Kerja Nyata (KKN) STMIK & STIT Pringsewu Tahun Akademik 2015/2016 yang dilaksanakan di Pendopo Pringsewu.

Acara tersebut dihadiri oleh Bupati Pringsewu H. Sujadi beserta jajaran SKPD di Kabupaten Pringsewu, Ketua DPRD Pringsewu (Ilyasa), unsur-unsur Muspida, camat, dan kepala pekon, Ketua Yayasan Dr. H. Fauzi, S.E., M.Kom., Akt., CA., adapun perwakilan dari STMIK & STIT Pringsewu yang juga hadir dalam kesempatan tersebut antara lain Ketua STMIK Pringsewu Hj. Rita Irviani, M.M. Ketua STIT Pringsewu Sri Hartati, M.T.I., Ketua Palaksana KKN, Seluruh DPL KKN T.A 2015/2016; serta 423 mahasiswa/i peserta KKN STMIK & STIT Pringsewu.

Dalam sambutannya, Ketua pelaksana Kuliah Kerja Nyata (Sudewi, M.M) mengatakan, Kuliah Kerja Nyata Pembelajaran Pemberdayaan Masyarakat adalah suatu kegiatan intrakurikuler wajib yang memadukan pelaksanaan Tri Dharma Perguruan Tinggi dengan metode pemberian pengalaman belajar dan bekerja kepada mahasiswa, dalam kegiatan pemberdayaan masyarakat. KKN juga merupakan wahana penerapan serta pengembangan ilmu dan teknologi, dilaksanakan di luar kampus dalam waktu, mekanisme kerja, dan persyaratan tertentu.

Oleh karena itu, KKN diarahkan untuk menjamin keterkaitan antara dunia akademik-teoritik dan dunia empirik-praktis. Dengan demikian akan terjadi interaksi sinergis, saling menerima dan memberi, saling asah, asih, dan asuh antara mahasiswa dan masyarakat. Melalui KKN mahasiswa memperoleh pengalaman belajar dan bekerja dalam kegiatan pembangunan masyarakat sebagai wahana penerapan ilmu pengetahuan dan teknologi.

Mahasiswa yang mengikuti KKN tahun 2016 ini sebanyak 423 orang, 385 orang dari STMIK Pringsewu terdiri dari :

Laki-Laki : 173
Perempuan : 212
Sedangkan 38 orang dari STIT Pringsewu terdiri dari :
Laki-Laki : 13
Perempuan : 25

Mereka akan dibimbing oleh 30 dosen pembimbing dan memberi arahan dalam penyusunan program maupun kegiatan dilapangan. Mahasiswa yang mengikuti KKN tersebar di 40 pekon di 9 Kecamatan yang berada di wilayah Kabupaten Pringsewu.

Sementara Ketua Yayasan Dr. H. Fauzi menyampaikan ucapkan terima kasih kepada Pemerintah Daerah Kabupaten Pringsewu atas sambutan yang begitu hangat kepada seluruh civitas akademika STMIK & STIT Pringsewu dalam kaitannya dengan kegiatan KKN T.A 2015/2016.

Terkait dengan pelaksanaan Kuliah Kerja Nyata, beliau berpesan kepada seluruh mahasiswa KKN T.A 2015/2016 agar memberikan yang terbaik bagi pekon di mana saudara/i ditempatkan, sehingga tujuan dari pelaksanaan KKN dapat tercapai.

Bupati Pringsewu H. Sujadi dalam sambutanya mengatakan ini adalah awal yang baik dan akan semakin baik dari sisi kwantitas serta kwalitas. “KKN satu bagian yang tak terpisahkan dari proses gelar sarjana dan bagian dari pada 40 hari yang akan dilaksana pada hari hari berikutnya, untuk itu laksanakan dengan sebaik baiknya,” Singkatnya.

WISUDA BERSAMA STMIK & STIT PRINGSEWU

Written by admin | September 19, 2016 | 0

STMIK PRINGSEWU – Sekolah Tinggi Manajemen Informatika dan Komputer (STMIK) Pringsewu menggelar Wisuda Program Sarjana dan Diploma yang ke-17. Selain STMIK Pringsewu, digelar pula Wisuda Sekolah Tinggi Ilmu Tarbiyah (STIT) PRINGSEWU ke-2.

Perhelatan tersebut dilaksanakan secara bersamaan di GOR Kabupaten Pringsewu, Sabtu (17/9). Perhelatan tersebut dihadiri Bupati Pringsewu Sujadi Saddat, Ketua DPRD Ilyasa, 2 Ketua MUI Kabupaten : Kabupaten Pringsewu, Kabupaten Lampung Barat, Polres, Kodim.

Dalam wisuda kali ini STMIK Pringsewu telah meluluskan 454 wisudawan yang terdiri dari 402 wisudawan Sarjana Komputer dari Program Studi Sistem Informasi; 52 wisudawan Ahli Madya Komputer dari Program Studi Manajemen Informatika.

Sedangkan jumlah wisudawan dari STIT Pringsewu sebanyak 54 orang. Mereka merupakan Sarjana Pendidikan Islam dari Program Studi Manajemen Pendidikan Islam.

Menurut Ketua STMIK Pringsewu Hj. Rita Irviani, M.M selama berkiprah di perguruan tinggi STMIK Pringsewu telah berusaha mendidik para mahasiswa untuk lulus menjadi sarjana/ahli madya yang berkarakter dan memiliki keterampilan, serta keahlian yang sesuai dengan kebutuhan di dunia kerja.

Dr. H. Fauzi (Ketua Yayasan) dalam sambutannya mengatakan, wisuda merupakan peristiwa bersejarah. Sejarah bagi mahasiswa yang telah dengan susah payah menyelesaikan studinya. Wisuda juga moment bersejarah bagi civitas akademika dalam menyempurnakan rangkaian kegiatan akademiknya. Menjadi sarjana maupun ahli madya adalah sebuah kebanggaan namun tanpa belajar dan usaha yang keras kebangaan itu terkesan kurang maksimal dan tidak bermakna, wisuda bukanlah penanda selesai dan berhentinya kegiatan belajar yang harus dilakukan. Masih ada jalan yang terbentang luas di depan sana, oleh karena itu tetaplah bermimpi karena Allah SWT akan memeluk mimpi saudara/i jika mau berusaha dan melangkah dengan mantap untuk masa depan yang penuh tantangan. Wisudawan diminta untuk terus mengembangkan diri. Belajar yang harus terus menerus kita lakukan meliputi tiga hal yaitu pencerdasan intelektualitas, emosionalitas, dan spiritualitas. Intelektualitas yang terus menerus secara baik dinilai akan menghasilkan daya pemahaman, analisis, dan kreativitas. Di sisi lain, emosionalitas yang terasah akan menghasilkan kemampuan mengelola diri dalam berinteraksi dengan orang lain. Sementara, spiritualitas yang terasah dinilai akan menghasilkan karakter kepribadian yang peka terhadap nilai moral luhur.

Beliau mengapresiasi dan bangga atas kerja keras para wisudawan yang berhasil melewati berbagai tantangan akademik mulai dari perkuliahan hingga berbagai tugas akademik lainnya, sehingga menjadi seorang sarjana. Kepada seluruh mahasiswa/i yang telah berhasil mencapai gelar akademiknya di kampus semoga sukses untuk menjalani masa selanjutnya, menyebarkan ilmunya dengan ikhlas dan mampu menerangi orang lain, harapnya.

Sementara Bupati Pringsewu (KH. Sujadi) dalam sambutannya mengatakan, atas nama pribadi dan Pemerintah Daerah Kabupaten Pringsewu mengucapkan, selamat sekaligus memberikan penghargaan yang setinggi-tingginya kepada para wisudawan/wisudawati serta bagi para orang tua/suami/isteri yang telah memberikan motivasi bagi anak-anaknya maupun pasangannya sehingga berhasil menyelesaikan studi dan di wisuda sebagai Alumni STMIK Ke-17 dan STIT Ke-2 Pringsewu, saudara-saudara boleh bangga tetapi jangan lupa bahwa belajar tidak mengenal batas waktu.

Beliau menegaskan, “Menuntut ilmu adalah fardhu bagi tiap-tiap muslim, baik laki-laki maupun perempuan”.

Sabda Nabi Muhammad yang artinya :

“Baran siapa menginginkan soal-soal yang berhubungan dengan dunia, wajiblah ia memiliki ilmunya, dan barang siapa yang ingin selamat dan berbahagia di akhirat, wajibllah ia mengetahui ilmunya pula, dan barang siapa menginginkan kedua-duanya, wajiblah ia memiliki kedua-duanya pula“. (H.R. Bukhari dan Muslim)

Dalam kitab Ta’lim Muta’alim :

“Tolabul ilmi minal mahdi ilal lahdi” artinya Tuntutlah ilmu sejak dari buaian hingga liang lahat.

Terkait dengan hal itu, Sujadi berharap semua pihak harus mempersiapkan diri sebaik-baiknya. Karena kemampuan tidak cukup dengan hanya belajar di bangku sekolah atau kuliah tetapi perlu untuk belajar pantang menyerah dan bagi yang sudah menjadi pegawai untuk berubah dan merevolusi mental baik sikap dan kedisiplinan.

“Kunci sukses baik sebagai pegawai maupun pengusaha adalah kejujuran, sepandai-pandainya kita apabila tidak didasari sikap jujur tidak akan berhasil. Kemampuan tidak hanya dapat dibangku kuliah tetapi dari pengalaman dimana adanya kemampuan untuk bekerja keras, bekerja cerdas dan pantang menyerah serta kemampuan berkomunikasi untuk membangun jejaring hubungan yang baik,” ujarnya.

Wisudawan/Wisudawati yang memperoleh Prestasi terbaik dari masing-masing Program Studi yakni:
PROGRAM STUDI SISTEM INFORMASI :
1. SAYU MADE DWI LESTARI
NPM : 13100009
IPK : 3.78
NAMA BAPAK : GUSTI MADE SARWANTA
NAMA IBU : SILOH NYOMAN ARMINI
2. ANDRA SETIAWAN
NPM : 14100880
IPK : 3.77
NAMA BAPAK : TUKINO
NAMA IBU : MISKIYAH
3. RIYAN SUHANDI
NPM : 12100017
IPK : 3.70
NAMA BAPAK : MASIRIN
NAMA IBU : BARIYAH
PROGRAM STUDI MANAJEMEN INFORMATIKA :

1. NOVITA MULYASARI
NPM : 13201013
IPK : 3.78
NAMA BAPAK : SAIAN
NAMA IBU : NANA DIANA
2. MONA ARISCA TAMBUNAN
NPM : 14201058
IPK : 3.77
NAMA BAPAK : JUNIRMAN TAMBUNAN
NAMA IBU : LAMRIA SIRAIT
3. RENI OKTA LIANA
NPM : 13201115
IPK : 3.65
NAMA BAPAK : MUDASIR SISWONDO
NAMA IBU : WARDANI NINGSIH
PROGRAM STUDI MANAJEMEN PENDIDIKAN ISLAM :
1. SANGIDAH
2. NUR AZIZAH
3. NUR KHONI’AH

STMIK PRINGSEWU – SEMINAR BEDAH BUKU APSI

Written by admin | September 30, 2016 | 0

STMIK PRINGSEWU – Sekolah Tinggi Manajemen Informatika dan Komputer (STMIK) Pringsewu menyelenggarakan acara Seminar dan Bedah Buku “Analisis Perancangan Sistem Informasi”, bertempat di Auditorium lantai II STMIK Pringsewu. Jum’at (30/9)

Bedah buku tentu sangat berkaitan dengan dunia tulis menulis. Menulis merupakan sebuah kegiatan intelektualitas yang sangat bermanfaat bagi penulis atau pembaca.

Dengan menulis kita bisa menuangkan isi pikiran kita terhadap sesuatu. Dengan menulis kita bisa berekspresi dengan bebas terkait keilmuan yang berkembang. Sehingga bisa dikatakan sebuah karya tulisan sebagai perwakilan ekspresi dari pemikiran sang penulis untuk ditransfer kepada semua pembaca dimanapun berada.

Hadir dalam acara bedah buku tersebut, Wakil Ketua I (E. Yunaeti A, M.T.I), Wakil Ketua III (Nur Aminudin, M.T.I), Ka. LPPM (M. Muslihudin, M.T.I), Ka. SDM (Dedi Irawan, M.E.Sy), Kaprodi Manajemen Informatika (Oktavianto, M.T.I), tidak ketinggalan Bapak dan Ibu dosen dilingkungan STMIK Pringsewu.

Dalam sambutannya Nur Aminudin, M.T.I (Wakil Ketua III) STMIK Pringsewu mengatakan, Analisis dan perancangan sistem adalah suatu pendekatan yang sistematis untuk mengidentifikasi masalah, peluang dan tujuan, mengidentifikasi arus data dan arus informasi, merancang sistem informasi. Dengan dilaksanakan seminar bedah buku tersebut diharapkan mahasiswa memahami konsep dasar Analisa dan perancangan Sistem Informasi, mahasiswa memahami pentingnya fase Analisa dan desain dalam pembangunan sebuah sistem informasi, mahasiswa memahami peran seorang system analyst, mahasiswa memahami penyebab terbesar gagalnya proyek sistem informasi, yang akan di kupas oleh penulisnya Oktavianto, M.T.I & M. Muslihudin, M.T.I, ucapnya sekaligus membuka acara seminar bedah buku tersebut.

PENGUKUHAN PUSAT INFORMASI & KONSELING MAHASISWA

Written by admin | October 10, 2016 | 0

STMIK PRINGSEWU – Pusat Informasi dan Konseling Mahasiswa (PIK-Mahasiswa) adalah suatu wadah kegiatan program KKB yang dikelola dari, oleh dan untuk mahasiswa guna memberikan pelayanan informasi dan konseling tentang KEPENDUDUKAN DAN Keluarga Berencana termasuk Penyiapan Kehidupan Berkeluarga bagi Remaja serta kegiatan-kegiatan penunjang lainnya.

PIK Mahasiswa adalah nama generik. Untuk menampung kebutuhan program PKBR dan menarik minat mahasiswa datang ke PIK Mahasiswa, nama generik ini dapat dikembangkan dengan nama-nama yang sesuai dengan kebutuhan program dan selera mahasiswa setempat.

Tujuan umum dari PIK Mahasiswa adalah dalam rangka meningkatkan akses dan kualitas pelayanan program penyiapan kehidupan berkeluarga bagi mahasiswa. Sedangkan tujuan khususnya antara lain: 1) membentuk Pusat Informasi dan Konseling Mahasiswa (PIK Mahasiswa) di kampus; 2) meningkatkan Pusat Informasi dan Konseling Mahasiswa (PIK Mahasiswa) dari tahap Tumbuh menjadi tahap tegak dan tahap Tegar; serta 3) Mengembangkan Pusat Informasi dan Konseling Mahasiswa (PIK Mahasiswa) sebagai pusat unggulan (center of excellence).

Ruang lingkup PIK Mahasiswa meliputi aspek-aspek kegiatan pemberian informasi PKBR, TRIAD KRR (Seksualitas, Npsza, HIV dan AIDS), Pendewasaan Usia Perkawinan, Keterampilan Hidup (Life Skills), pelayanan konseling, rujukan, pengembangan jaringan dan dukungan, serta kegiatan-kegiatan pendukung lainnya sesuai dengan ciri dan minat mahasiswa.

Pengelola PIK Mahasiswa adalah mahasiswa yang punya komitmen dan mengelola langsung PIK Mahasiswa serta telah mengikuti pelatihan dengan mempergunakan modul dan kurikulum standard yang telah disusun oleh BKKBN atau pihak lain. Pengelola PIK Mahasiswa terdiri dari Ketua, Bidang Administrasi, Bidang Program dan Kegiatan, Pendidik Sebaya, dan Konselor Sebaya.

Khalayak (audience) dari PIK Mahasiswa ada tiga sasaran, terdiri dari: 1) Sasaran utama (primary target audience) yaitu seluruh mahasiswa kampus; 2) Sasaran antara (secondary target audience) yaitu dosen pembina, aktivis mahasiswa, kelompok-kelompok diskusi, kelompok peminatan, pengurus BEM, dan lain-lain; serta 3) Sasaran penentu (key target audience) yaitu ketua jurusan, wakil ketua III bidang kemahasiswaan, ketua/pimpinan perguruan tinggi, koordinator kopetis wilayah, Dirjen Dikti, Menteri Pendidikan Nasional dan Menteri Agama.

Berdasarkan latar belakang tersebut beberapa mahasiswa STMIK Pringsewu mencetuskan PIK Mahasiswa “DATA UTAMA” STMIK Pringsewu sebagai wadah remaja untuk berbagi informasi dan konseling terkait TRIAD KRR yang selanjutnya menjadi UKM PIK Mahasiswa “DATA UTAMA” Dari Kita Untuk Kita Bersama.

Pada hari Senin (10/10) bertempat di halaman STMIK Pringsewu Kampus Gadingrejo telah dilaksanakan Launching dan Pengukuhan Pengurus PIK M “DATA UTAMA” STMIK Pringsewu. Hadir dalam kegiatan tersebut Bupati Pringsewu (H. Sujadi), Ketua STMIK Pringsewu (Hj. Rita Irviani, M.M), Wakil Ketua I (Elisabet Yunaeti Anggraeni, M.T.I) Wakil Ketua III Bidang Kemahasiswaan (Nur Aminudin, M.T.I), Perwakilan BKKBN Provinsi Lampung, dan Kepala Badan KB dan PP Kabupaten Pringsewu dr.Hj.Endang Budiati, Bapak Ibu Dosen STMIK Pringsewu.

Pembacaan Surat Keputusan Kepengurusan PIK Mahasiswa STMIK Pringsewu dibacakan oleh Wakil Ketua III Bidang Kemahasiswaan (Nur Aminudin, M.T.I) dan dilanjutkan pengukuhan kepengurusan oleh Ketua STMIK Pringsewu (Hj. Rita Irviani, M.M).

Dalam sambutannya, Bupati Pringsewu (H. Sujadi) menyampaikan bahwa dengan adanya PIK M STMIK Pringsewu diharapkan dapat menjembatani permasalahan – permasalahan yang ada di dalam kampus maupun di luar kampus (masyarakat).

Para remaja adalah potensi bagi daerah yang nantinya akan menentukan masa depan daerah. Namun situasi kini perlu disadari bahwa Para remaja usia sekolah dinilai masih rentan terhadap resiko kesehatan reproduksi yang timbul dari pergaulan bebas yang belakangan mulai marak. Untuk itulah para remaja remaja harus didorong untuk berkomitmen agar tidak mengambil resiko dengan melakukan seks bebas, penyalahgunaan narkotika dan obat-obatan terlarang, hingga terinveksi HIV dan Aids. Karena hal itu, Pemerintah Kabupaten Pringsewu melalui Badan Pemberdayaan Perempuan dan Keluarga Berencana (BPPKB) menggelar Pengukuhan dan Sosialisasi Genre bagi para Pengurus Pusat Informasi Konseling (PIK) Remaja/Mahasiswa (R/M).

Beliau menegaskan, keberadaan dan peranan Pusat Informasi dan Konseling Mahasiswa di lingkup Kampus sangat penting artinya dalam membantu mahasiswa untuk mendapatkan informasi dan pelayanan konseling yang cukup dan benar tentang berbagai aspek permasalahan remaja. Oleh karena itu perlu dilakukan peningkatan pengembangan dan pengelolaan PIK Mahasiswa dalam rangka meningkatan akses dan kualitas tersebut. “besar harapan kami, semoga terbentuknya PIK Mahasiswa STMIK Pringsewu akan dapat membantu para remaja baik di dalam maupun luar kampus untuk mengatasi permasalahannya dengan melakukan konsultasi kepada teman sebayanya” harapnya.

LIGA FUTSAL ANTAR KELAS STMIK PRINGSEWU 2016

Written by admin | October 24, 2016 | 0

STMIK PRINGSEWU – Minggu (23/10) di STMIK Pringsewu dilangsungkan acara pembukaan turnamen futsal antar kelas. Acara berlangsung sangat meriah, ditandai dengan antusiasnya mahasiswa yang ikut serta dalam turnamen tersebut.

Turnamen futsal antar kelas STMIK Pringsewu ini dibuka oleh wakil ketua III Bidang Kemahasiswaan Nur Aminudin, M.T.I. Dalam sambutannya disampaikan bahwa turnamen futsal ini bukanlah ajang mencari yang terkuat tetapi merupakan ajang pencarian bakat futsal yang nantinya akan ditetapkan sebagai tim pemain STMIK Pringsewu. Beliau juga menghimbau agar dalam turnamen ini peserta bermain secara sportif.

Nur Aminudin mengatakan, kegiatan tersebut Untuk pengaktualisasian diri dalam proses pengembangan potensi para mahasiswa STMIK Pringsewu dalam bidang olahraga khususnya dalam bidang olahraga Futsal, ucapnya.

Dalam laporan panitia, melaporkan bahwa peserta yang mengikuti turnamen Futsal ini adalah sebanyak 22 club. Turnamen Futsal ini akan berlangsung dari tanggal 23 Oktober 2016 s/d 3 Nopember 2016.

STMIK PRINGSEWU – OJK MENGAJAR

Written by admin | April 3, 2017 | 0

STMIK PRINGSEWU – Jum’at (31/3), Otoritas Jasa Keuangan (OJK) Provinsi Lampung mengenalkan diri dan melakukan sosialisasi kepada mahasiswa/mahasiswi STMIK Pringsewu & STIT Pringsewu di auditorium Lt. II STMIK Pringsewu, Kegiatan tersebut dibuka secara langsung oleh Ketua Yayasan Bapak DR. H. Fauzi, S.E., M.Kom., Akt., CA

OJK berkewajiban memberikan informasi dan edukasi kepada masyarakat khususnya kepada para mahasiswa atas karakteristik sektor jasa keuangan, layanan dan produknya,” kata Pak Wendi Rahmadi Deputi Direktur Pengawasan OJK Provinsi Lampung, yang didampingi oleh Bapak Milado Pani (Kasubag. Pengawasan Pasar Modal), Bapak Dwi Krisna Yudi (Kasubag. Edukasi), Ibu Dewi Indah Hanggono (Staff Edukasi dan Perlindungan Konsumen) di auditorium Lt. II STMIK Pringsewu.

Dalam kegiatan itu ada beberapa materi yang disampaikan seperti, pengenalan tentang OJK, industri jasa keuangan dan tentang simpanan pelajar yang disampaikan oleh bidang Edukasi dan Perlindungan Konsumen.

Otoritas Jasa Keuangan (OJK) adalah lembaga negara yang dibentuk berdasarkan UU Nomor 21 Tahun 2011 yang berfungsi menyelenggarakan sistem pengaturan dan pengawasan yang terintegrasi terhadap keseluruhan kegiatan di dalam sektor jasa keuangan. OJK adalah lembaga yang independen dan bebas dari campur tangan pihak lain, yang mempunyai fungsi, tugas, dan wewenang pengaturan, pengawasan, pemeriksaan, dan penyidikan. OJK didirikan untuk menggantikan peran Bapepam-LK dalam pengaturan dan pengawasan pasar modal dan lembaga keuangan, serta menggantikan peran Bank Indonesia dalam pengaturan dan pengawasan bank, serta untuk melindungi konsumen industri jasa keuangan.

Otoritas Jasa Keuangan dibentuk dengan tujuan agar keseluruhan kegiatan di dalam sektor jasa keuangan:

1. terselenggara secara teratur, adil, transparan, dan akuntabel;
2. mampu mewujudkan sistem keuangan yang tumbuh secara berkelanjutan dan stabil; dan
3. mampu melindungi kepentingan konsumen dan masyarakat.

Otoritas Jasa Keuangan (OJK) terus berupaya meningkatkan peran Industri Keuangan Non-Bank (IKNB) sebagai salah satu komponen penting dalam sistem keuangan. Dalam menjalankan bisnisnya, terdapat IKNB yang melakukan pengelolaan risiko dengan menerima premi/iuran/imbal jasa penjaminan yang selanjutnya diinvestasikan untuk memenuhi kewajibannya, seperti Asuransi, Dana Pensiun, dan Perusahaan Penjaminan.

Selain itu, terdapat pula IKNB yang melakukan penyaluran pinjaman atau pembiayaan, seperti Perusahaan Pembiayaan, Perusahaan Modal Ventura, Pergadaian, dan Lembaga Keuangan Mikro.

IKNB sebagai salah satu komponen penting sistem keuangan yang menjalankan fungsi intermediasi bagi berbagai kegiatan produktif di dalam perekonomian nasional sebagai alternatif sumber pendanaan sekaligus melakukan proteksi terhadap risiko usaha, khususnya pada sektor industri kreatif, UMKM, sektor infrastruktur, dan usaha rintisan/start up.

MAHASISWA STMIK PRINGSEWU GELAR SEMINAR UNDANG-UNDANG ITE

Written by admin | March 6, 2017 | 0

PRINGSEWU – Mahasiswa STMIK Pringsewu menggelar seminar terkait Undang-Undang ITE No 19/2016 di Auditorium Lt. II STMIK Pringsewu, Sabtu (4/3), Hadir dalam acara tersebut Wakil Ketua I (E. Yunaeti A, M.T.I), Wakil Ketua III (Nur Aminudin, M.T.I), Ka. LPPM (M. Muslihudin, M.T.I) serta bapak/ibu Dosen STMIK Pringsewu.

Dalam acara seminar tersebut menghadirkan sebagai narasumber AKBP. DR. I Ketut Seregig, S.H., M.H dari Polda Lampung.

Dalam sambutannya, sekaligus membuka acara seminar tersebut, Nur Aminudin, M.T.I mengingatkan kepada mahasiswa STMIK Pringsewu untuk selalu hati-hati dalam mengunggah informasi apapun dalam media sosial, sebab salah dalam berpendapat di medsos dapat berujung pada ancaman hukuman. Teknologi untuk memenuhi kebutuhan manusia memang sangat berdampak positif dan luas, tapi juga dapat dimanfaatkan untuk merugikan pihak-pihak tertentu,” katanya.

Menurutnya, kebebasan berpendapat memang menjadi bagian dari hak asasi manusia, namun kebebasan harus disertai dengan tanggung jawab. Dikatakannya, sejak diberlakukannya UU ITE , kehadirannya menuai pro dan kontra karena beberapa pasal berpotensi dapat menjerat pengguna internet terutama media sosial dalam kaitanya terhadap perkembangan ilmu pengetahuan dan teknologi. Kita perlu memahami UU ITE supaya kita bisa memanfaatkannya sesuai dengan peran yang ada, kalau tidak nantinya, bisa-bisa menabrak aturan dan bermasalah dengan hukum.

Mahasiswa STMIK Pringsewu untuk membingkai ilmu pengetahuan di era elektronik/digital dalam perspektif hukum, moral dan agama.

Ilmu pengetahuan dan teknologi dipergunakan untuk hal-hal yang positif, dipergunakan oleh orang-orang yang mampu bersyukur, artinya bagaimana kita menggunakan seluruh potensi itu untuk kebaikan dan kemuliaan, salah satu diantaranya adalah sebagai guide, bagaimana kita menempatkan media sosial itu dalam kerangka moral, salah satunya adalah sebagai penunjang pembangunan, ujarnya.

Sebaik apapun UU ITE dibuat, tak akan berpengaruh tanpa adanya kesadaran hukum dari masyarakat, kita perlu bijak dalam menggunakan media sosial, ucapnya.

Dilanjutkan serah terima cindera mata oleh Wakil Ketua I (E. Yunaeti A, M.T.I) kepada Narasumber dalam seminar nasional (AKBP. I Ketut Seregig, S.H., M.H)

Dalam seminar tersebut, AKBP. I Ketut Seregig, S.H., M.H mengatakan, media sosial memberi kesempatan seluas-luasnya kepada jejaring sosial atau pada siapapun untuk berpendapat. Misalnya Lewat kicauan di Twitter, status di Facebook, ataupun video di Youtube, pengguna bebas menyatakan dan menulis apa saja pada media yang mereka inginkan.

Tetapi jangan lupa, dengan ancaman hukum terhadap aktivitas di internet tetap ada. Keberadaan Kitab Undang-Undang Hukum Pidana Pasal 310 Ayat (1) juga Undang-Undang Nomor 19 Tahun 2016 tentang perubahan atas undang-undang nomor 11 tahun 2008 tentang Informasi dan Transaksi Elektronik (UU ITE), pada dasarnya menjadi rambu-rambu dalam interaksi sosial melalui media internet.

UU ITE mengatur berbagai perlindungan hukum atas kegiatan yang memanfaatkan internet sebagai medianya, baik transaksi maupun pemanfaatan informasinya. Pada UU ITE ini juga diatur berbagai ancaman hukuman bagi kejahatan melalui media internet. Sementara dalam KUHP, khususnya Pasal 310 Ayat (1), juga diatur masalah pencemaran nama baik. Ucapnya. (*na)