Minggu, 10 April 2011

profil diri

PROFIL DIRI


Assalamualaikum..,perkenalkan nama saya Retna Kusnul Khotimah,teman-temanku memanggilku Retna. Nama Kusnul Khotimah memiliki arti “akhir yang baik atau meninggal dalam keadaan baik”. Aku lahir di Klaten Provinsi Jawa Tengah,pada hari minggu tepatnya tanggal 17 Maret 1991. Aku adalah anak pertama dari tiga bersaudara,aku memiliki dua adik perempuan yang bernama Reza Silvia Lestari dan Nabila Dzahabiyah.

Aku lahir dari keluarga campuran antara Jawa dan Sunda. Nama ayahku Dede Solihin lahir di Cianjur,beliau bekerja pada sebuah perusahaan swasta di Jakarta Selatan. Ibuku bernama Sunarti lahir di Klaten.beliau adalah seorang ibu rumah tangga. Ayahku adalah sosok ayah yang bertanggung jawab,tegas dan sangat sayang terhadap keluarga. Ibuku adalah sosok ibu yang baik dan sangat perhatian kepada anak-anaknya.

Saat ini aku tinggal di Rawa Bambu,Jl.Mawar 4 No.9 kota Bekasi. Pada tahun 1996 aku bersekolah di SD Negeri Kali Baru II Bekasi. Saat aku SD kelas 4,wali kelasqu memilih aku untuk mengikuti lomba cerdas cermat sekota Bekasi. Alhamdulilah aku mendapat juara II,aku senang sekali bisa membuat harum nama sekolah,teman-temanku,terutama orang tuaku. Aku bisa meraih juara merupakan pengalaman baik dalam hidupku,karena wali kelasqu sering memilih aku untuk mengikuti lomba-lomba dari sekolah dan alhamdulilah aku bisa meraih prestasi dari perlombaan itu.

Setelah lulus SD pada tahun 2002,orangtuaku mendaftarkan aku di SMP Negeri 4 Bekasi. Sekolah ini sangat berkesan buat aku karena SMP Negeri 4 Bekasi merupakan sekolah SMP standar nasional sekota Bekasi. Aku pun tidak menyangka aku bisa lulus tes dan diterima di SMP Negeri 4 Bekasi. Setelah lulus SMP pada tahun 2005,aku melanjutkan ke SMK PERBANKAN NASIONAL Cakung Jakarta Timur. Kejuruan yang aku pilih adalah Administrasi Perkantoran. Selama 3 tahun di SMK aku selalu menempati kelas favorite di sekolah. Sewaktu aku kelas 2 aku memiliki pengalamn yang buruk bagiku. Saat itu aku mengikuti lomba volley antar kelas. Pengalaman buruk itu terjadi waktu pertandingan bola volley akan dimulai,diperjalanan aku terjebak macet yang sangat parah. Sehingga aku dating terlambat sampai kepertandingan itu dan aku didiskualikasi oleh juri. Padahal olahraga volley adalah hobiqu dan aku berharap bisa meraih juara dalam pertandingan tersebut.

Pada tahun 2008 aku lulus SMK,akupun melanjutkan kuliah di Universitas Gunadarma yang berlokasi di Kalimalang Bekasi. Aku memilih jurusan Sistem Informasi Fakultas Ilmu Komputer. Selain kuliah aku juga bekerja pada sebuah perusahaan swasta di PT.Omron Manufacturing of Indonesia Cikarang.

Alasan aku memilih jurusan Sistem Informasi adalah karena aku sangat menyukai dunia computer terutama internet. Dengan menggunakan internet kita bisa memperoleh informasi tentang apapun. Menurutku ilmu computer adalah ilmu yang universal yang akan berubah sesuai perubahan zaman.oleh karena itu aku ingin sekali mempelajari ilmu computer lebih detail lagi.

Dengan mempelajari ilmu computer aku ingin membuat suatu teknologi baru yang bisa bermanfaat untuk orang banyak,itulah cita-citaqu. Selain itu aku juga ingin mempunyai usaha di bidang perakitan computer.,karena dengan cita-citaqu ini aku ingin menjadi orang sukses yang bisa membahagiakan kedua orang tuaku.

TUGAS PEMROGRAMAN TINGKAT 4.

SOAL1. Buatlah Function untuk mendapatkan stock barang berdasarkan kode barang ?

Sp_cek_stok (‘k001’)
2. Buatlah procedure untuk update stok barang berdasarkan kode barang ?
Sp_update_stok (‘k001’,’+’,50)
Sp_update_stok (‘k002’,’-‘,30)

JAWABAN
1. CREATE OR REPLACE FUNCTION sp_cek_stok (kd_brg IN VARCHAR)
RETURN NUMBER
IS
stock NUMBER;
BEGIN
SELECT stok INTO stock FROM barang WHERE kode_barang=kd_brg;
RETURN stock;
END;

Memanggilnya :
BEGIN
DBMS_OUTPUT.PUT_LINE(‘Stok Barang:’||TO_CHAR(sp_cek_stok(‘k001’)));
END;

2. CREATE OR REPLACE FUNCTION sp_update_stok (kd_brg IN VARCHAR)
IS
stock NUMBER;
BEGIN
IF kd_brg=’k001’ THEN
stock:=stok+50
ELSE stock:=stok-30
UPDATE barang SET stok=stock
WHERE kode_barang=kd_brg;
DBMS_OUTPUT.PUT_LINE(‘Stok Barang:’||stock);
END;

Memanggilnya :
EXECUTE sp_update_stok (‘k001’,’+’,50);
EXECUTE sp_update_stok (‘k002’,’-‘,30);