* Set parent onload.

module/program/control.php

@@ -161,6 +161,7 @@ class program extends control
             return $this->send(array('result' => 'success', 'message' => $this->lang->saveSuccess, 'id' => $programID, 'locate' => $locateLink));
         }
 
+        $originExtra = $extra;
         $extra = str_replace(array(',', ' '), array('&', ''), $extra);
         parse_str($extra, $output);
 
@@ -175,6 +176,7 @@ class program extends control
         $this->view->programList    = $this->program->getList();
         $this->view->budgetUnitList = $this->project->getBudgetUnitList();
         $this->view->budgetLeft     = empty($parentProgram) ? 0 : $this->program->getBudgetLeft($parentProgram);
+        $this->view->loadUrl        = $this->createLink('program', 'create', "parentProgramID={parent}" . (empty($originExtra) ? '' : "&extra=$originExtra"));
 
         $this->display();
     }

module/program/ui/create.field.php

@@ -10,7 +10,7 @@ $fields->field('name')
 $fields->field('budget')
     ->control('inputGroup')
     ->checkbox(array('name' => 'future', 'text' => $lang->project->future))
-    ->item(field('budget'))
+    ->item(field('budget')->prefix(data('parentProgram') ? data('parentProgram.budgetUnit') : ''))
     ->item(data('parentProgram') ? field('budgetUnit')->hidden(true)->value(data('parentProgram.budgetUnit')) : field('budgetUnit')->required()->control('picker')->name('budgetUnit')->items(data('budgetUnitList'))->value($config->project->defaultCurrency));
 
 $fields->field('acl')

module/program/ui/create.html.php

@@ -5,19 +5,20 @@ namespace zin;
 $parentID = $parentProgram->id ?? 0;
 $currency = $parentID ? $parentProgram->budgetUnit : $config->project->defaultCurrency;
 
-jsVar('longTime', $lang->project->longTime);
-jsVar('weekend', $config->execution->weekend);
 jsVar('page', 'create');
-jsVar('parentBudget', $lang->program->parentBudget);
+jsVar('longTime',            $lang->project->longTime);
+jsVar('weekend',             $config->execution->weekend);
+jsVar('parentBudget',        $lang->program->parentBudget);
 jsVar('beginLessThanParent', $lang->program->beginLessThanParent);
-jsVar('endGreatThanParent', $lang->program->endGreatThanParent);
-jsVar('ignore', $lang->program->ignore);
-jsVar('currencySymbol', $lang->project->currencySymbol);
-jsVar('budgetOverrun', $lang->project->budgetOverrun);
+jsVar('endGreatThanParent',  $lang->program->endGreatThanParent);
+jsVar('ignore',              $lang->program->ignore);
+jsVar('currencySymbol',      $lang->project->currencySymbol);
+jsVar('budgetOverrun',       $lang->project->budgetOverrun);
 
 $fields = useFields('program.create');
 
 $autoLoad = array();
+$autoLoad['parent'] = 'parent,budgetUnit,';
 
 formGridPanel
 (