/*
 * Author       : zchelp
 * Generated on : 22-Nov-2009 20:46:51
 * Version      : 3.0
 */
application "Lookup On the Same Form"
{
    type = public
    date format = "dd-MMM-yyyy"
    time zone = "America/Los_Angeles"
    section Home
    {
        form  FormA
        {
            
            Company
            (
                type  =  text
            )

            Parent_Company
            (
                displayname  =  "Parent Company"
                type  =  picklist
                values  =  {"Option 1",   "xxx",   "crap",   "bvjhbvjh",   "Hello",   "sfgsdfg",   "Groove"}
                defaultvalue  =  "Y"
            )

            actions
            {
                on add
                {
                    on load
                    {
                        if (count(FormA)  <  1)
                        {
                            clear Parent_Company;
                        }
                        for each dat in FormA
                        {
                            Parent_Company:ui.add(dat.Company);
                        }
                    }
                    Submit
                    (
                        type  =  submit
                        displayname  =  "Submit"
                    )
                    Reset
                    (
                        type  =  reset
                        displayname  =  "Reset"
                    )
                }
                on edit
                {
                    on load
                    {
                        if (count(FormA)  <  1)
                        {
                            clear Parent_Company;
                        }
                        for each dat in FormA
                        {
                            Parent_Company:ui.add(dat.Company);
                        }
                    }
                    Update
                    (
                        type  =  submit
                        displayname  =  "Update"
                    )
                    Cancel
                    (
                        type  =  cancel
                        displayname  =  "Cancel"
                    )
                }
            }
        }

        list  FormA_View
        {
            displayname = "FormA View"
            show  all  rows  from  FormA 
            (
                Company
                Parent_Company as "Companies"
            )
            filters 
            (
                Parent_Company
            )
            options
            (
                display rows = 100
            )
        }

    }

}
