PHP strzero函数代码示例

 function check_this_year()
 {
     $year = date("Y");
     for ($bln = 1; $bln <= 12; $bln++) {
         $period = $year . "-" . strzero($bln, 2);
         if (!$this->exist($period)) {
             $last_date = date("Y-m-t", strtotime($year . "-" . strzero($bln, 2) . "-01"));
             //lastday
             $this->save(array("period" => $period, "year_id" => $year, "sequence" => $bln, "startdate" => $year . "-" . strzero($bln, 2) . "-01 00:00:00", "enddate" => $last_date . " 23:59:59", "closed" => 0, "month_name" => date("M", strtotime($last_date))));
         }
     }
 }

 function updatex()
 {
     global $base;
     $c = 'amt';
     $c1 = 'id_' . $c;
     $c2 = $c . '_codigo';
     $c3 = 3;
     $sql = "update " . $this->tabela . " set \n\t\t\t\t\t\t{$c2} = lpad({$c1},{$c3},0) \n\t\t\t\t\t\twhere {$c2}='' ";
     if ($base == 'pgsql') {
         $sql = "update " . $this->tabela . " set {$c2} = trim(to_char(id_" . $c . ",'" . strzero(0, $c3) . "')) where {$c2}='' ";
     }
     $rlt = db_query($sql);
 }

 function proses_kredit_save($data)
 {
     //param $data['old_loan_id'], $data['new_loan_id'], $data['loan_date']
     $this->load->model("leasing/invoice_header_model");
     $ok = false;
     $old = $data['old_loan_id'];
     $data['loan_date'] = date('Y-m-d H:i:s', strtotime($data['loan_date']));
     if ($data['new_loan_id'] == "") {
         $data['new_loan_id'] = "01630" . substr($old, -6);
     }
     $rs_loan['loan_id'] = $data['new_loan_id'];
     $rs_loan['loan_date'] = $data['loan_date'];
     $rs_loan['loan_date'] = $data['loan_date'];
     $rs_loan['status'] = 1;
     if ($query = $this->db->where("loan_id", $data['old_loan_id'])->update("ls_loan_master", $rs_loan)) {
         $this->db->query("update ls_loan_obj_items \n\t\t\t\tset loan_id='" . $data['new_loan_id'] . "' \n\t\t\t\twhere loan_id='" . $data['old_loan_id'] . "'");
         if ($query = $this->db->query("select * from ls_loan_master lm\n\t\t\t\twhere lm.loan_id='" . $data['new_loan_id'] . "'")) {
             if ($row_loan = $query->row()) {
                 $qspk = $this->db->query("select * from ls_app_master  \n\t\t\t\t\twhere app_id='" . $row_loan->app_id . "'");
                 $spk = $qspk->row();
                 $rs_invoice = null;
                 // hapus dulu data invoice yg ada
                 $this->db->where("loan_id", $data['new_loan_id'])->delete("ls_invoice_header");
                 $tgl_tagih = date('Y-m-d H:i:s', strtotime($data['loan_date']));
                 for ($tenor = 0; $tenor < $row_loan->max_month; $tenor++) {
                     $faktur = $row_loan->loan_id . "-" . strzero($tenor + 1, 2);
                     $rs_invoice['loan_id'] = $row_loan->loan_id;
                     $rs_invoice['app_id'] = $spk->app_id;
                     $rs_invoice['idx_month'] = strzero($tenor + 1, 2);
                     $rs_invoice['invoice_number'] = $faktur;
                     $rs_invoice['invoice_date'] = add_date($tgl_tagih, 0, $tenor + 1);
                     $rs_invoice['invoice_type'] = "I";
                     $rs_invoice['amount'] = $spk->inst_amount;
                     $rs_invoice['cust_deal_id'] = $row_loan->cust_id;
                     $rs_invoice['cust_deal_ship_id'] = $spk->counter_id;
                     $rs_invoice['gross_amount'] = $spk->inst_amount;
                     $rs_invoice['insr_amount'] = $spk->insr_amount;
                     $rs_invoice['pokok'] = $spk->inst_amount - $spk->rate_amount;
                     $rs_invoice['bunga'] = $spk->rate_amount;
                     $rs_invoice['disc_amount'] = 0;
                     $rs_invoice['paid'] = 0;
                     $rs_invoice['admin_amount'] = 0;
                     $ok = $this->invoice_header_model->save($rs_invoice);
                 }
                 $this->db->where("app_id", $spk->app_id)->update("ls_app_master", array("status" => "Finish", "contract_id" => $row_loan->loan_id));
             }
         } else {
             echo mysql_error();
         }
     }
     return $ok;
 }

    function comment_form()
    {
        global $dd, $ss;
        $us = strzero(round($ss->user_id), 7);
        $sx = '';
        $sxf = '';
        if (strlen($dd[1]) > 0) {
            if (strlen($dd[2]) == 0) {
                $sxf = '<script>' . chr(13);
                $sxf .= " alert('" . msg('need_comment_type') . "');";
                $sxf .= '</script>' . chr(13);
            } else {
                $this->comment = $dd[1];
                $this->avaliation = $dd[2];
                $this->user = $us;
                $this->comment_save();
                $dd[1] = '';
                $dd[2] = '';
                redirecina(page());
            }
        }
        $disp1 = 'display: none;';
        $disp2 = 'display: block;';
        if (strlen($dd[1]) > 0) {
            $disp2 = 'display: none;';
            $disp1 = 'display: block;';
        }
        $sx .= '<div id="posted" style="' . $disp1 . '">';
        $sx .= '<form method="post" action="' . page() . '">';
        //				$sx .= '<input type="hidden" name="dd0" value="'.$dd[0].'">'.chr(13);
        //				$sx .= '<input type="hidden" name="dd90" value="'.$dd[90].'">'.chr(13);
        $sx .= '<table width="98%">';
        $sx .= '<TR><TD>';
        $sx .= msg('comment_post') . '<BR>';
        $sx .= '<TR><TD><textarea name="dd1" cols="80" rows="5">';
        $sx .= $dd[1];
        $sx .= '</textarea>';
        $sx .= '<TR><TD>';
        /** Avaliation **/
        /* $sx .= msg('comment_type').':';
        			
        			$chk1 = ''; $chk2 = '';
        			if ($dd[2]=='1') { $chk1 = 'checked'; }
        			if ($dd[2]=='0') { $chk2 = 'checked'; }
        			
        			/** Radio **/
        /** com avalia��o		
        					$sx .= '<input type="radio" value="1" name="dd2" '.$chk1.'>';
        					$sx .= '<img src="img/icone_coment_ok.png">';
        	
        					$sx .= '<input type="radio" value="0" name="dd2" '.$chk2.'>';
        					$sx .= '<img src="img/icone_coment_nook.png">';
        					**/
        /** sem avalia��o **/
        $sx .= '<input type="hidden" value="1" name="dd2" >';
        /**  **/
        $sx .= '<BR><input type="submit" value="' . msg('comment_submit') . '">';
        $sx .= '</table>';
        $sx .= '</form>';
        $sx .= '</div>';
        /** **/
        $sx .= '<input id="mst" type="button" value="' . msg('comment_add', 1) . '" onclick="mostrar();"  style="' . $disp2 . '">';
        $sx .= chr(13) . '<script>
					      $("#mst").click(function () {
					      		$("#posted").fadeIn("slow"); 
						   		$("#mst").fadeOut("slow"); 
						  }); 
						';
        $sx .= chr(13) . '</script>';
        return $sx . $sxf;
    }

if (strlen($adm) == 0) {
    return 'admin.php';
}
/* Admin Common */
$ok = ($perfil->valid('#ADM') or $perfil->valid('#SCR') or $perfil->valid('#COO'));
if ($ok == 0) {
    redirecina('main.php');
}
require "_class/_class_submit_manuscrito_field.php";
global $acao, $dd, $cp, $tabela;
require $include . 'sisdoc_colunas.php';
require $include . '_class_form.php';
$form = new form();
require "form_css.php";
echo '<h1>' . msg('amendment_' . $adm) . '</h1>';
$dd[12] = strzero($adm, 5);
$cl = new fields();
$cp = $cl->cp();
$tabela = $cl->tabela;
$http_edit = 'admin_submit_ed.php';
$http_redirect = '';
/** Comandos de Edicao */
$tela = $form->editar($cp, $tabela);
/** Caso o registro seja validado */
if ($form->saved > 0) {
    echo 'Salvo';
    $cl->updatex();
    redirecina('admin_submit_000.php');
} else {
    echo $tela;
}

 function updatex()
 {
     global $base;
     $c = 'us';
     $c1 = 'id_' . $c;
     $c2 = $c . '_codigo';
     $c3 = 7;
     $sql = "update " . $this->tabela . " set {$c2} = lpad({$c1},{$c3},0) ,\n\t\t\t\t\t\tus_login =  lpad({$c1},{$c3},0) ,\n\t\t\t\t\t\tus_cracha =  lpad({$c1},{$c3},0) \n\t\t\t\t\t\twhere {$c2}='' or 1=1";
     if ($base == 'pgsql') {
         $sql = "update " . $this->tabela . " set {$c2} = trim(to_char(id_" . $c . ",'" . strzero(0, $c3) . "')) where {$c2}='' or  {$c2} isnull ";
     }
     $rlt = db_query($sql);
 }

require "_class/_class_cep_submit.php";
require "_class/_class_team.php";
require $include . 'sisdoc_data.php';
require $include . 'sisdoc_email.php';
require '_class/_class_ic.php';
$ic = new ic();
$proj = new submit();
$proj->doc_autor_principal = $ss->user_codigo;
require "_class/_class_ged.php";
require "_class/_class_cep.php";
$cep = new cep();
/****/
if (strlen($dd[91]) > 0) {
    $_SESSION['proj_page'] = $dd[91];
    redirecina('submit.php?time' . date("dmYhis"));
}
$pag_id = round($_SESSION['proj_id']);
$pag_page = round($_SESSION['proj_page']);
//if ($pag_id == 0) { $pag_page = 1; }
//if ($pag_page == 0) { $pag_page = 1; }
$pag_id = $_SESSION['proj_id'];
$dd[0] = $pag_id;
$protocolo = strzero($dd[0], 7);
echo '<H2>' . msg('submit_end_monitoreo_008') . '</h2>';
//echo msg('protocolo').' '.$protocolo;
echo '<BR><BR>';
echo '<div style="text-align: justify; width: 80%">';
echo msg('submit_end_monitoreo_008_text');
echo '</div>';
echo '</div>';
echo $hd->foot();

 function update12()
 {
     $new = 0;
     for ($r = 1; $r <= 10; $r++) {
         $cod = strzero($r, 3);
         $sql = "select * from cep_amendment_type \n\t\t\t\t\t\t\twhere amt_codigo = '{$cod}' ";
         $rlt = db_query($sql);
         if ($line = db_read($rlt)) {
         } else {
             $sql = "insert into cep_amendment_type \n\t\t\t\t\t\t\t\t\t(amt_codigo, amt_descrip, amt_form, amt_ord,amt_ativo)\n\t\t\t\t\t\t\t\t\t\tvalues\n\t\t\t\t\t\t\t\t\t('{$cod}','amendment_{$cod}','00{$cod}','{$r}',1);";
             $rlt = db_query($sql);
             $new++;
         }
     }
     if ($new > 0) {
         echo '<br>' . msg('update') . ' 012 ' . msg('successful') . ' ' . $new . ' updated';
     } else {
         echo '<br>' . msg('already update - 012');
     }
 }

 function protocolos_avaliacao($sta, $tipo = '')
 {
     global $ss;
     $us = strzero(round($ss->user_id), 7);
     if (strlen($tipo) > 0) {
         $wh = " and (cep_tipo = '{$tipo}' )";
     } else {
         $wh = '';
     }
     if ($sta == 'Z') {
         $sql = "select * from " . $this->tabela . " \n\t\t\t\t\t inner join cep_dictamen on pp_protocolo = cep_protocol \n\t\t\t\t\t where \n\t\t\t\t\t (cep_status = '@' or cep_status = 'A' or cep_status = 'B' or cep_status = 'C' or cep_status = 'D')\n\t\t\t\t\t and pp_avaliador = '{$us}' \n\t\t\t\t\t and (pp_status <> 'B' and pp_status <> 'X')\n\t\t\t\t\t {$wh}\n\t\t\t\t\t order by cep_reuniao ";
     } else {
         $sql = "select * from " . $this->tabela . " \n\t\t\t\t\t left join usuario on us_codigo = cep_pesquisador\n\t\t\t\t\t where cep_status = '{$sta}' \n\t\t\t\t\t {$wh}\n\t\t\t\t\t order by cep_reuniao \n\t\t\t\t\t ";
     }
     $rlt = db_query($sql);
     $dta = 19000101;
     $tot = 0;
     while ($line = db_read($rlt)) {
         $tot++;
         $data = $line['cep_reuniao'];
         if ($data != $dta) {
             $sx .= '<TR><TD colspan=4 align="center" class="lt2"><center>' . msg('meet_data') . ' ' . stodate($data);
             $dta = $data;
         }
         $sx .= $this->mostra($line);
     }
     $sa = '<table width=96% class="table_normal" border=0>';
     $sa .= '<TR><TH>' . msg('protocol');
     $sa .= '<TH>' . msg('project_title');
     $sa .= '<TH>' . msg('status');
     $sa .= $sx;
     $sa .= '<TR><TD colspan=5>' . msg('found') . ' ' . $tot . ' ' . msg('records');
     $sa .= '</table>';
     if ($tot == 0) {
         $sa = '';
     }
     return $sa;
 }

//.........这里部分代码省略.........
                }
                $tela .= '<td align="right">' . form_checkbox($dados, 'accept', $vlr);
                /* label */
                if (strlen($label) > 0) {
                    $tela .= '<td>' . $label . ' ';
                }
                if ($required == 1) {
                    $tela .= ' <font color="red">*</font> ';
                }
                $tela .= $tdn . $trn;
                break;
                /* Oculto */
            /* Oculto */
            case 'H':
                $dados = array($dn => $vlr);
                $tela .= form_hidden($dados);
                break;
            case 'HV':
                $vlr = $cp[2];
                $dados = array($dn => $vlr);
                $tela .= '<input type="hidden" name="' . $dn . '" id="' . $dn . '" value="' . $vlr . '">' . cr();
                break;
                /* Select Box - Mes */
            /* Select Box - Mes */
            case 'MES':
                $options = array('' => '::select an option::');
                /* recupera dados */
                for ($r = date("Y") + 4; $r > 1990; $r--) {
                    $vlra = $r;
                    $options[$vlra] = '===' . $r . '===';
                    //array_push($options,array('2019'));
                    $ar = array();
                    for ($y = 12; $y > 0; $y--) {
                        $vlrs = $r . strzero($y, 2) . '01';
                        $cpt = $r . '/' . msg('mes_' . strzero($y, 2));
                        $op = array($vlr => $cpt);
                        $ar[$vlrs] = $cpt;
                        //array_push($options,$op);
                    }
                    $options[$vlra] = $ar;
                }
                $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select');
                $tela .= $tr;
                /* label */
                if (strlen($label) > 0) {
                    $tela .= $tdl . $label . ' ';
                }
                if ($required == 1) {
                    $tela .= ' <font color="red">*</font> ';
                }
                if (strlen($vlr) == 0) {
                    $vlr = date("Ym") . '01';
                } else {
                    $vlr = sonumero($vlr);
                }
                $tela .= '<TD>';
                $tela .= form_dropdown($dados, $options, $vlr);
                break;
                /* Select Box */
            /* Select Box */
            case 'O':
                $ntype = trim(substr($type, 2, strlen($type)));
                $ntype = troca($ntype, '&', ';') . ';';
                $param = splitx(';', $ntype);
                $options = array('' => '::select an option::');
                for ($r = 0; $r < count($param); $r++) {

$documents = new documents();
/* Sessao e pagina da Submissao */
$sx = '<H1>' . msg('documents_title_commite') . '</h1>';
$sx .= '<fieldset>';
$sx .= '<Table width="100%" class="tabela00" align="center" >';
$sx .= '<TR><TD>';
$sql = "select * from ged_documento_tipo \n\t\twhere (doct_publico = 1) ";
/* Restricted documents to members */
if ($perfil->valid('#MEM')) {
    $sql .= " or (doct_publico = 0) ";
}
/* Executa busca */
$rlt = db_query($sql);
$to = 0;
while ($line = db_read($rlt)) {
    $ged->protocol = strzero(round($line['doct_codigo']), 7);
    $sf = '<h2>' . utf8_encode(msg(trim($line['doct_nome']))) . '</h2>';
    $ged->table_class = "tabela01";
    $sf .= $ged->filelist_download();
    $to = $to + $ged->total_files;
}
$sx .= $sf;
$sx .= '</table>';
$sx .= '</fieldset>';
if ($to > 0) {
    echo $sx;
}
echo '<BR>';
echo '<H1>' . msg('documents_title') . '</h1>';
echo '<fieldset>';
require "documents_proethos.php";

    if ($dda < $dini) {
        $dini = $dda;
    }
    $dda = round("0" . $oline['cso_dt_fim']);
    if ($dda > $dfim) {
        $dfim = $dda;
    }
}
$meses = calcmeses($dini, $dfim);
if ($meses > 0) {
    $wt = intval(80 / $meses);
    $wi = 120;
    for ($kr = 0; $kr < count($crono); $kr++) {
        ////////// nomear datas
        $mm1 = strzero($crono[$kr][1], 6);
        $mm2 = strzero($crono[$kr][2], 6);
        $mn = nomemes_short(intval(substr($mm1, 0, 2))) . '/' . substr($mm1, 2, 4);
        $crono[$kr][3] = $mn;
        $mn = nomemes_short(intval(substr($mm2, 0, 2))) . '/' . substr($mm2, 2, 4);
        $crono[$kr][4] = $mn;
        if ($crono_cab == false) {
            $crono_cab = true;
            $pdf->MultiCell(0, 0, ' ', 1, 'L');
            $pdf->Ln($ln);
            $pdf->SetFont('Times', 'B', 12);
            $pdf->MultiCell(0, 8, msg('crono'), 0, 'L');
            $orca_cab = true;
            $pdf->Ln(6);
            /////////////////qqq cabecalho orcamento
            $y = $pdf->GetY();
            $pdf->SetLineWidth(0.3);

// restricts commercial use of the Software.
//
// ProEthos is distributed in the hope that it will be useful, but WITHOUT ANY
// WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A
// PARTICULAR PURPOSE. See the ProEthos License for more details.
//
// You should have received a copy of the ProEthos License along with the ProEthos
// Software. If not, see
// https://raw.githubusercontent.com/bireme/proethos/master/LICENSE.txt
global $institution_name, $LANG, $messa;
$line = $dic->line;
require 'fphp-170/fpdf.php';
$versao_pdf = '0.0.38a';
$ln = 4;
$caae = trim($line['cep_caae']);
$nrp = strzero($dic->line['id_pr'], 5) . '/' . substr($dic->line['pr_data_emissao'], 0, 4);
$pdf = new FPDF();
$pdf->AliasNbPages();
$ln = 0;
$pdf->AddPage();
/* Logo Novo */
$img = 'document/proegthos_logo_1.jpg';
if (!file_exists($img)) {
    $img = 'img/logo_dictamen.jpg';
}
$pdf->Image($img, 20, 10);
$pdf->SetFont('Times', 'B', 16);
$pdf->MultiCell(0, 10, $institution_name, 0, 'R');
/* Research Project Evaluation Form */
$pdf->SetFont('Times', '', 14);
$pdf->MultiCell(0, 1, utf8_decode(msg('dictamen_title')), 0, 'R');

 function form_field($cp, $vlr)
 {
     global $dd, $ddi;
     /* Zera tela */
     $tela = '';
     $table = 1;
     if (!isset($dd)) {
         $dd = array();
         $ddi = 0;
     }
     $type = $cp[0];
     $label = $cp[2];
     $required = $cp[3];
     $placeholder = $label;
     $readonly = $cp[4];
     $tt = substr($type, 1, 1);
     /* exessoes */
     if (substr($type, 0, 4) == '$MES') {
         $tt = 'MES';
     }
     /* form */
     $max = 100;
     $size = 100;
     $dados = array();
     $dn = 'dd' . $ddi;
     if ($table == 1) {
         $td = '<td>';
         $tdl = '<td align="right">';
         $tdn = '</td>';
         $tr = '<tr valign="top">';
         $trn = '</tr>';
     } else {
         $td = '';
         $tdl = '';
         $tdn = '';
         $tr = '';
         $trn = '';
     }
     //$dados = array('name'=>'dd'.$ddi, 'id'=>'dd'.$ddi,'value='.$dd[$ddi],'maxlenght'=>$max,'size'=>$size,$class=>'');
     switch ($tt) {
         /* Button */
         case 'B':
             $tela .= $tr . $tdl . $td;
             $dados = array('name' => 'acao', 'id' => 'acao', 'value' => $label);
             $tela .= form_submit($dados);
             $tela .= $tdn . $trn;
             break;
             /* Oculto */
         /* Oculto */
         case 'H':
             $dados = array($dn => $vlr);
             $tela .= form_hidden($dados);
             break;
             /* Select Box - Mes */
         /* Select Box - Mes */
         case 'MES':
             $options = array('' => '::select an option::');
             /* recupera dados */
             for ($r = date("Y") + 4; $r > 1990; $r--) {
                 $vlra = $r;
                 $options[$vlra] = '===' . $r . '===';
                 //array_push($options,array('2019'));
                 $ar = array();
                 for ($y = 12; $y > 0; $y--) {
                     $vlrs = $r . strzero($y, 2) . '01';
                     $cpt = $r . '/' . msg('mes_' . strzero($y, 2));
                     $op = array($vlr => $cpt);
                     $ar[$vlrs] = $cpt;
                     //array_push($options,$op);
                 }
                 $options[$vlra] = $ar;
             }
             $dados = array('name' => $dn, 'id' => $dn, 'size' => 1, 'class' => 'form_select');
             $tela .= $tr;
             /* label */
             if (strlen($label) > 0) {
                 $tela .= $tdl . $label . ' ';
             }
             if ($required == 1) {
                 $tela .= ' <font color="red">*</font> ';
             }
             if (strlen($vlr) == 0) {
                 $vlr = date("Ym") . '01';
             }
             $tela .= '<TD>';
             $tela .= form_dropdown($dados, $options, $vlr);
             break;
             /* Select Box */
         /* Select Box */
         case 'Q':
             $ntype = trim(substr($type, 2, strlen($type)));
             $ntype = troca($ntype, ':', ';') . ';';
             $param = splitx(';', $ntype);
             $options = array('' => '::select an option::');
             /* recupera dados */
             $sql = "select * from (" . $param[2] . ") as tabela ";
             $CI =& get_instance();
             $query = $CI->db->query($sql);
             foreach ($query->result_array() as $row) {
                 /* recupera ID */
//.........这里部分代码省略.........

}
/* Redireciona se 008 */
if ($adm == '008') {
    redirecina('admin_submit_blocked.php');
    exit;
}
require "_class/_class_submit_manuscrito_field.php";
/* Dados da Classe */
$clx = new fields();
$tabela = $clx->tabela;
echo '<h1>' . msg('amendment_' . $adm) . '</h1>';
/* Nao alterar - dados comuns */
$label = msg($tabela);
$http_edit = 'admin_submit_000_ed.php';
//$http_ver = 'pibic_bolsa_tipo_detalhe.php';
$editar = True;
$http_redirect = page();
$clx->row();
$busca = true;
$offset = 20;
//$pre_where = " e_mailing = '".$cl->mail_codigo."' ";
if ($order == 0) {
    $order = $cdf[1];
}
$order = ' sub_pag, sub_pos, sub_ordem ';
$pre_where = " sub_projeto_tipo = '" . strzero($adm, 5) . "' ";
echo '<TABLE width="' . $tab_max . '" align="center"><TR><TD>';
require $include . 'sisdoc_row.php';
echo '</table>';
echo '</div>';
echo $hd->foot();