rotina-Importa.Classe.xml

<?xml version="1.0"?>
<Classe Tipo="Rotina">
  <Atributos>
    <Ativo>True</Ativo>
    <Comentarios>
    </Comentarios>
    <Descricao>Importa Classe</Descricao>
    <MostrarProgresso>True</MostrarProgresso>
    <ProgressoExecucao>
    </ProgressoExecucao>
  </Atributos>
  <Relacionamentos>
    <Parametros>
      <Record Id="PRELATORIO" Tipo="RotinaParametro">
        <Atributos>
          <Comando>
          </Comando>
          <Etiqueta>Relatório</Etiqueta>
          <Formato>
          </Formato>
          <LimparAposExecucao>False</LimparAposExecucao>
          <NomeInterno>PRELATORIO</NomeInterno>
          <Ordem>10</Ordem>
          <PreComando>
          </PreComando>
          <TipoEditor>OpenFileDialog</TipoEditor>
          <TipoEditorPesquisa>Texto</TipoEditorPesquisa>
          <UsoInterno>False</UsoInterno>
          <ValorInicial>
          </ValorInicial>
        </Atributos>
        <Relacionamentos />
      </Record>
      <Record Id="PTME" Tipo="RotinaParametro">
        <Atributos>
          <Comando>
          </Comando>
          <Etiqueta>TME</Etiqueta>
          <Formato>
          </Formato>
          <LimparAposExecucao>False</LimparAposExecucao>
          <NomeInterno>PTME</NomeInterno>
          <Ordem>30</Ordem>
          <PreComando>
          </PreComando>
          <TipoEditor>OpenFileDialog</TipoEditor>
          <TipoEditorPesquisa>Texto</TipoEditorPesquisa>
          <UsoInterno>False</UsoInterno>
          <ValorInicial>
          </ValorInicial>
        </Atributos>
        <Relacionamentos />
      </Record>
      <Record Id="PROTINA" Tipo="RotinaParametro">
        <Atributos>
          <Comando>
          </Comando>
          <Etiqueta>Rotina</Etiqueta>
          <Formato>
          </Formato>
          <LimparAposExecucao>False</LimparAposExecucao>
          <NomeInterno>PROTINA</NomeInterno>
          <Ordem>20</Ordem>
          <PreComando>
          </PreComando>
          <TipoEditor>OpenFileDialog</TipoEditor>
          <TipoEditorPesquisa>Texto</TipoEditorPesquisa>
          <UsoInterno>False</UsoInterno>
          <ValorInicial>
          </ValorInicial>
        </Atributos>
        <Relacionamentos />
      </Record>
    </Parametros>
    <Comandos>
      <Record Id="" Tipo="RotinaComando">
        <Atributos>
          <Ativo>True</Ativo>
          <Comando>if PTME.Trim.Length &gt; 0 then
  PTME.ImportClass(TipoMovimentoEstoque)
  ; 'TME importado com sucesso!'.Msg
else
  false
endif
</Comando>
          <Descricao>
          </Descricao>
          <Ordem>30</Ordem>
        </Atributos>
      </Record>
      <Record Id="" Tipo="RotinaComando">
        <Atributos>
          <Ativo>True</Ativo>
          <Comando>if PRELATORIO.Trim.Length &gt; 0 then
  PRELATORIO.ImportClass(Relatorio)
  ; 'Relatório importado com sucesso!'.Msg
else
  false
endif
</Comando>
          <Descricao>
          </Descricao>
          <Ordem>10</Ordem>
        </Atributos>
      </Record>
      <Record Id="" Tipo="RotinaComando">
        <Atributos>
          <Ativo>True</Ativo>
          <Comando>if PROTINA.Trim.Length &gt; 0 then
  PROTINA.ImportClass(Rotina)
  ; 'Rorinta importada com sucesso!'.Msg
else
  false
endif
</Comando>
          <Descricao>
          </Descricao>
          <Ordem>20</Ordem>
        </Atributos>
      </Record>
    </Comandos>
  </Relacionamentos>
</Classe>