FSN#40183 SCF Clone record ook vertalingen

svn path=/Website/trunk/; revision=33629

APPL/SCF/scaffolding_save.inc

@@ -132,6 +132,40 @@ function scaffolding_save(model, scf_params)
         {
             var restresult = model.REST_POST(params, jsondata);
             key = restresult.key;
+
+            if (cloning)
+            {
+                // Vertalingen ook nog
+                // Vooralsnog alleen van het hoofd-record ('eigen tabel omschrijving')
+                // Ook van alle children ('eigen tabel waarde omschrijving') is veel ingewikkelder
+                var transcols = [];
+                for (var fld in model.fields)
+                {
+                    var field = model.fields[fld];
+                    if (field.translate)
+                        transcols.push(field.dbs);
+                }
+                if (transcols.length)
+                {
+                    var sql = "INSERT INTO fac_locale"
+                            + "       (fac_locale_tekst,"
+                            + "        fac_locale_lang,"
+                            + "        fac_locale_kolomnaam,"
+                            + "        fac_localeitems_key,"
+                            + "        fac_locale_dialect_key,"
+                            + "        fac_locale_kolomkeyval)"
+                            + " SELECT fac_locale_tekst,"
+                            + "        fac_locale_lang,"
+                            + "        fac_locale_kolomnaam,"
+                            + "        fac_localeitems_key,"
+                            + "        fac_locale_dialect_key, "
+                            +          key
+                            + "   FROM fac_locale"
+                            + "  WHERE fac_locale_kolomkeyval = " + clone_key
+                            + "    AND fac_locale_kolomnaam IN ({0})".format(safe.quoted_sql_join(transcols, true));
+                    Oracle.Execute(sql);
+                }
+            }
         }
     }