sts = mpi_access.cancel( source, tag, datatype, outcount, flag ) ;
if ( sts != MPI_SUCCESS || !flag ) {
mpi_access.errorString(sts, msgerr, &lenerr) ;
sts = mpi_access.cancel( source, tag, datatype, outcount, flag ) ;
if ( sts != MPI_SUCCESS || !flag ) {
mpi_access.errorString(sts, msgerr, &lenerr) ;