maintenance:

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

library:
	purpose:  	13-03-2015   CSR-22071 : Created 

				Scenario 1 : When oxgen aerosol therapy is selected,then oxygen therapy should not be available for selection. .
                            
                Scenario 2 : When oxgen therapy is selected,then oxygen aerosol therapy should not be available for selection;;
	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;

			CallingEvent := this_communication.CallingEvent;
			CallingField := this_communication.CallingFieldName;

			
			Respiratory1 := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
											and field_list.Control_MultiFieldOccNum = 51 );
		    Respiratory2 := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
											and field_list.Control_MultiFieldOccNum = 62 );
			//Medication_Pharmacy := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
			//								and field_list.Control_MultiFieldOccNum = 49 );

	
			Respiratory1_Value  := Respiratory1.Value ;
			Respiratory2_Value := Respiratory2.Value;
			
// *********** Objects for first flow *************
			  
		
			Oxygen_Aerosol := first of (Respiratory1_Value where Respiratory1_Value.Name = "Oxygen Aerosol Therapy"); 
		
	    	Oxygen_Therapy := first of (Respiratory2_Value where Respiratory2_Value.Name = "Oxygen Therapy"); // D5W  1000ml
			
		
					If Oxygen_Aerosol.IsSelected = True Then 
						Oxygen_Therapy.IsReadonly := True;					
		
				    Endif;
			        If Oxygen_Therapy.IsSelected = True Then 
						Oxygen_Aerosol.IsReadonly := True;					

				    Endif;
					If Oxygen_Aerosol.IsSelected = False And Oxygen_Therapy.IsSelected = False Then
		
						Oxygen_Aerosol.IsReadonly := False;					
					    Oxygen_Therapy.IsReadonly := False;
				
					EndIf;



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