Example 2: Stack-based layout form

SCHEMA stores

ACTION DEFAULTS
  ACTION import(TEXT=%"action.import")
END

TABLES
  customer
END

LAYOUT(TEXT=%"title.customer")
STACK
GROUP
  LABEL, TEXT=%"label.new_customer";
END --GROUP
GROUP
  EDIT customer.customer_num, NOENTRY, TITLE=%"label.number";
  EDIT customer.fname, TITLE=%"label.first_name";
  EDIT customer.lname, TITLE=%"label.last_name";
  EDIT customer.company, TITLE=%"label.company";
END --GROUP
GROUP(TEXT = "group.address")
  EDIT customer.address1, TITLE=%"label.address1";
  EDIT customer.address2, TITLE=%"label.address2";
  EDIT customer.city, TITLE=%"label.city";
  BUTTONEDIT customer.state, TITLE=%"label.state", UPSHIFT,
             NOTEDITABLE, ACTION = zoom;
  EDIT customer.zipcode, TITLE=%"label.zipcode";
END --GROUP
GROUP phone_edit
  EDIT customer.phone, TITLE=%"label.telephone",
       KEYBOARDHINT=PHONE;
END --GROUP
GROUP phone_dial
  BUTTON dial, TEXT=%"button.dial";
END --GROUP
END --STACK
END --LAYOUT