Author Topic: sys(2015) di grid  (Read 1050 times)

0 Members and 1 Guest are viewing this topic.

Offline @fm

  • Full Member
  • *
  • Posts: 68
sys(2015) di grid
« on: January 11, 2011, 07:55:22 PM »
malam master...

thisformset.form3.grid1.RecordSource=""

PUBLIC temp
temp =sys(2015)

select * from tableA into cursor &temp

thisformset.form3.grid1.ColumnCount=1
thisformset.form3.grid1.RecordSourceType= 1
thisformset.form3.grid1.RecordSource="&temp"
thisformset.form3.grid1.column1.ControlSource=&temp.code

kenapa selalu error/data tak tampil di grid?
errornya "variabel _34G16XXCODE is not found", mohon pencerahanya

Offline onytoo

  • Fox-id M.V.P
  • Hero Member
  • *
  • Posts: 1.032
Re: sys(2015) di grid
« Reply #1 on: January 11, 2011, 07:59:14 PM »
select * from tableA into cursor (temp)

thisformset.form3.grid1.ColumnCount=1
thisformset.form3.grid1.RecordSourceType= 1
thisformset.form3.grid1.RecordSource= temp

[edited]
thisformset.form3.grid1.column1.ControlSource= temp+[.code]


Regards,
Onytoo
« Last Edit: January 11, 2011, 08:01:16 PM by onytoo »
Long life Visual FoxPro...

Offline @fm

  • Full Member
  • *
  • Posts: 68
Re: sys(2015) di grid
« Reply #2 on: January 11, 2011, 08:09:52 PM »
siip... thanks pak  :thumbsup:

Offline @fm

  • Full Member
  • *
  • Posts: 68
Re: sys(2015) di grid
« Reply #3 on: January 11, 2011, 08:46:44 PM »
tapi kalo untuk tgl dan fungsi IIF selalu gagal

thisformset.form3.grid1.column2.ControlSource=dtoc(temp+[.tgl])
thisformset.form3.grid1.column3.ControlSource=IIF(temp+[.posting=0], 'Belum','Sudah')

Offline Sammy

  • Hero Member
  • *
  • Posts: 2.400
Re: sys(2015) di grid
« Reply #4 on: January 12, 2011, 04:44:20 AM »
tapi kalo untuk tgl dan fungsi IIF selalu gagal

thisformset.form3.grid1.column2.ControlSource=dtoc(temp+[.tgl])
thisformset.form3.grid1.column3.ControlSource=IIF(temp+[.posting=0], 'Belum','Sudah')

Kenapa diberi dtoc()?

thisformset.form3.grid1.column2.ControlSource="DTOC("+temp+".tgl)"
thisformset.form3.grid1.column3.ControlSource="IIF("+temp+".posting=0, 'Belum','Sudah')"
Sammy