Árvore de páginas

Versões comparadas

Chave

  • Esta linha foi adicionada.
  • Esta linha foi removida.
  • A formatação mudou.
Comentário: Ajuste nos exemplos e em alguns métodos, que estavam defasados em relação ao código fonte atual.

...

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
USING com.totvs.datasul.eai.internalid.*.

oMapper = InternalIdMapperProvider:getMapper().

IF oMapper:register("CustomerVendor","clientes","cod_empresa|cod_cliente") = TRUE THEN DO:    
	MESSAGE "Cadastro efetuado com sucesso" VIEW-AS ALERT-BOX.
END.
ELSE DO:
    MESSAGE "Problemas durante o cadastro" VIEW-AS ALERT-BOX.
END.

...

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
IF oMapper:existMapping("USING com.totvs.datasul.eai.internalid.*.

oMapper = InternalIdMapperProvider:getMapper().

IF oMapper:existMapping("CustomerVendor", "clientes") = TRUE THEN DO:    
	MESSAGE "Encontrou o registro" VIEW-AS ALERT-BOX.
END.
ELSE DO:
    MESSAGE "Não encontrou o registro" VIEW-AS ALERT-BOX.
END.

...

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
USING com.totvs.datasul.eai.internalid.*.

oMapper = InternalIdMapperProvider:getMapper().

IF oMapper:setValue("CustomerVendor", "clientes", "01|20", "DATASUL_EAI","02|30|40|12345678") = TRUE THEN DO:
	MESSAGE "Cadastro efetuado com sucesso" VIEW-AS ALERT-BOX.
END.
ELSE DO:
    MESSAGE "Problemas durante o cadastro" VIEW-AS ALERT-BOX.
END.

...

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
USING com.totvs.datasul.eai.internalid.*.

DEFINE VARIABLE valor AS CHARACTER NO-UNDO. 
 
valoroMapper = InternalIdMapperProvider:getMapper(). 

valor = oMapper:getValue("CustomerVendor", "clientes", "DATASUL_EAI","02|30|40|123456789").
MESSAGE "Valor retornado " + valor + " = 01|20" VIEW-AS ALERT-BOX.

...

ParâmetroTipoDescrição
internalIdStringCódigo do internalId
internalValueString

Valor dos campos do internalId do aplicativo interno que deseja extrair a informação.

Pode ser passado o nome da tabela no final, separado pelo caractere “@”

Informações
titleUso da forma antiga

Anteriormente, a tabela associada do InternalId era incorporada ao valor. Exemplo: “01|234@pedidos”

. Com a inclusão de campo próprio para a tabela, esta forma perdeu utilidade, mas ainda é suportada.

internalTableStringValor da tabela utilizada pelo internalId. Caso o nome da tabela seja passado no campo InternalValueinternalTableStringValor da tabela utilizada pelo internalId. Caso o código da tabela for passado no campo “internalValue, o valor passado como parâmetro para internalTable poderá ser “null”’nulo ( ? ).
columnStringCódigo Nome da coluna utilizada para extrair valor de internalValue.


Retorno:

...

ValorDescrição
columnValueStringValor

...

correspondente a coluna

...

informada no parâmetro "column".
nulo ( ? )

Quando

...

não encontrar o valor correspondente aos parâmetros

...

fornecidos.


Exemplo de utilização em Progress:

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
USING com.totvs.datasul.eai.internalid.*.

DEFINE VARIABLE valor AS CHARACTER NO-UNDO.

oMapper = InternalIdMapperProvider:getMapper().

valor = oMapper:internalIdGetValue("CustomerVendorInternalIdCustomerVendor","01|20@clientes",?,"cod_empresa").
MESSAGE "Valor retornado " + valor + " = '01'" VIEW-AS ALERT-BOX.
  
valor = oMapper:internalIdGetValue("CustomerVendorInternalIdCustomerVendor","01|20","clientes","cod_cliente").
MESSAGE "Valor retornado " + valor + " = '20'" VIEW-AS ALERT-BOX.

...

Bloco de código
languagejava
themeEmacs
linenumberstrue
String valor = internalIdMapperImpl.internalIdGetValue("CustomerVendorInternalIdCustomerVendor", "01|20@clientes", null, "cod_empresa");
System.out.println("Valor retornado " + valor + " = '01'");
                
valor  = internalIdMapperImpl.internalIdGetValue("CustomerVendorInternalIdCustomerVendor", "01|20", "clientes", "cod_cliente");
System.out.println("Valor retornado " + valor + " = '20'");

deleteValue

...

Função responsável por excluir o(s) registro(s) que contenha(m) os valores do InternalId com os parâmetros selecionados.

Parâmetros:

ParâmetroTipoDescrição
internalIdStringCódigo do internalId utilizado como filtro para exclusão. Ex: "CustomerVendor"
internalValueCHAR (200)Utilizará o código do valor interno como filtro para exclusão. Ex: "01|10".
externalApplicationCHAR (200)

Utilizará o código do aplicativo externo como filtro para exclusão. Ex: "P1299".

Informações
titleObservação

...

A versão da função

...

sem

...

este argumento

...

excluirá todos os registros

...

do internalId” e “internalValueinformados.


Retorno:

RetornoValor
TRUEExcluiu o(s) registro(s) com sucesso
FALSEHouve problemas durante a exclusão do registro.

...

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
themeEmacs
linenumberstrue
USING com.totvs.datasul.eai.internalid.*.

oMapper = InternalIdMapperProvider:getMapper().

/* Exclusão de TODOS os registros do valor de internalId informado */
IF oMapper:deleteValue("_CustomerVendorInternalId_CustomerVendor","01|20@clientes20") = TRUE THEN DO:    
	MESSAGE "Exclusão do internalid com o valor: '01|20@clientes' para todos os Aplicativos externos." VIEW-AS ALERT-BOX.
END.
ELSE DO:
    MESSAGE "Problemas com a exclusão." VIEW-AS ALERT-BOX.
END.
   a exclusão." VIEW-AS ALERT-BOX.
END.

/* Exclusão do valor de internalId de determinado aplicativo externo. */  
IF oMapper:deleteValue("_CustomerVendorInternalId_CustomerVendor","01|20@clientes20","DATASUL_EAIP1299") = TRUE THEN DO:
    MESSAGE "Exclusão do internalid com o valor: '01|20@clientes' para a aplicativo externo: 'LogixAppP1299'." VIEW-AS ALERT-BOX.
END.
ELSE DO:
    MESSAGE "Problemas com a exclusão." VIEW-AS ALERT-BOX.
END.

...

Bloco de código
languagejava
themeEmacs
linenumberstrue
themeEmacs
linenumberstrue
// Exclusão de TODOS os registros do valor de internalId informado 
if(internalIdMapperImpl.deleteValue("CustomerVendorInternalIdCustomerVendor", "01|20@clientes")) {
	System.out.println("Exclusão do internalid com o valor: '01|20@clientes' para todos os Aplicativos externos.");
} else {
    System.out.println("Problemas com a exclusão.");
}
                
// Exclusão do valor de internalId de determinado aplicativo externo.
if(internalIdMapperImpl.deleteValue("CustomerVendorInternalIdCustomerVendor", "01|20@clientes", "LogixAppP1299")) {
    System.out.println("Exclusão do internalid com o valor: '01|20@clientes' para a aplicativo externo: 'LogixAppP1299'.");
} else {
    System.out.println("Problemas com a exclusão.");
}

...

Função responsável por excluir o registro a estrutura do InternalId com os parâmetros selecionados.

...

ParâmetroTipoDescrição
internalIdStringCódigo do internalId utilizado como filtro para exclusãopara exclusão. Ex: "CustomerVendor".
internalTableStringUtilizará o código da tabela interna como filtro para exclusão. Ex: "clientes".


Retorno:

RetornoValor
TRUEExcluiu o registro com sucesso
FALSEHouve problemas durante a exclusão do registro

...

Bloco de código
languageactionscript3
themeEmacs
linenumberstrue
USING com.totvs.datasul.eai.internalid.*.

DEFINE VARIABLE valor AS CHARACTER NO-UNDO.

oMapper = InternalIdMapperProvider:getMapper().

IF oMapper:deleteMapping("CustomerVendorInternalIdCustomerVendor","fornecedores") = TRUE THEN DO:    
	MESSAGE "Exclusão do internalid efetuada com sucesso" VIEW-AS ALERT-BOX.
END.
ELSE DO:
    MESSAGE "Problemas com a exclusão." VIEW-AS ALERT-BOX.
END.

...

Bloco de código
languagejava
themeEmacs
linenumberstrue
if(internalIdMapperImpl.delete("CustomerVendorInternalIdCustomerVendor","fornecedores")) {        
	System.out.println("Exclusão do internalid efetuada com sucesso");
} else {
    System.out.println("Problemas com a exclusão.");
}