Bubur Ayam Spesial

Kata orang penyesalan itu selalu datang terlambat. Dan biasanya penyesalan hadir mengikuti kesalahan yang kita buat. Atau juga kita kurang sungguh-sungguh dalam menggapai sebuah tujuan, sehingga kegagalan yang kita raup. Atau kesalahan itu adalah sebuah dosa. Dalam penyesalan kerap kali saya, dan mungkin juga anda, berkata kepada diri sendiri, "Ah... seandainya waktu itu dapat diputar kembali... pasti aku tidak akan mengulangi kesalahan yang konyol itu." Kalau sudah begini kita sering kali mengutip peribahasa, Apalagi mau diperbuat..? "Nasi Sudah Menjadi Bubur."
Tapi ngomong-ngomong siapa sih yang tidak pernah melakukan kesalahan..? Orang bilang ada dua macam manusia yang tidak pernah melakukan kesalahan. 1. Manusia yang belum lahir 2. Manusia yang sudah mati. Jadi, semua orang (yang masih hidup), tanpa terkecuali, pasti pernah melakukan kesalahan..!(yang disengaja maupun tidak disengaja). Jika demikian, kita harus belajar dari sikap dalam menghadapi kesalahan yang pernah kita alami agar tidak terulang lagi.
Bila saat ini kita sedang dirundung penyesalan karena kesalahan yang kita telah buat selama menjalani tahun 2009 ini dan seolah-olah apa yang selama ini kita rancang dalam setiap pekerjaan dan hari-hari kita, petiklah pelajaran dari kesalahan itu. Ayo bangkit dan terus menjalani hidup ini..! Tahun 2009 akan segera berlalu dan kita akan memasuki Tahun 2010... Bila nasi sudah menjadi bubur, toh kita dapat mengisinya dengan daging ayam, cakue, daun bawang, telor, kacang dan cabai sehingga menjadi semangkok bubur ayam spesial..! Memasuki Tahun 2010 mari membuat hidup lebih spesial lagi.

Read more

TUGAS II

TEORI ORGANISASI UMUM

1. Mengapa manusia cenderung untuk mengatur dan mengorganisasi kegiatan ?
2. Sebutkan dan terangkan beberapa alasan untuk mempelajari organisasi secara formal ?
3. Teori organisasi klasik telah menimbulkan dampak pada organisasi-organisasi sampai sekarang, sebutkan beberapa contohnya ?
4. Henry fayol seorang industrialis merupakan salah satu tokoh teori administrasi dalam bukunya menyatakan bahwa semua kegiatan industry dapat di kelompokkan menjadi beberapa, sebutkan!
5. Dalam buku-buku literature, manajemen ilmiah sering diartikan berbeda !
6. Mengapa banyak bidang-bidang teknik industry, manajemen industry, dan manejemen personalia di ilhami oleh karya-karya taylor?
7. Menurut teori organisasi klasik adanya suatu organisasi bergantung pada 4 kondisi, sebutkan dan terangkan ?
8. Mengapa teori neo-klasik secara sederhana di kenal sebagai teori hubungan manusia ?
9. Apakah teori neo klasik merupakan teori baru seperti teori klasik ?
10. Bagaimanakah pandangan teori neo klasik terhadap organisasi informal ?
11. Dalam teori organisasi modern dikemukakan bahwa organisasi merupakan system terbuka, apa maksudnya ?
12. Menurut teori modern organisasi sebagai suatu system terdiri atas berapa unsur, sebutkan!
13. Kualitas-kualitas apakah yang merupakan filosofi untuk mempelajari organisasi sebagai suatu system ?
14. Apakah yang dimaksud dengan proses komunikasi keseimbangan dan proses pengambilan keputusan dalam teori organisasi modern ?
15. Apa alasanya organisasi formal diibaratkan sebagai sebuah kendaraan untuk mencapai tujuan bersama ?
16. Mengapa tidak ada cara suatu cara desain yang ampuh untuk segala kondisi ?
17. Apa peranan manager proyek dalam organisasi proyek secara umum ?
18. Bagaimanakah pendapat scoth dan Mitchell tentang pengertian pengaruh, sebutkan contohnya !
19. Sebutkan dan terangkan lima sumber atau basis yang di identifikasikan oleh French dan roven !
20. Bagaimanakah type pendekatan teknik-teknik kreatif dalam pengambilan keputusan ?
21. Bagaimanakah pula kritik terhadap teknik brainstorming, jelaskan !
22. Apa yang dimaksud dengan proses minaut dalam pengambilan keputusan ?
23. Apa sebab timbulnya organisasi informal ?
24. Apa yang dimaksud dengan “jendela johari”, dikembangkan oleh siapa ?
25. Bagaimanakah maksud dari model teori proses motivasi kerja ?


JAWABAN !


1. Karena manusia memiliki keterbatasan kemampuan yang menyebabkan manusia tidak dapat mencapai suatu tujuan tanpa kerjasama.
2. Untuk pencapaian tujuan tertentu dan cenderung muncul dalam situasi dimana orang – orang menyadari manfaat organisasi sebagai suatu jalan terbaik pelaksanaan kegiatan kolektif.
3.
* Organisasi menjadi sangat tersentralisasi
* Tugas – tugasnya terspesialisasi
* Memberikan petunjuk mekanistik structural yang kaku
* Tidak mengandung kreatifitas
4.
* Perencanaan
* Pengorganisasian
* Pemberian perintah
* Pengkoordinasian
* Pengawasan
5. Pendapat I : Manajemen Ilmiah merupakan penerapan metode ilmiah pada studi, analisa dan pemecahan masalah – masalah organisasi. Pendapat II : Manajemen Ilmiah adalah seperangkat mekanisme /teknik “a bag of tricks” untuk meningkatkan efisiensi kerja organisasi.
6.
* Menggantikan metoda – metoda kerja dalam praktek dengan berbagai

metode yang dikembangkan atas dasar ilmu pengetahuan tentang kerja yang ilmiah & benar.
* Mengadakan seleksi, latihan – latihan dan pengembangan para karyawan secara ilmiah.
* Pengembangan ilmu tentang kerja serta seleksi, latihan dan pengembangan secara ilmiah harus diintegrasikan.
* Untuk mencapai manfaat manajemen ilmiah, perlu dikembangkan semangat dan mental para karyawan.
7.
* Kekuasaan
* Saling melayani
* Doktrin ( rumusan tujuan organisasi )
* Disiplin ( perilaku yang ditentukan oleh perintah )
8. Karena teori ini dikembangkan atas dasar, menekankan pentingnya aspek psikologis dan social karyawan sebagai individu maupun sebagai bagian kelompok kerjanya.
9. Ya. Karena teori neoklasik dikembangkan dari teori klasik.
10. Organisasi merupakan sekelompok orang dengan tujuan bersama.
11. Semua unsur organisasi sebagai satu kesatuan dan saling ketergantungan yang didalamnya mengemukakan bahwa organisasi berkaitan dengan lingkungan yang stabil.
12.

* Manusia
* Kerja sama
* Tujuan
* Peralatan
* Kekayaan alam
* Kerangka / konstruksi metal organisasi
13. -
14. Komunikasi, konsep keseimbangan, dan proses pengambilan keputusan merupakan 3 kegiatan proses hubungan universal yang selalu muncul pada system manusia dalam perilakunya berorganisasi.
15. Karena dalam system organisasi formal, antara struktur dengan proses
organisasi merupakan satu kesatuan dan berkaitan erat. Struktur organisasi walaupun hanya menyajikan kerangka bangunan organisasi, tetapi merupakan suatu subsistem penting.
16.
* Lingkungan stabil : lingkungan dDaftar Berbutirengan sedikit atau tanpa perubahan yang tidak diperkirakan atau secara tiba – tiba.
* Lingkungan berubah ( changing environment ) : lingkungan dimana

inovasi mungkin terjadi dalam setiap atau seluruh bidang.
* Lingkungan bergejolak ( turbulent environment ) : lingkungan

dimana sering terjadi perubahan secara drastis.
17.
* Organisasi proyek individual, hanya terdiri atas manajer proyek

dan tidak mempunyai kegiatan.
* Organisasi proyek staf, manajer proyek mempunyai staf pendukung.
* Organisasi proyek intermiks, manajer proyek mempunyai personalia

staf dan dipilh kepala – kepala fungsional utama.
* Organisasi proyek agrerat, manajer proyek mempunyai semua

personalia.
18. Merupakan suatu transaksi social dimana seorang atau kelompok orang
digerakkan oleh seorang atau kelompok orang yang lain untuk melakukan kegiatan yang sesuai dengan harapan mereka yang mempengaruhi.
19.
* Kekuasaan balas jasa ( reward power )
* Kekuasaan paksaan ( coercive power )
* Kekuasaan sah ( legitimate power )
* Kekuasaan ahli ( expert power )
* Kekuasaan panutan ( referent power )
20.
* Brainstorming : untuk menggali dan mendapatkan kreativitas maksimal dari kelompok dengan member kesempatan anggota untuk mengemukakan ide – idenya.
* Synechcs : didasarkan pada asumsi bahwa proses kreatif dapat dijabarkan dan diajarkan.
21.
* Hanya dapat diterapkan pada masalah – masalah keputusan sederhana.
* Sangat memakan waktu dan biaya.
* Hanya menghasilkan ide – ide dangkal.
22.

Proses untuk menerapkan empat proses dasar yang rasional dalam penggunaan dan penyebaran informasi mengenai masalah organisasi yang diterapkan secara sistematik tentang,

• menilai dan menjelaskan

• sebab akibat

• melakukan pilihan

• mengantisipasi masa depan

Oleh karena itu, prosesnya dibedakan menjadi empat tipe yaitu :

1. Analisis situasi (pengenalan masalah, pemisahan masalah, penetapan
prioritas, dan penempatan)

2. Analisis persoalan (merumuskan, menguraikan, menyaring informasi, menguji sebab yangmungkin dan melakukan verifikasi)

3. Analisis keputusan (merumuskan pernyataan keputusan, menentukan sasaran, mengembangkan dan mengevaluasi alternative, dan menganalisa konsekuensi atau resiko)

4. Analisis persoalan potensial (mengidentifikasi daerah kritis/lemah,
mengidentifikasi persoalan potensial menyimpang, mengidentifikasi sebab yang mungkin dan mengidentifikasi tindakan penanggulangan).
23.
* Kebutuhan social
* Rasa memiliki dan pengenalan diri
* Pengetahuan tentang perilaku yang diterima
* Perhatian ( simpati )
* Bantuan dalam pencapaian tujuan
* Kesempatan berpengaruh dan berkreasi
* Pelestarian nilai – nilai budaya
* Komunikasi dan informasiDaftar Berbutir
24. Johari Window atau Jendela Johari merupakan alat yang dikembangkan oleh
dua orang ahli psikologi yaitu Joseph Luft dan Harry Ingham pada tahun 1955.
Alat ini dikembangkan untuk memperbaiki interaksi antar manusia yang belum saling mengenal supaya dapat saling mengenal dan mengetahui dan memperkecil kemungkinan konflik.
25.
* Motivasi adalah keadaan dalam pribadi seseorang yang mendorong

keinginan individu untuk melakukan kegiatan – kegiatan tertentu guna mencapai suatu tujuan.
* Motivasi merupakan masalah yang kompleks dalam organisasi karena

kebutuhan dan keinginan setiap anggota organisasi adalah berbeda – beda dan berkembang atas dasar proses belajar yang berbeda pula.
* Motivasi dapat ditimbulkan baik oleh factor internal maupun eksternal tergantung dari mana suatu kegiatan dimulai.

Read more

Menu dengan Cobol

IDENTIFICATION DIVISION.
Program-Id. Ujian.
Author. Yopi.
ENVIRONMENT DIVISION.
DATA DIVISION.
WORKING-STORAGE SECTION.
01 var.
02 pilih pic 9.
01 nama pic X(30).
01 kelas pic X(10).
01 npm pic X(10).
01 alas pic 9(4).
01 tinggi pic 9(4).
01 luas pic 9(6).
01 nilai pic 9(2).
01 coba-lagi pic X.
88 ya VALUE 'Y', 'y'.
88 tidak VALUE 'T', 't'.
SCREEN SECTION.
01 cls.
02 BLANK SCREEN.
01 masukan.
02 LINE 5 COLUMN 20 VALUE " MENU ".
02 LINE 6 COLUMN 20 VALUE "========================".
02 LINE 7 COLUMN 20 VALUE "1. BIODATA".
02 LINE 8 COLUMN 20 VALUE "2. LUAS SEGITIGA".
02 LINE 9 COLUMN 20 VALUE "3. LULUS".
02 LINE 10 COLUMN 20 VALUE "4. EXIT".
02 LINE 11 COLUMN 20 VALUE "------------------------".
02 LINE 13 COLUMN 20 VALUE "MASUKKAN PILIHAN ANDA".
02 COLUMN PLUS 2 pic 9 to pilih.
01 seleksi.
02 LINE 15 COLUMN 20 VALUE "INGIN MENCOBA LAGI : ".
02 COLUMN PLUS 2 pic X to coba-lagi.
PROCEDURE DIVISION.
mulai.
DISPLAY cls.
DISPLAY masukan.
ACCEPT masukan.
seleksi1.
IF pilih = 1 go to pil1.
IF pilih = 2 go to pil2.
IF pilih = 3 go to pil3.
IF pilih = 4 go to selesai.
pil1.
DISPLAY cls.
DISPLAY (6, 20)"Nama : ".
ACCEPT ( , )nama.
DISPLAY (7, 20)"NPM : ".
ACCEPT ( , )npm.
DISPLAY (8, 20)"Kelas : ".
ACCEPT ( , )kelas.
DISPLAY (10, 20)"Nama Anda : ", nama.
DISPLAY (11, 20)"NPM Anda : ", npm.
DISPLAY (12, 20)"Kelas : ", kelas.
DISPLAY seleksi.
ACCEPT seleksi.
IF ya go to mulai.
IF tidak go to selesai.
STOP RUN.
pil2.
DISPLAY cls.
DISPLAY (6, 20)"Alas : ".
ACCEPT ( , )alas.
DISPLAY (7, 20)"Tinggi : ".
ACCEPT ( , )tinggi.
COMPUTE luas = (alas * tinggi) / 2.
DISPLAY (9, 20)"Luas : ", luas.
DISPLAY seleksi.
ACCEPT seleksi.
IF ya go to mulai.
IF tidak go to selesai.
STOP RUN.
pil3.
DISPLAY cls.
DISPLAY (6, 20)"Masukan Nilai : ".
ACCEPT ( , )nilai.
IF nilai not > 70
DISPLAY (8, 20)"TIDAK LULUS".
IF nilai not < 70
DISPLAY (8, 20)" ANDA LULUS".
DISPLAY seleksi.
ACCEPT seleksi.
IF ya go to mulai.
IF tidak go to selesai.
STOP RUN.
selesai.
DISPLAY cls.
DISPLAY (10, 35) "BERHASIL".
STOP RUN.

Read more

10 Tips and Trick Visual Basic

1.Denied deletion file, this trick are open the file for simultan so the windows couldn’t delete the file until the aplication end or stopped
private sub form_load()
timer1.interval = 1
end sub
Private sub timer1_timer()
Open PathFilenya For Input As 1
end sub

2.Random Coloured label, this trick will change your label each sec
Private Sub Timer1_Timer()
randomize()
Label1.ForeColor = RGB(Rnd * 255, Rnd * 255, Rnd * 255)
End Sub

3.Set the Attributes file without API function
Private Sub Command1_Click()
Setattr pathname,vbhidden+vbsystem+vbreadonly
End Sub
‘To make it normal
Private Sub Command1_Click()
Setattr pathname,vbnormal
End Sub

4. Animated form when unload
Private Sub Form_Unload(Cancel As Integer)
On Error Resume Next
‘The form go up
Do Until Me.Top <= -5000
DoEvents
Me.Move Me.Left, Me.Top – 10
DoEvents
Loop
Unload Me
End Sub

5.Gradiation Back Color Form
Private Sub Form_Load()
Form1.AutoRedraw = True
For x = 0 To ScaleHeight
Line (1, x)-(ScaleWidth, x), RGB(5, 10, 255 – (x * 255) \ ScaleHeight)
Next x
End Sub

6. Select all content in textbox the easiest way and always used by POS or accounting application just insert these code to event proc
SendKeys “{home}+{end}”

7. UnClosed Form
Private Sub Form_Unload (Cancel as Integer)
Cancel = 1
End Sub

8. ASCII Detector
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Me.Caption = KeyCode
End Sub

9. Check the existence of Folder or Files
‘Check the Folder
If Dir$(Text1.Text, vbDirectory) = “” Then
msgbox “Folder Not Exist”, vbinformation
ElseIf Dir$(Text1.Text, vbDirectory) <> “” Then
msgbox “Folder Exist”, vbinformation
End If
‘Check The File
If Dir(Text1.Text) = “” Then
msgbox “File Not Exist”, vbinformation
ElseIf Dir(Text1.Text) <> “” Then
msgbox “File Exist”, vbinformation
End If

10. Dragging the Form from around of your form
Private move_x As Integer
Private move_y As Integer
Private move_form As Boolean
Private Sub form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
move_x = X
move_y = Y
move_form = True
End Sub
Private Sub form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
If move_form Then
Me.Move Me.Left + X – move_x, Me.Top + Y – move_y
DoEvents
End If
End Sub
Private Sub form_MouseUp(Button As Integer, Shift As Integer, X As Single, Y As Single)
move_form = False
End Sub

Read more

COBOL

3. Pernyataan PERFORM.
3.1. Pernyataan PERFORM digunakan untuk :
1. Proses Pengulangan.
Yaitu jika terdapat suatu proses atau beberapa proses yang
dijalankan beberapa kali.
2. Pemrograman Terstruktur.
o Suatu cara mengorganisir program untuk memudahkan
pengembangan, pemahaman, dan pemodifikasian program.
o Pendekatan pembuatan program menggunakan konsep TOPDOWN
3.2. Perbedaan proses antar pernyataan PERFORM dan GO TO.
Setelah selesai mengerjakan seluruh isi paragraph yang diinginkan,
maka :
Pada PERFORM => akan kembali lagi ke statement setelah
statement PERFORM tersebut.
Pada GO TO => tidak akan kembali ke statement setelah GO
TO, tetapi proses dilanjutkan ke paragraph
berikutnya dari paragraph yang dituju.
3.3. Keuntungan Penggunaan PERFORM :
Suatu prosedur dapat dieksekusi pada berbagai tempat yang
berbeda di dalam program, sehingga menghemat kode program.
3.4. Bentuk dasar PERFORM :
PERFORM NAMA-PROSEDUR-1 { THROUGH THRU } NAMA PRO
2
Dapat di bagi menjadi 2, yaitu :
a. PERFORM NAMA-PROSEDUR-1.
Ilustrasi:
Contoh Program :
*---CONTOH PEMAKAIAN PERFORM---*
IDENTIFICATION DIVISION.
PROGRAM-ID. PERFORM.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
MULAI.
PERFORM PROCEDURE-A.
DISPLAY ‘ SELAMAT BELAJAR ‘.
PERFORM PROCEDURE-B.
PERFORM PROCEDURE-A.
STOP RUN.
PROCEDURE-A.
DISPLAY ‘*********************’.
DISPLAY ‘^^^^^^^^^^^^^^^^^^^^^^’.
PROCEDURE-B.
DISPLAY ‘ DAN SEMOGA SUKSES’.
Hasilnya :
**********************************
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
SELAMAT BELAJAR
DAN SEMOGA SUKSES
*********************************
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
b. PERFORM NAMA PROCEDURE-1 THROUGH NAMAPROCEDURE-
2. atau
PERFORM PROSEDUR-A
( pernyataan selanjutnya)
.
.
PROSEDUR – A.
……
PROSEDUR – B.
……
PERFORM NAMA-PROCEDURE-1 THROUGH NAMAPROCEDURE-
2.
Contoh Program :
*----CONTOH PEMAKAIAN PERFORM THRU----*
IDENTIFICATION DIVISION.
PROGRAM-ID. PERFORM2.
ENVIRONMENT DIVISION.
DATA DIVISION.
PROCEDURE DIVISION.
MULAI.
PERFORM GARIS.
PERFORM PROCEDURE-A THRU PROCCEDURE-B.
DISPLAY ‘ SEMOGA KITA JADI ORANG SUKSES ‘.
PERFORM GARIS.
STOP RUN.
PROCEDURE-A.
DISPLAY ‘ AYO BELAJAR ‘.
PROCEDURE-B.
DISPLAY ‘ JANGAN MALAS ‘.
GARIS.
DISPLAY’~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~’.
Hasilnya :
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
AYO BELAJAR
JANGAN MALAS
SEMOGA KITA JADI ORANG SUKSES
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Read more

Tip's

Bakat Dan Potensi Diri

Di dalam diri kita tersedia kemampuan untuk melakukan yang bahkan belum kita impikan.
Kekuatan ini akan ada jika kita merubah sikap terhadap apa yang membatasi kita, dan terhadap apa yang tidak mungkin kita capai.
Sadari bahwa cara menuju keberhasilan adalah kerja keras, lalu kerja keras membutuhkan tenaga untuk bergerak maju dan itu yang kita sebut dengan kesungguhan.
Maka bagi siapa saja yang menuntut dengan keras kepada dirinya sendiri untuk mengupayakan keberhasilan, akan berhasil.
Berhasil itu bakat, dan memang benar bakat hanya datang setelah mencoba.
Dan karena yang dicoba hanya sedikit dari sekian banyak kemungkinan yang tersedia, maka sebetulnya kita semua sama tidak tahunya mengenai bakat kita masing-masing. Jadi yang kita tahu saat ini hanyalah anggapan sementara mengenai bakat, dan disebut sebagai bakat.
Oleh karena Kita semua adalah calon pemimpin, bakat untuk berhasil adalah hasil keputusan kita sendiri. Maka kita akan lebih nyaman untuk menjalaninya, dan hasilnya pun akan terasa lebih memuaskan untuk diri kita.

Read more

ARTI PENTINGNYA ORGANISASI DAN METODE ( TUGAS I )

1. Organisasi dapat diartikan sebagai wadah dan sebagai proses. Jelaskan dengan singkat !
   - organisasi merupakan wadah untuk sekelompok manusia untuk bekerjasama
   - organisasi pengelompokkan manusia dalam suatu kerjasama yang efisien .
2. Apa yang dimaksud dengan pimpinan dalam pengertian universal ?
   - Seseorang yang memiliki kemampuan dalam mengatur/mengorganisir semua lini kehidupan perusahaan untuk mencapai tujuan yang menggunakan prinsip Planning, Organizing, Controlling, Directing dan Evaluating.
3. Jelaskan mengapa market dan methods tidak dimasukkan kedalam sumber-sumber manajemen ?
   - Karena method itu bukan sebuah sumber manajemen melainkan sebuah tata kerja dalam sebuah pekerjaan. sama dengan Market, bukan termasuk kategori sumber manajemen tapi merupakan tempat dimana mereka memasarkan produknya.
4. Apa yang dimaksud dengan material dalam arti fisik ? Bagaimana kalau dalam arti non fisik ?
   - Material dalam arti fisik : sesuatu yang dapat dilihat dan diRasakan/dipegang. Biasanya berupa barang .
   contoh : UAng , Buku , handphone, dsb.
   
   - Material dalam arti non fisik : yakni yang tidak dapat dilihat . Biasanya berbentuk jasa.
   contoh : Jasa Angkutan umum, pelayanan dari suatu instansi kepada masyarakat, dsb.
5. Mengapa uang dapat dijadikan motivasi dalam kerja?
   - Karena uang merupakan salah satu unsur yang bisa menunjang kehidupan, dan juga sebagai peningkatan taraf hidup manusia itu sendiri. Orang bekerja untuk mendapatkan uang, maka uang bisa dikatakan kebutuhan primer bagi seseorang.
6. Apa pengertian efisiensi ?
   - Efisiensi = melakukan tugas dengan benar/tepat, sehingga menghemat waktu, tenaga, dll. Bila tidak melakukan tugas dengan benar dan sesuai prosedur yang ada , maka pekerjaan tersebut tidak efisien karena hasilnya akan jauh dari sasaran.
7. Bagaimana cara meningkatkan efisiensi kerja?
   - Efisiensi kerja dapat dilakukan dengan memberi fasilitas yang cukup untuk pekerja, memberi tunjangan pada pekerja, mengebangkan kemampuan pegawai dengan mengadakan pelatihan yang berkaitan dengan kinerja perusahaan.
8. Jelaskan ruang lingkup orgaanisasi dan metode !
   
   - maksud organisasi dan metode ialah pelayanan terhadap manajer dan administrasi yang berusaha memajukan pekerjaan mereka atau tata kerja yang dipergunakan dalam rangka pencapaian efisiensi yang maksimal pada organisasi.
   
   - Kegiatan - kegiatan yang termasuk dalam Organisasi dan Metode adalah sebagai berikut :
   
   1. Analisis organisasi.
   2. Komunikasi dalam orrganisai
   3. Tentang tenaga kerja, prosedur kerja dan system kerja.
   4. Pentingnya filing dari segi Organisasi dan Metode
   5. Pentingnya jangka waktu penyimpanan data dan dokumen
   6. Pentingnya formulir dari segi Organisasi dan Metode
   7. Pendayagunaan mesin kantor
   8. Pendayagunaan perabotan dan peralatan kantor
   9. Pentingnya penulisan laporan
   10. Pentingnya buku pedoman kerja
   11. Pentingnya anggaran belanja
   12. Analisis kepegawaian
   13. Pentingnya penyederhanaan kerja
   14. Orgaisasi unit
   15. Kesimpulan akhir
9. Mengapa pada ukuran efisiensi wewenang harus seimbang dengan tanggung jawab yang dibebankan ?
   - Karena setiap perusahaan memiliki target yang harus dicapai, maka dibuatlah pembagian kerja. Dan setiap orang memiliki kemampuan berbeda-beda. maka, antara tanggung jawab dan wewenang harus seimbang, sehingga tidak keluar dari tanggung jawab yang diberikan, agar tidak ada yang menyalahgunakan wewenang. karena seseorang harus bersikap profesional.

Read more

Picture Character Editing pada Cobol

1. PICTURE karakter 9
Hanya mengandung nilai NUMERIK.
2. PICTURE karakter V
Menunjukkan letak anggapan dari titik decimal
3. PICTURE karakter P
Digunakan dgn gabungan PICTURE karakter V, utk menimbulkan 0
4. PICTURE karakter S
Untuk memberi tanda negatif
5. PICTURE karakter A
Untuk menyimpan nilai data huruf (alphabet)
6. PICTURE karakter X
Untuk menunjukkan posisi nilai alphanumerik (gabungan angka,huruf atau spesial karakter) & BERSIFAT RATA KIRI
7. PICTURE EDITING Z
Digunakan untuk menggantikan angka 0 dimuka dgn blank
8. PICTURE EDITING $
Digunakan untuk pencetakan $ pada posisi paling kiri.
9. PICTURE EDITING . DAN ,
Karakter . digunakan utk menunjukkan letak posisi dari titik desimal pada
pencetakan.
10. PICTURE EDITING –
Untuk menampilkan tanda negatif bila data aslinya negatif
11. PICTURE EDITING +
Untuk menampilkan tanda negatif atau tanda positif
12. PICTURE EDITING DB dan CR
Untuk DEBIT dan KREDIT pada akuntansi
13. PICTURE EDITING B
Khusus untuk mengedit nilai data BUKAN NUMERIK
14. PICTURE EDITING *
Digunakan utk mengganti nilai 0 pd nilai data disebelah kanan dgn tanda * .
15. PICTURE EDITING 0
Digunakan untuk menyisipkan angka 0 pada posisi dimana karakter 0 itu berada.
16. PICTURE EDITING /
sama dgn karakter 0, hanya saja karakter yg digunakan adlh / (slash)

Read more

Matrik Pada Cobol

IDENTIFICATION DIVISION.

Program-id. MATRIK. *identitas program

ENVIRONMENT DIVISION.

DATA DIVISION.

WORKING-STORAGE SECTION.

77 I PIC 9. *variabel I bertipe data Numerik

77 J PIC 9. *variabel J bertipe data Numerik

01 CETAK.

02 M1 PIC Z9.

02 M2 PIC Z9.

02 T PIC ZZ9.

01 TOTAL.

02 TOTAL-BARIS OCCURS 2 TIMES.

03 TM OCCURS 2 TIMES PIC 999.

01 DATA1.

02 BARIS1 OCCURS 2 TIMES.

03 MATRIK1 OCCURS 2 TIMES PIC 999.

01 DATA2.

02 BARIS2 OCCURS 2 TIMES.

03 MATRIK2 OCCURS 2 TIMES PIC 99.

SCREEN SECTION.

01 HAPUS-LAYAR.

02 BLANK SCREEN.

01 TANDA.

02 LINE 3 COLUMN 16 VALUE '+' HIGHLIGHT.

02 LINE 3 COLUMN 31 VALUE '=' HIGHLIGHT.

PROCEDURE DIVISION.

MULAI.

MOVE 3 TO LIN.

DISPLAY HAPUS-LAYAR.

*menampilkan user devined dari Screen section dengan nama Hapus-Layar yang berisi Syntax Blank-Screen.

PERFORM ISI1 VARYING I FROM 1 BY 1

*memanggil prosedur 1 dengan memvariasikan variabel I secara satu-satu

UNTIL I>2 AFTER J FROM 1 BY 1 UNTIL J>2.

*sebelum I lebih besar dari 2 sesudah J secara satu satu sebelum J lebih besar dari 2.

Jadi maksudnya terjadi proses looping dimana setelah looping I=I+1 begitu juga dengan J

COMPUTE LIN= 10.

PERFORM ISI2 VARYING I FROM 1 BY 1

UNTIL I>2 AFTER J FROM 1 BY 1 UNTIL J>2.

PERFORM PROSES VARYING I FROM 1 BY 1

UNTIL I>2 AFTER J FROM 1 BY 1 UNTIL J>2.

DISPLAY HAPUS-LAYAR.

DISPLAY ( 1 , 6 ) 'MATRIK A + MATRIK B'.

DISPLAY TANDA.

PERFORM HASIL VARYING I FROM 1 BY 1

UNTIL I>2 AFTER J FROM 1 BY 1 UNTIL J>2.

STOP RUN.

ISI1.

DISPLAY ( 3 , 2 ) 'MATRIK A'.

COMPUTE LIN = LIN + 1.

DISPLAY ( LIN , 2 ) 'ELEMEN BARIS KE-' , I ,

' KOLOM KE-' , J , ':'.

ACCEPT MATRIK1 ( I , J ).

ISI2.

DISPLAY ( 10 , 2 ) 'MATRIK B'.

COMPUTE LIN = LIN + 1.

DISPLAY ( LIN , 2 ) 'ELEMEN BARIS KE-' , I ,

' KOLOM KE-' , J , ':'.

ACCEPT MATRIK2 ( I , J ).

PROSES.

COMPUTE TM ( I , J ) = MATRIK1 ( I , J ) + MATRIK2 ( I , J ).

HASIL. *Prosedure HasiL

MOVE I TO LIN. Memindahkan I sebagai baris

MOVE J TO COL. Memindahkan J sebagai Colom

MOVE MATRIK1 ( I , J ) TO M1.

MOVE MATRIK2 ( I , J ) TO M2.

MOVE TM ( I , J ) TO T.

COMPUTE LIN = LIN * 2. Melakukan proses penghitungan untuk LIN=LIN*2

COMPUTE COL = COL * 4. Melakukan proses penghitungan untuk COL=COL*4

DISPLAY ( LIN , COL + 1 ) M1.

DISPLAY ( LIN , COL + 16 ) M2.

DISPLAY ( LIN , COL + 30 ) T.

ISI1, ISI2,PROSES dan HASIL adalah Divisi lain yang user defined yang akan dipanggil sebagai procedure pada procedure division dengan Syntax Perform

Setelah itu simpan Matrik.COB pada folder yang sama dengan tempat software cobol berada,

Lalu Compile.

>Cobol Matrik.COB

Memasukkan semua input bertype data numeric untuk Proses dan hasil.

Setelah melakukan perform “prosedur Hasil” semua elemen pada baris dan kolom matrik A dan matrik B dijumlah.

Maka hasil Output akhirnya sebagai berikut :

Read more