extraetablas: Extrae los nombres de las tablas de una consulta SQL

In mkesslerct/opadar: Useful functions for the daily operations of the OPADA, UPCT.

Description

Proporciona una lista con los nombres de las tablas de las que tira la consulta SQL considerada. Es vectorizada, por lo que se puede pasar un vector de consultas SQL.

Usage

extraetablas(sqlselect)

Arguments

sqlselect

String. Un vector que contiene las consultas select sql.

Value

Una lista de la misma longitud de 'sqlselect'. El elemento i de esta lista es un vector que contiene las tablas usadas en la consulta elemento i de sqlselect.

Examples

sqlselect <- c( "select * from tabla1 t1",
                "select  from tabla2 where tabla2.key = '1'")
extraetablas(sqlselect)
## Un ejemplo m<c3><a1>s complejo:
sqlselect <- "select distinct ctm.any_anyaca TIPMAT_ANYACA, tm.codnum  TIPMAT_COD,
tm.desid2 TIPMAT_DESC, e.PLA_CODALF EXP_PLA, e.NUMORD EXP_NUMORD,
e.ALU_DNIALU, p.LLENIF ALU_DNILETRA
from acad_talu_cpstipmatricula ctm
left join acad_talu_tipmatricula tm
    on ctm.TMA_CODNUM = tm.CODNUM
left join (select * from acad_talu_linmatricula where etalma is null) lm
    on lm.PLA_CODALF = ctm.PLA_CODALF and lm.EXP_NUMORD = ctm.EXP_NUMORD and
 lm.ANY_ANYACA = ctm.ANY_ANYACA
left join acad_talu_expedient e
    on e.PLA_CODALF = ctm.PLA_CODALF and e.NUMORD = ctm.EXP_NUMORD
left join acad_tuib_persona p
    on p.DNIPRS = e.ALU_DNIALU
where ctm.ANY_ANYACA = '2015-16'
order by TIPMAT_DESC"
extraetablas(sqlselect)

mkesslerct/opadar documentation built on May 23, 2019, 2:01 a.m.