Venda:
1. TOP
TEM IPI?
Não: pega a CST de Saída informada neste cadastro.
Sim: passa para o próximo cadastro.
2. CADASTRO DO PRODUTO
TEM IPI NA VENDA?
Não: pega a CST de Saída informada neste cadastro.
Sim: passa para o próximo cadastro.
3. EMPRESA
TEM IPI?
Não: pega a CST de Saída informada neste cadastro.
Sim: passa para o próximo cadastro.
 |
| Atributos dos dois campos adicionais |
 |
| Tela Comercial > Preferências > Empresa |
O DANFE Simplificado é um documento que veio para facilitar a vida dos consumidores e comerciantes. Principalmente para quem trabalha com e-commerce, o DANFE Simplificado traz todas as informações referentes a uma venda, em formato resumido e aperfeiçoado para impressão.
Download dos arquivos aqui.
1: CREATE OR REPLACE FUNCTION SNK_PRECOVOA(P_CODTAB IN INT,P_CODPROD IN INT,P_CODVOL IN VARCHAR2)
2: RETURN FLOAT
3: IS
4: P_RETURN FLOAT;
5: BEGIN
6: SELECT PRECO INTO P_RETURN FROM
7: (SELECT
8: (SNK_PRECO(P_CODTAB, PRO.CODPROD) * (CASE WHEN MULTIPVLR <> 0 THEN VOA.QUANTIDADE * VOA.MULTIPVLR ELSE 1 END)) AS PRECO
9: FROM
10: TGFPRO PRO
11: LEFT OUTER JOIN TGFVOA VOA ON PRO.CODPROD=VOA.CODPROD
12: WHERE
13: PRO.ATIVO = 'S'
14: AND PRO.CODPROD = P_CODPROD
15: AND VOA.CODVOL = P_CODVOL
16: UNION ALL
17: SELECT
18: (SNK_PRECO(P_CODTAB, PRO.CODPROD)) AS PRECO
19: FROM
20: TGFPRO PRO
21: WHERE
22: PRO.ATIVO = 'S'
23: AND PRO.CODPROD =P_CODPROD
24: AND PRO.CODVOL = P_CODVOL);
25: RETURN P_RETURN;
26: END;
27: /
Script para alterar tamanho de campo em todas as tabelas que ele exista.
BEGIN
DECLARE P_SCRIPT VARCHAR2(400);
NOVO_TAMANHO NUMBER(10);
CURSOR CUR_CONTROLE IS
SELECT 'ALTER TABLE ' || TABLE_NAME || ' MODIFY ' || COLUMN_NAME || ' VARCHAR2('||TO_CHAR(NOVO_TAMANHO)||')'
FROM USER_TAB_COLUMNS C
WHERE COLUMN_NAME LIKE '%CONTROLE%' --<<=== ALTERAR CAMPO
AND TABLE_NAME LIKE 'T%'
AND EXISTS(SELECT 1 FROM USER_TABLES T WHERE T.TABLE_NAME = C.TABLE_NAME)
AND DATA_LENGTH < NOVO_TAMANHO
AND DATA_TYPE IN ('VARCHAR2', 'CHAR', 'VARCHAR')
ORDER BY TABLE_NAME;
BEGIN
NOVO_TAMANHO := 12; --<<==== ALTERAR
OPEN CUR_CONTROLE;
LOOP
FETCH CUR_CONTROLE
INTO P_SCRIPT;
EXIT WHEN CUR_CONTROLE%NOTFOUND;
EXECUTE IMMEDIATE P_SCRIPT;
END LOOP;
CLOSE CUR_CONTROLE;
EXCEPTION WHEN OTHERS THEN
RAISE_APPLICATION_ERROR(-20101, P_SCRIPT ||' erro: '||SQLERRM);
END;
END;
/
 |
| Abertura do chamado |
 |
| Atendimento 1 |
 |
| Fechando o chamado |
AD_TGFCHA.CODUSU = (SELECT CODUSU FROM TSIUSU WHERE CODUSU = STP_GET_CODUSULOGADO)OR STP_GET_CODUSULOGADO IN (0,XX)