maintenance:

	title: FORM_SET_DESELECT_ALL;;
	mlmname:  FORM_SET_DESELECT_ALL;;
	arden: version 2.5;;
	version:  5.50;;
	institution:  St Clair Hospital;;
	author:  Shawn Head, Allscripts ;;
	specialist:  Peggy Karish/David Kish, St Clair Hospital;;
	date:  2016-06-21;;
	validation:  testing;;

library:
      purpose: De-Select all items in Order set if the "de-select all" checkbox is checked.				
				;;

	explanation:  Called from the transition orders order set

	Change history 
		2016062.21		STH		CSR 34745: Created {go-live 6/23/2016}	;;


	keywords: Called MLMs, Transition Orders
	;;
knowledge:
	type: data-driven;;
	data:

			standard_libs := mlm {{{SINGLE-QUOTE}}}std_include_libs{{{SINGLE-QUOTE}}};
			include standard_libs;

			using "ObjectsPlusXA.SCM.Forms";
			using namespace "ObjectsPlusXA.SunriseClinicalManager.Forms";

			// This MLM is passed three arguments, of types 
        	// communication_type, form_type and client info object respectively.

        	(this_communication,   	// Communication object
			 this_form,				// Form object
			 client_info_obj			//Arden ClientInfo object	
			 ) := argument;


			/*******************Make Changes To Spelling And Flags In This Section*******************/

			/* Set to true if a decision.log is needed.*/
			log_execution_info := FALSE;

			stop := false;
	
			/***************************************************************************************/

			// Initialize error message
			error_message:="";

			// Assigns fields passed in the Form object to the Field object
			field_list:= this_form.fields;
			CallingEvent := this_communication.CallingEvent;
			CallingField := this_communication.CallingFieldName;
			ClientGuid   := this_communication.ClientGUID;
			ClientVisitGuid := this_communication.ClientVisitGUID;
			ChartGuid := this_communication.ChartGUID;

			Deselect_cb := first of (field_list WHERE field_list.DataItemName = "ED_Deselect CB") ;

			
			field_list.Value.IsSelected := false;
			Deselect_cb.Value := 0;
			
;;
	evoke:  // No evoke statement
	;;
	logic:  

		conclude true;
	;;
	action:
        // This MLM returns two parameters, of types communication_type and form_type respectively.
		return this_communication, this_form;
	;;
end: