CAESARS POKER ROOM
CAESARS POKER ROOM DESCRIPTION
Poker Arena is on the first floor, next to main entrance. It has 24 non-smoking gaming tables. The room itself is nothing special. However, this is the only poker room in Atlantic City where our editors have consistently won money in cash games. Draw your own conclusions.
CAESARS POKER ROOM DAILY TOURNAMENT SCHEDULE
%if($events){
| <% Bender::TokenLang::Ops::wc $pref_room->{room_name} %> |
|
<% Bender::TokenLang::Ops::trunc $pref_room->{room_description},220 %>
% if($pref_room->{room_description}){
more...
% } ##end if
|
 |
|
<% Bender::TokenLang::Ops::wc $venue->{name} %> Poker Events
|
|
%my $top=1;
%for my $event(@{$events}){
% $top++;
% my $performances;
% if($event->{ongoing}){
% $performances =$m->comp("/lib/data/event_functions.mas",
% expire_cache_now=>$expire_cache_now,
% method=>'performanceListing',
% look_ahead_window =>'6 days',
% event_id =>$event->{id},
% venue_id =>$venue->{id},
% order_by =>'date,time',
%# DBG =>1,
% );
% }#end if
% else{
% $performances =$m->comp("/lib/data/event_functions.mas",
% expire_cache_now=>$expire_cache_now,
% method=>'performanceListing',
% event_id =>$event->{id},
% venue_id =>$venue->{id},
% order_by =>'date,time',
% limit =>1,
%# DBG =>1,
% );
% }#end if
<% $event->{name} %>
% if($performances->[0]->{headline}){
<% $performances->[0]->{headline} %>
%}
|
%my ($d,$d2)="";
% if($event->{ongoing}){
%for my $performance(@{$performances}){
% $d2=$performance->{day_word};
% if($d ne $d2){ $d=$d2;
 |
% }#end if
%}#end for---$performances
%}#end if
%if(!($event->{ongoing})&&($event->{min_date} ne $event->{max_date})) {
<% $event->{min_date} %>
<% $event->{max_date} %> |
%} ##end if
%if(!($event->{ongoing})&&($event->{min_date} eq $event->{max_date})) {
<% $event->{min_date} %> |
%} ##end if
% if($event->{ongoing}){
% my $counter=0;
% my ($next_day,$flg,$day,$day2)=0;
%if($performances){
% $day = $performances->[0]->{day_word}; $flg=0;
% if(scalar(@{$performances}) >1){
% if(($performances->[0]->{fmt_date}) ne ($performances->[scalar(@{$performances})]->{fmt_date}))
% { $day = $performances->[scalar(@{$performances})]->{day_word}; $flg++; }
% }##end if-------(scalar(@{$performances}) >1)
%for my $performance(@{$performances}){
% $day2 = $performance->{day_word};
% if($day ne $day2){ $day=$day2; $next_day++; }
% if(($day eq $day2)&&($next_day==$flg)){
% if($counter !=0){ print "\, "; } $counter++;
<% $performance->{fmt_time} %>
% }#end if-----($day eq $day2)&&($next_day==$flg)
%}#end for------------$performances
%} ##end if------$performances
%} ##end if---$event->{ongoing}
|
|
 |
%} ##end for--events
Calendar of <% $venue->{name} %> Poker
| <% $pref_room->{room_description} %> |
|
%}#end if--------($events)
%else{
We currently do NOT have any Poker Events For
<% $venue->{name} %>
Please check back again.
Thank you
|
|
%}#end else
<%init>
my $city_standard_id =16892;
my $venue_id=$ARGS{venue_id};
my $expire_cache_now=$ARGS{expire_cache_now};
my $venue=$m->comp ("/lib/data/event_functions.mas",
method =>'venueData',
venue_id=>$venue_id,
expire_cache_now=>$expire_cache_now,
# DBG =>1,
);
my $events=$m->comp ("/lib/data/event_functions.mas",
city_standard_id =>$city_standard_id,
expire_cache_now=>$expire_cache_now,
event_category=>'{19}',
order_by =>'min_date,name',
method =>'eventListing',
#exclude_ongoing =>1,
venue_id=>$venue_id,
# DBG =>1,
);
my $pref_room;
if($events){
$pref_room =$m->comp("/lib/data/event_functions.mas",
expire_cache_now=>$expire_cache_now,
method=>'performanceListing',
event_id =>$events->[0]->{id},
venue_id =>$venue->{id},
order_by =>'date,time',
limit =>1,
# DBG =>1,
);
$pref_room = $pref_room->[0];
}#end if
