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


!
!	The provider window
!


*providerDialog.wcCreate: XmCreateFormDialog
	*providerDialog.width: 200
	*providerDialog.height: 300
	*providerDialog.shadowThickness: 3
	*providerDialog.borderWidth: 0
	*providerDialog.marginHeight: 5
	*providerDialog.marginWidth:	7
	*providerDialog.verticalSpacing: 3
	*providerDialog.horizontalSpacing: 3

!   Layout of provider window
*providerDialog.wcChildren: providerTable
	*providerTable.leftAttachment:		ATTACH_FORM
	*providerTable.rightAttachment:		ATTACH_FORM
	*providerTable.topAttachment:		ATTACH_FORM
	*providerTable.bottomAttachment:	ATTACH_FORM


*providerTable.wcCreate:	XmpTable

*providerTable.WcChildren: label1 label2 label3 input1 input2 label4 \
	label5 label6 email OK Cancel
*providerTable.layout: label1 0 0 2; label2 0 1 2; label3 0 2 2; \
	input1 0 3 2; label4 0 4 2; input2 0 5 2; label5 0 6 2; \
	label6 0 7 2; email 0 8 2; OK 0 9 0; Cancel 1 9 0;

*providerTable.label1.wcCreate: XmLabel
*providerTable.label1.labelString: Please login to begin

*providerTable.label2.wcCreate: XmLabel
*providerTable.label2.labelString: provider session.

*providerTable.label3.wcCreate: XmLabel
*providerTable.label3.labelString: Username:

*providerTable.label4.wcCreate: XmLabel
*providerTable.label4.labelString: Password:

*providerTable.label5.wcCreate: XmLabel
*providerTable.label5.labelString: To get a username and

*providerTable.label6.wcCreate: XmLabel
*providerTable.label6.labelString: password, send email to

*providerTable.email.wcCreate: XmLabel
*providerTable.email.labelString: admin-techinfo@mit.edu

*providerTable.input1.wcCreate: XmText
*providerTable.input2.wcCreate: XmText
*providerTable.XmText.activateCallback: TraverseNext(this)

*providerTable.OK.wcCreate: XmPushButton
*providerTable.OK.activateCallback: \
	WcUnmanage(*providerDialog) \
	WaitCursor() \
	Authenticate() \
	StandardCursor()

*providerTable.Cancel.wcCreate: XmPushButton
*providerTable.Cancel.activateCallback: WcUnmanage(*providerDialog)