×
Linguagem de Programação ADVPL
Perguntas acols fina070
- sarraipa
- Autor do Tópico
- Desconectado
- Membro Dourado
-
Menos
Mais
- Postagens: 232
- Obrigados Recebidos: 1
10 anos 10 meses atrás #20139
por sarraipa
acols fina070 foi criado por sarraipa
Na rotina FINA070 quando vou baixar ou cancelar uma baixa existe um campo DBAIXA, para capturar a informação deste campo acho que deve ser através de acols, mas não intendo muito de alcos, aguem pode me ajudar.
O motivo de tudo isso é pq quero compara a data que o titulo foi baixado com a data do sistema na hora de cancelar a baixa, e se eu tento pegar a baixa da E1_BAIXA da pau quando o titulo tem baixa parcial
O motivo de tudo isso é pq quero compara a data que o titulo foi baixado com a data do sistema na hora de cancelar a baixa, e se eu tento pegar a baixa da E1_BAIXA da pau quando o titulo tem baixa parcial
Por favor Acessar ou Registrar para participar da conversa.
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
10 anos 10 meses atrás #20143
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico acols fina070
Qual o ponto de entrada vc está utilizando ?
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.
- sarraipa
- Autor do Tópico
- Desconectado
- Membro Dourado
-
Menos
Mais
- Postagens: 232
- Obrigados Recebidos: 1
- lalberto
-
- Desconectado
- Administrador
-
Menos
Mais
- Postagens: 3676
- Obrigados Recebidos: 6
10 anos 10 meses atrás #20336
por lalberto
Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br
Respondido por lalberto no tópico acols fina070
#include "Protheus.ch"
/*
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍ»±±
±±ºPrograma ³FA070CA4 ºAutor ³ Rafael Rodrigues º Data ³ 01/14/09 º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºDesc. ³ Impede que exclusoes de baixa sejam feitas em data º±±
±±º ³ diferente da baixa, para nao causar erros na contabilidade.º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºUso ³ Network1 º±±
±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
*/
User Function FA070CA4()
Local lRet := .T.
If dDatabase <> SE5->E5_DTDISPO
Aviso( "Atenção à data", "A baixa não pôde ser efetuada!"+Chr(13)+Chr(10)+"A data do crédito é diferente da data base do sistema e isto causará erros na contabilização. Antes de cancelar/excluir a baixa, favor alterar a data base do sistema para "+Dtoc(SE5->E5_DTDISPO)+".", {"Ok"}, 2 )
lRet := .F.
EndIf
Return lRet
/*
ÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜÜ
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
±±ÉÍÍÍÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍËÍÍÍÍÍÍÑÍÍÍÍÍÍÍÍÍÍÍÍÍ»±±
±±ºPrograma ³FA070CA4 ºAutor ³ Rafael Rodrigues º Data ³ 01/14/09 º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÊÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºDesc. ³ Impede que exclusoes de baixa sejam feitas em data º±±
±±º ³ diferente da baixa, para nao causar erros na contabilidade.º±±
±±ÌÍÍÍÍÍÍÍÍÍÍØÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍ͹±±
±±ºUso ³ Network1 º±±
±±ÈÍÍÍÍÍÍÍÍÍÍÏÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍÍͼ±±
±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±±
ßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßßß
*/
User Function FA070CA4()
Local lRet := .T.
If dDatabase <> SE5->E5_DTDISPO
Aviso( "Atenção à data", "A baixa não pôde ser efetuada!"+Chr(13)+Chr(10)+"A data do crédito é diferente da data base do sistema e isto causará erros na contabilização. Antes de cancelar/excluir a baixa, favor alterar a data base do sistema para "+Dtoc(SE5->E5_DTDISPO)+".", {"Ok"}, 2 )
lRet := .F.
EndIf
Return lRet
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.111 segundos