PC SOFT

FORUMS PROFESSIONNELS
WINDEVWEBDEV et WINDEV Mobile

Accueil → WINDEV 21 → Aula 1092 - WinDev Dicas 20/... - Pegar Quantidade/Valor/Codigo do Cupom
Aula 1092 - WinDev Dicas 20/... - Pegar Quantidade/Valor/Codigo do Cupom
Débuté par De matos, 14 mar. 2017 09:52 - Aucune réponse
//hostimage.webdev.info/avatars/4ofwsucwBZxV2XpJkn08g
Membre enregistré
364 messages
Popularité : +3 (3 votes)
Posté le 14 mars 2017 - 09:52
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


http://windevdesenvolvimento.blogspot.com.br/2017/03/aula-1092-windev-dicas-20-pegar.html

https://www.youtube.com/watch?v=C1e9oGBlHMk