Histórico da Página

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).

TMSA180.PRW

TMA180FIL - Grava solicitação de coleta ( [ cCdrSol ] ) --> cRet

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

#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