Controle de digitação em campo numérico:
========================================

1 - Incluir a referência o arquivo de script 'validacampo.js' à pagina 'aspx' no local apropriado:

    <script type="text/javascript" src="<Localizacao do arquivos>/validacampo.js"></script>
    
    Nota: O arquivo contendo as rotinas desta documentação está no Source Safe no projeto AdaptorPainelControle.
          Se houver outra no projeto, remova-a e adicione a do AdaptorPainelControle (compartilhando no SS).
    
2 - Incluir o seguinte código no evento load da pagina:

        If Not IsPostBack Then

            'Chama rotina para configurar os controles da pagina
            '(Tratametno de ventos, formato numerico, etc.)
            sbConfiguraCamposForm()

        End If
        
3 - Incluir a sub sbConfiguraCamposForm na página:

    ''' <summary>
    ''' Configura os campos do form para tratamento de digitação ou formatação.
    ''' Configura também chamadas a rotinas para tratamentos ao ganhar ou perder foco.
    ''' </summary>
    ''' <remarks></remarks>
    Private Sub sbConfiguraCamposForm()

        'Cria objeto rotinas
        Dim vloRotinas As New Ps_Rotinas.Rotinas

        For Each vloControle As Control In Page.Controls

            'Chama rotina para montar atributo de controle de formatacao de campos:
            '- Selecionar conteudo quando ganhar foco
            '- Formatar campo quando perder foco
            vloRotinas.MontaAtributoSelecaoCampo(vloControle)

        Next

        '==========================================================================================================
        'Adiciona atribuito para controle de digitacao e formatacao 
        'para os campos numericos do tipo TextBox. 
        
        ' A T E N Ç Ã 0
        ' =============
        'A rotina abaixo eh um exemplo de controle de digitação e edição para um campo
        'do tipo CPF e outro para o tipo valor.
        '
        'Deverá ser adicionada uma linha para controle do SEU form. O segundo parametro passado
        'para a rotina define o tipo do campo e a sua edição. Deverá ser utilizado uma definição
        'para campo de valor monetário ou decimal e outro para outros tipos de formatos. 
        '
        'Veja o significado do parametro:
        '
        '    Para campo do tipo valor (dinheiro ou decimal):
        ' 
        '       N 8,2|DEC 2
        ' 
        '         N - Fixo
        '         8 - Tamanho da parte inteira
        '         2 - Número de decimais
        '         | - Separador da definição do tipo de campo e da edição deste.
        '         DEC - Tipo de edição para valores monetários e decimais.
        '         2 - Número de casas decimais da edição. Não havendo decimais, informar zero.
        ' 
        '    Outros tipos numéricos (CPF, CNPJ, data, CEP, etc.):
        ' 
        '       N 11,0|USR 999.999.999-99 onde:
        ' 
        '         N - Fixo
        '         11 - Tamanho da parte inteira
        '         0 - Número de decimais
        '         | - Separador da definição do tipo de campo e da edição deste.
        '         USR - Tipo de edição definida pelo usuário. Utilizada para CPF, datas, CEP,fone, etc.
        '         999.999.999-99 - A edição propriamente dita. Os noves são os valores significativos da edição.
        '==========================================================================================================
        
        'Controle de digitacao/edicao para CPF
        vloRotinas.MontaAtributoDigitacaoNumero(txtCPF, "N 11,0|USR 999.999.999-99")

        'Controle de digitacao/edicao valor monetario
        vloRotinas.MontaAtributoDigitacaoNumero(txtPrincipal, "N 13,2|DEC 2")
        
        'Destroi o objeto utilizado
        vloRotinas = Nothing

    End Sub