maintenance:

	title:  FORM_PRE_PACEMAKER_ICDINSERTION_ANESTHESIA;;
	mlmname:  FORM_PRE_PACEMAKER_ICDINSERTION_ANESTHESIA;;
	arden: version 2.5;;
	version:  6.10;;
	institution: St. Clair Hospital ;;
	author:  Shivprasad Jadhav;;
	specialist:  Shivprasad Jadhav, Allscripts;;
	date:  2015-01-21;;
	validation:  testing;;

library:
	purpose:  	If any Anesthesia Consult is ordered then precheck the ‘Nursing Instructions:Call OR Scheduling’. ;;
	explanation:  
	;;
	keywords:
	;;
	citations: 
	;;
knowledge:
	type: data-driven;;
	data:
		(this_communication,   	// Communication object
			this_form,				// Form object
			client_info_obj			//Arden ClientInfo object	
			) := argument;
		field_list:= this_form.Fields;

			field_list := this_form.fields;
			CallingEvent := this_communication.CallingEvent;
			CallingField := this_communication.CallingFieldName;
		

			Anesthesia_Consult := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
											and field_list.Control_MultiFieldOccNum = 57 );
			Anesthesia_Consult_Val := Anesthesia_Consult.Value;

			Nursing_Instr := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
										and field_list.Control_MultiFieldOccNum = 48 );
			Nursing_Instr_Val := Nursing_Instr.Value;
			

			if ( CallingEvent = "FieldChange" ) then
				if ( CallingField = "MultiOrderGrid|57") then
					if ( true IN Anesthesia_Consult_Val.IsSelected ) then
						Nursing_Instr_Val[1].IsSelected := true;
						Nursing_Instr_Val[1].IsReadonly := true ;
					else
						Nursing_Instr_Val[1].IsSelected := false;
						Nursing_Instr_Val[1].IsReadonly := false ;
					endif;
				endif;
			endif; 


	;;
	priority: 50
	;;
	evoke:  
	;;
	logic: conclude true;
	;;
	action: return this_communication, this_form;
	;;
Urgency: 50;;
end: