my @foo=split('/', ); my $usuario = $foo[$#foo-1] unless $#foo<1; my $rfc = ''; Pg dbname=sica host=xalli postgres

select * from datos_per where login='$usuario'

# # Reading rfc from esql # $rfc .= do

;

@cie.unam.mx

Pg dbname=informe2002 host=mazatl postgres

select materia, nivel, facultad, semestre from cursos_sem where rfc='$rfc'

select nombre,inst from distinciones where (rfc='$rfc' and pub like 'S%')

select * from articulos where rfc='$rfc'

select autores, titulo, edit, isbn from libros where rfc='$rfc'

select nombre,editores, titulo, autores2, edit, pags, periodo, isbn from capitulos_lib where rfc='$rfc'

select titulo,tipo_pat,registro from patentes where rfc='$rfc'

select frh.nombre_est,frh.inst,nivel_frh.nivel,frh.titulo,frh.fecha from frh,nivel_frh where (rfc='$rfc') and (tipo_part=1 or tipo_part=2) and (frh.nivel=nivel_frh.cla_niv)

No hay datos

Pg dbname=informe2003 host=mazatl postgres

select nombre_proy, tipo_part, tinv_proy,financ_proy,no_reg_part from proyectos1 where rfc='$rfc'

select materia, nivel, facultad, semestre from cursos_sem where rfc='$rfc'

select nombre,inst from distinciones where (rfc='$rfc' and pub='Sí')

select * from articulos where rfc='$rfc'

select autores, titulo, edit, isbn from libros where rfc='$rfc'

select nombre,editores, titulo, autores2, edit, pags, periodo, isbn from capitulos_lib where rfc='$rfc'

select titulo,tipo_pat,registro from patentes where rfc='$rfc'

select frh.nombre_est,frh.inst,nivel_frh.nivel,frh.titulo,frh.fecha from frh,nivel_frh where (rfc='$rfc') and (tipo_part=1 or tipo_part=2) and (frh.nivel=nivel_frh.cla_niv)

No hay datos

Pg dbname=sica host=xalli postgres

select materia, nivel, facultad, semestre from cursos where rfc='$rfc'

select nombre,inst from distinciones where (rfc='$rfc' and pub like 'S%')

select articulos.tipo_art,articulos.autor,articulos.autores,articulos.titulo,revistas.nom_rev,articulos.vol,articulos.pag_ini,articulos.pag_fin,articulos.fecha,articulos.anno where articulos.rfc='$rfc' and articulos.num_rev=revistas.id_rev;

select autores, titulo, edit, isbn from libros where rfc='$rfc'

select nombre,editores, titulo, autores2, edit, pags, periodo, isbn from capitulos_lib where rfc='$rfc'

select titulo,tipo_pat,registro from patentes where rfc='$rfc'

select alumnos.ap_alu,alumnos.nom_alu,inst_frh.nombre_inst,nivel_frh.nivel,frh_gral.titulo,frh_gral.fecha_final where (frh_gral.rfc='$rfc') and (frh_gral.tipo_part<3) and (frh_gral.nivel>1) and (frh_gral.nivel=nivel_frh.cla_niv) and (frh_gral.id_alu=alumnos.id_alu) and (frh_gral.inst=inst_frh.id)

No hay datos 2004