How to convert this simple fortran loop to acc loop

Accelerated Computing HPC Compilers Legacy PGI Compilers
1

Hi,

I am converting the following code to openacc loop:

do i = 1, n
  sort (array(:)) ! This function will be replaced by thrust key-value sort
                           ! Which I don't know how but it seems possible
  idx = findloc(array, somenumber) 
enddo

I simplified the code to

!$acc kernels
do i=1, n
  idx = findloc(array, somenumber)
enddo
!$acc end kernels

yields the following error

Call to PGI runtime function not supported - pghpfio_ldw

Is there any similar “findloc” function which I could use in OpenACC ?