|
|
|
(search: (dCoreModTag_coreConfig->prefix) + 'moddb_core', 'dcoremoddb_core_sections', (array: (pair:'='=(pair:'section_approved'='1')), (pair:'='=(pair:'section_title'='Television'))), (dCoreModTag_core_sections->setFields)->second))->(get:3)->(get:1)->(get:1);
local: 'tvGuideCatNum' = (dCoreModTag_moduledb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_core', 'dcoremoddb_core_categories', (array: (pair:'='=(pair:'category_approved'='1')), (pair:'='=(pair:'category_name'='Cable Guide'))), (dCoreModTag_core_categories->setFields)->second))->(get:3)->(get:1)->(get:1);
local: 'tvGuideConNum' = (dCoreModTag_moduledb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_core', 'dcoremoddb_core_content', (array: (pair:'='=(pair:'content_approved'='1')), (pair:'='=(pair:'content_title'='Cable Guide Online'))), (dCoreModTag_core_content->setFields)->second))->(get:3)->(get:1)->(get:1);
local:'sqlStatement' = 'SELECT tf_station_call_sign,tf_channel_num FROM dcoremoddb_tvguide_station Order by tf_channel_num';
local:'channelSearch' = (dCoreModTag_moduleSQL2->(getsql:(dcoremodtag_coreconfig->prefix)+'moddb_tvguides',#sqlStatement,(array:'tf_station_call_sign','tf_channel_num')));
local: 'outData' = '';
/**************************************************************************************
*
* if a package is selected display the channels in that package else display the package names
*
****************************************************************************************/
if:(($package) != '');
local:'dCorePackage' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'='=(pair:'id'=$package))),(dCoreModTag_cablepack_packages->setFields)->second));
if:(var_defined:'groupDisplay') == false;
var:'groupDisplay' = 0;
/if;
local:'imageName' = (string_replace: -find=' ', -replace='',(#dCorePackage->get:3->get:1->get:2));
#outData += '';
#outData += '';
#outData += '';
#outData += ' ';
#outData += '
';
#outData += ' | ';
#outData += ' ';
#outData += ' ';
if: #dCorePackage->(get:2) > 0;
#outData += '';
//seperate channel list into two arrays - one for each column.
local:'column1' = (array);
local:'column2' = (array);
local:'channelNum1' = (array);
local:'channelNum2' = (array);
local:'groupedList' = (array);
local:'groupedChList' = (array);
local:'chanList' = (#dCorePackage->(get:3)->(get:1)->(get:5)->(split:','));
local:'channelNumArray' = (#dCorePackage->(get:3)->(get:1)->(get:6)->(split:','));
local:'sortedList' = (array);
//create an array of pairs (channel number=channel id) so that we can sort by channel number
iterate:(#channelNumArray), local:'record';
#sortedList->insert:(pair:(Integer:#record)=(#chanList->get:(loop_count)));
/iterate;
//sort by channel number
#sortedList->sort:true;
//compile an array of all channels within the package, or only channels for a specific group within that package
if:(($groupDisplay) == 0);
//sort the list of channels into two columns
loop:((#sortedList)->size);
if:((loop_count) <= (((#sortedList)->size)/2));
#column1->insert:(#sortedList->get:(loop_count)->second);
#channelNum1->insert:(#sortedList->get:(loop_count)->first);
else;
#column2->insert:(#sortedList->get:(loop_count)->second);
#channelNum2->insert:(#sortedList->get:(loop_count)->first);
/if;
/loop;
else;
iterate:(#sortedList), local:'record';
local: 'channelID' = (string_replace: -find='?', -replace='',#record->second);
local: 'dCoreChannels' = (dCoreModTag_moduledb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack', 'dCoreModdb_cablepack_channels', (array: (pair:'='=(pair:'id'=#channelID)), (pair:'='=(pair:'channel_approved'='1'))), (dCoreModTag_cablepack_channels->setFields)->second));
if:((#dCoreChannels->get:2) > 0);
if:((#dCoreChannels->get:3->get:1->get:11) == (((dCoreModTag_cablepack_options->groupings)->find:($groupDisplay))->get:1->second));
#groupedList->insert:(#record->second);
#groupedChList->insert:(#record->first);
/if;
/if;
/iterate;
//sort the grouped list of channels into two columns
loop:((#groupedList)->size);
if:((loop_count) <= (((#groupedList)->size)/2));
#column1->insert:(#groupedList->get:(loop_count));
#channelNum1->insert:(#groupedChList->get:(loop_count));
else;
#column2->insert:(#groupedList->get:(loop_count));
#channelNum2->insert:(#groupedChList->get:(loop_count));
/if;
/loop;
/if;
#outData += '';
#outData += '';
#outData += '';
iterate: (#column1), local: 'dCoreRecord';
local: 'channelID' = (string_replace: -find='?', -replace='',#dcoreRecord);
local: 'dCoreChannels' = (dCoreModTag_moduledb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack', 'dCoreModdb_cablepack_channels', (array: (pair:'='=(pair:'id'=#channelID)), (pair:'='=(pair:'channel_approved'='1'))), (dCoreModTag_cablepack_channels->setFields)->second));
if:((#dcoreChannels)->get:2 > 0);
#outData += '';
//display sepcific channel info if channel is selected
if:((var_defined:'chanDisplay') == true) && ((var:'chanDisplay') == (#dCoreChannels->(get:3)->(get:1)->(get:1)));
#outData += '';
//link jump if a channel is clicked on
#outData += '';
inline: -username=dCoreModTag_coreConfig->username,-password=dCoreModTag_coreConfig->password;
if:((#dCoreChannels->(get:3)->(get:1)->(get:5)) == '');
#outData += '| | ';
else;
#outData += '' + image_display->(display(-filepath=((response_path) + (dCoreModTag_core_appinfo->getFilePath:'1') + 'dCoreChannels/' + (#dCoreChannels->(get:3)->(get:1)->(get:5))),-width=90)) + ' | ';
/if;
/inline;
#outData += 'Close  | ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '| ' + (#dCoreChannels->(get:3)->(get:1)->(get:2)) + ', Channel ' + (#channelNum1->get:(loop_count)) + ' | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '| ' + (#dCoreChannels->(get:3)->(get:1)->(get:7)) + ' | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '| | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
if:((#dCoreChannels->(get:3)->(get:1)->(get:4)) != '') && ((#channelSearch->get:3)->FindIndex:(array: (#dCoreChannels->(get:3)->(get:1)->(get:4)), (#channelNum1->get:(loop_count))))->size > 0;
#outData += '';
#outData += '| Click here to see whats showing now. | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
/if;
else;
#outData += '';
#outData += '| ' + (#dCoreChannels->(get:3)->(get:1)->(get:2)) + ' | ';
#outData += '' + (#channelNum1->get:(loop_count)) + ' | ';
#outData += ' | ';
#outData += ' ';
/if;
if:((loop_count) != (#column1->size));
#outData += '';
#outData += '
| ';
#outData += ' | ';
#outData += ' ';
/if;
#outData += ' ';
/if;
/iterate;
#outData += ' | ';
#outData += '';
iterate: (#column2), local: 'dCoreRecord';
local: 'channelID' = (string_replace: -find='?', -replace='',#dcoreRecord);
local: 'dCoreChannels' = (dCoreModTag_moduledb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack', 'dCoreModdb_cablepack_channels', (array: (pair:'='=(pair:'id'=#channelID)), (pair:'='=(pair:'channel_approved'='1'))), (dCoreModTag_cablepack_channels->setFields)->second, (pair:'channel_title'='ASC') ));
if:((#dcoreChannels)->get:2 > 0);
#outData += '';
//display sepcific channel info if channel is selected
if:((var_defined:'chanDisplay') == true) && ((var:'chanDisplay') == (#dCoreChannels->(get:3)->(get:1)->(get:1)));
#outData += '';
//link jump if a channel is clicked on
#outData += '';
inline: -username=dCoreModTag_coreConfig->username,-password=dCoreModTag_coreConfig->password;
if:((#dCoreChannels->(get:3)->(get:1)->(get:5)) == '');
#outData += '| | ';
else;
#outData += '' + image_display->(display(-filepath=((response_path) + (dCoreModTag_core_appinfo->getFilePath:'1') + 'dCoreChannels/' + (#dCoreChannels->(get:3)->(get:1)->(get:5))),-width=90)) + ' | ';
/if;
/inline;
#outData += 'Close  | ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '| ' + (#dCoreChannels->(get:3)->(get:1)->(get:2)) + ', Channel ' + (#channelNum2->get:(loop_count)) + ' | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '| ' + (#dCoreChannels->(get:3)->(get:1)->(get:7)) + ' | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '| | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
if:((#dCoreChannels->(get:3)->(get:1)->(get:4)) != '') && ((#channelSearch->get:3)->FindIndex:(array: (#dCoreChannels->(get:3)->(get:1)->(get:4)), (#channelNum2->get:(loop_count))))->size > 0;
#outData += '';
#outData += '| Click here to see whats showing now. | ';
#outData += ' | ';
#outData += ' | ';
#outData += ' ';
/if;
else;
#outData += '';
#outData += '| ' + (#dCoreChannels->(get:3)->(get:1)->(get:2)) + ' | ';
#outData += '' + (#channelNum2->get:(loop_count)) + ' | ';
#outData += ' | ';
#outData += ' ';
/if;
if:((loop_count) != (#column2->size));
#outData += '';
#outData += '
| ';
#outData += ' | ';
#outData += ' ';
/if;
#outData += ' ';
/if;
/iterate;
#outData += ' | ';
#outData += ' ';
//back button
#outData += '';
#outData += ' | ';
#outData += ' ';
#outData += ' ';
/if; //this if closes off package found count
else;
/**************************************************************************************
*
* Show value headers
*
****************************************************************************************/
local:'dCoreOceansMovies' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'>'=(pair:'id'=0)),(pair:'='=(pair:'package_approved'=1)),(pair:'='=(pair:'package_type'=0)),(pair:'='=(pair:'package_title'='Oceans movies'))),(array:'id')));
local:'dCoreOceansSports' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'>'=(pair:'id'=0)),(pair:'='=(pair:'package_approved'=1)),(pair:'='=(pair:'package_type'=0)),(pair:'='=(pair:'package_title'='Oceans sports'))),(array:'id')));
local:'dCoreOceans125' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'>'=(pair:'id'=0)),(pair:'='=(pair:'package_approved'=1)),(pair:'='=(pair:'package_type'=0)),(pair:'='=(pair:'package_title'='Oceans 125'))),(array:'id')));
local:'dCoreOceans150' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'>'=(pair:'id'=0)),(pair:'='=(pair:'package_approved'=1)),(pair:'='=(pair:'package_type'=0)),(pair:'='=(pair:'package_title'='Oceans 150'))),(array:'id')));
local:'dCoreOceans175' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'>'=(pair:'id'=0)),(pair:'='=(pair:'package_approved'=1)),(pair:'='=(pair:'package_type'=0)),(pair:'='=(pair:'package_title'='Oceans 175'))),(array:'id')));
local:'dCoreOceansComplete' = (dCoreModTag_moduleDb->(search: (dCoreModTag_coreConfig->prefix) + 'moddb_cablepack','dCoreModdb_cablepack_packages',(array: (pair:'>'=(pair:'id'=0)),(pair:'='=(pair:'package_approved'=1)),(pair:'='=(pair:'package_type'=0)),(pair:'='=(pair:'package_title'='Oceans complete'))),(array:'id')));
#outData += '';
#outData += '';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += ' ';
#outData += '';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += '';
#outData += ' ';
#outData += ' | ';
#outData += ' ';
#outData += ' ';
/if; //closes
#outData;
?>
|