Ponto-de-Entrada: FISLEGNFE - Permite customizar a regra de cores de documentos do tipo NFE da legenda do SPEDNFE
Abrangências: | Microsiga Protheus 12 |
Versões: | Microsiga Protheus 12 |
Compatível Países: | Brasil |
Sistemas Operacionais: | Todos |
Compatível às Bases de Dados: | Todos |
Idiomas: | Português (Brasil) |
Este ponto de entrada foi disponibilizado a fim de permitir customizar a regra de cores de documentos do tipo NFE da legenda do SPEDNFE
SPEDNFE.PRX
FISLEGNFE - Permite customizar a regra de cores de documentos do tipo NFE da legenda do SPEDNFE( [ PARAMIXB ] ) --> aCores e Tipo Nota(Entrada ou Saida)
Parâmetros:
Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
PARAMIXB | Array of Record |
PARAMIXB[1][2][2](C):"ENABLE" PARAMIXB[1][3]:array PARAMIXB[1][3][1](C):"F2_FIMP=='T'" PARAMIXB[1][3][2](C):"BR_AZUL" PARAMIXB[1][4]:array PARAMIXB[1][4][1](C):"F2_FIMP=='D'" PARAMIXB[1][4][2](C):"BR_CINZA" PARAMIXB[1][5]:array PARAMIXB[1][5][1](C):"F2_FIMP=='N'" PARAMIXB[1][5][2](C):"BR_PRETO"
PARAMIXB[2](C):"SAIDA" |
aCores (vetor)
#INCLUDE "TOTVS.CH"
User Function FISLEGNFE()
Local aVariables := ParamIxb
/*
O ParamIxb neste caso tem 2 posições, sendo:
Primeira posição: Contem o Array aCores original da rotina a ser customizado
Segunda posição: Contem o tipo de nota a ser demonstrado, onde o seu conteúdo poderá ser 'ENTRADA' ou 'SAIDA'
*/
If aVariables[2] == "SAIDA"
aAdd(aVariables[1], {"F2_FIMP=='X'",'BR_PINK'})
ElseIf aVariables[2] == "ENTRADA"
aAdd(aVariables[1], {"F1_FIMP=='X'",'BR_MARROM'})
EndIf
Return aVariables[1]