Saneamiento de la base de proveedores — SBOS
Estos son los comandos SELECT
que se pueden ejecutar en el sistema Senior , para facilitar la extracción de datos. Los comandos están divididos por tipo de información (empleados, puestos, sectores, sucursales y centros de costos).
Si es necesario extraer información diferente de los ejemplos, puede adaptar los comandos para buscar información que no esté incluida en los ejemplos.
Saneamiento de datos:
Colaboradores
Vincular registros
Los registros se vinculan mediante el número de registro del empleado :
Registro en el sistema Senior | Registro con el proveedor de SST | Ejemplo | |||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
R034FUN.TipCol
R034FUN.NumCad
|
Campo: REGISTRO de empleado Formato:
|
|
Comandos de base de datos para saneamiento base
SELECCIONE R034FUN.CodFil 'Cod.Unid', R030FIL.NomFil 'Nombre de unidad', CAST(R030ORG.TabOrg AS VARCHAR(200)) + '/' + CAST(R016HIE.CodLoc AS VARCHAR(200)) 'Cod.Setor' , R016ORN.NomLoc 'Nombre del sector', CAST(R030CAR.EstCar AS VARCHAR(200)) + '/' + CAST(R034FUN.CarCod AS VARCHAR(200)) 'Código de carga', R024CAR.TitRed 'Nombre de posición', CAST (R034FUN.TIPCOL AS VARCHAR(200))+ '/'+ CAST(R034FUN.NUMCAD AS VARCHAR(200)) 'Registro', '' 'Código de empleado', R034FUN.FunName 'Nombre del empleado', CASO CUANDO (convertir ( varchar, R034FUN.DatNas, 103) = '31/12/1900') ENTONCES nulo ELSE (convert(varchar, R034FUN.DatNas, 103)) END 'Dt.Nascimento', R034FUN.TipSex 'Sexo', R010SIT.DesSit ' Situación', CASO CUANDO (convert(varchar, R034FUN.DatAdm, 103) = '31/12/1900') ENTONCES nulo ELSE (convert(varchar, R034FUN.DatAdm, 103)) FINAL 'Dt.Admission', CASO CUANDO ( convert(varchar, R038AFA.DatAfa, 103) = '31/12/1900') ENTONCES null ELSE (convert(varchar, R038AFA.DatAfa, 103)) END 'Dt.Dismissal', CASE R034FUN.EstCiv CUANDO 1 ENTONCES ' Licenciatura 'Estado Civil', R034FUN.NumPis 'Pis/Pasep', CASO R034FUN.tipcon CUANDO 1 ENTONCES 'Empleado' CUANDO 2 ENTONCES 'Director' CUANDO 3 ENTONCES 'Trabajador Rural' CUANDO 4 ENTONCES 'Jubilado' CUANDO 5 ENTONCES 'Becario' CUANDO 6 ENTONCES 'Aprendiz' CUANDO 7 ENTONCES 'Término Determinado - Ley 9.601/98' CUANDO 8 ENTONCES 'Director Jubilado' CUANDO 9 ENTONCES 'Agente Público' CUANDO 10 ENTONCES 'Maestro' CUANDO 11 ENTONCES 'Cooperador' CUANDO 12 ENTONCES 'Trabajador Doméstico' CUANDO 13 entonces ' ' CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 1)) ENTONCES (SUBSTRING('0000000000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + ' .' + SUBSTRING('0000000000' + CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING('0000000000' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING( '0000000000' + CONVERT(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 2)) ENTONCES (SUBSTRING('000000000' + CONVERTIR( CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('000000000' + CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' ) + '-' + SUBSTRING('000000000' + CONVERT(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) AND (LEN(R034FUN. NumCPF)= 3)) ENTONCES ( SUBSTRING('00000000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('00000000' + CONVERT(CHAR, R034FUN.NumCPF),4,3 ) + '.' '00000000' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('00000000' + CONVERTIR(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 4)) ENTONCES (SUBSTRING('0000000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING( '0000000' + CONVERT(CHAR, R034FUN.NumCPF),4,3) + '.' + CONVERTIR(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 5) ) ENTONCES (SUBSTRING('000000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('000000' + CONVERT(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING('000000' + CONVERT(CHAR, R034FUN. NumCPF),7,3) + '-' + SUBSTRING('000000' + CONVERT(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN. NumCPF <> 0) Y (LEN(R034FUN.NumCPF) = 6)) ENTONCES (SUBSTRING('00000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('00000' + CONVERT (CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING('00000' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('00000' + CONVERTIR(CHAR , R034FUN.NumCPF),10,2)) CUANDO ( (R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 7)) ENTONCES (SUBSTRING('0000' + CONVERT(CHAR, R034FUN.NumCPF), 1,3) + '.' + SUBSTRING('0000 ' + CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING('0000' + CONVERTIR(CHAR, R034FUN.NumCPF),7, 3) + '-' + SUBSTRING('0000' + CONVERT(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 8)) ENTONCES (SUBSTRING('000' + CONVERT(CHAR, R034FUN. NumCPF),1,3) + '.' + SUBSTRING('000' + CONVERT(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING ('000' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('000' + CONVERTIR(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF < > 0) Y (LEN(R034FUN.NumCPF)= 9 )) ENTONCES (SUBSTRING('00' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('00' + CONVERT(CHAR , R034FUN.NumCPF),4,3) + '. ' + SUBSTRING('00' + CONVERT(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('00' + CONVERT(CHAR, R034FUN .NumCPF),10,2)) CUANDO ((R034FUN .NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 10)) ENTONCES (SUBSTRING('0' + CONVERT(CHAR, R034FUN.NumCPF),1, 3) + '.' + SUBSTRING('0' + CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING('0' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('0' + CONVERT( CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 11)) ENTONCES (SUBSTRING (CONVERTIR(CHAR, R034FUN.NumCPF),1,3 ) + '.' + SUBSTRING(CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING(CONVERTIR(CHAR, R034FUN.NumCPF), 7,3) + '-' + SUBSTRING(CONVERT( CHAR, R034FUN.NumCPF),10,2)) ELSE '' END 'CPF' FROM R034FUN unión interna R030EMP en (R030EMP.NumEmp = R034FUN.NumEmp) unión interna R030CAR en (R030CAR.NumEmp = R034FUN.NumEmp AND R030CAR.EstCar = R034FUN.EstCar AND R030CAR.DatAlt = (SELECT MAX(C.DATALT) FROM R030CAR C DONDE R030EMP.NumEmp = C.NumEmp AND C.DatAlt <= GETDATE() )) unión interna R024CAR en (R024CAR.EstCar = R034FUN. EstCar AND R024CAR.CodCar = R034FUN.CodCar) unión interna R030ORG en (R030ORG.NumEmp = R034FUN.NumEmp AND R030ORG.TabOrg = R034FUN.TabOrg AND R030ORG.DatAlt = (SELECCIONAR MAX(O.DATALT) DESDE R030ORG O DONDE R030E MP.NumEmp = O.NumEmp AND O.DatAlt <= GETDATE())) unión interna R016ORN en (R016ORN.TabOrg = R034FUN.TabOrg AND R016ORN.NumLoc = R034FUN.NumLoc) unión interna R016HIE en (R016HIE.TabOrg = R034FUN.TabOrg AND R016HIE .NumLoc = R034FUN.NumLoc AND R016HIE.DatIni = (SELECT MAX(H.DATINI) FROM R016HIE H DONDE R034FUN.TabOrg = H.TabOrg AND R034FUN.NumLo c = H .NumLoc AND H.DatIni <= GETDATE())) unión interna R030FIL en (R030FIL.NumEmp = R034FUN.NumEmp AND R030FIL.CodFil = R034FUN.CodFil) unión interna R010SIT en (R010SIT.CodSit = R034FUN.SitAfa) unión izquierda R033PES en (R033PES.CodPES = R034FUN.CodPe s) izquierda unir R038AFA en (R038AFA.NUMEMP = R034FUN.NUMEMP AND R038AFA.TIPCOL = R034FUN.TIPCOL AND R038AFA.NUMCAD = R034FUN.NUMCAD AND R038AFA PCOL EN (1,2) ORDENAR POR 1,3,4 |
Observación
El comando anterior también considera a los empleados que son despedidos .
SELECCIONE R034FUN.FilCod "UnitCod", R030FIL.FilNom "Nombre de unidad", R030ORG.TabOrg || '/' || R016HIE.CodLoc "Cod.Setor", R016ORN.NomLoc "Nombre del sector", R030CAR.EstCar || '/' || R034FUN.CodCar "Cod.Cargo", R024CAR.TitRed "Nombre Cargo", R034FUN.TipCol || '/' || R034FUN.NumCad "Registro", '' "Código de empleado", R034FUN.FunName "Nombre del empleado", DECODE(TO_CHAR(R034FUN.DatNas, 'DD/MM/AAAA'), '31/12/1900', null, TO_CHAR (R034FUN.DatNas, 'DD/MM/AAAA')) "Dt.Nascimento", R034FUN.TipSex "Sexo", R010SIT.DesSit "Situação", DECODE(TO_CHAR(R034FUN.DatAdm, 'DD/MM/AAAA') , '31/12/1900', null, TO_CHAR(R034FUN.DatAdm, 'DD/MM/AAAA')) "Fecha de admisión", DECODE(TO_CHAR(R038AFA.DATAFA, 'DD/MM/AAAA'), ' 12 /31/1900', null, TO_CHAR(R038AFA.DATAFA, 'DD/MM/AAAA')) "Dt.Despido", CASE R034FUN.EstCiv CUANDO 1 ENTONCES 'Soltero' CUANDO 2 ENTONCES 'Casado' CUANDO 3 ENTONCES ' Divorciado ' CUANDO 4 ENTONCES 'Viudo' CUANDO 5 ENTONCES 'Concubinato' CUANDO 6 ENTONCES 'Separado' CUANDO 7 ENTONCES 'Derecho común' CUANDO 9 ENTONCES 'Otros' MÁS 'Soltero' FINAL "Estado civil", R034FUN.NumPis "Pis/Pasep " , CASO R034FUN.tipcon CUANDO 1 ENTONCES 'Empleado' CUANDO 2 ENTONCES 'Director' CUANDO 3 ENTONCES 'Trabajador Rural' CUANDO 4 ENTONCES 'Jubilado' CUANDO 5 ENTONCES 'Pasante' CUANDO 6 ENTONCES 'Aprendiz' CUANDO 7 ENTONCES 'Término Determinado - Ley 9,601/98' CUANDO 8 ENTONCES 'Director Jubilado' CUANDO 9 ENTONCES 'Agente Público' CUANDO 10 ENTONCES 'Maestro' CUANDO 11 ENTONCES 'Cooperador' CUANDO 12 ENTONCES 'Trabajador Doméstico' CUANDO 13 ENTONCES 'Maestro Término Fijo' OTRA VEZ 'Empleado' FINAL "Contrato", R033PES.NumCid "Rg", R033PES.EstCid "UF-RG", DECODE(R034FUN.NumCPF, 0, ' ', SUBSTR(TO_CHAR(R034FUN.NumCPF),1,3) ||'.' | | SUBSTR(TO_CHAR(R034FUN.NumCPF),4,3) ||'.'|| SUBSTR(TO_CHAR(R034FUN.NumCPF),7,3) ||'-'|| SUBSTR(TO_CHAR(R034FUN.NumCPF),10,2)) "CPF" FROM R034FUN unión interna R030EMP en (R030EMP.NumEmp = R034FUN.NumEmp) unión interna R030CAR en (R030CAR.NumEmp = R030EMP.NumEmp AND R030CAR.EstCar = R034FUN .EstCar AND R030CAR.DatAlt = (SELECT MAX(DATALT) FROM R030CAR C WHERE R030EMP.NumEmp = C.NumEmp AND C.DatAlt <= SYSDATE)) unión interna R024CAR en (R024CAR.EstCar = R034FUN.EstCar AND R024CAR.CodCar = R034FUN.CodCar) unión interna R030ORG en (R030ORG.NumEmp = R034FUN.NumEmp AND R030ORG.TabOrg = R034FUN.TabOrg AND R030ORG.DatAlt = (SELECT MAX(O.DATALT) FROM R030ORG O WHERE R030EMP.NumEmp = O.NumEmp AND EL .DatAlt <= SYSDATE)) unión interna R016ORN en (R016ORN.TabOrg = R034FUN.TabOrg AND R016ORN.NumLoc = R034FUN.NumLoc) unión interna R016HIE en (R016HIE.TabOrg = R034FUN.TabOrg AND R016HIE.NumLoc = R034F UN.NumLoc Y R016HIE .DatIni = (SELECT MAX(DATINI) FROM R016HIE H DONDE R034FUN.TabOrg = H.TabOrg AND R034FUN.NumLoc = H.NumLoc AND H.DatIni <= SYSDATE)) unión interna R030FIL en (R030FIL.NumEmp = R034FUN.NumEmp AND R030FIL.CodFil = R034FUN.CodFil) unión interna R010SIT en (R010SIT.CodSit = R034FUN.SitAfa) unión izquierda R033PES en (R033PES.CodPES = R034FUN.CodPes) unión izquierda R038AFA en (R038AFA.numemp = R034FUN.NumEmp Y R034FUN. TipCol = R038AFA.tipcol Y R034FUN.NumCad = R038AFA.numcad Y r038afa.sitafa EN (SELECCIONE codsit DE r010sit DONDE r010sit.tipsit = 7)) DONDE R034FUN.TipCol EN (1,2) ORDENAR POR 1,3,4 |
Observación
El comando anterior también considera a los empleados que son despedidos .
Posiciones
Vincular registros
Los registros se vinculan mediante el código HR del puesto :
Registro en el sistema Senior | Registro con el proveedor de SST | Ejemplo | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
R024CAR.EstCar
R024CAR.CodCar
|
Campo: Código HR del PUESTO Formato:
|
|
Comandos de base de datos para saneamiento base
SELECT DISTINCT R024CAR.EstCar 'Estructura de posición', R024CAR.CodCar 'Código de posición', R024CAR.TitRed 'Título de posición', CAST(R024CAR.ESTCAR AS VARCHAR(10))+'/'+ CAST(R024CAR.CODCAR AS VARCHAR( 100)) 'CÓDIGO RH DO CARGO' DE R024CAR, R034FUN, R010SIT DONDE (R024CAR.DatExt >= getdate() O CAST(R024CAR.DatExt AS DATE) = '1900-12-31') Y R024CAR.ESTCAR = R034FUN. ESTCAR Y R024CAR.CODCAR = R034FUN.CODCAR Y R034FUN.SITAFA = R010SIT.CODSIT Y R010SIT.TIPSIT <> 7 ORDENAR POR 1,3 |
SELECT DISTINCT R024CAR.EstCar "Estructura de posición", R024CAR.CodCar "Código de posición", R024CAR.TitRed "Título de posición", R024CAR.EstCar || '/' || R024CAR.CodCar "Código HR de la POSICIÓN" FROM R024CAR, R034FUN, R010SIT WHERE (R024CAR.DatExt >= sysdate OR R024CAR.DatExt = TO_DATE('1900-12-31', 'AAAA-MM-DD')) AND R024CAR ESTCAR = R034FUN.ESTCAR Y R024CAR.CODCAR = R034FUN.CODCAR Y R034FUN.SITAFA = R010SIT.CODSIT Y R010SIT.TIPSIT <> 7 ORDENAR POR 1,3. |
Sectores (Ubicaciones)
Vincular registros
Los registros se vinculan mediante el código HR del sector :
Registro en el sistema Senior | Registro con el proveedor de SST | Ejemplo | ||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
R016HIE.TabOrg
R016HIE.CodLoc
|
Campo: Código SECTOR RRHH Formato:
|
|
Comandos de base de datos para saneamiento base
SELECT DISTINCT R016HIE.TabOrg 'Organigrama', R016HIE.CodLoc 'Código de sector', R016ORN.LocNom 'Nombre del sector', CAST(R016HIE.TABORG AS VARCHAR(200)) +'/'+ R016HIE.CODLOC 'CÓDIGO HR DEL SECTOR ' DESDE R016ORN, R016HIE, R034FUN, R010SIT DONDE R016ORN.TabOrg = R016HIE.TabOrg AND R016ORN.NumLoc = R016HIE.NumLoc AND R016HIE.DatIni = (SELECCIONE MAX(DATINI) DESDE R016HIE H DONDE R016ORN.Tab Org = H.TabOrg Y R016ORN. NumLoc = H.NumLoc AND H.DatIni <= GETDATE()) AND (R016ORN.DatExt >= getdate() OR CAST(R016ORN.DatExt AS DATE) = '1900-12-31') AND R016ORN.taborg = R034FUN. taborg AND R016HIE.numloc = R034FUN.numloc AND R034FUN.SITAFA = R010SIT.CODSIT AND R010SIT.TIPSIT <> 7 ORDENAR POR 1,2,3 |
SELECT DISTINCT R016HIE.TabOrg "Organigrama", R016HIE.CodLoc "Código de sector", R016ORN.LocNom "Nombre del sector", R016HIE.TabOrg || '/' || R016HIE.CodLoc "Código de recursos humanos del sector" DE R016ORN, R016HIE, R034FUN, R010SIT DONDE R016ORN.TabOrg = R016HIE.TabOrg AND R016ORN.NumLoc = R016HIE.NumLoc AND R016HIE.DatIni = (SELECT MAX(DATINI) FROM R016 HIE H DONDE R016ORN TabOrg. = H.TabOrg AND R016ORN.NumLoc = H.NumLoc AND H.DatIni <= SYSDATE) AND (R016ORN.DatExt >= sysdate OR R016ORN.DatExt = TO_DATE('1900-12-31', 'AAAA-MM-DD ' )) AND R016ORN.taborg = R034FUN.taborg AND R016HIE.numloc = R034FUN.numloc AND R034FUN.SITAFA = R010SIT.CODSIT AND R010SIT.TIPSIT <> 7 ORDENAR POR 1,2,3 |
Sucursales
Vincular registros
Los registros se vinculan mediante el código HR de la sucursal :
Registro en el sistema Senior | Registro con el proveedor de SST | Ejemplo | |||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
R030FIL.CodFil
|
Campo: Código HR DE SUCURSAL Formato:
|
|
Comandos de base de datos para saneamiento base
SELECCIONE R030FIL.NumEmp 'Empresa', R030EMP.NomEmp 'Nombre de la empresa', R030FIL.CodFil 'Código de sucursal', R030FIL.NomFil 'Nombre de sucursal', R030FIL.RazSoc 'Nombre de la empresa brasileña', R030FIL.CodFil 'Código HR Sucursal', CASO R030FIL.TipIns CUANDO 1 ENTONCES 'CNPJ' CUANDO 2 ENTONCES 'CEI' CUANDO 3 ENTONCES 'CPF' ELSE null END 'Tipo de registro', CASO R030FIL.TipIns CUANDO 1 ENTONCES CASO CUANDO (REPLACE(R030FIL.NumCGC, '.', '') = nulo) ENTONCES nulo ELSE (SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),1,2) + '.' + SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL. NumCGC, '.', '')),3,3) + '.' + SUBSTRING(CONVERTIR(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),6,3) + '/' + SUBCADE(CONVERTIR(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),9,4) + '-' + SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.', '')) ,13,2)) FINAL CUANDO 2 ENTONCES CASO CUANDO (REPLACE(R030FIL.NumCGC, '.', '') = null) ENTONCES null ELSE (SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, ' .', ' ')),1,2) + '.' + SUBSTRING(CONVERTIR(CHAR, REEMPLAZAR(R030FIL.NumCGC, '.', '')),3,3) + '.' (CHAR, REEMPLAZAR (R030FIL.NumCGC) , '.', '')),6,5) + '/' + SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),11, 2)) FINAL CUANDO 3 ENTONCES CASO CUANDO (REPLACE(R030FIL.NumCGC, '.', '') = nulo) ENTONCES nulo ELSE (SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.', '')) ,1,3) + '. ' + SUBSTRING(CONVERTIR(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),4,3) + '.' NumCGC, '.', '')),7,3) + '-' + SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),10,2)) END ELSE null END 'Número de registro', CASE WHEN (R030FIL.InsCei = 0) THEN null ELSE R030FIL. InsCei END 'Número de registro CEI', CASO CUANDO (R030FIL.NumCno = 0) ENTONCES nulo ELSE R030FIL.NumCno END 'Número de registro en CNO', CASO CUANDO (R030FIL.NCaepf = 0) ENTONCES nulo ELSE R030FIL.NCaepf END 'Registro CAEPF número' DE R030FIL, R030EMP DONDE R030Emp.NumEmp = R030FIL.NumEmp ORDENAR POR 1,3,4 |
seleccione SUCURSAL", CASO R030FIL.TipIns CUANDO 1 ENTONCES 'CNPJ' CUANDO 2 ENTONCES 'CEI' CUANDO 3 ENTONCES 'CPF' ELSE NULL END "Tipo de registro", CASO R030FIL.TipIns CUANDO 1 ENTONCES DECODE(REPLACE(R030FIL.NumCGC, ' .', ''), nulo, nulo, SUBSTR(REPLACE(R030FIL.NumCGC, '.', ''),1,2) || SUBSTR(REPLACE(R030FIL.NumCGC, '.', ''), 3,3) || '.' || SUBSTR(R030FIL.NumCGC, '.', ''),6,3) || '.', ''),9,4) || SUBSTR(REPLACE(R030FIL.NumCGC, '.', ''),13,2)) CUANDO 2 ENTONCES DECODIFICA (REPLACE(R030FIL.NumCGC, '.', ''),null, null, SUBSTR(REPLACE(R030FIL. NumCGC, '.', ''),1,2) || SUBSTR(REPLACE(R030FIL.NumCGC, '. ', ''),3,3) || SUBSTR(R030FIL.NumCGC, ' .', ''),6,5) || NumCGC, '.', ''),11,2)) CUANDO 3 ENTONCES DECODIFICAR(REPLACE(R030FIL.NumCGC, '.', ''), 0, ' ', SUBSTR(REPLACE(R030FIL.NumCGC, '.' , ''),1,3) ||'.'|| SUBSTR(REPLACE(R030FIL.NumCGC, '.', ''),4,3) ||'.'|| SUBSTR(REPLACE(R030FIL.NumCGC, '.', ''),7,3) ||'-'|| SUBSTR(REPLACE(R030FIL.NumCGC, '.', ''),10,2)) ELSE null END "Número de registro", DECODE(R030FIL.InsCei, 0, null, R030FIL.InsCei) "Número de registro CEI", DECODE (R030FIL.NumCno, 0, null, R030FIL.NumCno) "Número de registro CNO", DECODE(R030FIL.NCaepf, 0, null, R030FIL.NCaepf) "Número de registro CAEPF" FROM R030FIL, R030EMP DONDE R030Emp.NumEmp = R030FIL.NumEmp ORDENAR POR 1,3,4 |
Centros de costos
Vincular registros
Los registros se vinculan mediante el código HR del centro de coste :
Registro en el sistema Senior | Registro con el proveedor de SST | Ejemplo | |||||||||
---|---|---|---|---|---|---|---|---|---|---|---|
R018CCU.CodCcu
|
Campo: Código HR CENTRO DE COSTOS Formato:
|
|
Comandos de base de datos para saneamiento base
SELECCIONE DISTINTO R018CCU.NumEmp 'Empresa', R030EMP.EmpName 'Nombre de la empresa', R018CCU.CodCcu 'Código del centro de costos', R018CCU.NumCcu 'Descripción del centro de costos', R018CCU.CodCcu 'CÓDIGO RH DEL CENTRO DE COSTOS' DE R030EMP, R018CCU, R034FUN , R010SIT DONDE R018CCU.NUMEMP = R030EMP.NUMEMP AND R018CCU.NUMEMP = R034FUN.NUMEMP AND R018CCU.CODCCU = R034FUN.CODCCU AND (R018CCU.DatExt >= getdate() OR CAST(R018CCU.DatExt AS DATE) = '1900-12 -31') Y R034FUN.SITAFA = R010SIT.CODSIT Y R010SIT.TIPSIT <> 7 ORDENAR POR 1,3 |
SELECCIONE DISTINTO R018CCU.NumEmp "Empresa", R030EMP.EmpName "Nombre de la empresa", R018CCU.CodCcu "Código del centro de costos", R018CCU.NumCcu "Descripción del centro de costos", R018CCU.CodCcu "CÓDIGO HR DEL CENTRO DE COSTOS" DE R030EMP, R018CCU, R034FUN, R010SIT DONDE R018CCU.NUMEMP = R030EMP.NUMEMP AND R018CCU.NUMEMP = R034FUN.NUMEMP AND R018CCU.CODCCU = R034FUN.CODCCU AND (R018CCU.DatExt >= sysdate OR R018CCU.DatExt = TO_DATE('1900- 12-31', 'AAAA-MM-DD')) Y R034FUN.SITAFA = R010SIT.CODSIT Y R010SIT.TIPSIT <> 7 ORDENAR POR 1,3 |