Código: /*------------------------------------------------------------------------ Description : Exibe diret¢rio tempor rio do Client Author(s) : Fabio Dantas Created : 02.02.2007 ----------------------------------------------------------------------*/ DISP SESSION:TEMP-DIRECTORY. /*------------------------------------------------------------------------ Description : O comando CAN-DO no caso abaixo busca a string passada como segundo parametro no array passado como primeiro parametro. Author(s) : Fabio Dantas Created : 02.02.2007 ----------------------------------------------------------------------*/ DISP CAN-DO("0,1,2,3,4,5,6,7,8,90", '90'). /*------------------------------------------------------------------------ Description : O comando Fill repete o caracter o numero de vezes que for passado por parametro. Author(s) : Fabio Dantas Created : 02.02.2007 ----------------------------------------------------------------------*/ DISP FILL('-',10). /*------------------------------------------------------------------------ Description : Controlar Transa‡äes Author(s) : Fabio Dantas Created : 02.02.2007 Details : Pra controlar as altera‡äes em banco costuma-se usar transa‡äes. Abaixo temos um exemplo bem simples. Onde o comando undo desfaz toda a transa‡Æo caso ocorra um erro em breve postarei exemplos mais completos. ----------------------------------------------------------------------*/ DO TRANSACTION ON ERROR UNDO. BLABLABLA. BLABLABLA. if erro then undo. END. /*------------------------------------------------------------------------ Description : Localizar string em um Array Author(s) : Fabio Dantas Created : 02.02.2007 Details : O comando CAN-DO no caso abaixo busca a string passada como segundo parametro no array passado como primeiro parametro. ----------------------------------------------------------------------*/ DISP can-do("0,1,2,3,4,5,6,7,8,90", '90').
