Á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
CTBCCSUP - Gerar cento de custo superior caso nao siga a regra padrao do Sistema.
CTBCCSUP - Gerar cento de custo superior caso nao siga a regra padrao do Sistema.

Ponto-de-Entrada: CTBCCSUP - Gerar cento de custo superior caso nao siga a regra padrao do Sistema.
Abrangências: Microsiga Protheus 10 , Microsiga Protheus 11
Versões: Microsiga Protheus 10 , Microsiga Protheus 11
Compatível Países: Todos
Sistemas Operacionais: Todos
Compatível às Bases de Dados: Todos
Idiomas: Português (Brasil) , Português (Portugal) , Espanhol , Inglês
Descrição:
Gerar cento de custo superior caso nao siga a regra padrao do Sistema.   
Eventos

chamado an função Gera Codigo do Centro de Custo Superior                   

Programa Fonte
CTBXFUN.PRX 
Sintaxe

CTBCCSUP - Gerar cento de custo superior caso nao siga a regra padrao do Sistema. ( [ cCodigo ] ) --> cCod

Parâmetros:
NomeTipoDescriçãoDefaultObrigatórioReferência
cCodigoCaracterCodigo do centro de custo
Retorno
    cCod (caracter)
  • codigo do centro de custo
Observações

Recebe em PARAMIXB o centro de custo atual. 

Exemplos
If ExistBlock("CTBCCSUP")	cCod := ExecBlock("CTBCCSUP",.F.,.F.,cCodigo)Else	For nCont := 1 to Len(cCodigo)		cCod  := padr(Substr(cCodigo,1,Len(cCodigo)-nCont),nTamCC)		If MsSeek(xFilial()+cCod,.f.)			cCod := CTT->CTT_CUSTO			Exit		EndIf	NextEndIf