Linha Microsiga Protheus

Árvore de páginas

  • Criado por Usuário desconhecido (sueli.gomides), última alteração por admin em 24 jun, 2012

Ponto-de-Entrada: MNTA6352 - Análise de Consistência
Versões: Microsiga Protheus 8.11 , Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Espanhol , Inglês
Descrição: 
Ponto de entrada chamado na análise de consistência para, por exemplo, checar uma inconsistência específica do cliente.
Programa Fonte 
MNTA635.PRX
Sintaxe

MNTA6352 - Análise de Consistência ( ) --> .T.

Retorno
    .T.(logico)
  • Verdadeiro
Exemplos 
User Function MNTA6352()Local nKM := 0Local nMedia:= 0Local nTolMax,nTolMinnKM := NGCONTPER(cFrota,DTOS(aRep2[nx][10]),aRep2[nx][11])nMedia := (nKm/aRep2[nx][7])nTolMax := ST9->T9_MEDIA * (1 + (GetMv("MV_NGPRAUT") / 100))nTolMin := ST9->T9_MEDIA * (1 - (GetMv("MV_NGPRAUT") / 100))If Len(aRep2[nx]) > 12	If aRep2[nx][13] == " 90"		Return .t.	EndIfEndIf	If nMedia < nTolMin .Or. nMedia > nTolMax	Mnt635Gra(aRep2,nx," 90",cFIL)EndIf	Return .t.