[[fjcg02]]

Puede parecer un poco dificil pero es válido.

Desglosas la clave en tres variables: fijo ( 'DJ')+ Letra+ nº ( funcion copy )
Si el nº es menor que 100, le sumas uno, la letra se mantiene strtoint(nº)>100
Si el nº es igual que 100, lo pones "001". Calculas la letra strtoint(nº )=100
Miras la última letra, la pasas a codigo ascii ( funcion ord ), le sumas uno y la conviertes a caracter ( funcion chr). chr(ord(letra)+1)
Por supuesto, tienes que hacer los pertinentes cast entre variables ( funciones strtoint y format ) para poder manejar variables de tipo numéricas y string en las funciones indicadas.
El problema que tienes es cuando llegues a la 'Z', pero o no se da el caso o tardará tanto en darse que te verás en cuatro días arreglando el 'fregao'.

Pues eso. Espero que te sirva.

Un saludo