Linha Microsiga Protheus - Inglês

Páginas filhas
  • EP AF250GRIMP

Versões comparadas

Versão antiga 1

changes.mady.by.user Otto Alexandre Monteiro Altorfer

Gravado em

comparado com

Nova versão 2

changes.mady.by.user Otto Alexandre Monteiro Altorfer

Gravado em

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.

03. OTHER INFORMATION


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 )
			// 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
Bloco de código
languagecpp
themeRDark
titleEP Example
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


Aviso
titleImportant !!
  • 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.