Results 1 to 10 of 20
Thread: paste what you have copied right now
-
08-11-10, 08:53 PM #1
paste what you have copied right now
unless it's against forum rules, of course.
http://www.colbertnation.com/home
^mine[QUOTE=QuickLightning;1240396]He seems like a nice guy from my experiences with him. He is a bit quiet though.[/][/center]
-
-
-
-
-
08-11-10, 10:04 PM #6
Re: paste what you have copied right now
http://tinyurl.com/y2jjn3c
Go if you want, its a guy drawing comics.(or more likly the waiting screen for when he does)
-
-
-
08-12-10, 01:15 PM #9
Re: paste what you have copied right now
Lol I have several pages of plsql. Here is s snip:
-- insert temp data
v_start_time := dbms_utility.get_time;
execute immediate
'insert into ' || self.get_temp_data_table(p_file_name => p_file_name) || ' ' ||
'(data_type_id, date_time, station_id, num_value) ' ||
'(select ' ||
'substr(key,20,4) as data_type_id, ' ||
'to_date(substr(key,12,8),''YYYYMMDD'') as date_time, ' ||
'substr(key,0,11) as station_id, ' ||
'decode(substr(key,20,4), ' ||
'''TMAX'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''TMIN'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''TOBS'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''PRCP'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''EVAP'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''MNPN'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''MXPN'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''WESF'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'''WTEQ'', decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5) / 10)), ' ||
'decode(substr(data,0,5), ''-9999'', null, to_number(substr(data,0,5))) ' ||
') as value ' ||
'from ' || p_table_name || ')';
commit;
dbms_output.put_line('insert data: ' || to_char((dbms_utility.get_time - v_start_time) / 100, '99999.99'));
-- insert temp data attributes
v_start_time := dbms_utility.get_time;
-- flag 1
execute immediate
'insert into ' || self.get_temp_data_attributes_table(p_file_name => p_file_name) || ' ' ||
'(data_type_id, date_time, station_id, attribute_id) ' ||
'(select data_type_id, date_time, station_id, attribute_id ' ||
'from ( ' ||
'select ' ||
'substr(key,20,4) as data_type_id, ' ||
'to_date(substr(key,12,8),''YYYYMMDD'') as date_time, ' ||
'substr(key,0,11) as station_id, ' ||
'nullif(substr(data,6,1), '' '') as value, ' ||
'id as attribute_id ' ||
'from wrk_test w ' ||
'inner join ( ' ||
'select id, value ' ||
'from attributes ' ||
'where attribute_type_id = ''GHCND_FLAG_1'') ' ||
'on value = substr(data,6,1)) ' ||
'where value is not null)';
commit;
-
08-12-10, 01:19 PM #10
Re: paste what you have copied right now
so funny...i wonder how many coders will post up..
i'm in the middle of changing some of my wallboard display code (streamlining)...
# ------------ update wait file -------------------------------
open(WAITFILE, ">/var/www/html/US/Prometheus/$ARGV[0].waiting");
for (my $i = 0; $i<1128; $i++) {
## print qq| \t$i***$waittimes[$i]|;
chomp($waittimes[$i]);
if ($waittimes[$i]>0) {
print WAITFILE qq|$i\t$waittimes[$i]\n|;
}
}
close(WAITFILE);
#$helptimestamp=time;
# -------------------------------------------------------------
# ------------ update ent file --------------------------------
open(ENTWAITFILE, ">/var/www/html/US/Prometheus/$ARGV[0].enterwait");
for (my $i = 0; $i<1128; $i++) {
## print qq| \t$i***$entwaittimes[$i]|;
chomp($entwaittimes[$i]);
if ($entwaittimes[$i]>0) {
print ENTWAITFILE qq|$i\t$entwaittimes[$i]\n|;
}
}
close(ENTWAITFILE);
#$entwaittimestamp=time;
# -------------------------------------------------------------
# ------------- update status file --------------------------
$wait=time - $helptimestamp;
$entwait=time - $enttimestamp;
print time;
print qq| *** ENTWAIT is (time-$enttimestamp) |;
print qq| === $entwait|;
if ($help==0) {$wait=0;}
if ($ent==0) {$entwait=0;}
print qq| HELPCNT is : $help | if $debug;
print time;
open(STATFILE, ">/var/www/html/US/Prometheus/$ARGV[0].status");
print STATFILE qq|$swtch\t$lcl\t$avl\t$tlicount\t$wait\t$ent\t$en twait\t$help\n|;
close(STATFILE);
print qq|\n ENT=$ent ENTW=$entwait HLP=$help W=$wait AVL=$avl TLI=$tlicount LCL=$lcl SWTCH=$swtch|;
print qq|\n|;
# -----------------------------------------------------------
Thread Information
Users Browsing this Thread
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks