maintenance:

	title: FORM_SET_METHOTREXATE_ETOPIC_PREGNANCY;;
	mlmname:  FORM_SET_METHOTREXATE_ETOPIC_PREGNANCY;;
	arden: version 2;;
	version:  4.50;;
	institution:  St Clair Hospital;;
	author:  Deevya Gaikwad;;
	specialist:  Don Warnick;;
	date:  2016-07-11;;
	validation:  testing;;

library:
	purpose:  This MLM Calcualtes Methotrexate dosage 

	;;
	explanation: Calcualtes Methotrexate dosage 
	
	Change History:

	07.11.2016   DW   CSR# 34789 - Created

	;;
	keywords: Called MLMs, Form fields, Methotrexate Etopic Pregnancy
	;;
knowledge:
	type: data-driven;;
	data:

        (this_communication, this_form,	client_info_obj) := argument;

		log_execution_info := FALSE;

		error_message:="";

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

		comb_ht_wt_field := first of (field_list where field_list.DataItemName = "CombinedMeasurements");

		if exists comb_ht_wt_field then
			comb_ht_wt_val := comb_ht_wt_field.value;
			bsa := comb_ht_wt_val.bsa;
		endif;
				
		dosefield := first of (field_list where field_list.DataItemName = "DosageLow");

		if BSA * 50 <> 0	
		then
		dosefield.value := BSA * 50;
		endif;	
		
	;;
	evoke:  
	;;
	logic:  
		conclude true;
	;;
	action:

		return this_communication, this_form; 

	;;
end: