# Property of Four Js*
# (c) Copyright Four Js 1995, 2019. All Rights Reserved.
# * Trademark of Four Js Development Tools Europe Ltd
#   in the United States and elsewhere
# 
# Four Js and its suppliers do not warrant or guarantee that these
# samples are accurate and suitable for your purposes. Their inclusion is
# purely for information purposes only.

LAYOUT
VBOX
GROUP(TEXT="Customer (Master Record)")
GRID
{
  First Name:[fname    ] Last Name:[last ] [bmaster]
}
END --GRID
END --GROUP
FOLDER
PAGE(TEXT="Donations",COMMENT="edits the customers donations",ACTION=page1)
TABLE
{
 DATE     Amount     Reason
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
[p_date][p_amount  ][p_reason ]
}
END
END --PAGE
PAGE(TEXT="More Details",COMMENT="edits some more customer details",ACTION=page2)
GROUP(TEXT="some data")
GRID
{
Member in the organization [clubmember]
Other detail               [otherdetail          ]


}
END --GRID
END --GROUP
END --PAGE
END --FOLDER
END --VBOX

ATTRIBUTES
fname  = FORMONLY.fname;
last   = FORMONLY.last,NOT NULL;
BUTTON bmaster:master,TEXT="Edit Master";
p_date  = FORMONLY.p_date,NOT NULL,DEFAULT=TODAY;
p_amount = FORMONLY.p_amount,NOT NULL;
p_reason = FORMONLY.p_reason,NOT NULL;

CHECKBOX clubmember  = FORMONLY.clubmember,NOT NULL,DEFAULT="";
otherdetail = FORMONLY.otherdetail,REQUIRED;

INSTRUCTIONS
SCREEN RECORD cr(FORMONLY.fname,FORMONLY.last);
SCREEN RECORD donations(FORMONLY.p_date THRU FORMONLY.p_reason);
SCREEN RECORD details(FORMONLY.clubmember THRU FORMONLY.otherdetail);