Files
MBS/TEST/MultipleDialogs/Folder/Folder_old.per
T

66 lines
1.8 KiB
Plaintext

# 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);