void AddDataSourceEdgeToApplicationNode(ApplicationNode applicationNode, DataSourceInfo dataSourceInfo,
DataSourceList datasources, MethodList methods, ScreenList screens, DatabaseList databases, FieldList fields, IndexList indexes)
{
var applicationInfo = applicationNode.Application;
if (dataSourceInfo.DatabaseType == DatabaseType.NormalDatabase)
{
var dataSourceNode = datasources.FindDataSourceNode(applicationInfo, dataSourceInfo);
AddEdge(applicationNode, AdlibEdgeType.HasDataSource, dataSourceNode);
dataSourceInfo.ListScreenList.ForEach(screenName =>
screens.LinkScreenToNode(applicationInfo, dataSourceNode, screenName, AdlibEdgeType.UsesListScreen));
dataSourceInfo.DetailScreenList.ForEach(screenName =>
screens.LinkScreenToNode(applicationInfo, dataSourceNode, screenName, AdlibEdgeType.UsesDetailScreen));
dataSourceInfo.MethodList.ForEach(methodInfo =>
methods.LinkMethodToNode(applicationInfo, dataSourceNode, methodInfo, screens));
var databasePath = DatabasePath(applicationInfo, dataSourceInfo);
screens.LinkScreensToDataSourceNode(applicationInfo, databases, fields, indexes, dataSourceInfo.DetailScreenList, databasePath);
screens.LinkScreensToDataSourceNode(applicationInfo, databases, fields, indexes, dataSourceInfo.ListScreenList, databasePath);
}
}
