Arkadaşlar fiş satırı içersinde üretici kodunu getirmek istiyorum..
Object designerde şu kodu yazdım ...
Kod başka bir yerden alıntıdır...
hatalı neresi ..
Sub FormCreate()
DBGRefresh("OrderLineGrid")
End Sub
Sub DBGPrepareQuery(ctrl as String, ID as string)
DBGGetQuery("OrderLineGrid",qry)
qry.AddSelFieldAsc("ST","PRODUCERCODE", 4, 0, 10001)
tblname = Application.GetTableName(1, Application.CompanyID)
qry.JoinTable("ST", tblName, "LGMAIN","STOCKREF", "=", "LOGICALREF", "",2)
End Sub
Sub DBGSetRow(ctrl as String, ID as string, row as Long)
PRODUCERCODE = ""
qry.GetFieldValueAsc(10001, 4, PRODUCERCODE)
DBGSetField("OrderLineGrid",row,10001,PRODUCERCODE)
End Sub