...
Olá, boa tarde! As OPs abaixo estão sem estabelecimento, não conseguimos ajustar por aqui, podem por favor aplicar os estabelecimento conforme tabela abaixo?
Estabel | Ordem de Produção | Empresa |
99 | 787.377 | Santillana |
99 | 787.401 | Santillana |
99 | 787.408 | Santillana |
99 | 787.431 | Santillana |
| Tip |
|---|
Possíveis Soluções: |
Consulta OP Consulta Ordem de Produção CD9070
...
Qual programa gerou a OP
Qual programa gerou a Ordem de Produção
| Code Block |
|---|
FOR EACH ord-prod
WHERE ord-prod.nr-ord-produ = 787431.
DISP nr-ord-produ
it-codigo
nome-abrev
cod-unid-negoc
cod-estabel WITH WIDTH 300 1 COL.
UPDATE cod-estabel.
END.
|
| Code Block |
|---|
FOR EACH ord-prod WHERE (ord-prod.nr-ord-produ = 305810 or ord-prod.nr-ord-produ = 305811 or ord-prod.nr-ord-produ = 305812 or ord-prod.nr-ord-produ = 305813 or ord-prod.nr-ord-produ = 305814). DISP nr-ord-produ it-codigo nome-abrev cod-unid-negoc cod-estabel WITH WIDTH 300 1 COL. //UPDATE cod-estabel. END. |
| Code Block |
|---|
OUTPUT TO i:\leopoldo\cp9070_estab.csv.
PUT UNFORMATTED
"ORDEM" ";"
"ESTAB" ";"
"EMISSAO" ";"
"NARRATIVA" SKIP.
FOR EACH ord-prod WHERE ord-prod.cod-estabel = "":
PUT UNFORMATTED
ord-prod.nr-ord-produ ";"
ord-prod.cod-estabel ";"
ord-prod.dt-emissao ";"
REPLACE(REPLACE(REPLACE(ord-prod.narrativa,CHR(13),' '),CHR(10),' '),';',' ') ";" SKIP.
END.
OUTPUT CLOSE.
|