READINSERT()
 Comuta o modo de inserçao corrente para READ e MEMOEDIT()
------------------------------------------------------------------------------

 Sintaxe

     READINSERT([<lComuta>]) --> lModoCorrente

 Argumentos

     <lComuta> comuta o modo de inserçao.  Verdadeiro (.T.) liga
     inserçao, enquanto que falso (.F.) desliga.  O padrao é falso (.F.) ou
     o último modo selecionado pelo usuário em READ ou MEMOEDIT().

 Retorno

     READINSERT() retorna o estado corrente do modo de inserçao na forma de
     um valor lógico.

 Descriçao

     READINSERT() é uma funçao de tratamento de ambiente que informa o
     estado atual do modo de inserçao para READ e MEMOEDIT(), e configura ou
     nao o modo de inserçao em ligado ou desligado, dependendo do valor de
     <lComuta>.  Quando READINSERT() retorna falso (.F.) e o usuário entra
     com caracteres em um buffer de objeto GET durante um READ ou
     MEMOEDIT(), os caracteres sao sobreescritos.  Quando READINSERT()
     retorna verdadeiro (.T.), os caracteres entrados sao inseridos.  O modo
     de inserçao é uma configuraçao global que pertence ao sistema, e nao a
     algum objeto específico.

     READINSERT() pode ser executada anteriormente ou durante um READ ou
     MEMOEDIT().  Se utilizado juntamente com READ, READINSERT() pode ser
     invocada dentro de uma cláusula WHEN ou VALID de @...GET ou dentro de
     uma rotina SET KEY.  Caso usada juntamente com a MEMOEDIT(), ela pode
     ser invocada com a funçao de usuário, bem como uma rotina SET KEY.

 Exemplos

     O exemplo a seguir configura o modo de inserçao antes da entrada na
     MEMOEDIT() e reconfigura o modo quando a MEMOEDIT() terminar:

     USE Sales NEW
     lInsMode = READINSERT(.T.)           // Liga modo insercao
     Sales->Notes := MEMOEDIT(Sales->Notes)
     READINSERT(lInsMode)                 // Recupera modo insercao anterior

 Arquivos:  Biblioteca CLIPPER.LIB.
 To download this example - click here.

See Also: MEMOEDIT() READEXIT() READ