01. GENERAL DATA

Product:

TOTVS Backoffice

Product Line:

Protheus Line

Industry:

Services

Module:

TOTVS Backoffice (Protheus Line) - Fixed Assets (SIGAFIS)

Function:

ATFA250

Country:

Brazil

Ticket:

Internal

Requisite/Story/Issue


02. DESCRIPTION

This entry point allows adding or editing tax-related data, to be displayed on the totals grid of the values apportionment routine. You can use it to add new taxes or to edit already existing tax values, as well as make adjustments before assembling the totals onscreen.

03. OTHER INFORMATION


aAF250GrImp := ExecBlock( 'AF250GrImp', .F., .F., aClone(aAF250Imp) )
If ValType( aAF250GrImp ) == "A"
		For nA := 1 To Len( aAF250GrImp )
			// Verifica se todos os tipos de dados estao corretos e se ja
			// nao existe a mesma linha retornada no array aAF250Imp
			If 	Len( aAF250GrImp[nA] ) == 6 .and.;
				ValType(aAF250GrImp[nA,1]) == 'C' .and.;
				ValType(aAF250GrImp[nA,2]) == 'C' .and.;
				ValType(aAF250GrImp[nA,3]) == 'N' .and.;
				ValType(aAF250GrImp[nA,4]) == 'L' .and.;
				ValType(aAF250GrImp[nA,5]) == 'N' .and.;
				ValType(aAF250GrImp[nA,6]) == 'N' .and.;
				!('ICMS' $ Upper(aAF250GrImp[nA,1]) )
				nPosImp :=  aScan( aAF250Imp, {|Imp| 	Imp[1] == aAF250GrImp[nA,1] .and. Imp[2] == aAF250GrImp[nA,2] .and.;
														Imp[3] == aAF250GrImp[nA,3] .and. Imp[4] == aAF250GrImp[nA,4] } )
				If nPosImp == 0
					Aadd( aAF250Imp, aClone( aAF250GrImp[nA] ) )
				Else
					aAF250Imp[nPosImp][5] := aAF250GrImp[nA][5]
					aAF250Imp[nPosImp][6] := aAF250GrImp[nA][6]
				EndIF
			EndIf
		Next nA
	EndIf 
User Function AF250GrImp()

    Local aAF250Imp := PARAMIXB[1]

    // Adiciona um novo imposto "PIS" com valores fictícios para demonstração
    Aadd(aAF250Imp, {"PIS", "CALC_PIS", 8, .T., 1000.00, 200.00})

Return aAF250Imp


  • Observa-se que a utilização do PE e os impactos dele no sistema são de responsabilidade do cliente.
  • Os exemplos utilizados nessa documentação são apenas para fins de demonstração, cada cliente deve verificar qual comportamento deseja realizar de acordo com o escopo do ponto de entrada.

04. RELATED SUBJECTS