Perguntas MATA241 - Rotina para valorização do custo do Estoque

Estou fazendo uma rotina para valorização do custo do Estoque (B2_CM1), pois alguns produtos
estão sem preços por serem antigos.

Então fiz a rotina para inclusão nas movimentações internas SD3:

aadd(aItemP,{{"D3_COD" ,ALLTRIM(SB2->B2_COD) ,NIL},;
{"D3_FILIAL" ,SB1->B1_FILIAL ,NIL},;
{"D3_QUANT" ,0 ,NIL},;
{"D3_UM" ,cUMB1 ,Nil},;
{"D3_LOCAL" ,SB2->B2_LOCAL ,NIL},;
{"D3_TIPO" ,SB1->B1_TIPO ,NIL},;
{"D3_GRUPO" ,cGrupB1 ,Nil},;
{"D3_CUSTO1" ,wcusto ,Nil},;
{"D3_NUMSEQ" ,PROXNUM() ,NIL},;
{"D3_USUARIO",substr(cUsuario,7,10) ,NIL}})


_cNUMDOC := GETSXENUM("SD3","D3_DOC",NIL)


aCabN := {{"D3_FILIAL" ,SB2->B2_FILIAL ,Nil},;
{"D3_DOC" ,_cNumDoc ,Nil},;
{"D3_TM" ,'003' ,Nil},;
{"D3_EMISSAO" ,ctod('31/01/2016') ,Nil},;
{"D3_CC" ,'' ,Nil}}

MSExecAuto({|x,y,z|MATA241(x,y,z)},aCabN,aItemP,3)


Contudo ao ser executada, retorna com erro:
D3_LOCAL :=02 < -- Invalido, contudo existe sim saldo inicial no SB2 com o mês do Lançamento.


Alguém vê algum erro no código, ou alguma razão para tal erro ?????

Obrigado.

CMKAS



HELP: A260LOCAL

Tabela SD3 11/02/2016 09:59:04
- cDocumento :=019490027
- cTM :=003
- cCC :=
- dA241Data :=31/01/2016
Erro --> M->D3_LOCALO Armazem informado como destino
nãoexiste para este produto.

---

Tabela SD3 11/02/2016 09:59:04
Erro no Item 1

---

Produto - D3_COD :=1.18099
Descr. Prod - D3_DESCRI :=Esfoliante
OBS - D3_XOBS :=
Unidade - D3_UM :=KG
Quantidade - D3_QUANT := 0
C Contabil - D3_CONTA :=112090950
Ord Producao - D3_OP :=
Armazem - D3_LOCAL :=02 < -- Invalido