Salve salve....
Ponto de entrada SPDPIS07 - ( Registro 0500 Conta Contábil - EFD Contribuições)
#INCLUDE "PROTHEUS.CH" /*/{Protheus.doc} SPDPIS07 Inclusão do ponto de entrada SPDPIS07, para possibilitar a geração do registro 0500 quando o código da conta contábil é diferente do informado na nota fiscal. @type function @author Eurai Rapelli @since 2023.01.01 /*/ User Function SPDPIS07() Local aArea := GetArea() Local cFTFILIAL := PARAMIXB[01] //FT_FILIAL Local cFTTIPOMOV := PARAMIXB[02] //FT_TIPOMOV Local cFTSERIE := PARAMIXB[03] //FT_SERIE Local cFTNFISCAL := PARAMIXB[04] //FT_NFISCAL Local cFTCLIEFOR := PARAMIXB[05] //FT_CLIEFOR Local cFTLOJA := PARAMIXB[06] //FT_LOJA Local cFTITEM := PARAMIXB[07] //FT_ITEM Local cFTPRODUTO := PARAMIXB[08] //FT_PRODUTO //Local cFTCONTA := PARAMIXB[9] //FT_CONTA Local cAliasSFT := 'SFT' Local cFTCONTA := (cAliasSFT)->FT_CONTA //Alterar a conta RestArea(aArea) Return( cFTCONTA )
Gostou? Compartilhe com seus amigos e deixe um comentário! 😎
Um abraço, e até a próxima