$SCHEMA = {
'DBI_STR' => ['Sybase:server=SYBASE;database=userdb','Sybase <host alisa>','','','set textsize 1000000'],
'CODEPAGE' => ['KOI8-R','KOI8-R'],
'COLOR' => ['white','black','red','black'],
'OUT_DATA_TYPE' => 'html',
'FIRST_PAGE' => 'LIST-0',
'DEF_LINES' => 250,
'DEF_COLS' => 800,
'EDITOR' => 'vi',
'PERL_CODE_OK' => 1,
'DBI_MULTI_SELECT' => 1,
'LISTS' => {
'0' => {
'title' => 'Список групп',
'multipart' => 1,
'list_selected' => [],
'decorations' => 1,
'ypos' => 0,
'xpos' => 0,
'VIEW_FORMAT' => [0,1],
'LIST_SIZE' => [51,15,12],
'FIND_TITLE' => ['Наименование','ID','Статей'],
'SORT_FORMAT' => [0],
'IND' => 1,
'CHILD_ID' => 'LIST-1;LIST-3',
'DB_COL' => ['grp.NAME','grp.ID','count( main.GROUP_ID )'],
'TABLE_NAME' => ['grp','main'],
'TABLE_FULL_NAME' => ['userdb..NEWS_GROUP_NAME grp','userdb..NEWS_MSG main'],
'OPTIONS' => [ ['',''],
['',''] ],
'TABLE_OPTIONS' => [ ['','where main.GROUP_ID = grp.ID'],
['','group by grp.NAME'] ]
},
'1' => {
'title' => 'Список тем/Темы',
'multipart' => 0,
'list_selected' => [],
'decorations' => 1,
'ypos' => 0,
'xpos' => 0,
'CHILD_ID' => 'LIST-2;LIST_FILE-2;MESG-0',
'VIEW_FORMAT' => [0],
'LIST_SIZE' => [70,8],
'SORT_FORMAT' => [0],
'FIND_TITLE' => ['Тема','Статей'],
'DB_COL' => ['main.SUBJ','count(main.SUBJ)'],
'IND' => 3,
'TABLE_NAME' => ['main'],
'TABLE_FULL_NAME' => ['userdb..NEWS_MSG main'],
'OPTIONS' => [ ['where main.GROUP_ID IN (<LIST_0[1]>)',''],
['group by main.SUBJ',''] ],
},
'2' => {
'title' => 'Список тем/Статьи',
'multipart' => 0,
'list_selected' => [],
'decorations' => 1,
'ypos' => 0,
'xpos' => 0,
'VIEW_FORMAT' => [0,1,12,5,3],
'LIST_SIZE' => [ 5 , 20, 20, 20, 30, 30, 10, 30, 10, 30, 10, 9, 6, 10,255,255],
'FIND_TITLE' => ['N','От кого','Кому', 'Дата', 'Тема','Группа','ID отправителя','E-MAIL отправителя','ID адресата','E-MAIL адресата','ID группы','N статьи','Строк','Смещение времени к GMT','Содержимое статьи','Примечание к пользователю'],
'SORT_FORMAT' => [4,11,3],
'DB_COL' => ['main.ID','user1.NAME','user2.NAME','main.DATE','main.SUBJ','grp.NAME','main.FROM_ID','user1.MAIL','main.COMMENT_TO','user2.MAIL','main.GROUP_ID','main.XREF','main.LINES','main.DATE_OFF','main.ARTICLE','user1.DESCRIPTION'],
'IND' => 0,
'CHILD_ID' => 'TEXT-0',
# 'CHILD_ID' => 'MIME-0-text/html',
'TABLE_NAME' => ['main','grp','user1','user2'],
'TABLE_FULL_NAME' => ['userdb..NEWS_MSG main','userdb..NEWS_GROUP_NAME grp','userdb..NEWS_USER_NAME user1','userdb..NEWS_USER_NAME user2'],
'OPTIONS' => [['where main.GROUP_ID IN (<LIST_0[1]>) and main.SUBJ = <LIST_1[0]> and',' and ']],
'TABLE_OPTIONS' => [['','main.GROUP_ID=grp.ID','main.FROM_ID=user1.ID','main.COMMENT_TO=user2.ID']]
},
'3' => {
'title' => 'Список статей/Статьи',
'multipart' => 0,
'list_selected' => [],
'decorations' => 1,
'ypos' => 0,
'xpos' => 0,
'VIEW_FORMAT' => [0,1,4,3],
'LIST_SIZE' => [ 5 , 20, 20, 20, 30, 30, 10, 30, 10, 30, 10, 9, 10, 10,255,255],
'FIND_TITLE' => ['N','От кого','Кому', 'Дата', 'Тема','Группа','ID отправителя','E-MAIL отправителя','ID адресата','E-MAIL адресата','ID группы','N статьи','Строк в статье','Смещение времени к GMT','Содержимое статьи','Примечание к пользователю'],
'SORT_FORMAT' => [4,11,3],
'DB_COL' => ['main.ID','user1.NAME','user2.NAME','main.DATE','main.SUBJ','grp.NAME','main.FROM_ID','user1.MAIL','main.COMMENT_TO','user2.MAIL','main.GROUP_ID','main.XREF','main.LINES','main.DATE_OFF','main.ARTICLE','user1.DESCRIPTION'],
'IND' => 0,
'CHILD_ID' => 'TEXT-1',
'TABLE_NAME' => ['main','grp','user1','user2'],
'TABLE_FULL_NAME' => ['userdb..NEWS_MSG main','userdb..NEWS_GROUP_NAME grp','userdb..NEWS_USER_NAME user1','userdb..NEWS_USER_NAME user2'],
'OPTIONS' => [['where main.GROUP_ID IN (<LIST_0[1]>) and ',' and ']],
'TABLE_OPTIONS' => [['','main.GROUP_ID=grp.ID','main.FROM_ID=user1.ID','main.COMMENT_TO=user2.ID']]
},
'RAW_VERT' => {
'multipart' => 0,
'decorations' => 1,
'ypos' => 0,
'xpos' => 0,
'VERTICAL_LIST' => 1,
'list_size_2' => [55,22],
'SQL' => 'select 1'
}
},
# 'MIMES' => {
# '0-text/html' => {
# 'title' => 'Список тем/Внешний просмотр сообщения',
# 'SQL' => "select 'From: '+user1.NAME+' <'+user1.MAIL+'>\nDate: '+convert(varchar(40),main.DATE,109)+'\nSubj: '+main.SUBJ+'\nNewsgroup: '+grp.NAME+'\n'+' \n',main.ARTICLE from userdb..NEWS_MSG main,NEWS_USER_NAME user1,NEWS_GROUP_NAME grp where main.FROM_ID = user1.ID and main.GROUP_ID = grp.ID and main.ID = <LIST_2[0]>"
# }
# },
'TEXTS' => {
'0' => {
'title' => 'Список тем/Просмотр сообщения',
'xpos' => 0,
'ypos' => 0,
'decorations' => 1,
'EDIT' => 1,
'COLOR' => {
6 => ['/^\s*\S{0,2}(>\s*){0}/','white:black'],
5 => ['/^\s*\S{0,2}(>\s*){1}/','yellow:black'],
4 => ['/^\s*\S{0,2}(>\s*){2}/','magenta:black'],
3 => ['/^\s*\S{0,2}(>\s*){3}/','cyan:black'],
2 => ['/^\s*\S{0,2}(>\s*){4}/','red:black'],
1 => ['/^\s*\S{0,2}(>\s*){5}/','green:black'],
0 => ['/^(From|Date|Subj|Newsgroup): /','red:blue']
},
'SQL' => "select 'From: '+user1.NAME+' <'+user1.MAIL+'>\nDate: '+convert(varchar(40),main.DATE,109)+'\nSubj: '+main.SUBJ+'\nNewsgroup: '+grp.NAME+'\n'+' \n',main.ARTICLE from userdb..NEWS_MSG main,NEWS_USER_NAME user1,NEWS_GROUP_NAME grp where main.FROM_ID = user1.ID and main.GROUP_ID = grp.ID and main.ID = <LIST_2[0]>"
},
'1' => {
'title' => 'Список статей/Просмотр сообщения',
'xpos' => 0,
'ypos' => 0,
'decorations' => 1,
'EDIT' => 1,
'COLOR' => {
6 => ['/^\s*\S{0,2}(>\s*){0}/','white:black'],
5 => ['/^\s*\S{0,2}(>\s*){1}/','yellow:black'],
4 => ['/^\s*\S{0,2}(>\s*){2}/','magenta:black'],
3 => ['/^\s*\S{0,2}(>\s*){3}/','cyan:black'],
2 => ['/^\s*\S{0,2}(>\s*){4}/','red:black'],
1 => ['/^\s*\S{0,2}(>\s*){5}/','green:black'],
0 => ['/^(From|Date|Subj|Newsgroup): /','red:blue']
},
'SQL' => "select 'From: '+user1.NAME+' <'+user1.MAIL+'>\nDate: '+convert(varchar(40),main.DATE,109)+'\nSubj: '+main.SUBJ+'\nNewsgroup: '+grp.NAME+'\n'+' \n',main.ARTICLE from userdb..NEWS_MSG main,NEWS_USER_NAME user1,NEWS_GROUP_NAME grp where main.FROM_ID = user1.ID and main.GROUP_ID = grp.ID and main.ID = <LIST_3[0]>"
}
},
'MESGS' => {
'0' => {
'title' => 'Удалить сообщения',
'SQL' => "delete from userdb..NEWS_MSG where GROUP_ID in (<LIST_0[1]>) and SUBJ = <LIST_1[0]>",
'WARN_MSG' => 'Удалить сообщения на эту тему ?',
}
}
};