Colombia -Dian – Digito de verificación
create or replace function verifydv(doc varchar)returns intlanguage plpgsql as $$declarexx int:=0;docArray text[];sumadigitos int=0;div float;vpri int[]:=ARRAY[71,67,59,53,47,43,41,37,29,23,19,17,13,7,3];beginraise notice ‘doc %’,doc;if length(trim(regexp_replace(doc,’W’,”,’g’)))>1 and regexp_like(regexp_replace(doc,’W’,”,’g’),’^[d]+$’) thenraise notice ‘doc1 %’,doc;select regexp_split_to_array(doc,”) into docArray;for j in array_lower(docArray, 1) .. array_upper(docArray, 1)loopsumadigitos=sumadigitos::int…