R/GetTableMetadata.R

Defines functions GetTableMetadata

# Get table metadata. 

GetTableMetadata <- function() {
  fields <- c(  IdRec = "IdRec", ProfBrutRec = "ProfBrutRec",
                IntituleInsee="IntituleInsee",
                LibN4="LibN4",
                N4="N4",
                LibN3="LibN3",
                N3="N3",
                LibN2="LibN2",
                N2="N2",
                LibN1="LibN1",
                N1="N1")
  
  result <- list(fields = fields)
  return (result)
}
Grisoudre/RecodPCS documentation built on Dec. 15, 2017, 1:02 p.m.