コード例 #1
0
function writeUF_TableRow(&$clsUF, &$clsUTable)
{
    //---------------------------------------------------------------------
    //
    //---------------------------------------------------------------------
    global $gbDev;
    $lTableID = $clsUTable->lKeyID;
    if ($gbDev) {
        $strLinkDebug = '  ' . strLinkDebug_Fields($clsUTable->lKeyID, 'Internal field details', true);
    } else {
        $strLinkDebug = '';
    }
    $bHidden = $clsUTable->bHidden;
    if ($bHidden) {
        $strHideStyle = 'color: #999; font-style: italic; ';
        $strHideLabel = ' (hidden)';
        $strFieldLink = '';
    } else {
        $strHideStyle = $strHideLabel = '';
        $strFieldLink = strLinkView_UFFields($lTableID, 'View fields', true, ' id="fieldView_' . $lTableID . '" ') . ' ';
    }
    $lTableID = $clsUTable->lKeyID;
    if ($clsUTable->bMultiEntry) {
        $strMLabel = 'Multiple-entry';
        if ($clsUTable->bReadOnly) {
            $strMLabel .= ' <i>(read only)</i>';
        }
    } else {
        $strMLabel = 'Single-entry';
    }
    echoT('<tr>
           <td class="enpRpt" style="' . $strHideStyle . '" nowrap>' . "\n" . str_pad($lTableID, 5, '0', STR_PAD_LEFT) . '&nbsp;' . strLinkView_UFTable($lTableID, 'View table record', true, '') . '&nbsp;&nbsp;' . strLinkClone_PTable($lTableID, 'Clone', true) . '
           </td>
           <td class="enpRpt" style="' . $strHideStyle . '">' . "\n" . strLinkEdit_UFTable($lTableID, $clsUF->enumTType, 'Edit table', true, '') . '
           </td>
           <td class="enpRpt" width="30%" style="' . $strHideStyle . '">
              <b>' . nl2br(htmlspecialchars($clsUTable->strUserTableName)) . $strHideLabel . '</b>
           </td>
           <td class="enpRpt" style="text-align: left; ' . $strHideStyle . '" width="25%">' . "\n" . $strMLabel . '
           </td>
           <td class="enpRpt" style="text-align: right; ' . $strHideStyle . '" width="10%">' . "\n" . $strFieldLink . $clsUTable->lNumFields . $strLinkDebug . '
           </td>
           <td class="enpRpt" width="40%" style="' . $strHideStyle . '">' . "\n" . nl2br(htmlspecialchars($clsUTable->strDescription)) . '
           </td>
        </tr>');
}
コード例 #2
0
function showUFTableInfo(&$clsRpt, &$schema, $lTableID)
{
    //---------------------------------------------------------------------
    //
    //---------------------------------------------------------------------
    $table =& $schema[$lTableID];
    openBlock('User Table <b>' . htmlspecialchars($table->strUserTableName) . '</b>', strLinkEdit_UFTable($lTableID, $table->enumAttachType, 'Edit table', true) . '&nbsp;' . strLinkEdit_UFTable($lTableID, $table->enumAttachType, 'Edit table', false));
    echoT($clsRpt->openReport());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Table ID:') . $clsRpt->writeCell(str_pad($lTableID, 5, '0', STR_PAD_LEFT)) . $clsRpt->closeRow() . $clsRpt->openRow() . $clsRpt->writeLabel('User Name:') . $clsRpt->writeCell(htmlspecialchars($table->strUserTableName)) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Internal Name:') . $clsRpt->writeCell(htmlspecialchars($table->strDataTableName)) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Parent Table:') . $clsRpt->writeCell(htmlspecialchars($table->enumAttachType)) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Description:') . $clsRpt->writeCell(nl2br(htmlspecialchars($table->strDescription))) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Multi-Entry?:') . $clsRpt->writeCell($table->bMultiEntry ? 'Yes' : 'No') . $clsRpt->closeRow());
    if ($table->bMultiEntry) {
        echoT($clsRpt->openRow() . $clsRpt->writeLabel('Read Only?:') . $clsRpt->writeCell($table->bReadOnly ? 'Yes' : 'No') . $clsRpt->closeRow());
    }
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Hidden?:') . $clsRpt->writeCell($table->bHidden ? 'Yes' : 'No') . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Alert if No Entry?:') . $clsRpt->writeCell($table->bAlertIfNoEntry ? 'Yes' : 'No') . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Alert Text:') . $clsRpt->writeCell(strip_tags($table->strAlertMsg, '<b><i><br><font>')) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Verification Module:') . $clsRpt->writeCell(htmlspecialchars($table->strVerificationModule)) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('Verification Entry Point') . $clsRpt->writeCell(htmlspecialchars($table->strVModEntryPoint)) . $clsRpt->closeRow());
    echoT($clsRpt->openRow() . $clsRpt->writeLabel('# Fields:') . $clsRpt->writeCell($table->lNumFields) . $clsRpt->closeRow());
    echoT($clsRpt->closeReport());
    closeBlock();
}