Look at the picture, I did it in the same worksheet for clarity.
Procedure codes to look for are in F1:F2
In G2 write the array formula (Ctrl Shift Enter to enter this formula):
=IFERROR(SMALL(IF(ISNUMBER(SEARCH($F$1;$D$2:$D$6))+ISNUMBER(SEARCH($F$2;$D$2:$D$6))>1;ROW($A$2:$A$6)-ROW($A$2)+1;"");ROWS($A$2:A2));"")
Copy this formula down till you sure it will cover the maximum possible matches.
Now in H2 write the formula:
=IF($G2="";"";INDEX(A$2:A$6;$G2))
Copy the formula right till K2 and then down at will (just like the first formula)
Depending on your regional settings you may need to replace field separator ";" by ","