Object RSL

RSL

Paradigm	multi-paradigm: object oriented, problem-oriented procedural, Event
Designed by	Sergey Kubrin
Typing discipline	dynamic
Website	http://www.softlab.ru/
Major implementations
RS-Bank, InterBank, RS-Securities, RS-Payments

RSL or Object RSL (R-Style Language) - problem-oriented, interpreted, proprietary programming language, developed by R-Style Softlab for use in their software products. RSL is macrolanguage. It is free distributed and available for download to everyone.

History

RSL Language was established in 1994. The first additions was appeared only in 1997, and it has added the ability to connect the C ++ modules and RSL language became the object-oriented. In 1998 was added a few standard classes in the language. In 2003 support for .NET Framework module has been added.

RSL shell

RSL Shell - development environment, which includes:

1. Text editor.
2. Debugger.
3. Interpreter / precompiler.
4. Editor of console dialogs.
5. Editor of Pervasive PSQL database structures.
6. Editor of Visual RSL graphical reports.
7. SDK is used to create plug-in modules using C DLM SDK language.

Code example

Sample of program of processing messages into the dialog box:

macro EvenMacro(dlg, cmd, id, key)
/* Set the focus of the input on field Dat */
 if (cmd == DLG_INIT)
 SetFocus (dlg, “Dat”)
 return CM_IGNORE; 
/* if button F3 was pressed  */
 elif (cmd == DLG_KEY)
 if (key == 317)
 dlg.Int = 500;
 dlg.Lab = “NewLabel”;
 dlg.Str =
 “It is new line”;
 UpdateFields (dlg);
/*if button Enter was pressed */
 elif ( (key == 13) and
 (id == 6 ) )
 SetFocus (dlg, 0);
 return CM_IGNORE;
 end;
/* if button Button was pressed */
 elif (cmd == DLG_BUTTON)
 /* Exit to save */
 if (trim (fldname (dlg, id)) == “~O~k”)
 return CM_SAVE;
 /*Quit without saving */
 elif (trim (fldname (dlg, id)) == “~C~ancel”)
 return CM_CANCEL;
 end;
 end;
/* Verify data entry */
 if (cmd == DLG_REMFOCUS)
 if ( (id == 1) and (dlg.Int < 100) )
 MsgBox (“The value must be greater than 100”);
 return CM_CANCEL;
 end;
 elif (cmd == DLG_SETFOCUS)
 message (“Focus installed”);
 elif (cmd == DLG_SAVE)
 if (dlg.Int < 100)
 SetFocus (dlg, 1);
 MsgBox (“Value
  must be |>100”));
 return CM_CANCEL;
 end;
 elif (cmd == DLG_DESTROY)
 message (“Dialog is destroyed”);
 end;
 return CM_DEFAULT;
end

Data types

Scalar types

Type Name	Declaration keyword	Type Code	Accepted values
Integer	Integer	Vs INTEGER	-2147483648 To 2147483647
Float	Double	V_DOUBLE	15 significant decimal digits
Float long	DoubleL	V_DOUBLEL	15 significant decimal digits (analogue Double)
A string of characters	String	V_STRING
Logical value	Bool	V_BOOL	True, False
Date	Date	V_DATE
Time	Time	V_TIME
Date and time	DateTime	V_DTTM
Memory Address	MemAddr	V_MEMADDR
Link to RSL procedure	ProcRef	V_PROC
Link to method of RSL object	MethodRef	V_R2M
BCD number with 4 characters after the point	Decimal	V_DECIMAL	28 significant digits (analogue Numeric)
BCD float. It is used for real values ​​(sums of money, exchange rates, interest rates and so forth.)	Numeric	V_NUMERIC	28 significant digits
Type of monetary values	Money	V_MONEY	28 significant digits (analogue Numeric)
Long type of monetary values	MoneyL	V_MONEYL	28 significant digits (analogue Numeric)
The special value "zero value", or the "default value"	SpecVal	No special constants. Type code 26	OptVal or NullVal
The special value "Empty"	-----	V_UNDEF	Null

Features:

1. Lexemes of DoubleL type is synonymous with Double type;
2. Lexemes of MoneyL is synonymous with Money;
3. Lexemes of Decimal is synonymous with Numeric;

For the internal representation of variables such as the Money type is used Numeric type. These types used in earlier versions of an RSL, were left only for the compatibility of the source code on the RSL.

Object types

Object data types are divided on specialized objects and generalized objects (GenObject). Generalized objects are created either directly by calling RSL-class constructor, or by using a standard procedure GenObject, receiving name of RSL-class as a string parameter. Constructor and procedure GenObect returns a reference to the created object . Currently, specialized objects are outdated. Into new code, it is recommended to use a generalized objects implemented to replace the specialized objects.

Type Name	Declaration keyword	Type Code	Type of similar generic object
Link to a specialized object "database file"	BtFileRef	V_FILE	TBfile
Link to a specialized object "structure in memory"	StrucRef	V_STRUC	TRecHandler
Link to a specialized object "array of values"	arrayRef	V_ARRAY	TArray
Link to specialized object "text file"	TxtFileRef	V_TXTFILE	No
Link to a specialized object "dBase File"	DbfFileRef	V_DBFFILE	No
Link to the generic object of RSL class	Object for any object type, or < name RSL class>	V_GENOBJ

References

• Kubrin, Sergei (1997). "Object RSL — object-oriented version of RSL language". Retrieved 2015-04-21. 
• R-Style Softlab: forum RSL, sources written on RSL
• Homepage of one of the leading developers - Sergei Kubrina
• Byte Russia. Creating a control containers of ActiveX
• PC world. Visual RSL — object-oriented report generator