Paste code

--6.- PROVEEDORES 7.- CLIENTES
		    SELECT CASE WHEN LENGTH(RUC_PROV) = 11 AND RUC_PROV LIKE &#039;10%&#039; THEN SUBSTRING(RUC_PROV, 3, 8) 
		               ELSE RUC_PROV END NUMDOC
				  ,CASE WHEN LENGTH(RUC_PROV) = 11 AND RUC_PROV LIKE &#039;10%&#039; then &#039;1&#039; 
				        WHEN LENGTH(RUC_PROV) = 11 AND RUC_PROV LIKE &#039;20%&#039; then &#039;2&#039; 
				        WHEN LENGTH(RUC_PROV) = 8 then &#039;1&#039; 
				        ELSE &#039;3&#039; end  Cod_Tipo_Documento
		          ,MAX(cast(case WHEN LOWER(RELACION_DSC) LIKE &#039;%cliente%&#039; then &#039;7.- CLIENTES&#039;
				                 ELSE &#039;6.- PROVEEDORES&#039; end AS varchar(50))) CATEGORIA
			, 0 FLG_ADI
			, &#039;.&#039; logica_banca_mes_val, &#039;.&#039; logica_banca_fin_val
			, &#039;.&#039; Banca_Mes_Val, &#039;.&#039; Banca_Fin_Val
			, &#039;.&#039; LOGICA
			, 0 FLG_MERCADO_BPE
			, 0 FLG_NUEVO_MERCADO_BPE
			, 0 FLG_RESCATE_BPE
			, 0 FLG_RESCATE_MICRO
			, 0 FLG_PJ
		    , 0 FLG_CTA_NEG
		    , MAX(case when LOWER(RELACION_DSC) LIKE &#039;%proveedor%&#039; then 1 else 0 end) FLG_PROVEEDORES
			, MAX(case when LOWER(RELACION_DSC) LIKE &#039;%cliente%&#039; then 1 else 0 end) FLG_CLIENTES
			, 0 FLG_RESCATE_BE
		    , 0 FLG_BARRIDO_TLV_BPE
			, 0 FLG_PNCN
			, 0 FLG_RETAIL
			, 0 FLG_ADQUISION_RIESGOS
			, 0 FLG_RRLL_BPE_PJ
			, 0 FLG_RRLL_DNI_CARNETEXT
			FROM E_DW_VIEWS.V_MST_VPC_BASES_ECOSIS_BC
			WHERE CAST(TO_CHAR(FECHA_BASE_DT, &#039;YYYYMM&#039;) AS INT) <= 202406  --- este se reemplaza por el parametro del SP
			GROUP BY CASE WHEN LENGTH(RUC_PROV) = 11 AND RUC_PROV LIKE &#039;10%&#039; THEN SUBSTRING(RUC_PROV, 3, 8) 
		                  ELSE RUC_PROV END
		            ,CASE WHEN LENGTH(RUC_PROV) = 11 AND RUC_PROV LIKE &#039;10%&#039; then &#039;1&#039; 
				          WHEN LENGTH(RUC_PROV) = 11 AND RUC_PROV LIKE &#039;20%&#039; then &#039;2&#039; 
				          WHEN LENGTH(RUC_PROV) = 8 then &#039;1&#039; 
				          ELSE &#039;3&#039; END