|
|
| Define the main index in database definition |
 |
| AccNumber |
Index name |
| type |
0 - usual index, 1 - index with subsets |
|
RecordBegin(AccVc,-,"konto4");
ImpExpLevel(1);
RecordField(AccNumber,M4Code,10,AccVc);
RecordField(Comment,M4Str,60,0);
RecordField(AccType,M4Int,0,0);
RecordField(NVD,M4Int,0,0);
RecordField(NVC,M4Int,0,0);
RecordField(AutCode,M4Code,10,AutVc);
RecordField(blockedFlag,M4Int,0,0);
RecordField(VATCode,M4Code,2,0);
RecordField(ControlType,M4Int,0,0);
RecordField(Curncy,M4Code,5,CurncyCodeVc);
RecordField(ConsAccNumber,M4Code,10,0);
RecordField(Conspr,M4Int,0,0);
RecordField(Objects,M4UStr,60,ObjVc);
RecordField(SRUCode,M4UStr,10,0);
RecordField(ExclFrRep,M4Int,0,0);
RecordField(PeriodCode,M4Code,10,0);
RecordField(GroupAcc,M4Int,0,0);
RecordField(TransAutCode,M4Code,10,AutVc);
RecordField(Math,M4Matrix,0,0);
ArrayBegin(Math,-,1);
ArrayField(LangCode,M4Code,5,0);
ArrayField(Text,M4Str,100,0);
EndArray;
MainKeyBegin(AccNumber,0);
KeySegment(AccNumber);
SynchronizationIndex;
KeyBegin(Comment);
KeySegment(Comment);
KeySegment(AccNumber);
KeyBegin(ActAccNumber);
KeySegment(AccNumber);
KeySegment(blockedFlag);
KeyBegin(ActComment);
KeySegment(Comment);
KeySegment(AccNumber);
KeySegment(blockedFlag);
KeyBegin(ConsAccNumber);
KeySegment(ConsAccNumber);
KeySegment(AccNumber);
EndRecord;
|
««