Crear texto de cuerpo de procedimiento ofuscado

Como alternativa a la utilización del método de procedimiento wrap_proc(), también puede crear el cuerpo ofuscado del procedimiento en un paso independiente, como se indica a continuación:

TEST.TESTSCH(USR)=> CALL wrap_nzplsql(BEGIN_PROC BEGIN RAISE NOTICE 'The 
customer name is alpha'; END; END_PROC);
                                 wrap_nzplsql                                                                    
----------------------------------------------------------------------
TlpQU1FMV1JBUDEwVE5jZlh5TnpYbndCNkV5VFFMRTBiQT09JGE5N2p6ZEdJSVZwTTRrWm
RRM0I3WmUxZERZeWd6YkdjTWkxTzQrL1dCMmpqRGQvak9lUzFQQjArNGdlM08yZVdxUjRI
MTFaTnROUmwKdk5xSm0wb1RPZz09
(1 row)

El procedimiento incorporado wrap_nzplsql() genera el texto del cuerpo ofuscado, que puede entrar directamente en un mandato CREATE OR REPLACE PROCEDURE, como se indica a continuación:

TEST.TESTSCH(USR)=> CREATE OR REPLACE PROCEDURE customer() RETURNS INT4 
LANGUAGE NZPLSQL AS 
'TlpQU1FMV1JBUDEwVE5jZlh5TnpYbndCNkV5VFFMRTBiQT09JGE5N2p6ZEdJSVZwTTRrW
mRRM0I3WmUxZERZeWd6YkdjTWkxTzQrL1dCMmpqRGQvak9lUzFQQjArNGdlM08yZVdxUjR
IMTFaTnROUmwKdk5xSm0wb1RPZz09';
CREATE PROCEDURE