Declare Cursor

sql_perintah="select th"+ string(ii_tahun) +"from gaji_pokok where kd_golongan= ?"

DECLARE my_cursor DYNAMIC CURSOR FOR SQLSA;

PREPARE SQLSA FROM :sql_perintah;
OPEN DINAMIC my_cursor using :kd_golongan;
FETCH my_cursor INTO :id_tahun;

If sqlca.sqlcode = 100 then
messagebox('Informasi','data tidak ada')
End if

CLOSE my_cursor;

get datawindows

many type of data windows can use for reporting or form, Usualy for reporting you can use tabular type
get the data windows
dw_1.reset()
dw_1.retrieve() // get the datawindow ( dw_1)
dw_1.retrieve(unit,tgl_proses) //get the datawindow ( dw_1) with parameter

Send Variabel to Datawindow

send variabel tertentu to data windows :

d_1.setitem( baris , 'field_datawindows ' , variabel )

contoh:
dw_1.setitem(dw_1.getrow(),'alamat',ls_alamat)

for baris = 1 to dw_1.rowcount()

dw_1.setitem(baris,'alamat',ls_alamat)

next

Get Field dalam datawindows Report ( Tabular )

Untuk mengambil file dari datawindows pada row model report ( tabular ) digunakan perintah
//==untuk row / abris yang sedang aktif
string ls_var1
dec lc_var2, lc_hitung
date ld_var3
datetime ldt_var4
int baris

dw_1.retrieve() //==mengambil data

for baris = 1 to dw_1.rowcount()

ls_var1 = dw_1.getitemstring(baris,'field1')
lc_var2 = dw_1.getitemnumber(baris,'field2')
ld_var3 = dw_1.getitemdate(baris,'field3')
ldt_var4 = dw_1.getitemdatetime(baris,'field4')

//===hitung
lc_hitung = lc_var2 * 100

next

Get Data Windows Variable ( get field )

get the row of datawindows we can use this sintaks:


string ls_var1
dec lc_var2
date ld_var3
datetime ldt_var4

ls_var1 = dw_1.getitemstring(dw_1.getrow(),'field1')
lc_var2 = dw_1.getitemnumber(dw_1.getrow(),'field2')
ld_var3 = dw_1.getitemdate(dw_1.getrow(),'field3')
ldt_var4 = dw_1.getitemdatetime(dw_1.getrow(),'field4')

Declaring Variable

To declare a variable, you first type in the data type followed by the name of variable. You can also assign the variable a default value by makin the name equal to appropriate value

Integer il_var_sex
Long ll_salary = 1000000
Date ld_daytogo
Date startdate = 1995-03-01

Data Types

PowerBuilder can handle many diffrent types of data. A few of the standart data type are given below:

Boolean -> True or False
Integer / Int -> 16 bit signed integer from -32768 to 32768. Whole number is not decimal points
Long -> 32 bit signed interger from -2.147.483.648 to 2.147.483.648 it is the same as an integer
String->This data type hold between 0 - 60.000 ASCII character
Blop -> A Binary Large Object can be use for extreme large data item
Datetime -> The date and time store as a single data
Dec -> These are signed decimal number with up to 18 digits
Dauble/Real -> The data types used to store very larger or very small number
Date -> Define variable as date