× Linguagem de Programação ADVPL

Perguntas Função para separar conta e dígito

Mais
11 anos 8 meses atrás #12079 por GuPadrao
Pessoal,

Na situação abaixo

123456-70

Como faço para obter o valor que está antes do "-" e como faço para obter o valor que está depois do "-"

Grato.

Por favor Acessar ou Registrar para participar da conversa.

Mais
11 anos 8 meses atrás #12081 por lalberto
cConta := '123456-70'

cNumConta := Left(cConta,At("-",cConta)-1)
cDigConta := SubStr(cConta,Rat("-",cConta)+1,2)

Tenta Assim, agora se o digito for fixo sempre 2 caracteres vc pode fazer assim

cConta := StrTran(cConta,'-','')
cConta fica assim '12345670'
cNumConta := Left(cConta,Len(cConta)-2)
cDigConta := Right(cConta,2)


Não testei mas acho que funfa rs

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.119 segundos
Joomla templates by a4joomla