!
!	resource file for xtechinfo
!
!	$Author: brlewis $
!	$Id: nodeForm.ad,v 2.1 93/02/08 14:09:47 brlewis Exp $
!
!	Copyright 1993 by the Massachusetts Institute of Technology.
!	For copying and distribution information, see the file
!	"mit-copyright.h".


!	nodeForm
! ________________________________________________________________
! |		o Document	o Folder	o GIF		 |
! |	    Title:	_______					 |
! |	 Keywords:	_______					 |
! |	   Source:	_______					 |
! |	   Locker:	_______					 |
! |	     File:	_______					 |
! |______________________________________________________________|
!

*nodeForm.wcCreate: XmForm

	*nodeForm.marginHeight: 5
	*nodeForm.marginWidth:	7
	*nodeForm.verticalSpacing: 2
	*nodeForm.horizontalSpacing: 3

!   Layout of form

*nodeForm.WcChildren: typeBox titleText titleLabel \
	keywordsText keywordsLabel sourceText sourceLabel lockerText \
	lockerLabel fileText fileLabel

	*nodeForm*defineLabel.topAttachment:	ATTACH_FORM
	*nodeForm*defineLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*defineLabel.rightAttachment:	ATTACH_FORM

	*nodeForm*typeBox.topAttachment:	ATTACH_FORM
	*nodeForm*typeBox.leftAttachment:	ATTACH_POSITION
	*nodeForm*typeBox.leftPosition:	25
	*nodeForm*typeBox.rightAttachment:	ATTACH_FORM
	*nodeForm*typeBox.orientation:		HORIZONTAL

	*nodeForm*titleText.topAttachment:	ATTACH_WIDGET
	*nodeForm*titleText.topWidget:		^typeBox
	*nodeForm*titleText.rightAttachment:	ATTACH_FORM
	*nodeForm*titleText.leftAttachment:	ATTACH_POSITION
	*nodeForm*titleText.leftPosition:	25

	*nodeForm*titleLabel.topAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*titleLabel.topWidget:		^titleText
	*nodeForm*titleLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*titleLabel.rightAttachment:	ATTACH_WIDGET
	*nodeForm*titleLabel.rightWidget:	^titleText
	*nodeForm*titleLabel.bottomAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*titleLabel.bottomWidget:	^titleText

	*nodeForm*keywordsText.topAttachment:	ATTACH_WIDGET
	*nodeForm*keywordsText.topWidget:		^titleText
	*nodeForm*keywordsText.rightAttachment:	ATTACH_FORM
	*nodeForm*keywordsText.leftAttachment:	ATTACH_POSITION
	*nodeForm*keywordsText.leftPosition:	25

	*nodeForm*keywordsLabel.topAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*keywordsLabel.topWidget:	^keywordsText
	*nodeForm*keywordsLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*keywordsLabel.rightAttachment:	ATTACH_WIDGET
	*nodeForm*keywordsLabel.rightWidget:	^keywordsText
	*nodeForm*keywordsLabel.bottomAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*keywordsLabel.bottomWidget:	^keywordsText

	*nodeForm*sourceText.topAttachment:	ATTACH_WIDGET
	*nodeForm*sourceText.topWidget:		^keywordsText
	*nodeForm*sourceText.rightAttachment:	ATTACH_FORM
	*nodeForm*sourceText.leftAttachment:	ATTACH_POSITION
	*nodeForm*sourceText.leftPosition:	25

	*nodeForm*sourceLabel.topAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*sourceLabel.topWidget:		^sourceText
	*nodeForm*sourceLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*sourceLabel.rightAttachment:	ATTACH_WIDGET
	*nodeForm*sourceLabel.rightWidget:	^sourceText
	*nodeForm*sourceLabel.bottomAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*sourceLabel.bottomWidget:	^sourceText

	*nodeForm*lockerText.topAttachment:	ATTACH_WIDGET
	*nodeForm*lockerText.topWidget:		^sourceText
	*nodeForm*lockerText.rightAttachment:	ATTACH_FORM
	*nodeForm*lockerText.leftAttachment:	ATTACH_POSITION
	*nodeForm*lockerText.leftPosition:	25

	*nodeForm*lockerLabel.topAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*lockerLabel.topWidget:		^lockerText
	*nodeForm*lockerLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*lockerLabel.rightAttachment:	ATTACH_WIDGET
	*nodeForm*lockerLabel.rightWidget:	^lockerText
	*nodeForm*lockerLabel.bottomAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*lockerLabel.bottomWidget:	^lockerText

	*nodeForm*fileText.topAttachment:	ATTACH_WIDGET
	*nodeForm*fileText.topWidget:		^lockerText
	*nodeForm*fileText.rightAttachment:	ATTACH_FORM
	*nodeForm*fileText.leftAttachment:	ATTACH_POSITION
	*nodeForm*fileText.leftPosition:		25

	*nodeForm*fileLabel.topAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*fileLabel.topWidget:		^fileText
	*nodeForm*fileLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*fileLabel.rightAttachment:	ATTACH_WIDGET
	*nodeForm*fileLabel.rightWidget:		^fileText
	*nodeForm*fileLabel.bottomAttachment:	ATTACH_OPPOSITE_WIDGET
	*nodeForm*fileLabel.bottomWidget:	^fileText

	*nodeForm*parentLabel.topAttachment:	ATTACH_WIDGET
	*nodeForm*parentLabel.topWidget:		^fileText
	*nodeForm*parentLabel.leftAttachment:	ATTACH_FORM
	*nodeForm*parentLabel.rightAttachment:	ATTACH_FORM

!   TYPE radio box

*nodeForm*typeBox.wcCreate: XmCreateRadioBox
*nodeForm*typeBox.wcChildren: Document Folder GIF
*nodeForm*typeBox.Document.wcCreate: XmToggleButtonGadget
*nodeForm*typeBox.Folder.wcCreate: XmToggleButtonGadget
*nodeForm*typeBox.GIF.wcCreate: XmToggleButtonGadget

*nodeForm*typeBox.*.armCallback: \
	WcSetValue(^^lockerLabel.sensitive: True) \
	WcSetValue(^^lockerText.sensitive: True) \
	WcSetValue(^^fileLabel.sensitive: True) \
	WcSetValue(^^fileText.sensitive: True)
*nodeForm*typeBox.Folder.armCallback: \
	WcSetValue(^^lockerLabel.sensitive: False) \
	WcSetValue(^^lockerText.sensitive: False) \
	WcSetValue(^^fileLabel.sensitive: False) \
	WcSetValue(^^fileText.sensitive: False)

!  Input for title, keywords, source, locker, file

*nodeForm.XmText.activateCallback:	TraverseNext(this)

*nodeForm*titleLabel.wcCreate:		XmLabel
*nodeForm*titleLabel.labelString:	Title:
*nodeForm*titleLabel.alignment:		ALIGNMENT_END

*nodeForm*titleText.wcCreate:		XmText
*nodeForm*titleText.maxLength:		79

*nodeForm*keywordsLabel.wcCreate:	XmLabel
*nodeForm*keywordsLabel.labelString:	Keywords:
*nodeForm*keywordsLabel.alignment:	ALIGNMENT_END

*nodeForm*keywordsText.wcCreate:		XmText
*nodeForm*keywordsText.maxLength:	79

*nodeForm*sourceLabel.wcCreate:		XmLabel
*nodeForm*sourceLabel.labelString:	Source:
*nodeForm*sourceLabel.alignment:		ALIGNMENT_END

*nodeForm*sourceText.wcCreate:		XmText
*nodeForm*sourceText.maxLength:		16

*nodeForm*lockerLabel.wcCreate:		XmLabel
*nodeForm*lockerLabel.labelString:	Locker:
*nodeForm*lockerLabel.alignment:		ALIGNMENT_END

*nodeForm*lockerText.wcCreate:		XmText
*nodeForm*lockerText.maxLength:		16

*nodeForm*fileLabel.wcCreate:		XmLabel
*nodeForm*fileLabel.labelString:		File:
*nodeForm*fileLabel.alignment:		ALIGNMENT_END

*nodeForm*fileText.wcCreate:		XmText
*nodeForm*fileText.maxLength:		72