CREATE OR REPLACE FUNCTION GETNAMES(numero CREATURE.CREATUREID%TYPE)
RETURN VARCHAR2
IS
chaine VARCHAR2(200);
TYPE tableOfNames IS TABLE OF CreatureName.creatureNameId%TYPE INDEX BY BINARY_INTEGER;
myTable tableOfNames;
BEGIN
    chaine:='[';

    SELECT creatureNameId BULK COLLECT INTO myTable FROM CreatureName WHERE CREATUREID=numero;
    IF(myTable.count>1)
    THEN
        FOR i IN myTable.FIRST .. myTable.LAST-1 LOOP
            chaine:=chaine||myTable(i)||',';
        END LOOP;
        chaine:=chaine||myTable(myTable.LAST);
    ELSE
        IF(myTable.COUNT=1)
        THEN
            chaine:=chaine||myTable(1);
        END IF;
    END IF;

    chaine:=chaine||']';
    RETURN chaine;
END;