generate needed qcontrols directly

I did a part of the work, only overriding templates.
So now I have:
*_fck column name generates directly a QFCKEditor control
*_img column name generates directly a QFileAsset control of image type

Works great!
But there is 2 more issues:
**these controls have a txt prefix and not a fck or fla
**_fck and _img suffixes are not striped when creating property, variable and controls names, so it's ugly

I did a little research on the forums and on source code of QCodeGenBase class, found that I should override QCodeGenBase class functions in the COMMONLY OVERRIDDEN CONVERSION FUNCTIONS section.
But uhh, these functions are not documented and not so easy for me to figure out from the code what are dependencies.

I tried to do this in my QCodoGen class:

protected function CleanColumnName(QColumn $objColumn)
{
    $objCleanColumn = clone $objColumn;
    $strColumnName = $objCleanColumn->Name;
    if (ereg('_img$', $strColumnName))
        $strColumnName = substr($strColumnName, 0, -4);

    if (ereg('_fck$', $strColumnName))
        $strColumnName = substr($strColumnName, 0, -4);
    
    $objCleanColumn->Name = $strColumnName;
    
    return $objCleanColumn;    
}

protected function PropertyNameFromColumn(QColumn $objColumn) 
{
    return parent::PropertyNameFromColumn($this->CleanColumnName($objColumn));
}
protected function VariableNameFromColumn(QColumn $objColumn) 
{
    return parent::VariableNameFromColumn($this->CleanColumnName($objColumn));
}        

protected function FormControlVariableNameForColumn(QColumn $objColumn) 
{
    if (ereg('_img$', $objColumn->Name))
        return sprintf('fla%s', $objColumn->Reference->PropertyName);

    if (ereg('_fck$', $objColumn->Name))
        return sprintf('fck%s', $objColumn->Reference->PropertyName);
        
    return parent::FormControlVariableNameForColumn($objColumn);
}

but when running codegen.php Apache crashed... :(

Any suggestions please?

I implemented by this time 3 of custom templates (_fck, _img, _audio). Last one uses a control similar to fileasset, it uploads an audio file and displays an audio preview in form of a flash player.

Please note that I use Qcodo 0.3.24 . I didn't have the time to switch all my customizations to the new version of Qcodo. I would like to do this...

What exactly I did:

- put a modified version of db_orm_edit_form_base.tpl in the includes/qcodo/codegen/templates

<template OverwriteFlag="true" DocrootFlag="false" DirectorySuffix="" TargetDirectory="<%= __FORMBASE_CLASSES__ %>" TargetFileName="<%= $objTable->ClassName %>EditFormBase.class.php"/>
<?php
    /**
     * This is the abstract Form class for the Create, Edit, and Delete functionality
     * of the <%= $objTable->ClassName %> class.  This code-generated class
     * contains all the basic Qform elements to display an HTML form that can
     * manipulate a single <%= $objTable->ClassName %> object.
     *
     * To take advantage of some (or all) of these control objects, you
     * must create a new Form which extends this <%= $objTable->ClassName %>EditFormBase
     * class.
     *
     * Any and all changes to this file will be overwritten with any subsequent re-
     * code generation.
     * 
     * @package <%= QCodeGen::$ApplicationName; %>
     * @subpackage FormBaseObjects
     * 
     */
    abstract class <%= $objTable->ClassName %>EditFormBase extends QForm {
        // General Form Variables
        protected $<%= $objCodeGen->VariableNameFromTable($objTable->Name); %>;
        protected $strTitleVerb;
        protected $blnEditMode;

        // Controls for <%= $objTable->ClassName %>'s Data Fields
<% foreach ($objTable->ColumnArray as $objColumn) { %>
        protected $<%= $objCodeGen->FormControlVariableNameForColumn($objColumn); %>;
<% } %>

        // Other ListBoxes (if applicable) via Unique ReverseReferences and ManyToMany References
<% foreach ($objTable->ReverseReferenceArray as $objReverseReference) { %>
    <% if ($objReverseReference->Unique) { %>
        protected $<%= $objCodeGen->FormControlVariableNameForUniqueReverseReference($objReverseReference); %>;
    <% } %>
<% } %>
<% foreach ($objTable->ManyToManyReferenceArray as $objManyToManyReference) { %>
        protected $<%= $objCodeGen->FormControlVariableNameForManyToManyReference($objManyToManyReference); %>;
<% } %>

        // Button Actions
        protected $btnSave;
        protected $btnCancel;
        protected $btnDelete;

        protected function Setup<%= $objTable->ClassName %>() {
            // Lookup Object PK information from Query String (if applicable)
            // Set mode to Edit or New depending on what's found
<% foreach ($objTable->PrimaryKeyColumnArray as $objColumn) { %>
            $<%= $objColumn->VariableName %> = QApplication::QueryString('<%= $objColumn->VariableName %>');
<% } %>
            if (<% foreach ($objTable->PrimaryKeyColumnArray as $objColumn) { %>($<%= $objColumn->VariableName %>) || <% } %><%----%>) {
                $this-><%= $objCodeGen->VariableNameFromTable($objTable->Name); %> = <%= $objTable->ClassName %>::Load(<% foreach ($objTable->PrimaryKeyColumnArray as $objColumn) { %>($<%= $objColumn->VariableName %>), <% } %><%--%>);

                if (!$this-><%= $objCodeGen->VariableNameFromTable($objTable->Name) %>)
                    throw new Exception('Could not find a <%= $objTable->ClassName %> object with PK arguments: ' . <% foreach ($objTable->PrimaryKeyColumnArray as $objColumn) { %>$<%= $objColumn->VariableName %> . ', ' . <% } %><%----------%>);

                $this->strTitleVerb = QApplication::Translate('Edit');
                $this->blnEditMode = true;
            } else {
                $this-><%= $objCodeGen->VariableNameFromTable($objTable->Name); %> = new <%= $objTable->ClassName %>();
                $this->strTitleVerb = QApplication::Translate('Create');
                $this->blnEditMode = false;
            }
        }

        protected function Form_Create() {
            // Call Setup<%= $objTable->ClassName %> to either Load/Edit Existing or Create New
            $this->Setup<%= $objTable->ClassName %>();

            // Create/Setup Controls for <%= $objTable->ClassName %>'s Data Fields
<% foreach ($objTable->ColumnArray as $objColumn) { %>
            $this-><%= $objCodeGen->FormControlVariableNameForColumn($objColumn) %>_Create();
<% } %>

            // Create/Setup ListBoxes (if applicable) via Unique ReverseReferences and ManyToMany References
<% foreach ($objTable->ReverseReferenceArray as $objReverseReference) { %>
    <% if ($objReverseReference->Unique) { %>
            $this-><%= $objCodeGen->FormControlVariableNameForUniqueReverseReference($objReverseReference) %>_Create();
    <% } %>
<% } %>
<% foreach ($objTable->ManyToManyReferenceArray as $objManyToManyReference) { %>
            $this-><%= $objCodeGen->FormControlVariableNameForManyToManyReference($objManyToManyReference) %>_Create();
<% } %>

            // Create/Setup Button Action controls
            $this->btnSave_Create();
            $this->btnCancel_Create();
            $this->btnDelete_Create();
        }

        // Protected Create Methods
<% foreach ($objTable->ColumnArray as $objColumn) { %><%
    // Use the "control_create_" subtemplates to generate the code
    // required to create/setup the control.
    $mixArguments = array(
        'objColumn' => $objColumn,
        'strObjectName' => $objCodeGen->VariableNameFromTable($objTable->Name),
        'strClassName' => $objTable->ClassName,
        'strControlId' => $objCodeGen->FormControlVariableNameForColumn($objColumn)
    );

    // Figure out WHICH "control_create_" to use
    if ($objColumn->Identity) {
        $strTemplateFilename = 'identity';
    } else if ($objColumn->Timestamp) {
        $strTemplateFilename = 'identity';
    } else if ($objColumn->Reference) {
        if ($objColumn->Reference->IsType)
            $strTemplateFilename = 'type';
        else
            $strTemplateFilename = 'reference';
    } else if(ereg('_fck$', $objColumn->Name)) {
        $strTemplateFilename = 'fck';
    } else if(ereg('_img$', $objColumn->Name)) {
        $strTemplateFilename = 'img';
    } else if(ereg('_audio$', $objColumn->Name)) {
        $strTemplateFilename = 'audio';
    } else {
        $strTemplateFilename = $objColumn->VariableType;
    }
    
    // Get the subtemplate and evaluate
    return $objCodeGen->EvaluateSubTemplate(sprintf('control_create_%s.tpl', $strTemplateFilename), $mixArguments) . "\n\n";
%><% } %>
<% foreach ($objTable->ReverseReferenceArray as $objReverseReference) { %><%
    if ($objReverseReference->Unique) { 
        // Use the "control_create_" subtemplates to generate the code
        // required to create/setup the control.
        $mixArguments = array(
            'objReverseReference' => $objReverseReference,
            'objTable' => $objTable,
            'strObjectName' => $objCodeGen->VariableNameFromTable($objTable->Name),
            'strClassName' => $objTable->ClassName,
            'strControlId' => $objCodeGen->FormControlVariableNameForUniqueReverseReference($objReverseReference)
        );
        // Get the subtemplate and evaluate
        return $objCodeGen->EvaluateSubTemplate('control_create_unique_reversereference.tpl', $mixArguments) . "\n\n";
    } else
        return null;
%><% } %>
<% foreach ($objTable->ManyToManyReferenceArray as $objManyToManyReference) { %><%
    // Use the "control_create_manytomany_reference" subtemplate to generate the code
    // required to create/setup the control.
    $mixArguments = array(
        'objManyToManyReference' => $objManyToManyReference,
        'objTable' => $objTable,
        'strObjectName' => $objCodeGen->VariableNameFromTable($objTable->Name),
        'strClassName' => $objTable->ClassName,
        'strControlId' => $objCodeGen->FormControlVariableNameForManyToManyReference($objManyToManyReference)
    );
    // Get the subtemplate and evaluate
    return $objCodeGen->EvaluateSubTemplate('control_create_manytomany_reference.tpl', $mixArguments) . "\n\n";
%><% } %>

        // Setup btnSave
        protected function btnSave_Create() {
            $this->btnSave = new QButton($this);
            $this->btnSave->Text = QApplication::Translate('Save');
            $this->btnSave->AddAction(new QClickEvent(), new QServerAction('btnSave_Click'));
            $this->btnSave->PrimaryButton = true;
            $this->btnSave->CausesValidation = true;
        }

        // Setup btnCancel
        protected function btnCancel_Create() {
            $this->btnCancel = new QButton($this);
            $this->btnCancel->Text = QApplication::Translate('Cancel');
            $this->btnCancel->AddAction(new QClickEvent(), new QServerAction('btnCancel_Click'));
            $this->btnCancel->CausesValidation = false;
        }

        // Setup btnDelete
        protected function btnDelete_Create() {
            $this->btnDelete = new QButton($this);
            $this->btnDelete->Text = QApplication::Translate('Delete');
            $this->btnDelete->AddAction(new QClickEvent(), new QConfirmAction(sprintf(QApplication::Translate('Are you SURE you want to DELETE this %s?'), '<%= $objTable->ClassName %>')));
            $this->btnDelete->AddAction(new QClickEvent(), new QServerAction('btnDelete_Click'));
            $this->btnDelete->CausesValidation = false;
            if (!$this->blnEditMode)
                $this->btnDelete->Visible = false;
        }
        
        // Protected Update Methods
        protected function Update<%= $objTable->ClassName; %>Fields() {
<% foreach ($objTable->ColumnArray as $objColumn) { %><%
    if ((!$objColumn->Identity) && (!$objColumn->Timestamp)) {
        // Use the "control_create_" subtemplates to generate the code
        // required to create/setup the control.
        $mixArguments = array(
            'objColumn' => $objColumn,
            'strObjectName' => $objCodeGen->VariableNameFromTable($objTable->Name),
            'strClassName' => $objTable->ClassName,
            'strControlId' => $objCodeGen->FormControlVariableNameForColumn($objColumn)
        );
    
        // Figure out WHICH "control_create_" to use
        if ($objColumn->Reference) {
            if ($objColumn->Reference->IsType)
                $strTemplateFilename = 'type';
            else
                $strTemplateFilename = 'reference';
        } else if(ereg('_img$', $objColumn->Name)) {
            $strTemplateFilename = 'img';
        } else if(ereg('_audio$', $objColumn->Name)) {
            $strTemplateFilename = 'audio';
        } else switch ($objColumn->VariableType) {
            case QType::Boolean:
                $strTemplateFilename = 'checkbox';
                break;
            case QType::DateTime:
                $strTemplateFilename = 'calendar';
                break;
            default:
                $strTemplateFilename = 'textbox';
                break;
        }
        
        // Get the subtemplate and evaluate
        return $objCodeGen->EvaluateSubTemplate(sprintf('control_update_%s.tpl', $strTemplateFilename), $mixArguments) . "\n";
    } else
        return null;
%><% } %>
<% foreach ($objTable->ReverseReferenceArray as $objReverseReference) { %><%
    if ($objReverseReference->Unique) {
        // Use the "control_update_unique_reversereference" subtemplate to generate the code
        // required to create/setup the control.
        $mixArguments = array(
            'objReverseReference' => $objReverseReference,
            'strObjectName' => $objCodeGen->VariableNameFromTable($objTable->Name),
            'strClassName' => $objTable->ClassName,
            'strControlId' => $objCodeGen->FormControlVariableNameForUniqueReverseReference($objReverseReference)
        );
    
        // Get the subtemplate and evaluate
        return $objCodeGen->EvaluateSubTemplate('control_update_unique_reversereference.tpl', $mixArguments) . "\n";
    } else
        return null;
%><% } %>
        }

<% foreach ($objTable->ManyToManyReferenceArray as $objManyToManyReference) { %><%
        // Use the "control_update_manytomany_reference" subtemplate to generate the code
        // required to create/setup the control.
        $mixArguments = array(
            'objManyToManyReference' => $objManyToManyReference,
            'strObjectName' => $objCodeGen->VariableNameFromTable($objTable->Name),
            'strClassName' => $objTable->ClassName,
            'strControlId' => $objCodeGen->FormControlVariableNameForManyToManyReference($objManyToManyReference)
        );

        // Get the subtemplate and evaluate
        return $objCodeGen->EvaluateSubTemplate('control_update_manytomany_reference.tpl', $mixArguments) . "\n";
%><% } %>

        // Control ServerActions
        protected function btnSave_Click($strFormId, $strControlId, $strParameter) {
            $this->Update<%= $objTable->ClassName; %>Fields();
            $this-><%= $objCodeGen->VariableNameFromTable($objTable->Name); %>->Save();

<% foreach ($objTable->ManyToManyReferenceArray as $objManyToManyReference) { %>
            $this-><%= $objCodeGen->FormControlVariableNameForManyToManyReference($objManyToManyReference); %>_Update();
<% } %>

            $this->RedirectToListPage
	
	

#5  |  	tronics (VIE, AUT) 	
	

	Saturday, April 5, 2008, 9:50 AM	PDT