CREATE MULTISET TABLE  ..................LD_VECTOR_VPC_PERSONA_02
   (DOCUMENTO_FINAL  varchar(25),
   RUC  varchar(25),
   DOCUMENTO_FINAL_RRLL  varchar(25)
   ) PRIMARY INDEX (DOCUMENTO_FINAL);

	INSERT INTO ..................LD_VECTOR_VPC_PERSONA_02 ( DOCUMENTO_FINAL,RUC,DOCUMENTO_FINAL_RRLL) 
	SELECT DISTINCT 
			X.DOCUMENTO_FINAL,
			X.RUC,
			CASE WHEN SUBSTR(TRIM(X.RUC),1,2) = '10'  THEN TRIM(X.DOCUMENTO_FINAL)
			  WHEN SUBSTR(TRIM(X.RUC),1,2) <> '10' AND X.TIPID_BDRELE = '1' AND LENGTH(TRIM(X.NUMID_BDRELE)) = 8 THEN TRIM(X.NUMID_BDRELE)
			  WHEN SUBSTR(TRIM(X.RUC),1,2) <> '10' AND X.TIPID_BDRELE = '1' AND LENGTH(TRIM(X.NUMID_BDRELE)) > 8 THEN SUBSTR(TRIM(X.NUMID_BDRELE),LENGTH(TRIM(X.NUMID_BDRELE))-7,8)
			  WHEN SUBSTR(TRIM(X.RUC),1,2) <> '10' AND X.TIPID_BDRELE = '1' AND LENGTH(TRIM(X.NUMID_BDRELE)) < 8 THEN X.TIPID_BDRELE||TRIM(X.NUMID_BDRELE)
			  WHEN SUBSTR(TRIM(X.RUC),1,2) <> '10' AND X.TIPID_BDRELE = '2' AND SUBSTR(TRIM(X.NUMID_BDRELE),1,2) = '10' THEN SUBSTR(TRIM(X.NUMID_BDRELE),3,8)
			  WHEN SUBSTR(TRIM(X.RUC),1,2) <> '10' AND X.TIPID_BDRELE = '2' AND SUBSTR(TRIM(X.NUMID_BDRELE),1,2) = '20' THEN TRIM(X.NUMID_BDRELE)
			  WHEN SUBSTR(TRIM(X.RUC),1,2) <> '10' AND X.TIPID_BDRELE NOT IN ('1''2') THEN X.TIPID_BDRELE||TRIM(X.NUMID_BDRELE) ELSE NULL 
			 END DOCUMENTO_FINAL_RRLL      
	FROM ..................LD_VECTOR_VPC_PERSONA X;