Try Dcount
Not sure I get it correctly but it seems to me that you are just wanting to do a count to see if the Job Code Exists. You could try something like.
If DCount("[JobCode]", "tblJobCodeInformation", "[JobCode] = [Forms]![frmShortageTicket]![txtJobCode]") Then
' Job code exists...