update for (future) AI integration

Author: Roland-Lannuzel

.gitignore

@@ -79,3 +79,4 @@ DEV/
 # Added by user
 #--------------------------------
 Project/Sources/dependencies.json
+Resources/4DWP_AI/aiPref.json

Project/Sources/Classes/AiWizard.4dm Project/Sources/Classes/PersonaWizard.4dmProject/Sources/Classes/AiWizard.4dm renamed to Project/Sources/Classes/PersonaWizard.4dm

@@ -8,7 +8,6 @@ Class constructor($formName : Text)
 
 Function getPersonas()->$personas : Collection
 
-	
 	var $folder : 4D:C1709.Folder
 	var $file : 4D:C1709.File
 	var $lang; $DBname : Text
@@ -46,10 +45,11 @@ Function getPersonas()->$personas : Collection
 				//$validated:=This.JSONvalidate("persona"; $file.getText())
 				$validated:=True:C214
 				If ($validated)
-					$persona:=JSON Parse:C1218($file.getText())
+					$persona:=JSON Parse:C1218($file.getText())  // .name and .prompt and .temperature
 					$persona._fileName:=$file.fullName
 					$persona._origin:=$i  // 0: "Default" 1:"Resources" 2:"User")
 					$persona._originIcon:=This:C1470._originIcons[$i]
+					
 					$personas.push($persona)
 				End if 
 			End for each 
@@ -66,6 +66,11 @@ Function getPersonas()->$personas : Collection
 	$personas.combine($dataPersonas)
 
 
+Function getValues()->$values : Collection
+	
+	$values:=This:C1470.personas.extract("name")
+	
+	
 Function getIcons()->$icons : Collection
 
 	var $fileNames : Collection
@@ -80,11 +85,11 @@ Function getIcons()->$icons : Collection
 		$icons.push($picture)
 	End for each 
 
-Function getPersona($id : Integer)->$persona : Object
+	//Function getPersona($id : Integer)->$persona : Object
 
-	If ($id<=This:C1470.personas.length)
-		$persona:=This:C1470.personas[$id]
-	End if 
+	//If ($id<=This.personas.length)
+	//$persona:=This.personas[$id]
+	//End if 
 
 Function save($persona : Object; $saveWhere : Integer)
 

Project/Sources/Forms/D_AI/method.4dm

@@ -1,6 +1,6 @@
 CONFIRM:C162(".Are you sure?.")
 If (ok=1)
-	Form:C1466.ai.delete(Form:C1466.persona)
+	Form:C1466.personaWizard.delete(Form:C1466.persona)
 
 
 	//*** reload list

…D_Personas/ObjectMethods/LB_Personas.4dm …I_Personas/ObjectMethods/LB_Personas.4dmProject/Sources/Forms/D_Personas/ObjectMethods/LB_Personas.4dm renamed to Project/Sources/Forms/D_AI_Personas/ObjectMethods/LB_Personas.4dm Project/Sources/Forms/D_Personas/ObjectMethods/LB_Personas.4dm renamed to Project/Sources/Forms/D_AI_Personas/ObjectMethods/LB_Personas.4dm

@@ -0,0 +1,6 @@
+Form:C1466.personaWizard.save(Form:C1466.editPersona; Form:C1466.saveDestination.index)  //index = 0…3
+
+//*** reload list
+
+UI_Personas("init")
+

…s/ObjectMethods/Popup Dropdown List1.4dm …s/ObjectMethods/Popup Dropdown List1.4dmProject/Sources/Forms/D_Personas/ObjectMethods/Popup Dropdown List1.4dm renamed to Project/Sources/Forms/D_AI_Personas/ObjectMethods/Popup Dropdown List1.4dm Project/Sources/Forms/D_Personas/ObjectMethods/Popup Dropdown List1.4dm renamed to Project/Sources/Forms/D_AI_Personas/ObjectMethods/Popup Dropdown List1.4dm

@@ -13,7 +13,7 @@
 		"onLoad",
 		"onTimer"
 	],
-	"windowTitle": "window title",
+	"windowTitle": ".Personas editor",
 	"destination": "detailScreen",
 	"pages": [
 		{
@@ -122,7 +122,7 @@
 					"events": [
 						"onSelectionChange"
 					],
-					"dataSource": "Form:C1466.ai.personas",
+					"dataSource": "Form:C1466.personaWizard.personas",
 					"listboxType": "collection",
 					"currentItemSource": "Form:C1466.persona",
 					"showHeaders": false,

…s/D_Personas/ObjectMethods/btnDelete.4dm …_AI_Personas/ObjectMethods/btnDelete.4dmProject/Sources/Forms/D_Personas/ObjectMethods/btnDelete.4dm renamed to Project/Sources/Forms/D_AI_Personas/ObjectMethods/btnDelete.4dm Project/Sources/Forms/D_Personas/ObjectMethods/btnDelete.4dm renamed to Project/Sources/Forms/D_AI_Personas/ObjectMethods/btnDelete.4dm

@@ -1,7 +1,7 @@
 Case of 
 	: (Form event code:C388=On Load:K2:1)
 
-		Form:C1466.ai:=cs:C1710.AiWizard.new()
+		Form:C1466.personaWizard:=cs:C1710.PersonaWizard.new()
 		LISTBOX SELECT ROW:C912(*; "LB_Personas"; 1; lk replace selection:K53:1)
 
 		Form:C1466.saveDestination:={values: [".Default"; ".Resources"; ".Single user"; ".All users"]; index: 0}