Saneamiento de la base de proveedores — OSG
Extraer informaciones usando comandos en la base de datos
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 y ramas).
Saneamiento de datos:
Colaboradores
Vincular registros
Los registros se vinculan mediante el código de identificación del proveedor del SST :
| Registro en el sistema de la Senior | Registro en el prestador SST* | Ejemplo | ||||||
|---|---|---|---|---|---|---|---|---|
R034FUN.NumCad
|
Campo: Código de identificación del proveedor de SST 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)) 'Cod. IDENTIFICACIÓN. Proveedor SST', '' 'Código de empleado', R034FUN.NomFun 'Nombre del empleado', CASO CUANDO (convert(varchar, R034FUN.DatNas, 103) = '31/12/1900') ENTONCES null 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 null ELSE (convert(varchar, R034FUN.DatAdm, 103)) END 'Dt.Admissão', CASE WHEN (convert(varchar, R038AFA.DatAfa, 103) = '31/12/1900') ENTONCES null ELSE (convert(varchar , R038AFA.DatAfa, 103)) FIN 'Dt.Despido', CASO 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 'Unión Estable' 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 'Período 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' MÁS 'Empleado' FINALIZA 'Contratación', R033PES.NumCid 'Rg', R033PES.EstCid 'UF-RG', CASO CUANDO R034FUN.NumCPF = 0 ENTONCES ' ' CUANDO R034FUN.NumCPF ES NULO ENTONCES ' ' CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 1)) ENTONCES (SUBSTRING ('0000000000' + CONVERTIR(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('0000000000' + CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' (CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('0000000000' + CONVERTIR(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0 ) Y (LEN (R034FUN.NumCPF)= 2)) ENTONCES (SUBSTRING('000000000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('000000000' + CONVERT(CHAR, R034FUN .NumCPF)) ,10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 3)) ENTONCES (SUBSTRING('00000000' + CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('00000000' + CONVERTIR(CHAR, R034FUN.NumCPF),4,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) + '.' + CONVERT( CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('0000000' + CONVERT(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' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('000000' + CONVERTIR(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' + CONVERT(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' + CONVERT( CHAR, R034FUN.NumCPF),4,3) + '.' (CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING('0000' + CONVERTIR(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' + CONVERT(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING( '000' + CONVERT(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' + CONVERTIR(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING('00' + CONVERTIR(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING ('00' + CONVERT(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) AND (LEN(R034FUN. NumCPF)= 10)) ENTONCES (SUBSTRING('0' + CONVERT (CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING('0' + CONVERT(CHAR, R034FUN.NumCPF),4,3 ) + '.' , R034FUN.NumCPF),7,3) + '-' + SUBSTRING('0' + CONVERT(CHAR, R034FUN.NumCPF),10,2)) CUANDO ((R034FUN.NumCPF <> 0) Y (LEN(R034FUN.NumCPF)= 11)) ENTONCES (SUBSTRING(CONVERT(CHAR, R034FUN.NumCPF),1,3) + '.' + SUBSTRING(CONVERT(CHAR, R034FUN.NumCPF),4,3) + '.' + SUBSTRING (CONVERT(CHAR, R034FUN.NumCPF),7,3) + '-' + SUBSTRING(CONVERT(CHAR, R034FUN.NumCPF),10,2)) ELSE '' END 'CPF' FROM R034FUN interno unirse a R030EMP en (R030EMP .NumEmp = R034FUN.NumEmp) unirse internamente a R030CAR en (R030CAR.NumEmp = R034FUN.NumEmp AND R030CAR.EstCar = R034FUN.EstCar AND R030CAR.DatAlt = (SELECT MAX(C.DATALT) FROM R030CAR C WHERE 0EMP .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 = (SELECT MAX(O.DATALT) FROM R030ORG O WHERE R030EMP.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) R016HIE H DONDE R034 FUN.TabOrg = H.TabOrg AND R034FUN.NumLoc = H.NumLoc AND H.DatIni <= GETDATE())) unión interna R030FIL en (R030FIL.NumEmp = R034FUN.NumEmp AND R030FIL.CodFil = R034FUN.CodFil) interno unirse a R010SIT en (R010SIT. CodSit = R034FUN.SitAfa) unirse a la izquierda R033PES en (R033PES.CodPES = R034FUN.CodPes) unirse a la izquierda R038AFA en (R038AFA.numemp = R034FUN.NumEmp AND R038AFA.TipCol = R034FUN.tipcol AND 8AFA.NumCad = R034FUN numcad Y r038afa sitafa en (SELECCIONE S.codsit DE r010sit S DONDE S.tipsit = 7)) DONDE R034FUn.tipcol EN (1,2) ORDEN 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 "Cod. IDENTIFICACIÓN. Proveedor SST", '' "Código de empleado", R034FUN.FunName "Nombre del empleado", DECODE(TO_CHAR(R034FUN.DatNas, 'DD/MM/AAAA'), '31/12/1900', nulo, 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'), '31/12/ 1900', null, TO_CHAR(R038AFA.DATAFA, 'DD/MM/AAAA')) "Dt.Dismissal", 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 'Unión Estable' CUANDO 9 ENTONCES 'Otros' MÁS 'Soltero' FIN "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 opción 'Empleado' FINALIZA "Contratación" , 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 .
Cargos
Vincular registros
Los registros se vinculan mediante el código de identificación del proveedor del SST :
| Registro en el sistema de la Senior | Registro en el prestador SST* | Ejemplo | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
R024CAR.EstCar R024CAR.CodCar |
Campo: Código de identificación del proveedor de SST 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)) 'Bacalao. IDENTIFICACIÓN. Cargo Prestador SST' FROM R024CAR, R034FUN, R010SIT WHERE (R024CAR.DatExt >= getdate() OR CAST(R024CAR.DatExt AS DATE) = '1900-12-31') AND R024CAR.ESTCAR = R034FUN.ESTCAR AND 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 "Cod. IDENTIFICACIÓN. Posición del proveedor de SST" DESDE 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
La relación de los registros es hecha por el código RR.HH del sector:
| Registro en el sistema de la Senior | Registro en el prestador SST* | Ejemplo | ||||||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
R016HIE.TabOrg R016HIE.CodLoc |
Campo: Código de identificación del proveedor de SST Formato:
|
|
||||||||||||
Comandos de base de datos para saneamiento base
SELECT DISTINCT R016HIE.TabOrg 'Tabla organizativa', R016HIE.CodLoc 'Código de sector', R016ORN.LocNom 'Nombre del sector', CAST(R016HIE.TABORG AS VARCHAR(200)) +'/'+ R016HIE.CODLOC 'Cod. IDENTIFICACIÓN. Sector proveedor SST' DE R016ORN, R016HIE, R034FUN, R010SIT DONDE R016ORN.TabOrg = R016HIE.TabOrg AND R016ORN.NumLoc = R016HIE.NumLoc AND R016HIE.DatIni = (SELECT MAX(DATINI) FROM R016HIE H WHERE R0 ORN.TabOrg = H. TabOrg AND 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 "Cod. IDENTIFICACIÓN. Sector proveedor SST" DESDE R016ORN, R016HIE, R034FUN, R010SIT DONDE R016ORN.TabOrg = R016HIE.TabOrg AND R016ORN.NumLoc = R016HIE.NumLoc AND R016HIE.DatIni = (SELECT MAX(DATINI) FROM R016HIE H DONDE R0 ORN.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
La relación de los registros es hecha por el código RR.HH de la sucursal:
| Registro en el sistema de la Senior | Registro en el prestador SST* | Ejemplo | |||||||||
|---|---|---|---|---|---|---|---|---|---|---|---|
R030FIL.CodFil
|
Campo: Código de identificación del proveedor de SST 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.FilNom 'Nombre de sucursal', R030FIL.RazSoc 'Nombre de sucursal', R030FIL.CodFil 'Código de identificación de sucursal Prestador SST' , CASO R030FIL.TipIns CUANDO 1 ENTONCES 'CNPJ' CUANDO 2 ENTONCES 'CEI' CUANDO 3 ENTONCES 'CPF' ELSE null END 'Tipo de inscripción', 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, '.', '')),9,4 ) + '-' + SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.' , '')),13,2)) FINAL CUANDO 2 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) + '.' CONVERTIR(CHAR, REPLACE(R030FIL.NumCGC, '.', '')),6,5) + '/' + SUBSTRING(CONVERTIR( CHAR, REEMPLAZAR (R030FIL.NumCGC, '.', '')),11, 2)) FINAL CUANDO 3 ENTONCES CASO CUANDO (REPLACE(R030FIL.NumCGC, '.', '') = nulo) ENTONCES nulo ELSE (SUBSTRING (CONVERTIR(CHAR, REEMPLAZAR(R030FIL.NumCGC, '.', '') ),1,3) + '.' + SUBSTRING(CONVERTIR(CHAR, REEMPLAZAR(R030FIL.NumCGC, '.', '')), 4,3) + '.' .NumCGC, '.', '')),7,3) + '-' + SUBSTRING(CONVERT(CHAR, REPLACE(R030FIL.NumCGC, '.', '')), 10,2)) END ELSE null END 'Número de registro', CASO CUANDO (R030FIL.InsCei = 0) ENTONCES nulo ELSE R030FIL.InsCei END 'Número de registro CEI', CASO CUANDO (R030FIL.NumCno = 0) ENTONCES nulo ELSE R030FIL. NumCno END 'Número de registro no CNO', CASO CUANDO (R030FIL.NCaepf = 0) ENTONCES null ELSE R030FIL.NCaepf END 'Número de registro CAEPF' FROM R030FIL, R030EMP DONDE R030Emp.NumEmp = R030FIL.NumEmp ORDENAR POR 1,3,4 |
seleccione Proveedor SST", 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 DECODIFICAR(REPLACE(R030FIL. NumCGC, '.', ''),null, null, SUBSTR(REPLACE( R030FIL.NumCGC, '.', ''),1,2) || .', ''),3,3) || .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 |
English
Español


