Notes
Notes - notes.io |
String ls_takeup_cable_no, ls_cable_no
Long li_lop1, ll_rw1, ll_nrw1, li_lop2, ll_rw2, ll_nrw2, li_lop3, ll_rw3, ll_nrw3, ll_level1, ll_level2, ll_level3, ll_cntr1, ll_cntr2, ll_cntr3
Long li_lop3, ll_rw3, ll_nrw3
ids_data1 = create datastore
ids_data2 = create datastore
ids_data97 = create datastore
ids_data98 = create datastore
ids_data99 = create datastore
ids_data1.dataobject = dw_1.dataobject
ids_data99.dataobject = dw_1.dataobject
ids_data98.dataobject = dw_1.dataobject
ids_data97.dataobject = dw_1.dataobject
ids_data1.settransobject(sqlca)
ids_data99.settransobject(sqlca)
ids_data98.settransobject(sqlca)
ids_data97.settransobject(sqlca)
ls_takeup_cable_no = Trim(sle_1.Text)
ll_rw1 = ids_data99.retrieve(ls_takeup_cable_no)
dw_1.reset()
ll_level1 = 0
ll_level2 = 0
ll_cntr1 = 0
ll_cntr2 = 0
if ll_rw1 > 0 then
for li_lop1 = 1 to ll_rw1
//Takeup Table = LEVEL 1
ll_nrw1 = ids_data1.insertrow(0)
ll_level1 = 1
ll_cntr1 = ll_cntr1 + 1
ls_cable_no = Trim(ids_data99.object.cable_no[li_lop1])
ls_takeup_cable_no = Trim(ids_data99.object.takeup_cable_no[li_lop1])
ids_data1.object.cable_no[ll_nrw1] = ls_cable_no
ids_data1.object.takeup_cable_no[ll_nrw1] = ls_takeup_cable_no
ids_data1.object.ext_level[ll_nrw1] = String(ll_level1)
ids_data1.object.sno[ll_nrw1] = ll_cntr1
ll_rw2 = 0
ll_cntr2 = 0
ll_rw2 = ids_data98.retrieve(ls_cable_no)
//Takeup Table = LEVEL 2
if ll_rw2 > 0 then
for li_lop2 = 1 to ll_rw2
ll_nrw1 = ids_data1.insertrow(0)
ll_level2 = ll_level2 + 1
ll_cntr2 = ll_cntr2 + 1
ls_takeup_cable_no = Trim(ids_data98.object.takeup_cable_no[li_lop2])
ls_cable_no = Trim(ids_data98.object.cable_no[li_lop2])
ids_data1.object.cable_no[ll_nrw1] = ls_cable_no
ids_data1.object.takeup_cable_no[ll_nrw1] = ls_takeup_cable_no
ids_data1.object.ext_level[ll_nrw1] = String(ll_level1) + '.' + String(ll_level2)
ids_data1.object.sno[ll_nrw1] = ll_cntr2
ll_rw3 = 0
ll_cntr3 = 0
ll_rw3 = ids_data97.retrieve(ls_cable_no)
//Takeup Table = LEVEL 3
if ll_rw3 > 0 then
for li_lop3 = 1 to ll_rw3
ll_nrw1 = ids_data1.insertrow(0)
ll_level3 = ll_level3 + 1
ll_cntr3 = ll_cntr3 + 1
ls_takeup_cable_no = Trim(ids_data97.object.takeup_cable_no[li_lop3])
ls_cable_no = Trim(ids_data97.object.cable_no[li_lop3])
ids_data1.object.cable_no[ll_nrw1] = ls_cable_no
ids_data1.object.takeup_cable_no[ll_nrw1] = ls_takeup_cable_no
ids_data1.object.ext_level[ll_nrw1] = String(ll_level1) + '.' + String(ll_level2) + '.' + String(ll_level3)
ids_data1.object.sno[ll_nrw1] = ll_cntr2
next
end if
next
end if
next
ll_rw3 = ids_data1.rowcount()
dw_1.reset()
for li_lop3 = 1 to ll_rw3
ll_nrw3 = dw_1.insertrow(0)
dw_1.object.cable_no[ll_nrw3] = Trim(ids_data1.object.cable_no[li_lop3])
dw_1.object.takeup_cable_no[ll_nrw3] = Trim(ids_data1.object.takeup_cable_no[li_lop3])
dw_1.object.ext_level[ll_nrw3] = Trim(ids_data1.object.ext_level[li_lop3])
dw_1.object.sno[ll_nrw3] = ids_data1.object.sno[li_lop3]
//Messagebox('test', String(ids_data1.object.cable_no[li_lop]) )
next
dw_1.GroupCalc()
end if
Destroy ids_data1
Destroy ids_data2
Destroy ids_data97
Destroy ids_data98
Destroy ids_data99
|
|
Notes.io is a web-based application for taking notes. You can take your notes and share with others people. If you like taking long notes, notes.io is designed for you. To date, over 8,000,000,000 notes created and continuing...
With notes.io;
- * You can take a note from anywhere and any device with internet connection.
- * You can share the notes in social platforms (YouTube, Facebook, Twitter, instagram etc.).
- * You can quickly share your contents without website, blog and e-mail.
- * You don't need to create any Account to share a note. As you wish you can use quick, easy and best shortened notes with sms, websites, e-mail, or messaging services (WhatsApp, iMessage, Telegram, Signal).
- * Notes.io has fabulous infrastructure design for a short link and allows you to share the note as an easy and understandable link.
Fast: Notes.io is built for speed and performance. You can take a notes quickly and browse your archive.
Easy: Notes.io doesn’t require installation. Just write and share note!
Short: Notes.io’s url just 8 character. You’ll get shorten link of your note when you want to share. (Ex: notes.io/q )
Free: Notes.io works for 12 years and has been free since the day it was started.
You immediately create your first note and start sharing with the ones you wish. If you want to contact us, you can use the following communication channels;
Email: [email protected]
Twitter: http://twitter.com/notesio
Instagram: http://instagram.com/notes.io
Facebook: http://facebook.com/notesio
Regards;
Notes.io Team
