fix : ACI0105627

Author: delahaye-4D

Project/Sources/Methods/AI_CallBack.4dm

@@ -13,7 +13,28 @@ If ($result.success)
 Else 
 	// Alert($result.errors.formula(Formula(JSON Stringify($1))).join("\n"))
 
-	AI_updateForm(""; "")  // just change state
+	//AI_updateForm(""; "")  // just change state
+	
+	
+	
+	//ACI0105627
+	
+	If ($result.errors.length>0)
+		$answer:=""
+		
+		If (Value type:C1509($result.errors[0].code)=Is real:K8:4)  // ACI0105627
+			$answer+="**"+Localized string:C991("ErrorCodeColon")+"**"
+			$answer+=$result.errors[0].code+"\r"
+		End if 
+		
+		$answer+="**"+Localized string:C991("ErrorMessageColon")+"**"
+		$answer+=$result.errors[0].message
+	Else 
+		$answer:=Localized string:C991("GlobalError")
+	End if 
+	
+	AI_updateForm($answer; "Error")  // just change state
+	
 
 End if 
 

Project/Sources/Methods/AI_updateForm.4dm

@@ -16,8 +16,17 @@ var $newDoc : Object
 
 Case of 
 
-	: ($action="")  // error to be managed
-		Form:C1466._extra.state:=1  // rub
+		//: ($action="")  // error to be managed
+		//Form._extra.state:=1  // rub
+		
+		//ACI0105627
+		
+	: ($action="Error")  // error to be managed
+		Form:C1466._extra.state:=0  // Run
+		AI_updateForm($content; "Set Text"; True:C214)
+		
+		
+		
 
 	: ($action="Set Text")