App-PhotoDB

 view release on metacpan or  search on metacpan

migrations/002-functions.sql  view on Meta::CPAN

SET @saved_cs_client      = @@character_set_client ;
SET @saved_cs_results     = @@character_set_results ;
SET @saved_col_connection = @@collation_connection ;
SET character_set_client  = utf8 ;
SET character_set_results = utf8 ;
SET collation_connection  = utf8_general_ci ;
SET @saved_sql_mode       = @@sql_mode ;
SET sql_mode              = 'NO_AUTO_CREATE_USER,NO_ENGINE_SUBSTITUTION' ;
CREATE FUNCTION `DISPLAYSIZE`(`width` decimal(5,2), `height` decimal(5,2)) RETURNS varchar(10) CHARSET utf8mb4 COLLATE utf8mb4_unicode_ci
    DETERMINISTIC
BEGIN
  declare size varchar(10);
  set size = concat(ifnull((trim(width) + 0),'?'),'×',ifnull((trim(height) + 0),'?'), '"');
RETURN size;
END ;;
SET sql_mode              = @saved_sql_mode ;
SET character_set_client  = @saved_cs_client ;
SET character_set_results = @saved_cs_results ;
SET collation_connection  = @saved_col_connection ;
SET @saved_cs_client      = @@character_set_client ;
SET @saved_cs_results     = @@character_set_results ;
SET @saved_col_connection = @@collation_connection ;
SET character_set_client  = utf8 ;
SET character_set_results = utf8 ;
SET collation_connection  = utf8_general_ci ;
SET @saved_sql_mode       = @@sql_mode ;
SET sql_mode              = 'NO_AUTO_CREATE_USER,NO_ENGINE_SUBSTITUTION' ;
CREATE FUNCTION `lenstype`(n int) RETURNS varchar(32) CHARSET utf8mb4 COLLATE utf8mb4_unicode_ci
BEGIN
declare x varchar(32);
if n <= 8 then set x = 'Super telephoto' ;
elseif n > 8 and n <= 25 then set x ='Medium telephoto';
elseif n > 25 and n <= 39 then set x ='Short telephoto';
elseif n > 39 and n <= 62 then set x ='Normal';
elseif n > 62 and n <= 84 then set x ='Wide angle';
elseif n > 84 and n <= 120 then set x ='Super wide angle';
else set x = 'Fisheye';
end if;
RETURN x;
END ;;
SET sql_mode              = @saved_sql_mode ;
SET character_set_client  = @saved_cs_client ;
SET character_set_results = @saved_cs_results ;
SET collation_connection  = @saved_col_connection ;
SET @saved_cs_client      = @@character_set_client ;
SET @saved_cs_results     = @@character_set_results ;
SET @saved_col_connection = @@collation_connection ;
SET character_set_client  = utf8 ;
SET character_set_results = utf8 ;
SET collation_connection  = utf8_general_ci ;
SET @saved_sql_mode       = @@sql_mode ;
SET sql_mode              = 'NO_AUTO_CREATE_USER,NO_ENGINE_SUBSTITUTION' ;
CREATE FUNCTION `lookupneg`(p_film_id int, p_frame varchar(5)) RETURNS int(11)
    DETERMINISTIC
BEGIN
	declare negid int;
    select negative_id into negid
    from NEGATIVE
    where film_id = p_film_id
		and frame = p_frame collate utf8mb4_general_ci;
RETURN negid;
END ;;
SET sql_mode              = @saved_sql_mode ;
SET character_set_client  = @saved_cs_client ;
SET character_set_results = @saved_cs_results ;
SET collation_connection  = @saved_col_connection ;
SET @saved_cs_client      = @@character_set_client ;
SET @saved_cs_results     = @@character_set_results ;
SET @saved_col_connection = @@collation_connection ;
SET character_set_client  = utf8 ;
SET character_set_results = utf8 ;
SET collation_connection  = utf8_general_ci ;
SET @saved_sql_mode       = @@sql_mode ;
SET sql_mode              = 'NO_AUTO_CREATE_USER,NO_ENGINE_SUBSTITUTION' ;
CREATE FUNCTION `printbool`(b int) RETURNS varchar(3) CHARSET utf8mb4 COLLATE utf8mb4_unicode_ci
    DETERMINISTIC
BEGIN
return if(b, 'Yes', 'No');
END ;;
SET sql_mode              = @saved_sql_mode ;
SET character_set_client  = @saved_cs_client ;
SET character_set_results = @saved_cs_results ;
SET collation_connection  = @saved_col_connection ;
SET @saved_cs_client      = @@character_set_client ;
SET @saved_cs_results     = @@character_set_results ;
SET @saved_col_connection = @@collation_connection ;
SET character_set_client  = utf8 ;
SET character_set_results = utf8 ;
SET collation_connection  = utf8_general_ci ;
SET @saved_sql_mode       = @@sql_mode ;
SET sql_mode              = 'NO_AUTO_CREATE_USER,NO_ENGINE_SUBSTITUTION' ;
CREATE PROCEDURE `print_unarchive`(IN printId int)
BEGIN
UPDATE PRINT set archive_id = null WHERE print_id = printId;
END ;;
SET sql_mode              = @saved_sql_mode ;
SET character_set_client  = @saved_cs_client ;
SET character_set_results = @saved_cs_results ;
SET collation_connection  = @saved_col_connection ;



( run in 0.720 second using v1.01-cache-2.11-cpan-39bf76dae61 )