Autor Tópico: [RESOLVIDO]: Escreve O valor por extenso em Metros Quadrados - EVENTO ONFOCUS  (Lida 1269 vezes)

Carlos Botelho

  • Novato
  • *
  • Mensagens: 47
Estou desenvolvendo um formulário onde tenho que preencher um Campo através do Evento ONFOCUS, O script está certinho, mais ele não preenche o Campo... Engraçado que coloquei pra exibir uma mensagem e funciona direitinho, mais não preenche o campo, abaixo um exemplo do código:

este código faz o seguinte:

    Ele pega o valor que vem do campo {MedFrente}, ele escreve por extenso em metros quadrados e preenche o campo {MedFrenteExtenc} no evento OnFocus. o script está funcionando direito, pois eu testei exibindo a mensagem, mais não está preenchendo o campo, alguem sabe me informar o porque????


$valor={MedFrente};
$maiusculas=true;

    // verifica se tem virgula decimal
    if (strpos($valor,",") > 0)
    {
      // retira o ponto de milhar, se tiver
      $valor = str_replace(".","",$valor);
 
      // troca a virgula decimal por ponto decimal
      $valor = str_replace(",",".",$valor);
    }
$singular = array("centimetro", "metro quadrado", "mil", "milhão", "bilhão", "trilhão", "quatrilhão");
$plural = array("centimetros", "metros quadrados", "mil", "milhões", "bilhões", "trilhões",
"quatrilhões");
 
$c = array("", "cem", "duzentos", "trezentos", "quatrocentos",
"quinhentos", "seiscentos", "setecentos", "oitocentos", "novecentos");
$d = array("", "dez", "vinte", "trinta", "quarenta", "cinquenta",
"sessenta", "setenta", "oitenta", "noventa");
$d10 = array("dez", "onze", "doze", "treze", "quatorze", "quinze",
"dezesseis", "dezesete", "dezoito", "dezenove");
$u = array("", "um", "dois", "três", "quatro", "cinco", "seis",
"sete", "oito", "nove");

        $z=0;
 
        $valor = number_format($valor, 2, ".", ".");
        $inteiro = explode(".", $valor);
      $cont=count($inteiro);
              for($i=0;$i<$cont;$i++)
                for($ii=strlen($inteiro[$i]);$ii<3;$ii++)
                $inteiro[$i] = "0".$inteiro[$i];
 
        $fim = $cont - ($inteiro[$cont-1] > 0 ? 1 : 2);
        for ($i=0;$i<$cont;$i++) {
                $valor = $inteiro[$i];
                $rc = (($valor > 100) && ($valor < 200)) ? "cento" : $c[$valor[0]];
                $rd = ($valor[1] < 2) ? "" : $d[$valor[1]];
                $ru = ($valor > 0) ? (($valor[1] == 1) ? $d10[$valor[2]] : $u[$valor[2]]) : "";
 
                $r = $rc.(($rc && ($rd || $ru)) ? " e " : "").$rd.(($rd &&
$ru) ? " e " : "").$ru;
                $t = $cont-1-$i;
                $r .= $r ? " ".($valor > 1 ? $plural[$t] : $singular[$t]) : "";
                if ($valor == "000")$z++; elseif ($z > 0) $z--;
                if (($t==1) && ($z>0) && ($inteiro[0] > 0)) $r .= (($z>1) ? " de " : "").$plural[$t];
                if ($r) $rt = $rt . ((($i > 0) && ($i <= $fim) &&
($inteiro[0] > 0) && ($z < 1)) ? ( ($i < $fim) ? ", " : " e ") : " ") . $r;
        }
   

{MedFrenteExtenc} =$rt;
         
sc_ajax_message($rt, 'Extenso Valor');
« Última modificação: Julho 23, 2014, 12:24:30 pm por Carlos Botelho »

Haroldo

  • Expert
  • *****
  • Mensagens: 6274
  • Conhecimento diminui limitações.△TFA△
    • Infinitus Web Gestão Empresarial/Gestão ITIL/Consultoria Scriptcase
Re:EVENTOS AJAX - ONFOCUS NÃO PREENCHE O CAMPO DO FORM
« Responder #1 Online: Julho 22, 2014, 11:56:11 am »
Sugestão:
1)Coloque o código numa biblioteca.

2) Atribua uma constante ao campo e verifique se eh exibido.

Ex: {MedFrenteExtenc} = "ABC123";

Carlos Botelho

  • Novato
  • *
  • Mensagens: 47
Re:EVENTOS AJAX - ONFOCUS NÃO PREENCHE O CAMPO DO FORM
« Responder #2 Online: Julho 23, 2014, 10:53:26 am »
Valeu Haroldo!!!!!

   Olha ai valeu a dica do Haroldo, então estou postando aqui para que outros possam ter acesso... Funciona 100%.


  1 - Eu criei uma Biblioteca chamada "EscreveExtenso.php" conforme o código abaixo;
        EscreveExtenso.php - Escreve o Numero por extenso em metros quadrados:

 0| <?php
 1|
 2| function extenso($valor = 0, $maiusculas = true) { 
 3|
 4| $singular = array("centimetro", "metro quadrado", "mil", "milhão", "bilhão", "trilhão", "quatrilhão"); 
 5| $plural = array("centimetros", "metros quadrados", "mil", "milhões", "bilhões", "trilhões", 
 6| "quatrilhões"); 
 7|
 8| $c = array("", "cem", "duzentos", "trezentos", "quatrocentos", 
 9| "quinhentos", "seiscentos", "setecentos", "oitocentos", "novecentos"); 
10| $d = array("", "dez", "vinte", "trinta", "quarenta", "cinquenta", 
11| "sessenta", "setenta", "oitenta", "noventa"); 
12| $d10 = array("dez", "onze", "doze", "treze", "quatorze", "quinze", 
13| "dezesseis", "dezesete", "dezoito", "dezenove"); 
14| $u = array("", "um", "dois", "três", "quatro", "cinco", "seis", 
15| "sete", "oito", "nove"); 
16|
17| $z = 0; 
18| $rt = "";
19|
20| $valor = number_format($valor, 2, ".", "."); 
21| $inteiro = explode(".", $valor); 
22| for($i=0;$i<count($inteiro);$i++) 
23| for($ii=strlen($inteiro[$i]);$ii<3;$ii++) 
24| $inteiro[$i] = "0".$inteiro[$i]; 
25|
26| $fim = count($inteiro) - ($inteiro[count($inteiro)-1] > 0 ? 1 : 2); 
27| for ($i=0;$i<count($inteiro);$i++) { 
28| $valor = $inteiro[$i]; 
29| $rc = (($valor > 100) && ($valor < 200)) ? "cento" : $c[$valor[0]]; 
30| $rd = ($valor[1] < 2) ? "" : $d[$valor[1]]; 
31| $ru = ($valor > 0) ? (($valor[1] == 1) ? $d10[$valor[2]] : $u[$valor[2]]) : ""; 
32|
33| $r = $rc.(($rc && ($rd || $ru)) ? " e " : "").$rd.(($rd && 
34| $ru) ? " e " : "").$ru; 
35| $t = count($inteiro)-1-$i; 
36| $r .= $r ? " ".($valor > 1 ? $plural[$t] : $singular[$t]) : ""; 
37| if ($valor == "000")$z++; elseif ($z > 0) $z--; 
38| if (($t==1) && ($z>0) && ($inteiro[0] > 0)) $r .= (($z>1) ? " de " : "").$plural[$t]; 
39| if ($r) $rt = $rt . ((($i > 0) && ($i <= $fim) && 
40| ($inteiro[0] > 0) && ($z < 1)) ? ( ($i < $fim) ? ", " : " e ") : " ") . $r; 
41| } 
42|
43| if(!$maiusculas){ 
44| return($rt ? $rt : "zero"); 
45| } else { 
46|
47| if ($rt) $rt=ereg_replace(" E "," e ",ucwords($rt));
48| return (($rt) ? ($rt) : "Zero"); 
49| } 
50|
51| }
52| ?>

       2 - No Evento Ajax eu criei o SeuCampo_EventoOnFocus do campo e chamei a função:

            $varValor = {MedFrente}; // Aqui o Valor Numérico que vai ser passado pra função
            $varMaiuscula = true; // atribui true para que me retorne tudo em Maiuscula

             {MedFrenteExtenc} = extenso($varValor, $varMaiuscula); //preencho o campo com o retorno da função


simples....

           

Carlos Botelho

  • Novato
  • *
  • Mensagens: 47
[RESOLVIDO]: EVENTOS AJAX - ONFOCUS NÃO PREENCHE O CAMPO DO FORM
« Responder #3 Online: Julho 23, 2014, 10:56:22 am »
Valeu Haroldo!!!!!

   Olha ai valeu a dica do Haroldo, então estou postando aqui para que outros possam ter acesso... Funciona 100%.


  1 - Eu criei uma Biblioteca chamada "EscreveExtenso.php" conforme o código abaixo;
        EscreveExtenso.php - Escreve o Numero por extenso em metros quadrados:

 0| <?php
 1|
 2| function extenso($valor = 0, $maiusculas = true) { 
 3|
 4| $singular = array("centimetro", "metro quadrado", "mil", "milhão", "bilhão", "trilhão", "quatrilhão"); 
 5| $plural = array("centimetros", "metros quadrados", "mil", "milhões", "bilhões", "trilhões", 
 6| "quatrilhões"); 
 7|
 8| $c = array("", "cem", "duzentos", "trezentos", "quatrocentos", 
 9| "quinhentos", "seiscentos", "setecentos", "oitocentos", "novecentos"); 
10| $d = array("", "dez", "vinte", "trinta", "quarenta", "cinquenta", 
11| "sessenta", "setenta", "oitenta", "noventa"); 
12| $d10 = array("dez", "onze", "doze", "treze", "quatorze", "quinze", 
13| "dezesseis", "dezesete", "dezoito", "dezenove"); 
14| $u = array("", "um", "dois", "três", "quatro", "cinco", "seis", 
15| "sete", "oito", "nove"); 
16|
17| $z = 0; 
18| $rt = "";
19|
20| $valor = number_format($valor, 2, ".", "."); 
21| $inteiro = explode(".", $valor); 
22| for($i=0;$i<count($inteiro);$i++) 
23| for($ii=strlen($inteiro[$i]);$ii<3;$ii++) 
24| $inteiro[$i] = "0".$inteiro[$i]; 
25|
26| $fim = count($inteiro) - ($inteiro[count($inteiro)-1] > 0 ? 1 : 2); 
27| for ($i=0;$i<count($inteiro);$i++) { 
28| $valor = $inteiro[$i]; 
29| $rc = (($valor > 100) && ($valor < 200)) ? "cento" : $c[$valor[0]]; 
30| $rd = ($valor[1] < 2) ? "" : $d[$valor[1]]; 
31| $ru = ($valor > 0) ? (($valor[1] == 1) ? $d10[$valor[2]] : $u[$valor[2]]) : ""; 
32|
33| $r = $rc.(($rc && ($rd || $ru)) ? " e " : "").$rd.(($rd && 
34| $ru) ? " e " : "").$ru; 
35| $t = count($inteiro)-1-$i; 
36| $r .= $r ? " ".($valor > 1 ? $plural[$t] : $singular[$t]) : ""; 
37| if ($valor == "000")$z++; elseif ($z > 0) $z--; 
38| if (($t==1) && ($z>0) && ($inteiro[0] > 0)) $r .= (($z>1) ? " de " : "").$plural[$t]; 
39| if ($r) $rt = $rt . ((($i > 0) && ($i <= $fim) && 
40| ($inteiro[0] > 0) && ($z < 1)) ? ( ($i < $fim) ? ", " : " e ") : " ") . $r; 
41| } 
42|
43| if(!$maiusculas){ 
44| return($rt ? $rt : "zero"); 
45| } else { 
46|
47| if ($rt) $rt=ereg_replace(" E "," e ",ucwords($rt));
48| return (($rt) ? ($rt) : "Zero"); 
49| } 
50|
51| }
52| ?>

       2 - No Evento Ajax eu criei o SeuCampo_EventoOnFocus do campo e chamei a função:

            $varValor = {MedFrente}; // Aqui o Valor Numérico que vai ser passado pra função
            $varMaiuscula = true; // atribui true para que me retorne tudo em Maiuscula

             {MedFrenteExtenc} = extenso($varValor, $varMaiuscula); //preencho o campo com o retorno da função


simples....

           
« Última modificação: Julho 23, 2014, 12:21:06 pm por Carlos Botelho »

Willian Fernando

  • Expert
  • *****
  • Mensagens: 1148
  • .....
    • Email
Re:EVENTOS AJAX - ONFOCUS NÃO PREENCHE O CAMPO DO FORM
« Responder #4 Online: Julho 23, 2014, 12:09:14 pm »
Modifica para [RESOLVIDO] para o pessoal saber que foi solucionado..