maintenance:

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

library:
	purpose:  	Change History 
				============================================
				22-05-2015 DW CSR-33411 : Created 

    ;;
	explanation:  1st scenario: When the user select "Rivastigmine Patch 4.6mg/24hr" order, then the user should not be able to select [Rivastigmine Patch 9.5mg/24hr],or vise versa.

				  2nd Scenario: When the user select "Rivastigmine Patch 9.5mg/24hr" order, then the user should not be able to slect [Rivastigmine Patch 4.6mg/24hr] or vise versa.
			      When user select one order eg .Hydromorphone inj-2mg for Q2H, then Hydromorphone inj-2mg for Q3H should be grayed out.
				  When user select  Hydromorphone inj-3mg for Q3H then Hydromorphone inj-3mg for Q4H should be grayed out,OR VISE VERSA 


				 When user select one order eg .Hydromorphone inj-2mg for Q2H, then Hydromorphone inj-2mg for Q3H should be grayed out.
				 When user select  Hydromorphone inj-3mg for Q3H then Hydromorphone inj-3mg for Q4H should be grayed out,OR VISE VERSA
	;;
	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;
			//ImgaingMLM := MLM {{{SINGLE-QUOTE}}}FORM_MEDICAL_IMAGING_INDICATIONS_FOR_OS{{{SINGLE-QUOTE}}};
			//this_communication,this_form := Call ImgaingMLM With this_communication,this_form,client_info_obj ;
			//Retrieve relevant form fields
		
				MedicationAN := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
								                and field_list.Control_MultiFieldOccNum = 2 );
				//Pharmacy_Heparin := last of ( field_list WHERE field_list.DataItemName = "MultiOrderGrid"
				//				                and field_list.Control_MultiFieldOccNum = 57 );
				MedicationAN_Val := MedicationAN.Value ;


		// For Pharmacy AltePhase Grid		
			//Row1 := MedicationAN_Val[15];
			Row2 := MedicationAN_Val[16];
			Row3 := MedicationAN_Val[17];
			Row4 := MedicationAN_Val[18]; 
			Row5 := MedicationAN_Val[19]; 
			Row6 := MedicationAN_Val[20]; 
			Row7 := MedicationAN_Val[21]; 
			//Row8 := MedicationAN_Val[22]; 
		
			


		If Row2.IsSelected = True Then 
			Row3.IsReadOnly := True ;
		Endif;
		If Row3.IsSelected = True Then 
			Row2.IsReadOnly := True ;
		Endif;
		If ( Row3.IsSelected = False And Row2.IsReadOnly= True) Or (Row2.IsSelected = False And Row3.IsReadOnly= True)  Then 
			Row2.IsReadOnly := False ;Row3.IsReadOnly := False; Row2.IsSelected := False;Row3.IsSelected := False;
		Endif;
		


		If Row4.IsSelected = True Then 
			Row5.IsReadOnly := True ;
		Endif;
		If Row5.IsSelected = True Then 
			Row4.IsReadOnly := True ;
		Endif;
		If ( Row4.IsSelected = False And Row5.IsReadOnly= True) Or (Row5.IsSelected = False And Row4.IsReadOnly= True)  Then 
			Row4.IsReadOnly := False ;Row5.IsReadOnly := False; Row4.IsSelected := False;Row5.IsSelected := False;
		Endif; 



		If Row6.IsSelected = True Then 
			Row7.IsReadOnly := True ;
		Endif;
		If Row7.IsSelected = True Then 
			Row6.IsReadOnly := True ;
		Endif;
		If ( Row6.IsSelected = False And Row7.IsReadOnly= True) Or (Row7.IsSelected = False And Row6.IsReadOnly= True)  Then 
			Row6.IsReadOnly := False ;Row7.IsReadOnly := False; Row6.IsSelected := False;Row7.IsSelected := False;
		Endif;
		

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