Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Composition Setup
import.css=/download/attachments/327912/newLayout.css
Portuguese

Pagetitle
M468PENT - Preenchimento da TES de entrega futura
M468PENT - Preenchimento da TES de entrega futura

Ponto-de-Entrada: M468PENT - Preenchimento da TES de entrega futura
Versões: Microsiga Protheus 10
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Descrição:
O ponto de entrada M468PENT preenche automaticamente conforme regra personalizada o TES de entrega futura.
Programa Fonte
Sintaxe

M468PENT - Preenchimento da TES de entrega futura ( ) --> aRet

Retorno
    aRet(array_of_record)
  • 1o. Elemento contendo o código do TES2o. Elemento contendo o valor lógico .T. ou .F. para indicar se apresenta ou não a tela de solicitação do TES.
Exemplos
#Include "Protheus.ch"User Function M468PENT()aRet := {"  ",.T.}aRet[2] := Aviso("Ponto M468PENT!!","Apresenta tela de solicitação de TES? ",{"Sim","Nao"}) == 1If aRet[2]	If Aviso("Ponto M468PENT!!","Mostra campo da TES preenchida? ",{"Sim","Nao"}) == 1		aRet[1] := "520" // <- TES com gera financeiro N e movimenta estoque S	EndIfElse	aRet[1] := "520" // <- TES com gera financeiro N e movimenta estoque SEndIfReturn aRet
Variáveis
NomeTipoEscopoPode Alterardescrição
Array of RecordGlobalNão