This is how to generate a variable with number matching:
#delimit;
egen poten_indo = anymatch(digit4n), values(
7201 7207 7113 8419 8003 8311 1804 1703 2902 6114 0906 3906 7305 4401 7208 6111 6406 5503 1605 0802 1212 8007 8538 7407 5205 0801
);
#delimit cr