- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- RATEIO FOLHA - Centro de Custo e Conta Contabil
×
Linguagem de Programação ADVPL
Perguntas RATEIO FOLHA - Centro de Custo e Conta Contabil
- vcosta
- Autor do Tópico
- Desconectado
- Membro Dourado
Menos
Mais
- Postagens: 175
- Obrigados Recebidos: 0
10 anos 9 meses atrás #20878
por vcosta
RATEIO FOLHA - Centro de Custo e Conta Contabil foi criado por vcosta
Olá,
estou tentando montar um execblock para retornar uma conta contabil na contabilização da folha, compilo normalmente o fonte mas na contabilização retorna um erro informando que não foi compilado.
veja o fonte, tema algo errado?
grato a quem puder ajudar,
valter
User Function GPEA01()
_cConta := ""
If SRZ010.RZ_CC == "110202000"
_cConta := "81020101"
ElseIf SRZ010.RZ_CC $ "110505000/110401003/110401001/110504000/110401002/110404000"
_cConta := "82020101"
ElseIf SRZ010.RZ_CC $ "110101000/110102000/110503000/110501000/110001001"
_cConta := "83020101"
Else
_cConta :="81020101"
EndIF
Return(_cConta)
estou tentando montar um execblock para retornar uma conta contabil na contabilização da folha, compilo normalmente o fonte mas na contabilização retorna um erro informando que não foi compilado.
veja o fonte, tema algo errado?
grato a quem puder ajudar,
valter
User Function GPEA01()
_cConta := ""
If SRZ010.RZ_CC == "110202000"
_cConta := "81020101"
ElseIf SRZ010.RZ_CC $ "110505000/110401003/110401001/110504000/110401002/110404000"
_cConta := "82020101"
ElseIf SRZ010.RZ_CC $ "110101000/110102000/110503000/110501000/110001001"
_cConta := "83020101"
Else
_cConta :="81020101"
EndIF
Return(_cConta)
Por favor Acessar ou Registrar para participar da conversa.
- mbrigagao
- Desconectado
- Membro Platina
Menos
Mais
- Postagens: 350
- Obrigados Recebidos: 1
- Fórum
- Protheus/Microsiga/Totvs
- AdvPL (Advanced Protheus Language)
- Dúvidas Gerais
- RATEIO FOLHA - Centro de Custo e Conta Contabil
Tempo para a criação da página:0.078 segundos