Ponto-de-Entrada: TMA180FIL - Grava solicitação de coleta
| Abrangências: | Microsiga Protheus 10 |
| Versões: | Microsiga Protheus 10 |
| Compatível Países: | Todos |
| Sistemas Operacionais: | Todos |
| Compatível às Bases de Dados: | Todas TotvsDbAccess |
| Idiomas: | Espanhol |
Descrição:
Localizado na rotina de coleta automática (TmsA180), o ponto de entrada é responsável por gravar a solcitação de coleta na filial correnspondente ao campo de código de região do solicitante (DUE_CDRSOL).
Programa Fonte
TMSA180.PRW
Sintaxe
TMA180FIL - Grava solicitação de coleta ( [ cCdrSol ] ) --> cRet
Parâmetros:
| Nome | Tipo | Descrição | Default | Obrigatório | Referência | ||||||||||||
| cCdrSol | Caracter | Código de região do solicitante |
Retorno
-
cRet(caracter)
- Filial em qual deverá ser gravada a solicitação de coleta + Codigo da Regiao de OrigemExemplo: 01270001, onde 01= Filial e 270001= Codigo da Regiao de Origem
Exemplos
#Include 'Protheus.ch'Local cCdrSol := ParamIxb Local cRet := ''Local nSizeFil:= FWSizeFilial()cRet := SubStr(Posicione("DUY",1,xFilial("DUY")+cCdrSol,"DUY_FILDES"),1,nSizeFil)cRet += SubStr(cCdrSol,1,Len(DUE->DUE_CDRSOL))Return cRet //Filial + Codigo da Regiao de Origem
Variáveis
| Nome | Tipo | Escopo | Pode Alterar | descrição | ||||||||||
| Array of Record | Global | Não |