Histórico da Página

...

02. SITUAÇÃO/REQUISITO

03. SOLUÇÃO

Aviso

title	Pagina em construção

Pagina em construção!

Criação de Tabela:

1-) Acesse Configurador > Base de Dados > Dicionário

...

> Bases de Dados

2-) Posicione o cursor em Dicionário de dados e clique em Incluir

Realize o preenchimento da tabela TXQ

Prefixo : TXQ

Descrição : Orcamento de Armamento

Compartilhamento Filial Filial: Exclusivo

Compartilhamento Unidade: Exclusivo

Compartilhamento Empresa: Exclusivo

Após o preenchimento dos dados da tabela TXQ clique em confirmar

Criação dos campos da tabela TXQ

Procedimento para criar os novos campos no Protheus:

1-) Acesse Configurador > Base de Dados > Dicionário > Bases de Dados

2-) Clique

...

em Dicionário de Dados posicione o cursor em campos e

...

selecione a tabela onde este campo será inserido e clique em editar

4-) Preencha os campos da tabela TXQ

...

conforme tabela abaixo:

Section

border	true

X3_CAMPO	X3_TIPO	X3_TAMANHO	X3_DECIMAL	X3_TITULO	X3_DESCRIC	X3_RELACAO	X3_F3	X3_PICTURE	X3_BROWSE	X3_VISUAL	X3_CONTEXT	X3_VLDUSER
TXQ_FILIAL	C	8	0	Filial	Filial do Sistema			@!	N
TXQ_CODIGO	C	6	0	Codigo	Codigo	GETSXENUM('TXQ','TXQ_CODIGO')		@!	N	V	R
TXQ_ITEARM	C	1	0	Item Armamen	Item do Armamento			@!	N	A	R	Pertence("123")
TXQ_CODPRD	C	30	0	Cod. Prod.	Codigo do Produto		SB5TXQ	@!	N	A	R	At740VlArm(FwFldGet("TXQ_ITEARM"), FwFldGet("TXQ_CODPRD"))
TXQ_DSCPRD	C	30	0	Descricao	Descricao			@!	N	V	V
TXQ_QTDVEN	N	11	2	Quantidade	Quantidade			@E 99,999,999.99	N	A	R	Positivo() .AND. FwFldGet("TXQ_QTDVEN") > 0
TXQ_PRCVEN	N	14	2	Valor	Valor			@E 99,999,999,999.99	N	A	R	Positivo() .AND. FwFldGet("TXQ_PRCVEN") > 0
TXQ_TOTAL	N	14	2	Sub. Total	Sub. Total			@E 99,999,999,999.99	N	V	V
TXQ_CODTFF	C	6	0	Cod. RH	Codigo do Recursos Humano			@!	N	V	R
TXQ_CONTRT	C	15	0	Nr. Contrato	Numero do Contrato			@!	N	V	R
TXQ_CONREV	C	3	0	Revisao	Revisao de Contratos			@!	N	V	R
TXQ_

...

CODSUBr

C

6

0

Cod. Subst.

Codigo Substituto

@!

N

V

R

TXQ_LUCRO

N

5

2

%Lucro

@E 99.99

N

A

R

Positivo()

TXQ_TXLUCR

N

14

2

Vlr. Lucro

@E 99,999,999,999.99

N

V

R

Positivo()

TXQ_ADM

N

5

2

%Adm

@E 99.99

N

A

R

Positivo()

TXQ_TXADM

N

14

2

Vlr. Tx Adm

@E 99,999,999,999.99

N

V

R

Positivo()

TXQ_TOTGER

N

14

2

Total Geral

ATINIPADMVC("TECA740","TXQDETAIL",'TXQ_TOTGER',,,,'TXQ->( TXQ_QTDVEN * TXQ_PRCVEN )')

@E 99,999,999,999.99

N

V

...

Criação dos índices da tabela TXQ

1-) Posicione na tabela e clique em editar e posicione

...

em índices

2-) Clique em Incluir e em outras ações selecione campos:

Selecione os campo Filial e Código(TXQ_FILIAL+TXQ_CODIGO).

Repita o processo anterior para prosseguir com a criação das tabelas a seguir:

Criação de Tabela

...

1 -) Acesse Configurador > Base de Dados > Dicionário > Bases de Dados

2-) Posicione o cursor em Dicionário de dados e clique em Incluir

...

TXT:

Prefixo : TXT

Descrição : Material de Implantacao Facili

Compartilhamento Filial Filial: Exclusivo

Compartilhamento Unidade: Exclusivo

Compartilhamento Empresa: Exclusivo

Após o preenchimento dos dados da tabela TXT clique em confirmar

Criação dos campos da tabela TXT

...

Procedimento para criar os novos campos no Protheus:

...

...
Preencha os campos da tabela TXT
...
conforme tabela abaixo:
Section
border true
X3_CAMPO X3_TIPO X3_TAMANHO X3_DECIMAL X3_TITULO X3_DESCRIC X3_RELACAO X3_F3 X3_PICTURE X3_BROWSE X3_VISUAL X3_CONTEXT X3_VLDUSER
...
TXT_FILIAL C 8 0 Filial       Filial do Sistema                                                                                                                                                 @!                                            N


...
TXT_CODIGO C 6 0 Codigo       Codigo                    GETSXENUM('
...
TXT','
...
TXT_CODIGO')                                                                                                           @!                                            N V R
...
TXT_CODTXS C 6 0 Cod. Posto   Codigo do Posto                                                                                                                                                   @!                                            N
...
A R
...
TXT_CODPRD C 30 0 Cod. Produto Codigo do Produto                                                                                                                                          TECPRD @!                                            N A R EXISTCPO('SB1') .AND. EXISTCPO('SB5') .AND. AT740VLDPRD(
...
2, FWFLDGET("
...
TXT_CODPRD") )
...

...
TXT_DESCRI C 30 0 Desc. Produt Descricao do Produto      ATINIPADMVC("TECA984A","
...
TXTDETAIL",'B1_DESC','SB1',1, "XFILIAL('SB1')+
...
TXT-
...
>TXT_CODPRD")                                                 @!                                            N V V
...
TXT_QUANTS N 4 0 Quant. Suger Quantidade Sugerida                                                                                                                                               @E 9999                                       N A R Positivo()
...
TXT_VLUNIT N 12 2 Vl. Unitario Valor Unitario                                                                                                                                                    @E 999,999,999.99                             N A R Positivo()
...
TXT_TES    C 3 0 Tipo Saida   Tipo de Saida                                                                                                                                              SF4
...
                                              N A R ExistCpo("SF4") .AND. FwFldGet("
...
TXT_TES") > "500"

Criação dos índices da tabela TXT
1-) Posicione na tabela e clique em editar e posicione em índices
2-) Clique em Incluir e em outras ações selecione campos:
Selecione os campo Filial e Código(TXT_FILIAL+TXT_CODIGO).

Criação de Tabela TXU:

Prefixo : TXU

Descrição : Material de Consumo Facilit.

Compartilhamento Filial: Exclusivo

Compartilhamento Unidade: Exclusivo

Compartilhamento Empresa: Exclusivo

Após o preenchimento dos dados da tabela TXU clique em confirmar

Criação dos campos da tabela TXU

Preencha os campos da tabela TXU conforme tabela abaixo:

Section

border	true

X3_CAMPO

X3_TIPO

X3_TAMANHO

X3_DECIMAL

X3_TITULO

X3_DESCRIC

X3_RELACAO

X3_F3

X3_PICTURE

X3_BROWSE

X3_VISUAL

X3_CONTEXT

X3_VLDUSER

...

TXU_FILIAL

C

8

0

Filial

Filial do Sistema

@!

N

...

TXU_CODIGO

C

6

0

Codigo

GETSXENUM('

...

TXU','

...

TXU_CODIGO')

@!

N

V

R

...

TXU_CODTXS

C

6

0

Cod. Posto

Codigo do Posto

@!

N

V

R

...

TXU_CODPRD

C

30

0

Cod. Produto

Codigo do Produto

...

TECPRD

@!

N

A

R

...

EXISTCPO('SB1') .AND. EXISTCPO('SB5') .AND. AT740VLDPRD(3, FWFLDGET("TXU_CODPRD") )

...

TXU_DESCRI

C

30

0

Desc. Produt

Descricao do Produto

ATINIPADMVC("TECA984A","

...

TXUDETAIL",'B1_DESC','SB1',1, "XFILIAL('SB1')+

...

TXU-

...

>TXU_CODPRD")

@!

N

V

...

TXU_QUANTS

N

4

0

Quant. Suger

Quantidade Sugerida

@E 9999

N

A

R

Positivo()

...

TXU_VLUNIT

N

12

2

Vl. Unitario

Valor Unitario

@E 999,999,999.99

N

A

R

Positivo()

TXU_TES

C

3

0

Tipo Saida

Tipo de Saida

SF4

@!

N

A

R

ExistCpo("SF4") .AND. FwFldGet("TXU_TES") > "500"

Criação dos índices da tabela TXU

1-) Posicione na tabela e clique em editar e posicione em índices

2-) Clique em Incluir e em outras ações selecione campos:

Selecione os campo Filial e Código(TXU_FILIAL+TXU_CODIGO).

Criação de Tabela TXV:

Prefixo : TXV

Descrição : Uniformes Facilitador

Compartilhamento Filial: Exclusivo

Compartilhamento Unidade: Exclusivo

Compartilhamento Empresa: Exclusivo

Após o preenchimento dos dados da tabela TXV clique em confirmar

Criação dos campos da tabela TXV

Preencha os campos da tabela TXV conforme tabela abaixo:

Section

border	true

X3_CAMPO

X3_TIPO

X3_TAMANHO

X3_DECIMAL

X3_TITULO

X3_DESCRIC

X3_RELACAO

X3_F3

X3_PICTURE

X3_BROWSE

X3_VISUAL

X3_CONTEXT

X3_VLDUSER

...

TXV_FILIAL

C

8

0

Filial

Filial do Sistema

@!

N

...

TXV_CODIGO

C

6

0

Codigo

GETSXENUM('

...

TXV','

...

TXV_CODIGO')

@!

N

V

R

...

TXV_CODTXS

C

6

0

Cod. Posto

Codigo do Posto

@!

N

...

V

R

...

TXV_CODPRD

C

30

0

Cod. Produto

Codigo do Produto

...

SB1UNI

@!

N

A

R

...

At740VlUni(FwFldGet("TXV_CODPRD"))

...

TXV_DESCRI

C

30

0

Desc. Produt

Descricao do Produto

ATINIPADMVC("TECA984A","

...

TXVDETAIL",'B1_DESC','SB1',1, "XFILIAL('SB1')+

...

TXV-

...

>TXV_CODPRD")

@!

N

V

...

TXV_QUANTS

N

4

0

Quant. Suger

Quantidade Sugerida

...

@E 9999

N

A

R

Positivo()

...

TXV_VLUNIT

N

12

2

Vl. Unitario

Valor Unitario

@E 999,999,999.99

N

A

R

Positivo()

...

Criação dos índices da tabela TXV

1-) Posicione na tabela e clique em editar e posicione em índices

2-) Clique em Incluir e em outras ações selecione campos:

Selecione os campo Filial e Código(TXV_FILIAL+TXV_CODIGO).

Criação de Tabela TXW:

Prefixo: TXW

Descrição: Armamento Facilitador

Compartilhamento Filial: Exclusivo

Compartilhamento Unidade: Exclusivo

Compartilhamento Empresa: Exclusivo

Após o preenchimento dos dados da tabela TXW clique em confirmar

Criação dos campos da tabela TXW

Preencha os campos da tabela TXW conforme tabela abaixo:

Section

border	true

X3_CAMPO

X3_TIPO

X3_TAMANHO

X3_DECIMAL

X3_TITULO

X3_DESCRIC

X3_RELACAO

X3_F3

X3_PICTURE

X3_BROWSE

X3_VISUAL

X3_CONTEXT

X3_VLDUSER

TXW_FILIAL

C

8

0

Filial

Filial do Sistema

@!

N

TXW_CODIGO

C

6

0

Codigo

GETSXENUM('TXW','TXW_CODIGO')

@!

N

V

R

TXW_CODTXS

C

6

0

Cod. Posto

Codigo do Posto

@!

N

V

R

TXW_ITEARM

C

1

0

Item Armamen

Item do Armamento

@!

N

A

R

Pertence("123")

TXW_CODPRD

C

30

0

Cod. Prod.

Codigo do Produto

SB5TXQ

@!

N

A

R

TXW_DESCRI

C

30

0

Desc. Produt

Descricao do Produto

ATINIPADMVC("TECA984A","TXWDETAIL",'B1_DESC','SB1',1, "XFILIAL('SB1')+TXW->TXW_CODPRD")

@!

N

V

TXW_QUANTS

N

4

0

Quant. Suger

Quantidade Sugerida

@E 9999

N

A

R

Positivo()

TXW_VLUNIT

N

12

2

Vl. Unitario

Valor Unitario

@E 999,999,999.99

N

A

R

...

04. DEMAIS INFORMAÇÕES

Card documentos

Informacao	Use esse box para destacar informações relevantes e/ou de destaque.
Titulo	IMPORTANTE!

Positivo()

Criação dos índices da tabela TXW

1-) Posicione na tabela e clique em editar e posicione em índices

2-) Clique em Incluir e em outras ações selecione campos:

Selecione os campo Filial e Código(TXW_FILIAL+TXW_CODIGO).

04. DEMAIS INFORMAÇÕES

Não há.

05. ASSUNTOS RELACIONADOS

...

Templatedocumentos

Árvore de páginas

Versões comparadas

Versão antiga 1

Nova versão Atual

Chave

02. SITUAÇÃO/REQUISITO

03. SOLUÇÃO

Criação de Tabela:

Criação dos campos da tabela TXQ

Criação dos índices da tabela TXQ

Criação de Tabela

TXT:

Criação dos campos da tabela TXT

Criação de Tabela TXU:

Criação dos campos da tabela TXU

Criação de Tabela TXV:

Criação dos campos da tabela TXV

Criação dos índices da tabela TXV

Criação de Tabela TXW:

Criação dos campos da tabela TXW

04. DEMAIS INFORMAÇÕES

Criação dos índices da tabela TXW

04. DEMAIS INFORMAÇÕES

05. ASSUNTOS RELACIONADOS