Este Ponto de Entrada pertence à rotina de Relatórios de L.I. (EICOR150). Ele deve ser utilizado para customizar os relatórios.
Programa Fonte: EICOR150.PRW
User Function EICOR150()
Local cParam := If(Type("ParamIxb") = "A",ParamIxb[1],If(Type("ParamIxb") = "C",ParamIxb,""))
DO case
CASE cParam == "ADICIONA_CAMPO"
aAdd(Struct,{"NOVO_CAMPO","C",10,0})
CASE cParam == "DESC_ITEM_REL"
conout("Descrição do item: " + cTexto)
CASE cParam == "DESC_LI_REL"
msginfo("Licença de importação","Descrição LI")
CASE cParam == "IMPRIME_EST_MUN"
msginfo("Impressão do estado e município")
CASE cParam =="TOTALIZADOR"
nTot_PLI := 10.000,00
nPesTotPLI := 100
CASE cParam == "DESCRICAO_ITEM"
cTexto +="Adiciona na descrição do item"
CASE cParam == GRAVA_WORK
msginfo("Tabela work gravada","Gravação da work")
CASE cParam == "Impostos"
msginfo("Impressão dos impostos ICMS,IPI,PIS E COFINS")
CASE cParam == "GRV_WORK_INV"
msginfo("Entrou no ponto de entrada 'GRV_WORK_INV' ")
END CASE
Return Nil |
| Nome | Tipo | Descrição |
|---|---|---|
| ADICIONA_CAMPO | Caracter | Permite incluir ou alterar campos da tabela Work |
| DESC_ITEM_REL | Caracter | Impressão da descrição do item. |
| DESC_LI_REL | Caracter | Impressão da descrição da L.I. |
| IMPRIME_EST_MUN | Caracter | Permite alteração do Relatório de L.I antes da impressão. |
| TOTALIZADOR | Caracter | Totalizador personalizado. |
| DESCRICAO_ITEM | Caracter | Impressão da descrição do item. |
| GRAVA_WORK | Caracter | Ocorre antes da gravação da work dos itens do relatório (Alias = Work). |
| IMPOSTOS | Caracter | Impressão dos impostos das alíquotas ICMS, IPI, PIS e COFINS. |
| GRV_WORK_INV | Caracter | Ocorre na gravação da Work das invoices. (Alias = Work). |
| Parâmetro | Nome | Tipo | Permite alterar | Descrição |
|---|---|---|---|---|
| ADICIONA_CAMPO | Struct | Array | Sim | A variável Struct é um array que contém os campos para permitir a manipulação do relatório. |
| TOTALIZADOR | nTot_PLI | Numérico | Sim | Total da P.L.I. |
| TOTALIZADOR | nPesTotPLI | Numérico | Sim | Peso total. |
| DESCRICAO_ITEM | cTexto | Caracter | Sim | Descrição do item. |