terça-feira, 14 de março de 2017

Aula 1092 - WinDev Dicas 20/... - Pegar Quantidade/Valor/Codigo do Cupom













Video no Youtube Se Gostou clique aqui para dar joinha



https://doc.windev.com/en-US/?3024015&name=Functions_for_character_strings




Backup e Restore Projeto Windev - 001
Dicionario e Supecontrole - 002
Cd - CdEject CdList - Abre e Lista CD - 003
Dicionario e SuperControle - 004
Cnpj - Formatar com Pontos Barra Ifen - 005
Controlfindhighlight - Pesquizar Palavras entre edts - 006
Som - Emitir - Beep - 007
Valor Minimo e Maximo - MinValue / MaxValue - Dicas - 008
Vazio - Empty - Ver se combox,tabela,ou etc Esta Vazio - 009 - Dicas
Pdf - Ler Pdf com Active X - 010
Baixar Titulos Contas Receber - Dica - 011 
Saldo Anterior Caixa - Como Calcular - Dica - 012
Anos - Mostrar Anos Pagamentos Recebimentos - Dica - 013
Mes Por Extenso - MonthNumberInAlpha - Dicas - 014
Clone Tabela - Meses com Varios Anos - Dicas - 015
Tecla Atalho - Control + Alt + Espaco - WinDev - dicas - 016/...
ControleCreate - Criar bloco Notas - Notes - WinDev - Dicas - 017/...
Alt - Static - Apertando Alt em Cima Static - Altera borda - Windev - Dicas 018/...
Guardar Valor - WinDev - Dicas 019/...
Pegar Quantidade/Valor/Codigo Cupom - WinDev - Dicas- 020
Consultar Alterar cliente e Procurar - WinDev - Dicas - 021



Aula 1092 - WinDev Dicas 20/... - Pegar Quantidade/Valor/Codigo do Cupom

Nessa aula vou ensinar
como Digitar numa String
Quantidade,Valor e Codigo
e O sistema
Separar os 3
Isso serve para frente de Caixa
no meu caso
Cupom Eletronico

In this class I will teach
How to Type in a String
Quantity, Value and Code
And the system
Separate the 3
This is for Box Front
in my case
Electronic Coupon




//Fonte
IF EDT_Codigo_Venda <> "" THEN
   nPosicao_inicial_codigo_Venda is int=0      
   //Exemplo: 20q15v
   //         123456     
    n_posicao_quantidade is int=Position(EDT_Codigo_Venda,["q","Q","*"])
    //     n_posicao_quantidade=3
    n_posicao_valor is int=Position(EDT_Codigo_Venda,["V","v"])
    // n_posicao_valor=6
    _quantidade_String is string=""
    _valor_String is string=""
    IF n_posicao_quantidade>0 THEN //Se Posição quantidade maior que zero
        _quantidade_String=EDT_Codigo_Venda[[1 TO n_posicao_quantidade-1]]
        // quantidade_string=20q15v[[1 to (3-1)]]
        // quantidade_string=20q15v[[1 to 2)]]
        // quantidade_string=20
        _quantidade_String=Replace(_quantidade_String,",",".")
        //Vai procurar virgula e substituir por ponto
        //_quantidade_String=Replace("10,50",",",".")
        //_quantidade_String=10.50
        nPosicao_inicial_codigo_Venda=n_posicao_quantidade+1
    END
    IF n_posicao_valor>0 THEN
        _valor_String=EDT_Codigo_Venda[[n_posicao_quantidade+1 TO n_posicao_valor-1]]
        //_valor_String=20q15v[[(3+1) TO (6-1))]]
        //_valor_String=20q15v[[4 TO 5)]]
        //_valor_String=15
        _valor_String=Replace(_valor_String,",",".")
        //Vai procurar virgula e substituir por ponto
        nPosicao_inicial_codigo_Venda=n_posicao_valor+1
    END           
    IF _quantidade_String<>"" THEN
        EDT_Quantidade=_quantidade_String
    ELSE       
        EDT_Quantidade=1
    END
    IF nPosicao_inicial_codigo_Venda<>0     THEN
        n_tamanho is int=Length(EDT_Codigo_Venda)
        EDT_Codigo_Venda = EDT_Codigo_Venda[[nPosicao_inicial_codigo_Venda TO n_tamanho]]
    END
    EDT_preco=_valor_String
   
    // Temos
    // Edt_preco
    // Edt_valor
    // Edt_codigo_Venda
end

















Teste

Teste
teste