}
}
$cgccpf = str_replace(".", "", $cgccpf);
$cgccpf = str_replace("/", "", $cgccpf);
$cgccpf = str_replace("-", "", $cgccpf);
$result = pg_exec("select * from issbase inner join cgm on q02_numcgm = z01_numcgm where z01_cgccpf = '{$cgccpf}' and q02_inscr = {$inscricaow}");
if (pg_numrows($result) != 0) {
db_fieldsmemory($result, 0);
} else {
redireciona("digitaissqn.php?" . base64_encode("erroscripts=Acesso a Rotina Inválido, verifique os dados digitados!"));
}
}
}
if (isset($primeiravez)) {
$clquery->sql_query("issplan", "q20_mes, q20_ano", "q20_mes", " q20_ano = {$ano} and q20_mes={$mes} and q20_numcgm= {$z01_numcgm}");
$clquery->sql_record($clquery->sql);
$num = $clquery->numrows;
if ($num != 0) {
if (isset($q02_inscr)) {
$inscricaow = $q02_inscr;
}
redireciona("planilha.php?" . base64_encode("nomecontri=" . @$nomecontri . "&fonecontri=" . @$fonecontri . "&inscricaow=" . $inscricaow . "&mesx=" . $mesx . "&mes=" . $mes . "&ano=" . $ano . "&numcgm=" . $z01_numcgm . "&nomes=" . $z01_nome));
}
}
if (isset($grava)) {
if ($modificando == true) {
$sqlx1 = "delete from issplanit where q21_planilha={$plani}";
$sqlx2 = "delete from issplan where q20_planilha={$plani}";
pg_exec($sqlx1) or die($sqlx1);
$planilha = $plani;
} else {
