#!/usr/local/odd/hyper -f
#
# $Id: master_photo,v 2.7 1995-07-12 11:29:36+01 zkoppany Rel $
#
# $Log: master_photo,v $
# Revision 2.7  1995-07-12 11:29:36+01  zkoppany
# Checkin for: 2.7
#
# Revision 2.6  1995/05/30  16:22:48  zkoppany
# Checkin for: 2.6
#
# Revision 2.5  1994/10/31  10:51:36  zkoppany
# Checkin for: 2.5
#
# Revision 2.4  1994/08/01  13:37:13  zkoppany
# Checkin for: 2.4
#
# Revision 2.3.2.1  1994/07/21  17:36:32  zkoppany
# General master-detail examples.
#
# Revision 2.3  1994/06/15  14:30:40  zkoppany
# *** empty log message ***
#
#

lappend auto_path . $odd_home/demos

set host multixd
set dbname mxora
set dbtype Oracle
set user ""
set passwd ""

wm withdraw .
toplevel .form

frame .form.master_detail -class Form

Form_detail_photo form_test $host $dbtype $dbname\
	"SELECT * FROM EMP"\
	-User $user\
	-Password $passwd\
	-frame .form.master_detail\
	-master_field DEPTNO\
	-detail_field DEPTNO\
	-detail_query {SELECT * FROM DEPT}\
	-photo_field ENAME\
	-exit_process 1


pack .form.master_detail -side top -expand y -fill both
wm minsize .form 0 0
