Code::Blocks
Friday, April 9, 2010 at 12:18 AM | 0 comments
Code Blocks adalah sebuah IDE bebas/open source yang tersedia di beberapa platform dan support dengan external plugins. Di kembangkan dengan C++, Jadi 1 code sumber, langsung bisa di compile di berbagai platform. Disini saya coba nengenalkan codding mengunakan Code Blocks.

Setelah installasi selesai kita coba buat projectnya.
1. File->New-Project ( setelah tampil seperti dibawah langsung bisa dipilih Console Application lalu klik Go.


















2. Kemudian Klik Next, Next lalu masukan project titlenya. Klik Next



















3. klik tombol Next saja.. ( proses selesai )





















4. Akan tampil seperti dibawah. kemudian Klik menu File->Open lalu buka file main.cpp.

















Sourcenya akan tampil seperti ini



















5. Lalu lanjutkan untuk Build dan Run ( F9 )











Oke deh sampai disini dulu dan lain waktu kita akan membahas xwWidgets agar tampilannya seperti visual.
Posted by Shanto Labels:
ABAP : Execute Program Flow
Thursday, April 8, 2010 at 2:40 AM | 0 comments
Pada dasarnya pada saat membuat program di abap terdiri dari beberapa event:
1. Initialization
Di event Initialization kita bisa memberikan nilai default terhadap suatu variabel. Karena pada saat ini line code akan di execute sebelum screen di tampilkan.


2. At selection screen
Event ini akan di jalankan jika terjadi perubahan di screen
3. Start of selection
Event ini akan dijalankan jika melakukan execute terhadap program tersebut.
4. Block Program yang di buat
Di sinilah suatu block program yang akan dibuat baik select, insert, update, insert atau proses.
5. End of selection
Disini adalah akhir dari suatu execute.
6. At line selection
Ini akan dijalan kan jika terjadi event terhadap screen result yang telah di tampilkan.

Sample Program :color:

REPORT YSANTO_01.
tables: spfli.

data: wa_spfli type spfli,
wa_sflig type spfli.

parameters par_cid like spfli-carrid.

initialization.
par_cid = 'MH'.

at selection-screen.
if par_cid = ''.
message e000(38) with 'Carr ID harus di isi'.
endif.

start-of-selection.
select single * from spfli into wa_spfli where carrid = par_cid.
if sy-subrc = 0.
write wa_spfli-carrid.
endif.

end-of-selection.

at line-selection.
select single * from spfli into wa_sflig where carrid = wa_spfli-carrid.
if sy-subrc = 0.
write: / 'Asal Penerbangan : ', wa_sflig-cityfrom.
write: / 'Tujuan Penerbangan : ', wa_sflig-cityto.
endif.

Output :







Result after execute :





After double click :





Ternyata abap itu mudah, betul betul ....
Posted by Shanto Labels: