public function get_delete_buttons($request = "")
 {
     $out = "";
     if ($this->obj instanceof CT1_Collection) {
         if ($this->obj->get_count() > 0) {
             $render = new CT1_Render();
             $cfs = $this->obj->get_objects();
             foreach ($this->obj->get_objects() as $o) {
                 if (!method_exists($this->obj, 'get_clone_this')) {
                     throw new Exception('get_clone_this ' . wfMessage('fm-error-clone') . get_class($this->obj) . wfMessage('fm-error-in') . __FILE__);
                 }
                 $clone = $this->obj->get_clone_this();
                 $label = "";
                 $clone->remove_object($o);
                 $button = $render->get_form_collection($clone, wfMessage('fm-button-delete') . " " . $o->get_label(), '', $request);
                 $out .= $label . $button;
             }
         }
     }
     return $out;
 }
 /**
  * Get string to render form requesting explanation of value or interest rate
  *
  * @param CT1_Cashflows $cf
  * @param string $submit caption for sumbit button
  * @param string $intro text to place above form (if any)
  * @return string
  *
  * @access private
  */
 private function get_render_form_cashflow(CT1_Cashflows $cf, $submit = 'Submit', $intro = "")
 {
     $render = new CT1_Render();
     return $render->get_form_collection($cf, $submit, $intro, 'view_cashflows');
 }