- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Modelo 2 (campo data de vencimento)
×
Linguagem de Programação ADVPL
Perguntas Modelo 2 (campo data de vencimento)
- gustavo
- Autor do Tópico
- Desconectado
- Membro Sénior
-
Menos
Mais
- Postagens: 70
- Obrigados Recebidos: 0
10 anos 4 meses atrás #23417
por gustavo
Modelo 2 (campo data de vencimento) foi criado por gustavo
Boa tarde pessoal!!!
Estou criando uma modelo 2 porém estou com um problema. Coloco uma variável dDatainc que recebe Date(), e outra que recebe DayDAY(dDatainc)+ 15, porém quando o fonte vai executar o campo da um erro.
Private dDtainc := Date()
Private dDtavenc := DAY(dDatainc)+2
AADD(aCab,{'dDtainc',{15,400},'Emissao',,,,.F.})
AADD(aCab,{'dDtavenc',{15,480},'Vencimento',,,,.F.})
o erro segue em anexo.
Obrigado.
Estou criando uma modelo 2 porém estou com um problema. Coloco uma variável dDatainc que recebe Date(), e outra que recebe DayDAY(dDatainc)+ 15, porém quando o fonte vai executar o campo da um erro.
Private dDtainc := Date()
Private dDtavenc := DAY(dDatainc)+2
AADD(aCab,{'dDtainc',{15,400},'Emissao',,,,.F.})
AADD(aCab,{'dDtavenc',{15,480},'Vencimento',,,,.F.})
o erro segue em anexo.
Obrigado.
Por favor Acessar ou Registrar para participar da conversa.
- davidjackpaiva
- Desconectado
- Membro Especialista
-
Menos
Mais
- Postagens: 153
- Obrigados Recebidos: 0
10 anos 4 meses atrás #23421
por davidjackpaiva
Respondido por davidjackpaiva no tópico Modelo 2 (campo data de vencimento)
Poderia anexar o fonte inteiro para analisar?? Seria melhor!!
Por favor Acessar ou Registrar para participar da conversa.
- admin
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 216
- Obrigados Recebidos: 0
10 anos 4 meses atrás - 10 anos 4 meses atrás #23424
por admin
Respondido por admin no tópico Modelo 2 (campo data de vencimento)
Tenta assim:
Private dDtainc := Date()
Private dDtavenc := (dDatainc+2) // Soma Data Inicial Mais 2 Dias
AADD(aCab,{'dDtainc',{15,400},'Emissao','@!',,,.F.})
AADD(aCab,{'dDtavenc',{15,480},'Vencimento','@!',,,.F.})
Private dDtainc := Date()
Private dDtavenc := (dDatainc+2) // Soma Data Inicial Mais 2 Dias
AADD(aCab,{'dDtainc',{15,400},'Emissao','@!',,,.F.})
AADD(aCab,{'dDtavenc',{15,480},'Vencimento','@!',,,.F.})
Ultima edição: 10 anos 4 meses atrás por admin.
Por favor Acessar ou Registrar para participar da conversa.
- gustavo
- Autor do Tópico
- Desconectado
- Membro Sénior
-
Menos
Mais
- Postagens: 70
- Obrigados Recebidos: 0
10 anos 4 meses atrás #23434
por gustavo
Respondido por gustavo no tópico Modelo 2 (campo data de vencimento)
Obrigado Adm consegui resolver o problema. David o problema já está resolvido, mas segue em anexo o fonte da modelo 2 ainda não terminei.
Por favor Acessar ou Registrar para participar da conversa.
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- Modelo 2 (campo data de vencimento)
Tempo para a criação da página:0.105 segundos