x/kreta
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

init

Browse Source
This commit is contained in:
albert
2024-03-13 00:33:46 +01:00
commit e124a47765
19374 changed files with 9806149 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files
Tools/CodeGeneration/Templates/Server/DataAccess/DBCommands/InsertCommands.tdl
+49
View File
@@ -0,0 +1,49 @@
//***************************************************************************//
// Megjegyzés? //
// //
// VALÓSZÍNŰLEG MÁR ELAVULT, ÉS NEM HASZNÁLT! //
//***************************************************************************//
template GenerateInsertEntityCommand(MClass as ENTITY)
begin
[GenerateInsertEntityCommandCore([ENTITY])]
end;
end template
//***************************************************************************//
// Megjegyzés? //
// //
// VALÓSZÍNŰLEG MÁR ELAVULT, ÉS NEM HASZNÁLT! //
//***************************************************************************//
template GenerateInsertEntityCommandCore(MClass as ENTITY)
[if (IsMasterEntity([ENTITY]) == "false")]
insert into [ConvertNameToSQLTableName([ENTITY.name])] (
[loop (ENTITY -> MAttribute as ATTRIBUTE)]
[ConvertNameToSQLColumnName([ATTRIBUTE.name])],
[end loop]
ID
)
values (
[loop (ENTITY -> MAttribute as ATTRIBUTE)]
:[ConvertNameToCommandParameterName([ATTRIBUTE.name])],
[end loop]
:[ConvertNameToCommandParameterName("ID")]
);
[loop (ENTITY -> SuperClass as BASECLASS)]
[GenerateInsertEntityCommandCore([BASECLASS])][break]
[end loop]
[else]
insert into [ConvertNameToSQLTableName([ENTITY.name])] (
[loop (ENTITY -> MAttribute as ATTRIBUTE)]
[ConvertNameToSQLColumnName([ATTRIBUTE.name])],
[end loop]
ID, SERIAL
)
values (
[loop (ENTITY -> MAttribute as ATTRIBUTE)]
:[ConvertNameToCommandParameterName([ATTRIBUTE.name])],
[end loop]
:[ConvertNameToCommandParameterName("ID")], :[ConvertNameToCommandParameterName("Serial")]
);
[end if]
end template