Composition Setup |
---|
import.css=/download/attachments/327912/newLayout.css |
...
Pagetitle | ||
---|---|---|
|
...
|
...
|
...
|
...
...
|
Alcances: | Microsiga Protheus 10, Microsiga Protheus 11 |
...
Versiones: | Microsiga Protheus 10, Microsiga Protheus 11 |
...
Compatible países: | Todos |
Sistemas |
...
operativos: | Todos |
...
Compatible con las bases de datos: |
...
Todas |
Idiomas: |
...
Portugués (Brasil) , |
...
Portugués (Portugal) , |
...
Español , |
...
Inglés |
...
Descripción:
Gerar cento de custo superior caso nao siga a regra padrao do Sistema.
Generar centro de costo superior si no siguiera la regla estándar del sistema.
Eventos
activado la función Genera código del centro de costo superior
Programa fuente
chamado an função Gera Codigo do Centro de Custo Superior
...
CTBXFUN.PRX
...
...
Sintaxis
CTBCCSUP -
...
Generar centro de
...
costo superior si no siguiera la regla estándar del sistema. ( [ cCodigo ] ) --> cCod
...
Parámetros:
...
Nombre | Tipo |
...
Descripción |
...
Estándar |
...
Obligatorio |
...
Referencia | |||
cCodigo |
...
Carácter |
...
Código del centro de |
...
costo |
...
Devolución
...
cCod
(caracter)
...
código del centro de
...
costo
...
Observaciones
Recibe el centro de costo actual en PARAMIXB
...
.
...
Ejemplos
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