my $heading;

                            my $heading;

                            my $heading_authtype_code;

                            my $heading_authtype_code;

                            $heading_authtype_code = GuessAuthTypeCode($marcrecord);

                            $heading_authtype_code = GuessAuthTypeCode($marcrecord);

                            $heading = C4::AuthoritiesMarc::GetAuthorizedHeading({ record => $marcrecord });

                            $heading = C4::AuthoritiesMarc::GetAuthorizedHeading({ record => $marcrecord });

                            my $breedingid = ImportBreedingAuth( $marcrecord, $serverhost[$k], $encoding[$k], $heading );

                            my $breedingid = ImportBreedingAuth( $marcrecord, $serverhost[$k], $encoding[$k], $heading );