@@ -, +, @@ git grep getzipnamecity --- C4/Members.pm | 20 -------------------- 1 file changed, 20 deletions(-) --- a/C4/Members.pm +++ a/C4/Members.pm @@ -66,7 +66,6 @@ BEGIN { &GetPendingIssues &GetAllIssues - &getzipnamecity &getidcity &GetFirstValidEmailAddress @@ -1357,25 +1356,6 @@ sub get_cardnumber_length { return ( $min, $max ); } -=head2 getzipnamecity (OUEST-PROVENCE) - -take all info from table city for the fields city and zip -check for the name and the zip code of the city selected - -=cut - -sub getzipnamecity { - my ($cityid) = @_; - my $dbh = C4::Context->dbh; - my $sth = - $dbh->prepare( - "select city_name,city_state,city_zipcode,city_country from cities where cityid=? "); - $sth->execute($cityid); - my @data = $sth->fetchrow; - return $data[0], $data[1], $data[2], $data[3]; -} - - =head2 getdcity (OUEST-PROVENCE) recover cityid with city_name condition --