Perguntas Customização no grid do Orçamento (MATA415)

Mais
12 anos 3 meses atrás #3394 por rodrigolparaujo
Bom dia a todos!
Estou com a seguinte dúvida, preciso montar um gatilho onde tenho que repetir nas linhas abaixo do grid o conteudo do campo CK_LOCAL da linha anterior (não serve da primeira linha)

No pedido de vendas foi fácil

IIF(N>1,aCols[N-1,FieldPos("C5_LOCAL")],'03')

onde N por padrao é a linha que estou (isso usando o MSNEWGETDADOS)

agora no Orçamento, nao consigo saber qual a posição da linha que estou

sei que no orçamento o componente utilizado é o MsGetDB

agradeço desde ja a todos.

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 3 meses atrás #3396 por lalberto
Brother no caso do orçamento de vendas no faturamento, ele não utiliza acols, ele esta em uma tabela temporaria TMP1->CK_LOCAL, agora para pegar a linha anterior vc tera de voltar registros, neste caso creio que terá de fazer uma função mesmo, ou tente pegar TMP1->(Recno())-1, nunca tentei.

Abraços.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 3 meses atrás #3438 por rodrigolparaujo
bom dia amigo!
É isso mesmo, usei o TMP1->(RECNO()) para pegar a posição que estou, montei o gatilho que serve tanto para o Pedido de Vendas quanto para o Orçamento

a função ficou assim:
User Function FATM002()    
	Local _cArm := Alltrim(POSICIONE("SX5",1,XFILIAL("SX5")+"ZW"+__CUSERID,"X5_DESCRI")) //Armazem padrão do Usuário
	if FunName()=="MATA415" //Verifico se estou no Orçamento
		if TMP1->(RECNO())> 1 //Se não for a linha Atual
			TMP1->(MsGoTo(TMP1->(RECNO())-1)) //Posiciono no registro anterior
			_cArm := TMP1->CK_LOCAL  
			TMP1->(MsGoTo(TMP1->(RECNO()))) //volto para o registro
		Endif
	ElseIf FunName()=="MATA410"
                //N = Posição que estou
                //N-1 = Posição anterior
                //FieldPos("C6_LOCAL") = Posição da coluna onde está o campo C6_LOCAL
		_cArm := IIF(N>1,aCols[N-1,FieldPos("C6_LOCAL")],_cArm)
	Endif
Return(_cArm)

obrigado

Por favor Acessar ou Registrar para participar da conversa.

Mais
12 anos 3 meses atrás #3439 por lalberto
Legal Rodrigo, apareça sempre no site, indique aos amigos, e atualiza seu perfil com foto pra gente te conhecer melhor.

Abraços.

Luiz Alberto Vieira Alves
Proprietário
55 (12) 9 8256-5905 (Vivo)
www.3lsystems.com.br
www.masteradvpl.com.br

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.112 segundos
Joomla templates by a4joomla