Hi All,
I have the Add and Edit forms which are created with an xdialog. I used the set.external_record...() to get the List of my product Set in an Add form. I designed that Display "Description" and save only the "ID" from list of the product into table.
Now I want to review it with Edit form. I have a trouble to get the Display value of "ID" on the Edit form.
This is my Product List from Add form
This is my Edit Scripts
I have the Add and Edit forms which are created with an xdialog. I used the set.external_record...() to get the List of my product Set in an Add form. I designed that Display "Description" and save only the "ID" from list of the product into table.
Now I want to review it with Edit form. I have a trouble to get the Display value of "ID" on the Edit form.
This is my Product List from Add form
vFilter = "..filter Condition.."
vPrdctList = set.external_record_content_get("mtr_prdct.set",\
"Prdctavail->Shape+' '+Prdsurf->Surface+' '+Prdctgroup->Group+' '+shape->description+'^'+Product->prdct_id","Shape->Shape",vFilter)
'Save it to table
tbl.change_begin()
tbl.Product_id = word(vPrdctList,2,"^")
tbl.change_end(.t.)
vPrdctList = set.external_record_content_get("mtr_prdct.set",\
"Prdctavail->Shape+' '+Prdsurf->Surface+' '+Prdctgroup->Group+' '+shape->description+'^'+Product->prdct_id","Shape->Shape",vFilter)
'Save it to table
tbl.change_begin()
tbl.Product_id = word(vPrdctList,2,"^")
tbl.change_end(.t.)
tEst = table.get("est")
tEst.fetch_goto(vCurRcdNo)
vEstPrdId = tEst.Product_id
vPrdctList = set.external_record_content_get("mtr_prdct.set",\
"Prdctavail->Shape+' '+Prdsurf->Surface+' '+Prdctgroup->Group+' '+shape->description+'^'+Product->prdct_id","Shape->Shape"," ")
'I tried this and "Reverse" set to get the Display value.
vShape = set.external_record_content_get("mtr_prdct.set",\
"Prdctavail->Shape+' '+Prdsurf->Surface+' '+Prdctgroup->Group+' '+shape->description+'^'+Product->prdct_id","Shape->Shape",\
"Product->prdct_id="+quote(vEstPrdId))
'...xdialog here
Product:| [%v%.25vShape^=vPrdctList!vShape_changed] 'I have the Blank on the here. How can I display the value which same as "Add" form?
tEst.fetch_goto(vCurRcdNo)
vEstPrdId = tEst.Product_id
vPrdctList = set.external_record_content_get("mtr_prdct.set",\
"Prdctavail->Shape+' '+Prdsurf->Surface+' '+Prdctgroup->Group+' '+shape->description+'^'+Product->prdct_id","Shape->Shape"," ")
'I tried this and "Reverse" set to get the Display value.
vShape = set.external_record_content_get("mtr_prdct.set",\
"Prdctavail->Shape+' '+Prdsurf->Surface+' '+Prdctgroup->Group+' '+shape->description+'^'+Product->prdct_id","Shape->Shape",\
"Product->prdct_id="+quote(vEstPrdId))
'...xdialog here
Product:| [%v%.25vShape^=vPrdctList!vShape_changed] 'I have the Blank on the here. How can I display the value which same as "Add" form?
Comment