Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

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.

...

Bloco de código
languagecpp
themeRDark
titleHandling of EP in the system
aAF250GrImp := ExecBlock( 'AF250GrImp', .F., .F., aClone(aAF250Imp) )
If ValType( aAF250GrImp ) == "A"
		For nA := 1 To Len( aAF250GrImp )
			// VerificaCheck sewhether todosall osdata tipostypes deare dadoscorrect estao corretos e se jaand whether
			// the naosame existeline areturned mesmain linhaarray retornadaaAF250Imp nodoes arraynot aAF250Impexist
			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 
Bloco de código
languagecpp
themeRDark
titleEP Example
User Function AF250GrImp()

    Local aAF250Imp := PARAMIXB[1]

    // AdicionaAdd uma novonew imposto "PIS" com valores fictícios para demonstraçãotax with fictitious values for simulation purposes
    Aadd(aAF250Imp, {"PIS", "CALC_PIS", 8, .T., 1000.00, 200.00})

Return aAF250Imp

  


Aviso
titleImportant !!
  • It is noteworthy that the customer is responsible for EP utilization and its impacts on the system.
  • The examples used in this documentation are for demonstration purposes only. Each customer must check what behavior they want to perform according to the scope of the entry point
  • 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

  • Not Applicable.