<?xml version="1.0" encoding="utf-8"?>

<!--PatientHeaderBar.mxml -->
<!--
ApplicationControlBar has some weird borders that can make it screw up your layouts.
Meaning, if you have a Canvas with 100% width and height, and have theApplicationControl
bar in it, your Canvas will get scrollbars . Easiest way to fix is to (like a lot of
things) wrap it in a Canvas with width and height of a 100%, as well as your vertical
and horizontalScrollPolicies set to “off”. That’ll make it flush and not cause scrollbars.
This works for other components as well that give you layout grief.
-->
<mx:VBox
	xmlns:mx="http://www.adobe.com/2006/mxml"
    xmlns:pt="gov.va.med.edp.pt.demog.view.*"
	verticalScrollPolicy="off" horizontalScrollPolicy="off">
	
<mx:ApplicationControlBar
	paddingBottom="0"
	paddingTop="0"
	dock="true"
	width="100%"
	fillColors="[#6688E5,#3F6BEA]"
	fillAlphas="[0.6,0.6]" >
	
	<mx:Script>
		<![CDATA[
		import gov.va.med.edp.pt.demog.view.SelectPatientEvent;
		import gov.va.med.edp.pt.demog.model.PatientChecksModel;
		import gov.va.med.edp.pt.demog.IPatientChecksController;
		import gov.va.med.edp.pt.demog.view.PatientRecordFlagsDialog;
		import gov.va.med.edp.pt.demog.model.PatientSelectVO;
		import gov.va.med.edp.model.TrackingModelLocator;
		import gov.va.med.edp.util.ChangeWatcher;
		import gov.va.med.edp.util.AccessibilityTools;

		[Bindable]
		public var model:TrackingModelLocator = TrackingModelLocator.getInstance();

		[Bindable]
		public var ptChecksController:IPatientChecksController;

		[Bindable]
		public var patientChecksModel:PatientChecksModel;

		private function getPatient(name: String): PatientSelectVO
		{
			// name is passed in just to force the binding to call this
			var patient: PatientSelectVO = new PatientSelectVO();
			patient.dfn = model.logEdit.entry.dfn;
			patient.name = model.logEdit.entry.name;
			patient.ssn = model.logEdit.entry.ssn;
			patient.dob = model.logEdit.entry.dob;
			return patient;
		}

		private function changePatient(event: SelectPatientEvent): void
		{
			ChangeWatcher.changeField(event);
		}

		private function patientButtonLeft(pw: int, dw: int, sw: int): int
		{
			return (pw > (dw + sw + 12)) ? pw + 32 : dw + sw + 18;
		}

		private function set handleFlagsButton(value: Boolean): void
		{
			flag.visible = value;
		}

		private function displayFlagsDialog(): void
		{
			if (model.logEdit.entry.patientFlags != null &&
				model.logEdit.entry.patientFlags.length > 0) {
				PatientRecordFlagsDialog.show(model.logEdit.entry.patientFlags);
			}
		}
						
			
		]]>
	</mx:Script>
	
	<mx:Canvas width="100%" >
		<mx:Label
			id="ptName"
			top="0" left="6"
			text="{model.logEdit.entry.name}"
			toolTip="{model.logEdit.entry.name}"
			fontWeight="bold" />
		<mx:Label
			id="ssn"
			top="{ptName.height + 2}" left="6"
			text="{model.logEdit.entry.ssn}" 
			toolTip="{model.logEdit.entry.ssn}"/>
		<mx:Label
			id="dob"
			top="{ptName.height + 2}" left="{ssn.width + 12}"
			text="{model.logEdit.entry.dob}" 
			toolTip="{model.logEdit.entry.dob}"/>
		<pt:SelectPatientButton
			id="editPatient"
			verticalCenter="0"
			left="{patientButtonLeft(ptName.width, dob.width, ssn.width)}"
			visible="{(model.logEdit.entry.dfn == '')}"
			label="Identify Patient..."
			patient="{getPatient(model.logEdit.entry.name)}"
			selectPatient="changePatient(event)" tabIndex="1000"
            ptSelectController="{ptChecksController}"
                    patientChecksModel="{patientChecksModel}"/>
		<mx:Canvas
			paddingTop="0" paddingBottom="0" paddingLeft="0" paddingRight="0" right="6" >
			<!-- Modified by jtorreno 2008.02.13 for accessibility functionality - Start -->
			<mx:Button
				id="flag"
				 visible="{model.logEdit.entry.patientFlags.length > 0}"
				initialize="{AccessibilityTools.accessComponentName(flag,'Flag')}" 
				icon="@Embed(source='flag.png')"
				click="{displayFlagsDialog()}"
				left="0" width="24" verticalCenter="0" tabIndex="1001"/>
			<!-- Modified by jtorreno 2008.02.13 for accessibility functionality - End -->	
			<mx:Form id="times" left="{flag.width + 6}" indicatorGap="0"
				paddingTop="0" paddingBottom="0" paddingLeft="0" paddingRight="0">
				<mx:FormItem label="in"  toolTip="in" tabIndex="1002" >
					<mx:Label
						text="{fmtDt.format(model.logEdit.entry.inTS)}"
						toolTip="{fmtDt.format(model.logEdit.entry.inTS)}"
						styleName="formField" />
				</mx:FormItem>
				<mx:FormItem label="out" toolTip="out" visible="{model.logEdit.entry.outTS != null}" tabIndex="1003">
					<mx:Label
						text="{fmtDt.format(model.logEdit.entry.outTS)}"
						toolTip="{fmtDt.format(model.logEdit.entry.outTS)}"
						styleName="formField" />
				</mx:FormItem>
			</mx:Form>	
		</mx:Canvas>
	</mx:Canvas>

</mx:ApplicationControlBar>	
	
<mx:DateFormatter id="fmtDt" formatString="D MMM YY J:NN" />
</mx:VBox>