Identificador de Regra

VEN-115INCPG01

Módulo: VEN - Vendas.

Finalidade: atribuir uma condição de pagamento a um item de ticket gerado pela rotina de expedição manual. A regra é executada no momento da carga dos itens na grade da tela. Será exibida a condição de pagamento na grade de tickets da tela. Caso não seja atribuída nenhuma condição de pagamento, o campo ficará em branco e a condição definida nas definições do cliente será utilizada para geração das notas.

Transação: não se aplica.

Variáveis disponibilizadas:

Exemplo de regra:

Definir Numero VSCODEMP;
Definir Numero VSFILPED;
Definir Numero VSNUMPED;
Definir Alfa VSCODCPG;
Definir Cursor cE120PED;

SE (VSNUMPED <> 0)  {

	cE120PED.Sql "SELECT E120PED.CODCPG                            \
				FROM E120PED                                             \
			WHERE E120PED.CODEMP =:VSCODEMP       	\
				AND E120PED.CODFIL =:VSFILPED             	\
				AND E120PED.NUMPED =:VSNUMPED";	
	cE120PED.AbrirCursor();
	Se (cE120PED.Achou)  {
		VSCODCPG = cE120PED.CodCpg;
	}
	cE120PED.FecharCursor();
}