{"id":518,"date":"2021-05-24T14:32:35","date_gmt":"2021-05-24T18:32:35","guid":{"rendered":"https:\/\/tecgesco.com\/blog\/?p=518"},"modified":"2021-05-24T14:37:03","modified_gmt":"2021-05-24T18:37:03","slug":"procedure-firebird-valor-por-extenso","status":"publish","type":"post","link":"https:\/\/tecgesco.com\/blog\/procedure-firebird-valor-por-extenso\/","title":{"rendered":"Procedure Firebird &#8211; Valor por Extenso"},"content":{"rendered":"\n<p>Nesse artigo, ser\u00e1 descrito uma Procedure que recebe um valor num\u00e9rico e retorna uma Sting com o nome por extenso.<\/p>\n\n\n<pre class=\"wp-block-code\" aria-describedby=\"shcb-language-1\" data-shcb-language-name=\"PHP\" data-shcb-language-slug=\"php\"><span><code class=\"hljs language-php\">CREATE <span class=\"hljs-keyword\">OR<\/span> ALTER PROCEDURE <span class=\"hljs-string\">\"NUMERO_POR_EXTENSO\"<\/span> \n(\n  <span class=\"hljs-string\">\"PE_VL_NUMERO\"<\/span> NUMERIC(<span class=\"hljs-number\">15<\/span>, <span class=\"hljs-number\">2<\/span>)\n)\nRETURNS\n(\n  <span class=\"hljs-string\">\"PS_NUMERO_EXTENSO\"<\/span> VARCHAR(<span class=\"hljs-number\">240<\/span>)\n)\n<span class=\"hljs-keyword\">AS<\/span>\n<span class=\"hljs-keyword\">DECLARE<\/span> EXTENSO VARCHAR(<span class=\"hljs-number\">240<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> B1 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B2 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B3 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B4 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B5 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B6 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B7 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B8 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B9 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B10 INTEGER; \n<span class=\"hljs-keyword\">DECLARE<\/span> B11 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B12 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B13 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> B14 INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> L1 VARCHAR(<span class=\"hljs-number\">12<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L2 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L3 VARCHAR(<span class=\"hljs-number\">9<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L4 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L5 VARCHAR(<span class=\"hljs-number\">6<\/span>); \n<span class=\"hljs-keyword\">DECLARE<\/span> L6 VARCHAR(<span class=\"hljs-number\">8<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L7 VARCHAR(<span class=\"hljs-number\">12<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L8 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L9 VARCHAR(<span class=\"hljs-number\">9<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L10 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L11 VARCHAR(<span class=\"hljs-number\">6<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L12 VARCHAR(<span class=\"hljs-number\">8<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L13 VARCHAR(<span class=\"hljs-number\">12<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L14 VARCHAR(<span class=\"hljs-number\">3<\/span>); \n<span class=\"hljs-keyword\">DECLARE<\/span> L15 VARCHAR(<span class=\"hljs-number\">9<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L16 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L17 VARCHAR(<span class=\"hljs-number\">6<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L18 VARCHAR(<span class=\"hljs-number\">8<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L19 VARCHAR(<span class=\"hljs-number\">12<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L20 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L21 VARCHAR(<span class=\"hljs-number\">9<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L22 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L23 VARCHAR(<span class=\"hljs-number\">6<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L24 VARCHAR(<span class=\"hljs-number\">16<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L25 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L26 VARCHAR(<span class=\"hljs-number\">9<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L27 VARCHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L28 VARCHAR(<span class=\"hljs-number\">6<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> L29 VARCHAR(<span class=\"hljs-number\">17<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> VIRGULA_BI CHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> VIRGULA_MI CHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> VIRGULA_MIL CHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> VIRGULA_CR CHAR(<span class=\"hljs-number\">3<\/span>);\n<span class=\"hljs-keyword\">DECLARE<\/span> VALOR1 VARCHAR(<span class=\"hljs-number\">14<\/span>);\n<span class=\"hljs-comment\">\/*-- TABELA DE CENTENAS --*\/<\/span>\n<span class=\"hljs-keyword\">DECLARE<\/span> CENTENAS CHAR(<span class=\"hljs-number\">108<\/span>) = <span class=\"hljs-string\">'CENTO       DUZENTOS    TREZENTOS   QUATROCENTOSQUINHENTOS  SEISCENTOS  SETECENTOS  OITOCENTOS  NOVECENTOS  '<\/span>;\n<span class=\"hljs-comment\">\/*-- TABELA DE DEZENAS --*\/<\/span>\n<span class=\"hljs-keyword\">DECLARE<\/span> DEZENAS CHAR(<span class=\"hljs-number\">79<\/span>) = <span class=\"hljs-string\">'DEZ      VINTE    TRINTA   QUARENTA CINQUENTASESSENTA SETENTA  OITENTA  NOVENTA  '<\/span>; \n<span class=\"hljs-comment\">\/*-- TABELA DE UNIDADES --*\/<\/span>\n<span class=\"hljs-keyword\">DECLARE<\/span> UNIDADES CHAR(<span class=\"hljs-number\">54<\/span>) = <span class=\"hljs-string\">'UM    DOIS  TRES  QUATROCINCO SEIS  SETE  OITO  NOVE  '<\/span>;\n<span class=\"hljs-comment\">\/*-- TABELA DE UNIDADES DA DEZENA 10 --*\/<\/span>\n<span class=\"hljs-keyword\">DECLARE<\/span> UNID10   CHAR(<span class=\"hljs-number\">81<\/span>)  = <span class=\"hljs-string\">'ONZE     DOZE     TREZE    QUATORZE QUINZE   DEZESSEISDEZESSETEDEZOITO  DEZENOVE '<\/span>; \n<span class=\"hljs-keyword\">DECLARE<\/span> V_IMPLEMENTAR INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> I INTEGER;\n<span class=\"hljs-keyword\">DECLARE<\/span> V_VL_INTEIRO VARCHAR(<span class=\"hljs-number\">14<\/span>);\nbegin\n  EXTENSO = <span class=\"hljs-string\">''<\/span>;\n  L1 = <span class=\"hljs-string\">''<\/span>;\n  L2 = <span class=\"hljs-string\">''<\/span>;\n  L3 = <span class=\"hljs-string\">''<\/span>;\n  L4 = <span class=\"hljs-string\">''<\/span>;\n  L5 = <span class=\"hljs-string\">''<\/span>;\n  L6 = <span class=\"hljs-string\">''<\/span>;\n  VIRGULA_BI = <span class=\"hljs-string\">''<\/span>;\n  L7 = <span class=\"hljs-string\">''<\/span>;\n  L8 = <span class=\"hljs-string\">''<\/span>; \n  L9 = <span class=\"hljs-string\">''<\/span>;\n  L10 = <span class=\"hljs-string\">''<\/span>;\n  L11 = <span class=\"hljs-string\">''<\/span>;\n  L12 = <span class=\"hljs-string\">''<\/span>;\n  VIRGULA_MI = <span class=\"hljs-string\">''<\/span>;\n  L13 = <span class=\"hljs-string\">''<\/span>;\n  L14 = <span class=\"hljs-string\">''<\/span>;\n  L15 = <span class=\"hljs-string\">''<\/span>;\n  L16 = <span class=\"hljs-string\">''<\/span>;\n  L17 = <span class=\"hljs-string\">''<\/span>; \n  L18 = <span class=\"hljs-string\">''<\/span>;\n  VIRGULA_MIL = <span class=\"hljs-string\">''<\/span>;\n  L19 = <span class=\"hljs-string\">''<\/span>;\n  L20 = <span class=\"hljs-string\">''<\/span>;\n  L21 = <span class=\"hljs-string\">''<\/span>;\n  L22 = <span class=\"hljs-string\">''<\/span>;\n  L23 = <span class=\"hljs-string\">''<\/span>;\n  L24 = <span class=\"hljs-string\">''<\/span>;\n  VIRGULA_CR = <span class=\"hljs-string\">''<\/span>; \n  L25 = <span class=\"hljs-string\">''<\/span>;\n  L26 = <span class=\"hljs-string\">''<\/span>;\n  L27 = <span class=\"hljs-string\">''<\/span>;\n  L28 = <span class=\"hljs-string\">''<\/span>;\n  L29 = <span class=\"hljs-string\">''<\/span>;\n  I = <span class=\"hljs-number\">1<\/span>;\n  V_IMPLEMENTAR = <span class=\"hljs-number\">0<\/span>;\n  V_VL_INTEIRO = <span class=\"hljs-number\">0<\/span>;\n  \n  V_VL_INTEIRO = PE_VL_NUMERO;\n  V_IMPLEMENTAR = CHAR_LENGTH(V_VL_INTEIRO);\n  VALOR1 = <span class=\"hljs-string\">''<\/span>;\n  <span class=\"hljs-keyword\">WHILE<\/span> (I &lt;= V_IMPLEMENTAR) <span class=\"hljs-keyword\">DO<\/span>\n  BEGIN\n    <span class=\"hljs-keyword\">IF<\/span> (SUBSTRING(V_VL_INTEIRO FROM I <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>) &lt;&gt; <span class=\"hljs-string\">'.'<\/span>) THEN\n    BEGIN\n      VALOR1 = VALOR1 || SUBSTRING(V_VL_INTEIRO FROM I <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>); \n    END\n    I = (I+<span class=\"hljs-number\">1<\/span>);\n  END\n  V_IMPLEMENTAR = (<span class=\"hljs-number\">14<\/span> - CHAR_LENGTH(TRIM(VALOR1)));\n  I = <span class=\"hljs-number\">0<\/span>;\n  <span class=\"hljs-keyword\">WHILE<\/span> (I &lt;= V_IMPLEMENTAR) <span class=\"hljs-keyword\">DO<\/span>\n  BEGIN\n    <span class=\"hljs-keyword\">IF<\/span> (CHAR_LENGTH(VALOR1) &lt; <span class=\"hljs-number\">14<\/span>) THEN\n    BEGIN\n      VALOR1 = <span class=\"hljs-string\">'0'<\/span> || VALOR1;\n    END\n    I = (I + <span class=\"hljs-number\">1<\/span>);\n  END\n  B1 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">1<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B2 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">2<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B3 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">3<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B4 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">4<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B5 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">5<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B6 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">6<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>); \n  B7 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">7<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B8 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">8<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B9 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">9<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B10 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">10<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B11 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">11<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B12 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">12<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>); \n  B13 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">13<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  B14 = SUBSTRING(VALOR1 FROM <span class=\"hljs-number\">14<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">1<\/span>);\n  <span class=\"hljs-keyword\">IF<\/span> (PE_VL_NUMERO &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n  BEGIN\n    <span class=\"hljs-keyword\">IF<\/span> (B1 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B1 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B2 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B3 = <span class=\"hljs-number\">0<\/span>)) THEN\n        BEGIN\n          L5 =  <span class=\"hljs-string\">'CEM'<\/span>; \n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L1 = SUBSTRING(CENTENAS FROM (B1 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L1 = SUBSTRING(CENTENAS FROM (B1 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>); \n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B2 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B2 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (B3 = <span class=\"hljs-number\">0<\/span>) THEN\n        BEGIN\n          L5 =  <span class=\"hljs-string\">'DEZ'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L3 =  SUBSTRING(UNID10 FROM (B3 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>); \n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L3 =  SUBSTRING(DEZENAS FROM (B2 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B3 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B2 &lt;&gt; <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        L5 =  SUBSTRING(UNIDADES FROM (B3 * <span class=\"hljs-number\">6<\/span><span class=\"hljs-number\">-5<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">6<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> ((B1 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B2 &lt;&gt; <span class=\"hljs-number\">0<\/span>)  <span class=\"hljs-keyword\">OR<\/span> (B3 &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> ((B1 = <span class=\"hljs-number\">0<\/span> <span class=\"hljs-keyword\">AND<\/span> B2 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B3 = <span class=\"hljs-number\">1<\/span>)) THEN \n      BEGIN\n        L5 =  <span class=\"hljs-string\">'UM'<\/span>;\n        L6 =  <span class=\"hljs-string\">' BILH\u00c3O'<\/span>;\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L6 =  <span class=\"hljs-string\">' BILH\u00d5ES'<\/span>;\n      END\n      <span class=\"hljs-keyword\">IF<\/span> (PE_VL_NUMERO &gt; <span class=\"hljs-number\">999999999<\/span>) THEN \n      BEGIN\n<span class=\"hljs-comment\">\/*        VIRGULA_BI = ' E ';*\/<\/span>\n        VIRGULA_BI = <span class=\"hljs-string\">''<\/span>;\n        <span class=\"hljs-keyword\">IF<\/span> ((B4+B5+B6+B7+B8+B9+B10+B11+B12) = <span class=\"hljs-number\">0<\/span>) THEN\n        BEGIN\n          VIRGULA_BI = <span class=\"hljs-string\">' DE '<\/span> ;\n        END \n      END\n      L1 =  TRIM(L1);\n      L3 =  TRIM(L3);\n      L5 =  TRIM(L5);\n      <span class=\"hljs-keyword\">IF<\/span> ((B2 &gt; <span class=\"hljs-number\">1<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B3 &gt; <span class=\"hljs-number\">0<\/span>)) THEN\n      BEGIN\n        L4 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((B1 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> ((B2 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B3 &lt;&gt; <span class=\"hljs-number\">0<\/span>))) THEN \n      BEGIN\n        L2 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n    END\n  <span class=\"hljs-comment\">\/*-- ROTINA DOS MILHOES --*\/<\/span>\n    <span class=\"hljs-keyword\">IF<\/span> (B4 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B4 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B5 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B6 = <span class=\"hljs-number\">0<\/span>)) THEN\n        BEGIN\n          L7 =  <span class=\"hljs-string\">'CEM'<\/span>;\n        END \n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L7 = SUBSTRING(CENTENAS FROM (B4 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L7 = SUBSTRING(CENTENAS FROM (B4 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n      END \n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B5 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B5 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (B6 = <span class=\"hljs-number\">0<\/span>) THEN\n        BEGIN\n          L11 =  <span class=\"hljs-string\">'DEZ'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN \n          L9 =  SUBSTRING(UNID10 FROM (B6 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>);\n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L9 =  SUBSTRING(DEZENAS FROM (B5 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B6 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN \n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B5 &lt;&gt; <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        L11 =  SUBSTRING(UNIDADES FROM (B6 * <span class=\"hljs-number\">6<\/span><span class=\"hljs-number\">-5<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">6<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> ((B4 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B5 &lt;&gt; <span class=\"hljs-number\">0<\/span>)  <span class=\"hljs-keyword\">OR<\/span> (B6 &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (((B4 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B5 = <span class=\"hljs-number\">0<\/span>)) <span class=\"hljs-keyword\">AND<\/span> (B6 = <span class=\"hljs-number\">1<\/span>)) THEN\n      BEGIN\n        L11 =  <span class=\"hljs-string\">' UM'<\/span>;\n        L12 =  <span class=\"hljs-string\">' MILH\u00c3O'<\/span>;\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L12 =  <span class=\"hljs-string\">' MILH\u00d5ES'<\/span>; \n      END\n      <span class=\"hljs-keyword\">IF<\/span> (PE_VL_NUMERO &gt; <span class=\"hljs-number\">999999<\/span>) THEN\n      BEGIN\n<span class=\"hljs-comment\">\/*        VIRGULA_MI = ' E ';*\/<\/span>\n        VIRGULA_MI = <span class=\"hljs-string\">''<\/span>;\n        <span class=\"hljs-keyword\">IF<\/span> ((B7+B8+B9+B10+B11+B12) = <span class=\"hljs-number\">0<\/span>) THEN\n        BEGIN\n          VIRGULA_MI = <span class=\"hljs-string\">' DE '<\/span>; \n        END\n      END\n      L7 =  TRIM(L7);\n      L9 =  TRIM(L9);\n      L11 = TRIM(L11);\n      <span class=\"hljs-keyword\">IF<\/span> ((B5 &gt; <span class=\"hljs-number\">1<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B6 &gt; <span class=\"hljs-number\">0<\/span>)) THEN\n      BEGIN\n        L10 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((B4 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> ((B5 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B6 &lt;&gt; <span class=\"hljs-number\">0<\/span>))) THEN \n      BEGIN\n        L8 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n    END\n    <span class=\"hljs-comment\">\/*-- ROTINA DOS MILHARES --*\/<\/span>\n    <span class=\"hljs-keyword\">IF<\/span> (B7 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B7 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B8 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B9 = <span class=\"hljs-number\">0<\/span>)) THEN\n        BEGIN\n          L17 =  <span class=\"hljs-string\">'CEM'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN \n          L13 = SUBSTRING(CENTENAS FROM (B7 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L13 = SUBSTRING(CENTENAS FROM (B7 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B8 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN \n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B8 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (B9 = <span class=\"hljs-number\">0<\/span>) THEN\n        BEGIN\n          L17 =  <span class=\"hljs-string\">'DEZ'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L15 =  SUBSTRING(UNID10 FROM (B9 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>); \n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L15 =  SUBSTRING(DEZENAS FROM (B8 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B9 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B8 &lt;&gt; <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        L17 =  SUBSTRING(UNIDADES FROM (B9 * <span class=\"hljs-number\">6<\/span><span class=\"hljs-number\">-5<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">6<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> ((B7 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B8 &lt;&gt; <span class=\"hljs-number\">0<\/span>)  <span class=\"hljs-keyword\">OR<\/span> (B9 &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (((B7 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B8 = <span class=\"hljs-number\">0<\/span>)) <span class=\"hljs-keyword\">AND<\/span> (B9 = <span class=\"hljs-number\">1<\/span>)) THEN \n      BEGIN\n        L17 =  <span class=\"hljs-string\">'UM'<\/span>;\n        L18 =  <span class=\"hljs-string\">' MIL'<\/span>;\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L18 =  <span class=\"hljs-string\">' MIL'<\/span>;\n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((PE_VL_NUMERO &gt; <span class=\"hljs-number\">999<\/span>) <span class=\"hljs-keyword\">AND<\/span> ((B10+B11+B12) &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN \n      BEGIN\n        VIRGULA_MIL  = <span class=\"hljs-string\">' E '<\/span>;\n      END\n      L13 =  TRIM(L13);\n      L15 =  TRIM(L15);\n      L17 =  TRIM(L17);\n      <span class=\"hljs-keyword\">IF<\/span> ((B8 &gt; <span class=\"hljs-number\">1<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B9 &gt; <span class=\"hljs-number\">0<\/span>)) THEN\n      BEGIN\n         L16 = <span class=\"hljs-string\">' E '<\/span>; \n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((B7 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> ((B8 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B9 &lt;&gt; <span class=\"hljs-number\">0<\/span>))) THEN\n      BEGIN\n        L14 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n    END\n  <span class=\"hljs-comment\">\/*-- ROTINA DOS REAIS --*\/<\/span>\n    <span class=\"hljs-keyword\">IF<\/span> (B10 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B10 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B11 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B12 = <span class=\"hljs-number\">0<\/span>)) THEN\n        BEGIN\n          L19 =  <span class=\"hljs-string\">'CEM'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN \n          L19 = SUBSTRING(CENTENAS FROM (B10 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n        END\n     END\n     <span class=\"hljs-keyword\">ELSE<\/span>\n     BEGIN\n       L19 = SUBSTRING(CENTENAS FROM (B10 * <span class=\"hljs-number\">12<\/span><span class=\"hljs-number\">-11<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">12<\/span>);\n     END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B11 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B11 = <span class=\"hljs-number\">1<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (B12 = <span class=\"hljs-number\">0<\/span>) THEN\n        BEGIN\n          L23 =  <span class=\"hljs-string\">'DEZ'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L21 =  SUBSTRING(UNID10 FROM (B12 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>); \n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        L21 =  SUBSTRING(DEZENAS FROM (B11 * <span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> (B12 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B11 &lt;&gt; <span class=\"hljs-number\">1<\/span>) THEN \n      BEGIN\n        L23 =  SUBSTRING(UNIDADES FROM (B12 * <span class=\"hljs-number\">6<\/span><span class=\"hljs-number\">-5<\/span>) <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">6<\/span>);\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> ((B10 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B11 &lt;&gt; <span class=\"hljs-number\">0<\/span>)  <span class=\"hljs-keyword\">OR<\/span> (B12 &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> ((PE_VL_NUMERO &gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (PE_VL_NUMERO &lt; <span class=\"hljs-number\">2<\/span>)) THEN\n      BEGIN\n        L23 =  <span class=\"hljs-string\">'UM'<\/span>;\n      END\n      L19 =  TRIM(L19); \n      L21 =  TRIM(L21);\n      L23 = TRIM(L23);\n      <span class=\"hljs-keyword\">IF<\/span> ((B11 &gt; <span class=\"hljs-number\">1<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B12 &gt; <span class=\"hljs-number\">0<\/span>)) THEN\n      BEGIN\n        L22 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((B10 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> ((B11 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B12 &lt;&gt; <span class=\"hljs-number\">0<\/span>))) THEN \n      BEGIN\n        L20 = <span class=\"hljs-string\">' E '<\/span>;\n      END\n    END\n    <span class=\"hljs-keyword\">IF<\/span> ((PE_VL_NUMERO &gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (PE_VL_NUMERO &lt; <span class=\"hljs-number\">2<\/span>))  THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (B12 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n      BEGIN\n        L24 = <span class=\"hljs-string\">' REAL'<\/span>;\n      END\n    END\n    <span class=\"hljs-keyword\">ELSE<\/span>\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (PE_VL_NUMERO &gt; <span class=\"hljs-number\">1<\/span>) THEN \n      BEGIN\n        L24 = <span class=\"hljs-string\">' REAIS'<\/span>;\n      END\n    END\n  <span class=\"hljs-comment\">\/*-- TRATA CENTAVOS --*\/<\/span>\n    <span class=\"hljs-keyword\">IF<\/span> ((B13 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> (B14 &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN\n    BEGIN\n      <span class=\"hljs-keyword\">IF<\/span> (PE_VL_NUMERO &gt; <span class=\"hljs-number\">0<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B12 &lt;&gt; <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">OR<\/span> ((B1+B2+B3+B4+B5+B6+B7+B8+B9+B10+B11+B12) &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN \n        BEGIN\n          L25 = <span class=\"hljs-string\">' E '<\/span>;\n        END\n      END\n      <span class=\"hljs-keyword\">IF<\/span> (B13 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (B13 = <span class=\"hljs-number\">1<\/span>) THEN\n        BEGIN\n          <span class=\"hljs-keyword\">IF<\/span> (B14 = <span class=\"hljs-number\">0<\/span>) THEN\n          BEGIN \n            L28 =  <span class=\"hljs-string\">'DEZ'<\/span>;\n          END\n          <span class=\"hljs-keyword\">ELSE<\/span>\n          BEGIN\n            L26 =  SUBSTRING(UNID10 FROM B14*<span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>);\n          END\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L26 =  SUBSTRING(DEZENAS FROM B13*<span class=\"hljs-number\">9<\/span><span class=\"hljs-number\">-8<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">9<\/span>); \n        END\n      END\n      <span class=\"hljs-keyword\">IF<\/span> (B14 &lt;&gt; <span class=\"hljs-number\">0<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (B13 &lt;&gt; <span class=\"hljs-number\">1<\/span>) THEN\n        BEGIN\n          L28 =  SUBSTRING(UNIDADES FROM B14*<span class=\"hljs-number\">6<\/span><span class=\"hljs-number\">-5<\/span> <span class=\"hljs-keyword\">FOR<\/span> <span class=\"hljs-number\">6<\/span>);\n        END\n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((B13 &lt;&gt; <span class=\"hljs-number\">0<\/span>)  <span class=\"hljs-keyword\">OR<\/span> (B14 &lt;&gt; <span class=\"hljs-number\">0<\/span>)) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> (PE_VL_NUMERO = <span class=\"hljs-number\">1<\/span>) THEN\n        BEGIN\n          L28 =  <span class=\"hljs-string\">'UM'<\/span>;\n        END\n        L26 =  TRIM(L26);\n        L28 = TRIM(L28); \n        <span class=\"hljs-keyword\">IF<\/span> ((B13 &gt; <span class=\"hljs-number\">1<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B14 &gt; <span class=\"hljs-number\">0<\/span>)) THEN\n        BEGIN\n          L27 = <span class=\"hljs-string\">' E '<\/span>;\n        END\n      END\n      <span class=\"hljs-keyword\">IF<\/span> ((B1+B2+B3+B4+B5+B6+B7+B8+B9+B10+B11+B12) &gt; <span class=\"hljs-number\">0<\/span>) THEN\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B13 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B14 = <span class=\"hljs-number\">1<\/span>)) THEN \n        BEGIN\n          L29 = <span class=\"hljs-string\">' CENTAVO'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L29 = <span class=\"hljs-string\">' CENTAVOS'<\/span>;\n        END\n      END\n      <span class=\"hljs-keyword\">ELSE<\/span>\n      BEGIN\n        <span class=\"hljs-keyword\">IF<\/span> ((B13 = <span class=\"hljs-number\">0<\/span>) <span class=\"hljs-keyword\">AND<\/span> (B14 = <span class=\"hljs-number\">1<\/span>)) THEN \n        BEGIN\n          L29 = <span class=\"hljs-string\">' CENTAVO'<\/span>;\n        END\n        <span class=\"hljs-keyword\">ELSE<\/span>\n        BEGIN\n          L29 = <span class=\"hljs-string\">' CENTAVOS'<\/span>;\n        END\n      END\n    END\n  <span class=\"hljs-comment\">\/*-- CONCATENAR O LITERAL --*\/<\/span>\n    <span class=\"hljs-keyword\">IF<\/span> ((L29 = <span class=\"hljs-string\">' CENTAVO'<\/span>) <span class=\"hljs-keyword\">OR<\/span> (L29 = <span class=\"hljs-string\">' CENTAVOS'<\/span>)) THEN\n    BEGIN\n      VIRGULA_MIL = <span class=\"hljs-string\">''<\/span>;\n    END\n    EXTENSO = IIF(TRIM(L1)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L1)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L2)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L2)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L3)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L3)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L4)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L4)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L5)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L5)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L6)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L6)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(VIRGULA_BI)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(VIRGULA_BI)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(L7)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L7)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L8)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L8)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L9)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L9)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L10)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L10)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L11)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L11)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L12)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L12)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(VIRGULA_MI)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(VIRGULA_MI)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(L13)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L13)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L14)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L14)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L15)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L15)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L16)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L16)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L17)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L17)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L18)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L18)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(VIRGULA_MIL)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(VIRGULA_MIL)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(L19)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L19)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L20)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L20)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L21)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L21)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L22)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L22)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L23)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L23)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L24)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L24)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(VIRGULA_CR)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(VIRGULA_CR)||<span class=\"hljs-string\">' '<\/span>)||\n\n              IIF(TRIM(L25)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L25)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L26)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L26)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L27)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L27)||<span class=\"hljs-string\">' '<\/span>)||\n              IIF(TRIM(L28)=<span class=\"hljs-string\">''<\/span>,<span class=\"hljs-string\">''<\/span>,TRIM(L28)||<span class=\"hljs-string\">' '<\/span>)||\n              TRIM(L29);\n\n              EXTENSO = TRIM(EXTENSO);\n  END\n  <span class=\"hljs-keyword\">ELSE<\/span>\n  BEGIN\n    EXTENSO = <span class=\"hljs-string\">'ZERO'<\/span>;\n  END\n  \n  PS_NUMERO_EXTENSO = EXTENSO;\n  SUSPEND;\n  \nEND\n<\/code><\/span><small class=\"shcb-language\" id=\"shcb-language-1\"><span class=\"shcb-language__label\">Code language:<\/span> <span class=\"shcb-language__name\">PHP<\/span> <span class=\"shcb-language__paren\">(<\/span><span class=\"shcb-language__slug\">php<\/span><span class=\"shcb-language__paren\">)<\/span><\/small><\/pre>\n\n\n<h3 class=\"wp-block-heading\">COMO CHAMAR ?<\/h3>\n\n\n\n<p>A chamada da Procedure ocorre da seguinte forma:<\/p>\n\n\n\n<p><strong><span class=\"has-inline-color has-vivid-red-color\">SELECT * FROM NUMERO_POR_EXTENSO(158);<\/span><\/strong><\/p>\n\n\n\n<figure class=\"wp-block-image size-large\"><img loading=\"lazy\" decoding=\"async\" width=\"427\" height=\"184\" src=\"https:\/\/tecgesco.com\/blog\/wp-content\/uploads\/2021\/05\/image-22.png\" alt=\"\" class=\"wp-image-519\" srcset=\"https:\/\/tecgesco.com\/blog\/wp-content\/uploads\/2021\/05\/image-22.png 427w, https:\/\/tecgesco.com\/blog\/wp-content\/uploads\/2021\/05\/image-22-300x129.png 300w\" sizes=\"auto, (max-width: 427px) 100vw, 427px\" \/><\/figure>\n\n\n\n<p><strong>Fonte:<\/strong><\/p>\n\n\n\n<p><a href=\"https:\/\/www.firebase.com.br\/artigo.php?id=1800\">https:\/\/www.firebase.com.br\/artigo.php?id=1800<\/a><\/p>\n","protected":false},"excerpt":{"rendered":"<p>Nesse artigo, ser\u00e1 descrito uma Procedure que recebe um valor num\u00e9rico e retorna uma Sting com o nome por extenso. COMO CHAMAR ? A chamada da Procedure ocorre da seguinte forma: SELECT * FROM NUMERO_POR_EXTENSO(158); Fonte: https:\/\/www.firebase.com.br\/artigo.php?id=1800<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"_monsterinsights_skip_tracking":false,"_monsterinsights_sitenote_active":false,"_monsterinsights_sitenote_note":"","_monsterinsights_sitenote_category":0,"footnotes":""},"categories":[5],"tags":[99],"class_list":["post-518","post","type-post","status-publish","format-standard","hentry","category-tecnico","tag-firebird"],"_links":{"self":[{"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/posts\/518","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/comments?post=518"}],"version-history":[{"count":2,"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/posts\/518\/revisions"}],"predecessor-version":[{"id":521,"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/posts\/518\/revisions\/521"}],"wp:attachment":[{"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/media?parent=518"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/categories?post=518"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/tecgesco.com\/blog\/wp-json\/wp\/v2\/tags?post=518"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}