Delete OBR and Corresponding OBX Segments

[JJWest12]

I am trying to write a transformer to delete an OBR and every OBX associated to it when OBR.25 = P. I am struggling to figure out the syntax for deleting the OBX segments however. What I have below is not deleting anything other than the OBR. Can someone point out what I am mssing?

for(i=msg['OBR'].length()-1; i>=0; i--){
    if(msg['OBR'][i]['OBR.25']['OBR.25.1'].toString() == 'P'){
        for each(obx in getSegmentsAfter(msg,msg.OBR[i],'OBX',false)){
            delete obx
        }
delete msg['OBR'][i]
     }
}

[pacmano1]

using obr 2.1 here, but same thing.

for each (obr in msg.OBR) {
  if (obr['OBR.2']['OBR.2.1'].toString() == 'P') {
      for each (obx in getSegmentsAfter(msg, obr , 'OBX', true)) {
      	delete obx[0]
      }
      delete obr[0]
  }
}