Producto: | ||||
| Solucoes_totvs_cross | SolucaoCross | TOTVS Backoffice | ||
|---|---|---|---|---|
Línea de | Produtoproducto: | | Linhas_totvs | | Linha | Linha
Segmento: | | Segmentos_totvs | | Segmento | |
Módulo: | Financeiro Financiero (SIGAFIN) | |||
Función: | FINA401 | |||
País: | Brasil |
Verifique si ya se ha grabado el rendimiento en la tabla SR4, evitando valores duplicados
em casos dos impostossi los impuestos de IRRF
e PCC possuírem o mesmoy PCC tuvieran el mismo código de
retençãoretención.
No existen.
Nombre | Tipo | DescriçãoDescripción |
lRet | LógicoRetorna | se verificará ou não a gravação da tabela SR4 ou nãoResponde si verificará o no la grabación de la tabla SR4 o no. |
05. EXEMPLOEJEMPLO
| Bloco de código | ||||||||||
|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||
#Include 'Protheus.ch'
#include 'totvs.ch'
User Function F401VldPai()
Local nRecPai := PARAMIXB[1]
Local aArea := GetArea()
Local lRet := .F.
dbSelectArea("SE2")
dbGoTo(nRecPai)
If SE2->E2_PIS+SE2->E2_COFINS+SE2->E2_CSLL+SE2->E2_IRRF > 0
lRet := .T.
EndIf
RestArea(aArea)
Return lRet |