Instrução CREATE

A instrução CREATE cria um novo campo de mensagem.

SINTAXE

Notas:
  1. Não utilize DomainClause e ParseClause com o qualificador FIELD.
  2. Utilize RepeatClause somente com os qualificadores PREVIOUSSIBLING e NEXTSIBLING
  3. Cada subcláusula na ParseClause pode ocorrer apenas uma vez.

O novo campo de mensagem é posicionado em um local especificado (CREATE FIELD) ou relativo a um local existente atualmente (CREATE... OF...). Novos campos podem ser criados apenas quando a referência de campo de destino apontar para uma mensagem modificável, por exemplo, Environment, InputLocalEnvironment, OutputLocalEnvironment, OutputRoot ou OutputExceptionList.

Se a cláusula FIELD for incluída, o campo especificado por "target" será navegado para (criando os campos, se necessário) e qualquer cláusula values ou cláusula from será executada. O formato de instrução CREATE não cria, necessariamente, nenhum dos campos; ele apenas assegura que os campos especificados existem.

Se forem utilizados índices da matriz na referência de campo de destino, apenas uma instância de um campo específico poderá ser criada. Assim se você gravar uma instrução SET, começando:
  SET OutputRoot.XML.Message.Structure[2].Field = ...  

pelo menos uma instância de Estrutura já deverá existir na mensagem. Ou seja, os únicos campos na árvore que são criados são em um caminho direto da raiz para o campo identificado pela referência de campo.

Se uma cláusula PREVIOUSSIBLING, NEXTSIBLING, FIRSTCHILD ou LASTCHILD for incluída, o campo especificado por target será navegado para (criando os campos, se necessário) exatamente da mesma forma como para a cláusula FIELD. Um novo campo é então criado e anexado na posição especificada (por exemplo, como PREVIOUSSIBLING ou FIRSTCHILD). Este formato de instrução CREATE sempre cria um novo campo e coloca-o na posição especificada.

Se você utilizar duas instruções de destino CREATE FIRSTCHILD OF que especifiquem o mesmo destino, a segunda instrução criará um novo campo como o primeiro filho do destino e deslocará o primeiro filho criado anteriormente para a direita na árvore de mensagens (portanto ele deixa de ser o primeiro filho). De forma semelhante, o destino CREATE LASTCHILD OF navega para o campo de destino e inclui um novo campo como seu filho mais à direita, deslocando o último filho anterior para a esquerda.

o destino CREATE PREVIOUSSIBLING OF cria um campo imediatamente à esquerda do campo especificado por destino (portanto, a profundidade da árvore não é alterada); de forma semelhante, o destino CREATE NEXTSIBLING OF cria um campo logo à direita do campo especificado por destino. Ao criar PREVIOUSSIBLING ou NEXTSIBLING, você pode utilizar a palavra-chave REPEAT para copiar o tipo e nome do novo campo a partir do campo atual.

Cláusula AS:

Se presente, a cláusula AS move a variável de referência denominada para apontar o campo recém-criado. Isso é útil, pois é provável que você deseje envolver o novo campo em algum processamento adicional.

Cláusula DOMAIN:

Se presente, a cláusula DOMAIN associa o novo campo a um novo analisador do tipo especificado. Esta cláusula espera um nome de campo raiz (por exemplo, XML ou MQRFH2). Se a cláusula DOMAIN estiver presente, mas o valor fornecido for uma cadeia de caractere de comprimento zero, será criado um novo analisador do mesmo tipo que o analisador que possui o campo especificado por destino. Será emitida uma exceção se o nome de domínio fornecido não for do tipo de dados CHARACTER ou se seu valor for NULL. Não especifique a cláusula DOMAIN com a cláusula FIELD; não há garantias que o novo campo será criado.

Cláusula REPEAT:

Utilize a cláusula REPEAT para copiar o tipo e o nome do novo campo a partir do campo de destino. Como alternativa, o tipo, nome e valor do novo campo podem ser:
  • Copiados de qualquer campo existente (utilizando a cláusula FROM)
  • Especificados explicitamente (utilizando a cláusula VALUES)
  • Definidos pela análise de um fluxo de bits (utilizando a cláusula PARSE)
No caso das cláusulas FROM e PARSE, é possível criar também filhos do novo campo.

Cláusula VALUES:

Para a cláusula VALUES, o tipo, nome e valor (ou qualquer subconjunto deles) podem ser especificados por qualquer expressão que retorne um tipo de dados adequado (INTEGER para tipo, CHARACTER para nome e qualquer tipo escalar para valor). Será emitida uma exceção se o valor fornecido para um tipo ou nome for NULL.

Cláusula NAMES:

A cláusula NAMES utiliza qualquer expressão que retorna um valor não nulo de tipo caractere. O significado depende da presença das cláusulas NAME e NAMESPACE, conforme a seguir:
NAMESPACE NAME Elemento denominado da seguinte forma
Não Não O elemento não possui nome (sinalizador de nomes não definido automaticamente)
Não Sim Ao elemento é dado o nome no espaço de nomes padrão
Sim Não Ao elemento é dado o nome vazio no espaço de nomes especificado
Sim Sim Ao elemento é dado o nome no espaço de nomes especificado

O operando IDENTITY utiliza um único elemento de caminho em lugar das cláusulas TYPE e NAME, em que um elemento de caminho contém (no máximo) um tipo, um espaço de nomes, um nome e um índice. Elas especificam o tipo, espaço de nomes, nome e índice do elemento a ser criado e seguem todas as regras descritas no tópico para referências de campo (consulte Referências de Campos ESQL). Exemplo:

IDENTITY (XML.attribute)Space1:Name1[42]

Consulte a seção Exemplos a seguir, para saber como utilizar o operando IDENTITY.

Cláusula FROM:

Para a cláusula FROM, o tipo, nome e valor do novo campo são tomados de SourceFieldReference. Quaisquer campos filhos existentes do destino são desanexados (o campo poderia já existir no caso de uma cláusula FIELD) e o novo campo recebe cópias dos filhos, netos e outros descendentes do campo de origem.

cláusula PARSE:

Se uma cláusula PARSE estiver presente, será construída uma subárvore sob o campo recém-criado, a partir do fluxo de bits fornecido. O algoritmo para fazer isso varia de analisador para analisador e de acordo com as opções especificadas. Todos os analisadores suportam o modo RootBitStream, no qual o algoritmo de criação da árvore é igual ao utilizado por um nó input.

Alguns analisadores também suportam um segundo modo, FolderBitStream, que gera uma sub-árvore a partir de um fluxo de bits criados pela função ASBITSTREAM (consulte função ASBITSTREAM) utilizando esse modo.

Quando a instrução for processada, quaisquer expressões da cláusula PARSE serão avaliadas. Será emitida uma exceção se qualquer uma das seguintes expressões não resultar em um valor não nulo do tipo apropriado:

Cláusula Tipo Valor Padrão
Opções integer RootBitStream & ValidateNone
Codificação integer 0
Ccsid integer 0
Conjunto de Mensagens caractere Cadeia de comprimento zero
Tipo de Mensagem caractere Cadeia de comprimento zero
Formato de Mensagem caractere Cadeia de comprimento zero

Embora a cláusula OPTIONS aceite qualquer expressão que retorna um valor de tipo inteiro, ela apenas é significativa para gerar valores de opções da lista de constantes fornecidas, utilizando a função BITOR se mais de uma opção for requerida.

Depois de gerado, o valor se torna um inteiro e pode ser salvo em uma variável ou transmitido como um parâmetro para uma função, além de ser utilizado diretamente com uma instrução CREATE. A lista de constantes definidas globalmente é:
        Validate master options...
        ValidateContentAndValue
                ValidateValue		-- Pode ser utilizado com ValidateContent
                ValidateContent		-- Pode ser utilizado com ValidateValue
        ValidateNone

        Validate failure action options...
                ValidateException
        ValidateExceptionList
        ValidateLocalError
        ValidateUserTrace

        Validate value constraints options...
        ValidateFullConstraints
        ValidateBasicConstraints

        Validate fix up options...
        ValidateFullFixUp
        ValidateNoFixUp

        Parse timing options...
        ParseComplete
        ParseImmediate
        ParseOnDemand
Notas:
  1. A opção validateFullFixUp é reservada para utilização futura. Selecionar validateFullFixUp fornece comportamento idêntico a validateNoFixUp.
  2. A opção validateFullConstraints é reservada para utilização futura. Selecionar validateFullConstraints fornecer comportamento idêntico a validateBasicConstraints.
  3. Para obter detalhes completos sobre as opções de validação, consulte Propriedades de Validação para Mensagens no Domínio MRM.
  4. As Opções de Tempo de Validade correspondem às Opções de Tempo de Análise e, em particular, a Validação Adiada é chamada On Demand.

Você pode especificar apenas uma opção de cada grupo, com exceção de ValidateValue e ValidateContent que podem ser utilizadas em conjunto para obter a validação do conteúdo e do valor. Se você não especificar uma opção em um grupo, a opção em negrito será utilizada.

A cláusula ENCODING aceita qualquer expressão que retorne um valor de tipo integer. No entanto, apenas será significativo gerar valores de opções a partir da lista de constantes fornecidas:
       MQENC_INTEGER_NORMAL
       MQENC_INTEGER_REVERSED
       MQENC_DECIMAL_NORMAL
       MQENC_DECIMAL_REVERSED
       MQENC_FLOAT_IEEE_NORMAL
       MQENC_FLOAT_IEEE_REVERSED
       MQENC_FLOAT_S390

Os valores utilizados para a cláusula CCSID seguem o sistema de numeração normal. Por exemplo, 1200 = UCS-2, 1208 = UTF-8.

Para cláusulas ausentes, são utilizados os valores padrão especificados. Utilize o CCSID e os valores padrão de codificação, pois utilizam seus valores da codificação e das configurações de CCSID do gerenciador de filas.

Da mesma forma, utilizar os valores padrão para cada uma das opções de conjunto de mensagens, tipo e formato é útil, pois muitos analisadores não requerem informações sobre conjunto de mensagens, tipo ou formato, portanto, qualquer valor válido é suficiente.

Depois que todas as expressões tiverem sido avaliadas, um fluxo de bits é analisado utilizando os resultados das expressões.
Nota: Como esta função possui um grande número de cláusulas, uma sintaxe alternativa é suportada, na qual os parâmetros são fornecidos como uma lista separada por vírgulas em vez de separada por cláusulas nomeadas. Nesse caso, as expressões devem estar na seguinte ordem:
ENCODING -> CCSID -> SET -> TYPE -> FORMAT -> OPTIONS

A lista pode ser truncada em qualquer ponto e uma expressão totalmente vazia pode ser utilizada para quaisquer cláusulas nas quais você não fornece um valor.

Exemplos de Utilização da Instrução CREATE

  1. O exemplo a seguir cria o campo especificado:
    CREATE FIELD OutputRoot.XML.Data;
  2. O exemplo a seguir cria um campo sem nome, tipo ou valor como o primeiro filho de ref1:
    CREATE FIRSTCHILD OF ref1;
  3. O exemplo a seguir cria um campo utilizando o tipo, nome e valor especificados:
    CREATE NEXTSIBLING OF ref1 TYPE NameValue NAME 'Price' VALUE 92.3;
  4. O exemplo a seguir cria um campo com um tipo e nome, mas sem valor; o campo será incluído antes do irmão indicador pela referência dinâmica (ref1):
    CREATE PREVIOUSSIBLING OF ref1 TYPE Name NAME 'Quantity';
  5. O exemplo a seguir cria um campo denominado Component e move a variável de referência targetCursor para apontar:
    CREATE FIRSTCHILD OF
    targetCursor AS targetCursor NAME 'Component';
    O exemplo a seguir cria um novo campo como o irmão à direita do campo apontado pela variável de referência targetCursor tendo o mesmo tipo e nome que esse campo. A instrução então move targetCursor para apontar o novo campo:
    CREATE NEXTSIBLING OF targetCursor AS targetCursor REPEAT;
  6. O exemplo a seguir mostra como utilizar a cláusula PARSE:
    DECLARE bodyBlob BLOB ASBITSTREAM(InputRoot.XML, InputProperties.Encoding,
     InputProperties.CodedCharSetId);
    DECLARE creationPtr REFERENCE TO OutputRoot;
    CREATE LASTCHILD OF creationPtr DOMAIN('XML') PARSE(bodyBlob,
                        InputProperties.Encoding,
     InputProperties.CodedCharSetId);

    Este exemplo pode ser estendido para mostrar a serialização e a análise de um campo ou pasta:

    DECLARE bodyBlob BLOB ASBITSTREAM(InputRoot.XML.TestCase.myFolder,
                        InputProperties.Encoding,
    InputProperties.CodedCharSetId,",",",FolderBitStream);
    DECLARE creationPtr REFERENCE TO OutputRoot;
    CREATE LASTCHILD OF creationPtr DOMAIN('XML') PARSE(bodyBlob,
                        InputProperties.Encoding,
    InputProperties.CodedCharSetId,",",",FolderBitStream);
  7. O exemplo a seguir mostra como utilizar o operando IDENTITY:
    CREATE FIELD OutputRoot.XMLNS.TestCase.Root IDENTITY (XML.ParserRoot)Root;
    CREATE FIELD OutputRoot.XMLNS.TestCase.Root.Attribute
           IDENTITY (XML.Attribute)NSpace1:Attribute VALUE 'Attrib Value';
    CREATE LASTCHILD OF OutputRoot.XMLNS.TestCase.Root
           IDENTITY (XML.Element)NSpace1:Element1[1] VALUE 'Element 1 Value';
    CREATE LASTCHILD OF OutputRoot.XMLNS.TestCase.Root
           IDENTITY (XML.Element)NSpace1:Element1[2] VALUE 'Element 2 Value';

    Essa seqüência de instruções produz a seguinte mensagem de saída:

    <TestCase>
     <Root xmlns:NS1="NSpace1" NS1:Attribute="Attrib Value">
      <NS1:Element1>Element 1 Value</NS1:Element1>
      <NS1:Element1>Element 2 Value</NS1:Element1>
     </Raiz>
    </TestCase>
  8. O exemplo a seguir mostra como utilizar a cláusula DOMAIN para evitar perder informações exclusivas para o analisador XML ao ocorrer uma cópia improvável do analisador:
    DECLARE bodyBlob BLOB ASBITSTREAM(InputRoot.XML, InputProperties.Encoding,
    InputProperties.CodedCharSetId);
    CREATE FIELD Environment.Variables.myXMLTree;
    DECLARE creationPtr REFERENCE TO Environment.Variables.myXMLTree;
    CREATE FIRSTCHILD OF creationPtr DOMAIN('XML') PARSE(bodyBlob,
                        InputProperties.Encoding,
    InputProperties.CodedCharSetId);

Exemplo da Instrução CREATE

Este exemplo fornece o ESQL e uma mensagem de entrada de amostra, que produzem a mensagem de saída no final deste exemplo.

CREATE COMPUTE MODULE CreateStatement_Compute
	CREATE FUNCTION Main() RETURNS BOOLEAN
	BEGIN
	  CALL CopyMessageHeaders();

        CREATE FIELD OutputRoot.XML.TestCase.description TYPE NameValue VALUE 'This is my TestCase' ;
        DECLARE cursor REFERENCE TO OutputRoot.XML.TestCase;
        CREATE FIRSTCHILD OF cursor Domain('XML')
               NAME 'Identifier' VALUE InputRoot.XML.TestCase.Identifier;
        CREATE LASTCHILD OF cursor Domain('XML') NAME 'Sport' VALUE InputRoot.XML.TestCase.Sport;
        CREATE LASTCHILD OF cursor Domain('XML') NAME 'Date' VALUE InputRoot.XML.TestCase.Date;
        CREATE LASTCHILD OF cursor Domain('XML') NAME 'Type' VALUE InputRoot.XML.TestCase.Type;
        CREATE FIELD cursor.Division[1].Number TYPE NameValue VALUE 'Premiership';
        CREATE FIELD cursor.Division[1].Result[1].Number TYPE NameValue VALUE '1' ;
        CREATE FIELD cursor.Division[1].Result[1].Home TYPE Name;
        CREATE LASTCHILD OF cursor.Division[1].Result[1].Home NAME 'Team' VALUE 'Liverpool' ;
        CREATE LASTCHILD OF cursor.Division[1].Result[1].Home NAME 'Score' VALUE '4';
        CREATE FIELD cursor.Division[1].Result[1].Away TYPE Name;
        CREATE LASTCHILD OF cursor.Division[1].Result[1].Away NAME 'Team' VALUE 'Everton';
        CREATE LASTCHILD OF cursor.Division[1].Result[1].Away NAME 'Score' VALUE '0';
        CREATE FIELD cursor.Division[1].Result[2].Number TYPE NameValue VALUE '2';
        CREATE FIELD cursor.Division[1].Result[2].Home TYPE Name;
        CREATE LASTCHILD OF cursor.Division[1].Result[2].Home NAME 'Team' VALUE 'Manchester United';
        CREATE LASTCHILD OF cursor.Division[1].Result[2].Home NAME 'Score' VALUE '2';
        CREATE FIELD cursor.Division[1].Result[2].Away TYPE Name;
        CREATE LASTCHILD OF cursor.Division[1].Result[2].Away NAME 'Team' VALUE 'Arsenal';
        CREATE LASTCHILD OF cursor.Division[1].Result[2].Away NAME 'Score' VALUE '3';
        CREATE FIELD cursor.Division[2].Number TYPE NameValue VALUE '2';
        CREATE FIELD cursor.Division[2].Result[1].Number TYPE NameValue VALUE '1';
        CREATE FIELD cursor.Division[2].Result[1].Home TYPE Name;
        CREATE LASTCHILD OF cursor.Division[2].Result[1].Home NAME 'Team' VALUE 'Port Vale';
        CREATE LASTCHILD OF cursor.Division[2].Result[1].Home NAME 'Score' VALUE '9' ;
        CREATE FIELD cursor.Division[2].Result[1].Away TYPE Name;
        CREATE LASTCHILD OF cursor.Division[2].Result[1].Away NAME 'Team' VALUE 'Brentford';
        CREATE LASTCHILD OF cursor.Division[2].Result[1].Away NAME 'Score' VALUE '5';

	END;

	CREATE PROCEDURE CopyMessageHeaders() BEGIN
		DECLARE I INTEGER 1;
		DECLARE J INTEGER CARDINALITY(InputRoot.*[]);
		WHILE I < J DO
			SET OutputRoot.*[I] = InputRoot.*[I];
			SET I = I + 1;
		END WHILE;
	END;

END MODULE;
Conceitos relacionados
Visão Geral do ESQL
Tarefas relacionadas
Desenvolvendo ESQL
Trabalhando com Mensagens e Fluxos de Bits XML
Referências relacionadas
Diagramas de Sintaxe: Tipos Disponíveis
instruções ESQL
função ASBITSTREAM
Avisos | Marcas Registradas | Downloads | Biblioteca | Suporte | Feedback
Direitos Autorais IBM Corporation 1999, 2006 Última Atualização: 1 Sep 2006
ak04950_