Lost trying to do an auto increment

[Anonymous]

I want to increment the shipper # when accessed making Bills of lading in my customer DB. I cant seem to get the update function to work properly. Im sure that its something simple but I can be simple minded sometimes. Thanks in advance for your help. Below is my code:

Controller
{New()
{
.Data.Set(Record())
}
Controls:
#(Record
(Access bol
startNew: true
title: ‘Bill of Lading’
nextNum: #(field: bill_num,
table: bol_nextnum, table_field: nextnum)
(Vert
(Horz
(Static, ‘Cosignee Name:’)
#(Key “cosignee_db” field:”cosign_name” fillin:(shipper_num, cosign_name, cosign_address, cosign_city, cosign_st, cosign_zip)))
(cosign_address)

(Horz
cosign_city (Skip 2) cosign_st (Skip 2) cosign_zip)

Skip

(Horz (Skip 400)(Static, ‘Bill of Lading Information’, font: ‘Arial’, size: 16, weight: 600))
Skip
Skip
Skip
(Horz bill_date (Skip 450) bill_num)
cosignee_name
(Horz (Static, ‘ ‘) export (Skip 535) ship_num)
Skip
(Horz carrier (Skip 343) trailer_num)
Skip
material
Skip
booking
po
release
load
vessel
voyage
seal
Skip
gross_wt
tare_wt
net_wt
Skip
Skip
(Horz (Skip 450)
)
))

}

function()
{

QueryApply1(“cosignee_db where cosign_name =” $ Display(.Cosign_name))
{ |x|
Print(x.cosign_name)
x.shipper_num = x.shipper_num + 1
x.Update()
Print(x.shipper_num)
}
num = .shipper_num + 1
return num
}

[Anonymous]

I solved my own problem this time. By changing the Display(.Cosign_name) to Display(.cosign_name). It seems to be working fine now. Now on to my next problem.

Thanks
Benny

[amckinlay]

I was just writing a reply. I’m glad you figured it out.

[Author]

Posts