loop_role = “y”
¡provider_id = formas! frm_list_external_companies.cmb_placing
strSQL = “[fk_role_provider] =” y provider_id
rs_roles.FindFirst
Hacer mientras que loop_role = “y” y no rs_roles.EOF
Si rs_roles.NoMatch entonces
loop_role = “n”
…
Terminar si
strSQL de rs_roles.FindNext
Terminar mientras que