Linha Microsiga Protheus

Árvore de páginas


CONTEÚDO

  1. Visão Geral
  2. Exemplo de utilização
  3. Parâmetros
  4. Variáveis
  5. Tabelas utilizadas
  6. Demais informações

01. VISÃO GERAL

Este Ponto de Entrada pertence à rotina de Receb. Importação (EICDI154) para que seja possível a customização das funcionalidades de impressão do relatório de Solicitação de Nota Fiscal ou Custo Realizado do processo de importação.

Programa Fonte: EICDI155.PRW 

02. EXEMPLO DE UTILIZAÇÃO


Exemplo
#include 'protheus.ch'

user function EICDI155()

local cParam  := If (Type("ParamIxb") == "A",ParamIxb[1],If (Type("ParamIxb") == "C",ParamIxb,""))

if Type("ParamIxb") == "C" .and. cParam == "IMPRIMINDO_BOX_NOTA_FISCAL"
    nLin += 35
    oPrn:Say(nLin,10,"Condição de Pagamento: " + Posicione( "SW2", 1, xFilial("SW2") + cPedido , "W2_COND_PA"))
elseIf cParam == "IMPRIMINDO_NOTA_FISCAL"    
   //Alteração para exibir o valor cif unitário
   cPreco:= TRAN(Work1->WKCIF / Work1->WKQTDE,'@E 999,999,999.9999')   
endif

Return Nil

03. PARÂMETROS

NomeTipoDescrição

IMPRIMINDO_BOX_NOTA_FISCAL

CaracterePermite a impressão de informações adicionais no box da nota fiscal

IMPRIMINDO_NOTA_FISCAL

CaracterePermite a alteração das variáveis da solicitação da nota fiscal que serão impressas no documento.

04. VARIÁVEIS

VariávelTipoDescrição

cPedido

CaractereVariável com o código do Purchase Order (W2_PO_NUM)
nLinNuméricoLinha do posicionamento da impressão
cPrecoCaractereVariável que exibirá o valor do preço unitário do item na impressão da solicitação da nota fiscal.

05. TABELAS UTILIZADAS

  • SW2 - Capa de Purchase Order        

06. DEMAIS INFORMAÇÕES