Criar texto do corpo de procedimento ofuscado

Como uma alternativa ao uso do método de procedimento wrap_proc(), também é possível criar o corpo ofuscado do procedimento em uma etapa separada, da seguinte forma:

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)

O procedimento integrado wrap_nzplsql() gera o texto do corpo ofuscado, que pode ser inserido diretamente em um comando CREATE OR REPLACE PROCEDURE, da seguinte forma:

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