Histórico da Página

...

Produto:

Solucoes_totvs

Solucao	TOTVS Manufatura

Solucoes_totvs_cross

SolucaoCross

Solucoes_totvs_parceiros

SolucaoParceiros

Solucoes_totvs_parceirosexptotvs

SolucaoParcsExpsTOTVS

Linha de Produto:

Linhas_totvs

Linha	Linha Protheus

Segmento:

Segmentos_totvs

Segmento	Manufatura

Módulo:

Modulos_cross_segmentos

Modulos_framework

Modulos_totvs_construcao

Modulos_totvs_juridico

Modulos_totvs_logistica

Modulos_totvs_manufatura

ModulosTOTVSManufatura	TOTVS Manufatura (Linha Protheus) - Planejamento e controle da produção (SIGAPCP)

Modulos_totvs_rh

Modulos_totvs_saude

Modulos_totvs_prestadores_de_servicos

Função:

MATA650 - Cadastro de Ordem de Produção

País:

Brasil

...

Localização

Function A650ACols - Responsável em gravar os componentes da ordem.

Parâmetros

.

Nome	Tipo	Descrição	Obrigatório
ParamIxb1	Carater	Código do componente	Não
ParamIxb2	Numérico	Quantidade do componente (qtd necessária* qtd ordem)	Não
ParamIxb3	Carater	Código do produto da ordem	Não
ParamIxb4	Numérico	Quantidade da ordem	Não
ParamIxb5	Carater	Local de processo	Não
ParamIxb6	date	Data da necessidade	Não

.

Retorno

.

Nome

Tipo

Obrigatório

Descrição

Valores

lA650CALT

LogicalSim

Retorna se a função A650EmpAlt será executada

.T. - Não irá executar a função A650EmpAlt e o componente deverá ser tratado no ponto de entrada, para que seja gerado o empenho.

.F. - Irá executar a função A650EmpAlt.

.

Observação

...

Bloco de código

firstline	1
title	Exemplo
linenumbers	true

#INCLUDE "TOTVS.CH"

User Function A650AVALCLocalA650AVALC() 
	Local lRet := PARAMIXB[1]

	If !lRet .And. SA1->(Found()) .And. SA1->A1_COD == '000001'    
		lRet := .T.
	EndIf

Return lRet

...

Árvore de páginas

Versões comparadas

Versão antiga 2

Nova versão Atual

Chave