Expand | ||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
|
Panel | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
Situação: |
ITEM COMEÇADO COM 60 NÃO INTEGRA DO SAPE E PRECISA SER CADASTRADO NO TOTVS DIRETO.
Se o código do item começar com 47, na integração, já configura com item faturável no TOTVS
MDM (Código diferente do SAPE) - > SAPE - > TOTVS
10404627 - > 39102898 - > 39102898
Existem dois SAPE, o SAPE Governo, integra com a Moderna e o outro SAPE integra com a Santillana.
Campo1 Venda
Campo8 Contrato DA
Campo9 Volume\Edições
Campo12 Volume\Edições
Campo14 Livro
SANTIBR-64116 CADASTRO NA BASE DE SOLUÇÕES
Caros, bom dia! Solicito cadastro na base de soluções do item da planilha em anexo. Origem: Moderna. Destino Soluções. OBS: Material trata-se de uma caixa de Prefeitura.
SANTIBR-59278 – MOCG009 + qg DuplicaItensEntreEmpresas.p - Copia Códigos de Itens de uma empresa para outra - Duplicar Códigos
Tip |
---|
Possíveis Soluções: |
Solicitar as informações abaixo referente aos itens a serem copiados:
Empresa de origem
Empresa de destino
Código dos Itens
Família Comercial que será usado na empresa destino
--- Preparar arquivo Excel
Emp Origem | Emp Destino | cod item | Descr Item | Familia Comercial |
Salvar em CSV (MS-DOS) (*.csv) com o nome abaixo para facilitar futuras consultas DuplItemSantibr59278.csv
Obs.: Descrição não precisa, mas o campo tem que estar, porque o qg precisa.
Acessar a empresa de origem, abrir o editor e chamar o qg no caminho W:\ESP2\qgp\DuplicaItensEntreEmpresas.p.
Code Block |
---|
/* Programa deve ser excutado na empresa origem */
/* Conectar banco mgcad da empresa destino */
IF NOT CONNECTED ("mgcad1") THEN DO:
FIND FIRST bco_empres WHERE
bco_empres.cod_empresa = '8' AND /* empresa destino */
bco_empres.cod_bco_logic = "mgcad" NO-LOCK NO-ERROR.
IF AVAIL bco_empres THEN
CONNECT -db VALUE(bco_empres.cod_bco_fisic) -ld mgcad1 VALUE(bco_empres.cod_param_conex).
END. |
Code Block |
---|
DEF TEMP-TABLE tt-item
FIELD ep-origem AS INT
FIELD ep-destino AS INT
FIELD it-codigo LIKE mgcad1.ITEM.it-codigo
FIELD des-item LIKE mgcad1.ITEM.desc-item
FIELD fm-codigo LIKE mgcad1.ITEM.fm-codigo.
INPUT FROM I:\Leopoldo\Duplica_Item_SANTIBR-65026.csv.
REPEAT:
CREATE tt-item.
IMPORT DELIMITER ";" tt-item.
END.
FIND FIRST tt-item WHERE tt-item.it-codigo = "" no-lock NO-ERROR.
IF AVAIL tt-item THEN DELETE tt-item.
DEF BUFFER bf-it-sape-int FOR modlog.mocd-it-sape-int.
FOR EACH tt-item:
/* verifica se item ja existe na empresa destino */
FIND mgcad1.ITEM WHERE mgcad1.ITEM.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
IF AVAIL mgcad1.ITEM THEN DO:
MESSAGE tt-item.it-codigo + " Item ja existe na empresa destino"
VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.
UNDO, RETRY.
END.
/* Consulta cadastro para gerar registro de integração */
FIND mgcad.ITEM WHERE mgcad.ITEM.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
IF NOT AVAIL mgcad.ITEM THEN DO:
MESSAGE "Nao localizado na empresa origem o item " + tt-item.it-codigo
VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.
UNDO, RETRY.
END.
FIND LAST modlog.mocd-it-sape-int WHERE modlog.mocd-it-sape-int.acao = "I" AND
modlog.mocd-it-sape-int.empresa = string(tt-item.ep-origem) AND
modlog.mocd-it-sape-int.campo1 = tt-item.it-codigo NO-LOCK NO-ERROR.
IF AVAIL modlog.mocd-it-sape-int THEN DO:
CREATE bf-it-sape-int.
BUFFER-COPY modlog.mocd-it-sape-int EXCEPT empresa dt-recebido campo8 ident hr-recebido dt-processado hr-processado l-processado TO bf-it-sape-int.
ASSIGN bf-it-sape-int.dt-recebido = TODAY
bf-it-sape-int.hr-recebido = STRING(TIME, "hh:MM")
bf-it-sape-int.l-processado = NO
bf-it-sape-int.empresa = string(tt-item.ep-destino)
bf-it-sape-int.campo5 = tt-item.fm-codigo.
DISP bf-it-sape-int.campo1 FORMAT "x(25)".
END.
ELSE DO:
/* criando integração do item */
FIND mgcad.ITEM WHERE mgcad.ITEM.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
FIND FIRST moe-item WHERE moe-item.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
FIND FIRST item-lanc WHERE item-lanc.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
FIND FIRST item-agrupa WHERE item-agrupa.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
CREATE mocd-it-sape-int.
ASSIGN mocd-it-sape-int.nome = "LIVRO"
mocd-it-sape-int.acao = "I"
mocd-it-sape-int.campo1 = mgcad.ITEM.it-codigo
mocd-it-sape-int.campo2 = mgcad.ITEM.desc-item
mocd-it-sape-int.campo4 = mgcad.ITEM.fm-codigo
mocd-it-sape-int.campo9 = IF AVAIL item-agrupa THEN item-agrupa.item-volume ELSE ""
mocd-it-sape-int.campo14 = IF AVAIL moe-item THEN string(moe-item.cod-mdm) ELSE ""
mocd-it-sape-int.campo17 = IF AVAIL moe-item THEN moe-item.cod-tipo-livro ELSE ""
mocd-it-sape-int.campo6 = IF AVAIL moe-item THEN string(moe-item.editoria) ELSE ""
mocd-it-sape-int.campo7 = IF AVAIL item-lanc THEN STRING(YEAR(item-lan.dt-prev-lanc),"9999") + "-" +
STRING(MONTH(item-lanc.dt-prev-lanc),"99") + "-" +
STRING(DAY(item-lanc.dt-prev-lanc),"99") ELSE ""
mocd-it-sape-int.campo10 = IF AVAIL item-lanc THEN STRING(YEAR(item-lan.dt-lim-venda),"9999") + "-" +
STRING(MONTH(item-lanc.dt-lim-venda),"99") + "-" +
STRING(DAY(item-lanc.dt-lim-venda),"99") ELSE ""
mocd-it-sape-int.campo11 = IF AVAIL item-lanc THEN STRING(YEAR(item-lan.dt-distrato),"9999") + "-" +
STRING(MONTH(item-lanc.dt-distrato),"99") + "-" +
STRING(DAY(item-lanc.dt-distrato),"99") ELSE ""
mocd-it-sape-int.campo12 = IF AVAIL item-lanc THEN item-lanc.it-titulo ELSE ""
mocd-it-sape-int.campo13 = IF AVAIL item-lanc THEN item-lanc.situ-projeto ELSE ""
mocd-it-sape-int.dt-recebido = TODAY
mocd-it-sape-int.hr-recebido = STRING(TIME, "hh:MM")
mocd-it-sape-int.l-processado = NO
mocd-it-sape-int.empresa = string(tt-item.ep-destino)
mocd-it-sape-int.campo5 = tt-item.fm-codigo.
END.
IF NOT tt-item.it-codigo BEGINS "22" AND NOT tt-item.it-codigo BEGINS "23" THEN DO:
FIND item-agrupa WHERE item-agrupa.it-codigo = tt-item.it-codigo NO-LOCK NO-ERROR.
IF NOT AVAIL item-agrupa THEN DO:
MESSAGE "Não localizado cadastro do volume para o item " tt-item.it-codigo
VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.
UNDO, RETRY.
END.
/* Criando Integração do volume */
IF CAN-FIND(FIRST mgcad1.ITEM WHERE mgcad1.ITEM.it-codigo = item-agrupa.item-volume) THEN DO:
MESSAGE "Volume do item ja cadastrado " + item-agrupa.item-volume
VIEW-AS ALERT-BOX INFORMATION BUTTONS OK.
END.
ELSE DO:
FIND mgcad.ITEM WHERE mgcad.ITEM.it-codigo = item-agrupa.item-volume NO-LOCK NO-ERROR.
FIND FIRST moe-item WHERE moe-item.it-codigo = item-agrupa.item-volume NO-LOCK NO-ERROR.
FIND FIRST item-lanc WHERE item-lanc.it-codigo = item-agrupa.item-volume NO-LOCK NO-ERROR.
CREATE mocd-it-sape-int.
ASSIGN mocd-it-sape-int.nome = "LIVRO"
mocd-it-sape-int.acao = "I"
mocd-it-sape-int.campo1 = mgcad.ITEM.it-codigo
mocd-it-sape-int.campo2 = mgcad.ITEM.desc-item
mocd-it-sape-int.campo4 = mgcad.ITEM.fm-codigo
mocd-it-sape-int.campo9 = item-agrupa.item-volume
mocd-it-sape-int.campo14 = IF AVAIL moe-item THEN string(moe-item.cod-mdm) ELSE ""
mocd-it-sape-int.campo17 = IF AVAIL moe-item THEN moe-item.cod-tipo-livro ELSE ""
mocd-it-sape-int.campo6 = IF AVAIL moe-item THEN string(moe-item.editoria) ELSE ""
mocd-it-sape-int.campo7 = IF AVAIL item-lanc THEN STRING(YEAR(item-lan.dt-prev-lanc),"9999") + "-" +
STRING(MONTH(item-lanc.dt-prev-lanc),"99") + "-" +
STRING(DAY(item-lanc.dt-prev-lanc),"99") ELSE ""
mocd-it-sape-int.campo10 = IF AVAIL item-lanc THEN STRING(YEAR(item-lan.dt-lim-venda),"9999") + "-" +
STRING(MONTH(item-lanc.dt-lim-venda),"99") + "-" +
STRING(DAY(item-lanc.dt-lim-venda),"99") ELSE ""
mocd-it-sape-int.campo11 = IF AVAIL item-lanc THEN STRING(YEAR(item-lan.dt-distrato),"9999") + "-" +
STRING(MONTH(item-lanc.dt-distrato),"99") + "-" +
STRING(DAY(item-lanc.dt-distrato),"99") ELSE ""
mocd-it-sape-int.campo12 = IF AVAIL item-lanc THEN item-lanc.it-titulo ELSE ""
mocd-it-sape-int.campo13 = IF AVAIL item-lanc THEN item-lanc.situ-projeto ELSE ""
mocd-it-sape-int.dt-recebido = TODAY
mocd-it-sape-int.hr-recebido = STRING(TIME, "hh:MM")
mocd-it-sape-int.l-processado = NO
mocd-it-sape-int.empresa = string(tt-item.ep-destino)
mocd-it-sape-int.campo5 = tt-item.fm-codigo.
END.
END.
END. |
Verificar se a empresa destino está informada corretamente, que neste caso é a 8 e rodar o qg para conectar os bancos empresa de origem e destino e rodar a parte do programa que está selecionado a baixo.
Depois que rodar o programa, comentar o trecho do programa como abaixo
Descomentar o programa a linha DEF TEMP-TABLE até o final do programe e informar o local onde o arquivo *csv está gavado para que o qg possa acessá-lo, como exemplo abaixo e executar o programa.
Acessar a empresa de destino e rodar o mocg009 e executar
Deve abrir um arquivo de log informando os itens que foram importados, com a letra I de importados, como abaixo
Letra A é referente a advertência e E de erros
OBS: QG da Cristina Jorge
Pode rodar o qg G:\Leopoldo\Consulta_Mocd_It_Sape_Int.p para verificar se os itens foram criados na tabela para o mocg009 importar.
Se o item não copiar de primeira, pode consultar se o item está na tabela , mocd-it-sape-in
Code Block |
---|
qg-consulta-item-sape-dts.p
FOR EACH mocd-it-sape-int
WHERE campo1 = '46801074':
DISP mocd-it-sape-int
EXCEPT desc-erro log-env-sape
WITH WIDTH 300 1 COLUMN.
END
dt-recebido > 08/11/2023 // mm/dd/aaaa
/* WHERE campo1 = '46801074' OR campo1 = '10224720': */
/* MOCG009 */ |
Se estiver e estiver com sim no campo l-processado, rodar este qg, para mudar o item para não processado para então rodar o mocg009 novamente. As vezes, tenta importar o item, antes do volume.
Code Block |
---|
FOR EACH mocd-it-sape-int WHERE campo1 = "120003585":
l-processado = NO.
END. |
Rodar o mocg009 novamente
Code Block |
---|
************************* Consultar da Lista os itens que foram integrados
DEF TEMP-TABLE tt-item
FIELD itens LIKE item.it-codigo.
INPUT FROM "I:\Leopoldo\item.csv". // Lista de códigos de pedidos e código dos emitentes
REPEAT:
CREATE tt-item.
IMPORT DELIMITER ";" tt-item.
END.
INPUT CLOSE.
OUTPUT TO I:\Leopoldo\itens_importados.csv.
PUT UNFORMATTED
"itens" SKIP.
FOR EACH tt-item WHERE
tt-item.itens <> "": //Diferente de branco na tt-pedido
PROCESS EVENTS. // Para não travar a tela quando lê muitos dados
FIND FIRST ITEM WHERE // find first ler o primeiro item da tabela
ITEM.it-codigo = tt-item.itens NO-LOCK NO-ERROR.
IF AVAIL ITEM THEN DO:
PUT UNFORMATTED
ITEM.it-codigo SKIP.
END.
END.
OUTPUT CLOSE. |
title | MOCG009 + QG Consulta Item SAPE DTS - Item do SAPE não integrou no TOTVS.docx |
---|
Panel | ||||||||
---|---|---|---|---|---|---|---|---|
| ||||||||
Situação: |
Chamar no Teams a BR, Equipe SIMM para verificar a integração.
MDM (Código diferente do SAPE) - > SAPE - > TOTVS
10404627 - > 39102898 - > 39102898
SANTIBR-59886- MMOCG009 + QG Consulta Item SAPE DTS - Item do SAPE não integrou no TOTVS
Se buscar os itens pelo qg-consulta-item-sape-dts.p (qg no final deste documento) e também os logs de integração, nas pastas S:\Prod\integr\CorporatSant, mas pode ser \CorporatMod ou \CorporatGov ou \CorporatSeu ou \CorporatSol, solicitar ao Jorge verificar no SAPE a exportação.
Boa tarde!
Não consigo abrir OPs no Totvs, aparece a mensagem de erro que envio no print anexado.
Na verdade, o erro está na integração do SAPE com o TOTVS que não foi feita. Volume 10029667. Podem verificar, por favor?
Tip |
---|
Possíveis Soluções: |
Verificamos, os logs de integração, na pasta S:\Prod\integr\CorporatSant, mas pode ser \CorporatMod ou \CorporatGov ou \CorporatSeu ou \CorporatSol que o item não tinha integrado, porque não foi localizada a Família Comercial, como podemos ver abaixo:
Temos o programa Search and Replace sr32.exe que pode procurar mais rapidamente, como exemplo abaixo
Após identificar que o problema foi não ter encontrado a Família Comercial e receber da usuária do chamado que a família deveria ser 40240020, verificamos que não existia no TOTVS e solicitamos que ela fizesse a alteração para uma Família Comercial que já existe ou o cadastro de uma nova.
Após a alteração da Família no SAPE, dentro de 30 minutos o item foi integrado.
Code Block |
---|
qg-consulta-item-sape-dts.p FOR EACH mocd-it-sape-int WHERE campo1 = '46801074': DISP mocd-it-sape-int EXCEPT desc-erro log-env-sape WITH WIDTH 300 1 COLUMN. END dt-recebido > 08/11/2023 // mm/dd/aaaa /* WHERE campo1 = '46801074' OR campo1 = '10224720': */ /* MOCG009 */ |
Expand | |||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||
MDM (Código diferente do SAPE) - > SAPE - > TOTVS 10404627 - > 39102898 - > 39102898
Verificar se os itens estão na tabela mocd com o qg
Mudar para não com o qg abaixo
Rodar o mocg009 novamente |
Expand | |||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||
Os pedidos do PWM, que tem itens digitais, não estão integrando ao ERP e criando pedido porque, os itens digitais estão cadastrados com o tipo de controle debito direto e com isso o sistema pede a conta aplicação, mas o certo era, estes itens, estarem cadastrados com tipo de controle Não Definido e desta forma não vai pedir conta e os pedidos serão integrados. Verificamos que o Grupo de estoque e o tipo de controle estavam errados. Então trocamos com o qg: R:\ESP2\qgp\AlteraGrEstoqueItem.p
Pedidos integrados |
Expand | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
Todos os dias chegam 4 e-mails sobre os cadastros dos itens. Sendo eles os itens pertencentes aos seguintes cenários:
Os arquivos também ficam disponíveis na pasta da rede “(\\SBRTOTVSAPP1) (S:)”, para cada empresa:
FOR EACH mod-ger-estat WHERE mod-ger-estat.data-estat >= 06/01/2023 AND mod-ger-estat.cod-estabel = "99" AND mod-ger-estat.serie = "1" AND mod-ger-estat.nr-nota-fis = "0017540": UPDATE mod-ger-estat.it-codigo mod-ger-estat.cod-contr mod-ger-estat.nro-anexo mod-ger-estat.ano-refer mod-ger-estat.u-char WITH WIDTH 300. END. |
Expand | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
O livro está na tabela “mocd-it-sape-int”, porém o volume não está e, com isso, o livro não é importado.
Confirmar se a família comercial esta cadastrada:] Alterar o livro para “não processado” com o “qg” abaixo: FOR EACH mocd-it-sape-int WHERE campo1 = "120003585": l-processado = NO. END. Executar o “MOCG009”, para este caso foi apresentado erro de volume não localizado: Enviar o volume não localizado, (neste exemplo 10029837), para o TOTVS novamente, colocando um ponto e tirando na descrição. O Volume apareceu na tabela “mocd-it-sape-int”: Depois executado o MOCG020, os itens foram importados: |
Expand | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
O item 42103509 está com um título diferente no Totvs (Soluções Moderna) do cadastrado no Sape.
Se o usuário possuir acesso ao SAPE, solicitar que altere alguma informação na descrição do item, no SAPE, no campo "Nome Magnus". Salvar está alteração e depois alterar a descrição do item para a forma correta. Desta forma o item é forçado a uma nova integração, sendo atualizado: |
Expand | ||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||
Tentativa de integrar OP 23648 no volume abaixo no TOTVS. Foi efetuada alteração no SAPE, mas não integrou no TOTVS:
Não é possível alterar o volume já cadastrado no OP 23648, pois essa OP foi iniciada no mês 07/21 e o pedido de compra associado a ela. Inclusive foi identificado que o 10026086 está ativo no TOTVS e contrato de DA Nro: 2476 da Ruth Rocha, Qq alteração deste deve ser informado a área de DA: |
Expand | |||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||||||||||||||
Verificar se estão acontecendo as atualizações de forma automática, dos itens que foram direcionados para Aparas ou Distrato. Notamos no PWM, no campo “avise me quando puder” que há 2 itens: https://loja.moderna.com.br/varejista// Esta loja plataforma é da Gestão do Andrews Guedes, junto com PWM, PWV, Sob Medida, Telepedido Uesley é do time do PWV, desenvolvedor, mas chamar o Andrews primeiro.
SANTIBR-65816 - Rotina de Atualização de itens - Canal Responsável - Tabela PWMP1 Pessoal, boa tarde! Por gentileza verificar se estão acontecendo as atualizações de forma automática, dos itens que foram direcionados para Aparas ou Distrato. Notamos no PWM, no campo “avise me quando puder” que há 2 itens:
Porém os mesmos apontam com * na frente e isso significa que não serão comercializados. É possível avaliar o ocorrido e confirmar se essa rotina de atualização esteja acontecendo? Porém os mesmos apontam com * na frente e isso significa que não serão comercializados.
O item está distratado no SAPE e sem data limite de comercialização. Na item-lanc não temos uma data limite de venda e nem data de distrato Precisa atualizar a negociação para tirar este produto da venda, mas como eles ainda estão vigentes, não podem tirar da loja. Então abriram chamado para analisar se conseguem tirar esses dois, pontualmente, do estoque de obsoletos para entregar. Para atualizar a negociação destes itens para tirar eles da venda, é necessário retirar o item do contrato ou o contrato vencer. Está rotina é feita pela equipe de contratos do Administrativo. |
Expand | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
Ao realizar uma integração como ERP para cadastrar os códigos ISBN dos Livros do Aluno e Livro do Professor, a plataforma não retorna os códigos. Foi realizado teste com outras escolas, porém sem sucesso. Escola do projeto com erro: ASSOCIAÇÃO FRANCISCANA DE ENS SENHOR BOM JESUS ID pedido: 1874 Nome do projeto: Matemática - Bom Jesus - 1.ª série
Foi necessário entrar em contato com a equipe do SAPE (SIMM) e analisaram este serviço: Ao acessar o link http://integracaosape.netmoderna.com.br/api/Tokens deverá ser exibida a página abaixo: Após entrar em contato com a equipe, o erro foi solucionado e a integração gerada: |
Expand | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
Alterar o tipo de controle estoque para os item anexo. DE (2-Controle Total),PARA (4-Débito Direto)
Após a aprovação do Araújo - Setor Fiscal, Marcelo - Diretor de TI e Fábo Pelaio - Coord de Sistemas, executar o Qg abaixo: R:\ESP2\qgp\altera controle estoque item.p
DEF TEMP-TABLE tt-item FIELD it-cod LIKE item.it-codigo FIELD tp-contr LIKE item.tipo-contr.
INPUT FROM I:\Leopoldo\Alterar_Controle_Estoque_Grupo30_TI.csv. REPEAT: CREATE tt-item. IMPORT DELIMITER ";" tt-item.it-cod. END. INPUT CLOSE.
FIND FIRST tt-item WHERE tt-item.it-cod = '' NO-ERROR. IF AVAIL tt-item THEN DELETE tt-item. //SEMPRE QUE CRIAMOS UMA TEMPORÁRIA ELE GRAVA UM REGISTRO EM BRANCO, ESSE BLOCO É PRA ELIMINAR ESSE REGISTOR BRANCO DA TEMPORÁRIA
FOR EACH tt-item: FIND FIRST ITEM WHERE ITEM.it-codigo = tt-item.it-cod NO-ERROR. IF AVAIL ITEM THEN DO: FIND FIRST movto-estoq WHERE movto-estoq.it-codigo = tt-item.it-cod NO-LOCK NO-ERROR. IF NOT AVAIL movto-estoq THEN DO: ASSIGN tt-item.tp-contr = ITEM.tipo-contr. IF ITEM.tipo-contr <> 4 THEN ASSIGN ITEM.tipo-contr = 4.
END. END. END.
OUTPUT TO I:\Leopoldo\Alterar_Controle_Estoque_Grupo30_TI_alterado.csv. FOR EACH tt-item: EXPORT DELIMITER ";" tt-item. END. OUTPUT CLOSE. Será alterado o tipo de controle estoque para o solicitado |
Expand | ||||||||||||||||||||||||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| ||||||||||||||||||||||||||||||||||
Os itens abaixo estão sem o flag de item faturável no cadastro, é possível flegar? (Empresa Moderna)
Este cadastro é realizado pelo grupo BR, Fiscal Mercantil. |
Expand | |||||||||||||
---|---|---|---|---|---|---|---|---|---|---|---|---|---|
| |||||||||||||
FOR EACH ITEM WHERE ITEM.it-codigo = "69020": DISP usuario-alt responsavel cod-comprado. END. |
...