Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.

...

SintaxeEMP650 - Edição de Itens Empenhados na Abertura da OP ( [ ] )


Observações:

Não recebe parâmetros, porém neste momento o array aCols que é apresentado na alteração de empenhos quando se abre uma Ordem de Produção está disponível para alterações.
O aCols apresenta neste momento as linhas e colunas preenchidas, de acordo com o empenho padrão a ser efetuado no Sistema.
Basta alterar ou incluir o conteúdo deste array para alterar as informações dos empenhos. A estrutura básica do array aCols é apresentada da seguinte forma:

aCols[n,npos] - Onde o n e o  número da linha  e nPos  pode ser: 

nPosCod          -
nPosQuant      - nPosLocal        -
nPosTrt            - nPosLote          - nPosLotCTL      - nPosDValid      -
nPosPotenc      -
nPosLocLz        -  
nPosnSerie       -
nPosUM           -
nPosQtSegum -
nPos2UM         -
nPosDescr       - nPosOper        - nPosPrdOrg    -
nPosIsAlt         - Produto Alternativo
nCampoTítuloDescriçãoVariável Posição
1G1_COMPComponente          Código do Produto a ser empenhadonPosCod    
2D4_QUANTQuantidade Empenho  Quantidade do empenhonPosQuant  
3D4_LOCALArmazém             Almoxarifado do empenhonPosLocal  
4G1_TRTSequência           Sequência do componente na estrutura (Campo G1_TRT)nPosTrt    
5D4_NUMLOTESub-Lote            Sub-Lote utilizado no empenho (Somente deve ser preenchido se o produto utilizar rastreabilidade do tipo "S")nPosLote   
6D4_LOTECTLLote                Lote utilizado no empenho (Somente deve ser preenchido se o produto utilizar rastreabilidade)nPosLotCTL 
7D4_DTVALIDData de Validade    Data de validade do Lote (Somente deve ser preenchido se o produto utilizar rastreabilidade)nPosDValid 
8D4_POTENCIPotencia            Potência de lote (Somente deve ser preenchido se o produto utilizar rastreabilidade)nPosPotenc 
9DC_LOCALIZEndereço            Localização utilizada no empenho (Somente deve ser preenchido se o produto utilizar controle de localização física)nPosLocLz  
10DC_NUMSERINum de SerieNúmero de Série (Somente deve ser preenchido se o produto utilizar controle de localização física)nPosnSerie 
11B1_UM1a. UM              1a. Unidade de Medida do ProdutonPosUM     
12D4_QTSEGUMQtd. Empenho 2a. UM Quantidade do Empenho na 2a. Unidade de MedidanPosQtSegum
13B1_SEGUM2a. UM              2a. Unidade de Medida do ProdutonPos2UM    
14B1_DESCDescrição           Descrição do produtonPosDescr  
15D4_OPERACOperação            Produto Original  nPosOper   
16D4_PRDORGPrd. Orig.          Operação vinculada ao produtonPosPrdOrg 
17PRDALTERNAlternativo?        Produto AlternativonPosIsAlt  
18TRTORISeq.Origem          Sequência do componente Origem na estruturanPosTrtOri
19INTERNOINTERNOCampo array de controle interno do sistema NÃO UTILIZARINTERNO
20DeletadoDeletadoIdentificador se a linha está deletadaLEN(aCols)

Na acols a ultima coluna define se a linha está deletada (.T.) ou não (.F.)
Como a rotina sofreu alterações, e passou a ter alguma colunas dinâmicas, para pegar a posição da

...

última coluna, indicamos utilizar a busca pelo Acols através da função Len  Exemplo:

...

 LEN(ACOLS[n])

Vale ressaltar que as colunas que não forem preenchidas, devem ser inicializadas com a função Criavar dos respectivos campos. Basta pesquisar qual o campo tomado como base para criação das colunas.

...