× Linguagem de Programação ADVPL

Perguntas TABELA X EMPRESA

Mais
10 anos 1 mês atrás - 10 anos 1 mês atrás #25679 por brunosperb
TABELA X EMPRESA foi criado por brunosperb
galera, estou fazendo um programa que importa arquivos do excel para fazer um inventario, até ai ok.porém ele não reconhece a tabela de maneira certa, estou logado na empresa 20 e ele salva as informações na SB7010 alguem pode me ajudar??
segue a parte em que passo os dados

dbSelectArea("SB7")
Begin Transaction
Reclock("SB7", .T.)
SB7->B7_FILIAL:=RIGHT(aProd[1],2)
if len(aprod[2])<2
SB7->B7_LOCAL :=StrZero(val (aProd[2]),2)
else
SB7->B7_LOCAL :=aProd[2]
endif
SB7->B7_COD := aProd[3]
SB7->B7_TIPO:= aprod[4]
SB7->B7_DOC := cDoc
// SB7->B7_DOC:= GETSXENUM("SB7","B7_DOC")
SB7->B7_QUANT:= val(strtran((aProd[5]),",","."))
SB7->B7_DATA:= date(strtran((aProd[6]),",","."))

MsUnLock()
End Transaction
// END
Ultima edição: 10 anos 1 mês atrás por brunosperb.

Por favor Acessar ou Registrar para participar da conversa.

Tempo para a criação da página:0.092 segundos
Joomla templates by a4joomla