thx ya bung Wahyu
Thanks And Regards, ============================ Ade Veria Octora Email : [EMAIL PROTECTED] ----- Original Message ---- From: gue aja <[EMAIL PROTECTED]> To: [email protected] Sent: Tuesday, February 13, 2007 12:57:35 PM Subject: Re: [indo-oracle] Print Report dalam bentuk TEXT Mungkin Script ini bisa membantu Bung Ade..; PROCEDURE Test IS FileId Utl_File.File_ Type; vOsLocation Varchar2(255) ; vVirtualLocation Varchar2(255) ; vName Varchar2(50) ; vFileName Varchar2(100) ; vResultToFile Varchar2(500) ; Begin vFileName := 'TEXT_FILE_' ||to_char( sysdate,' ddmmyyyy_ hhmiss')| |'.txt'; vResultToFile := 'Person_Id' ||chr(9) || 'Field Name' ||chr(9) || 'Actual Amount ' ||chr(9); Begin Select os_location, virtual_location Into vOsLocation --D:\temp\, vVirtualLocation- -http://192. 168.1.223/ dev60temp/ From hr_file_location Where default_site = 1; Exception when no_data_found then msg('No File Generate in Browser'); End; If vOsLocation is not null and vVirtualLocation is not null Then fileId := Utl_File.FOpen (vOsLocation, vFileName, 'W'); Utl_File.Put_ Line (fileID,vResultToFi le); For Rec In ( Select Person_id, FieldName, Amount From hr359t ) Loop vResultToFile := Rec.Person_Id ||chr(9)|| Rec.FieldName ||chr(9)|| To_Char(Rec. Amount,'999, 999,999') ||chr(9); Utl_File.Put_ Line (fileID, vResultToFile) ; End Loop; Utl_File.FClose (fileID); Web.Show_Document( vVirtualLocation ||vFileName, '_blank') ; End if; END; Nb: table hr_file_location itu isinya * OS_LOCATION VIRTUAL_LOCATION D:\temp\ http://192.168. 1.223/dev60temp/ * Table hr359t itu berisi sekitar 3 juta record. * Jadi Nanti di Folder D:\temp\ (server) ada file txt : "TEXT_FILE_( sysdate). txt" Lumayan besar, sekitar 85Mb ( Ini Hanya 3 Field aja. Kalo 5 juta Reord kira2 berpa Mb yach?.) Mohon Koreksinya Bila Ada Kesalahan... . Rgds ------ Wahyu Laksono [EMAIL PROTECTED] com ----- Original Message ---- From: Ade Octora <[EMAIL PROTECTED] com> To: indo-oracle@ yahoogroups. com Sent: Tuesday, February 13, 2007 11:26:34 AM Subject: [indo-oracle] Print Report dalam bentuk TEXT dear all ada yang pernah coba g, print report dalam bentuk text, soalnya saya punya masalah untuk data yang banyak sekitar 5 jt record ketika d print dengan media PDF menjadi sekitar 500 rb halaman nah saya pengen coba untuk output berupa text file, ada yang pernah coba g? Thanks And Regards, ============ ========= ======= Ade Veria Octora Email : [EMAIL PROTECTED] com_._,___ <!-- #ygrp-mlmsg {font-size:13px; font-family: arial,helvetica, clean,sans- serif;} #ygrp-mlmsg table {font-size:inherit; font:100% ;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica, clean,sans- serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height: 1.22em;} #ygrp-text{ font-family: Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family: Arial; clear:both; } #ygrp-vitnav{ padding-top: 10px; font-family: Verdana; font-size:77% ; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space: nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space: nowrap; } .bld{font-weight: bold;} #ygrp-grft{ font-family: Verdana; font-size:77% ; padding:15px 0; } #ygrp-ft{ font-family: verdana; font-size:77% ; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom: 10px; } #ygrp-vital{ background-color: #e0ecee; margin-bottom: 20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77% ; font-family: Verdana; font-weight: bold; color:#333; text-transform: uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type: none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight: bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right: .5em; } #ygrp-vital ul li .cat{ font-weight: bold; } #ygrp-vital a { text-decoration: none; } #ygrp-vital a:hover{ text-decoration: underline; } #ygrp-sponsor #hd{ color:#999; font-size:77% ; } #ygrp-sponsor #ov{ padding:6px 13px; background-color: #e0ecee; margin-bottom: 20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type: square; padding:6px 0; font-size:77% ; } #ygrp-sponsor #ov li a{ text-decoration: none; font-size:130% ; } #ygrp-sponsor #nc { background-color: #eee; margin-bottom: 20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family: Arial; font-weight: bold; color:#628c2a; font-size:100% ; line-height: 122%; } #ygrp-sponsor .ad a{ text-decoration: none; } #ygrp-sponsor .ad a:hover{ text-decoration: underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0; } .MsoNormal { margin:0 0 0 0; } #ygrp-text tt{ font-size:120% ; } blockquote{margin: 0 0 0 4px;} .replbq {margin:4;} --> ____________ _________ _________ _________ _________ _________ _ Don't get soaked. Take a quick peak at the forecast with the Yahoo! Search weather shortcut. http://tools. search.yahoo. com/shortcuts/ #loc_weather [Non-text portions of this message have been removed] ____________ _________ _________ _________ _________ _________ _ Don't pick lemons. See all the new 2007 cars at Yahoo! Autos. http://autos. yahoo.com/ new_cars. html [Non-text portions of this message have been removed] <!-- #ygrp-mlmsg {font-size:13px;font-family:arial,helvetica,clean,sans-serif;} #ygrp-mlmsg table {font-size:inherit;font:100%;} #ygrp-mlmsg select, input, textarea {font:99% arial,helvetica,clean,sans-serif;} #ygrp-mlmsg pre, code {font:115% monospace;} #ygrp-mlmsg * {line-height:1.22em;} #ygrp-text{ font-family:Georgia; } #ygrp-text p{ margin:0 0 1em 0; } #ygrp-tpmsgs{ font-family:Arial; clear:both; } #ygrp-vitnav{ padding-top:10px; font-family:Verdana; font-size:77%; margin:0; } #ygrp-vitnav a{ padding:0 1px; } #ygrp-actbar{ clear:both; margin:25px 0; white-space:nowrap; color:#666; text-align:right; } #ygrp-actbar .left{ float:left; white-space:nowrap; } .bld{font-weight:bold;} #ygrp-grft{ font-family:Verdana; font-size:77%; padding:15px 0; } #ygrp-ft{ font-family:verdana; font-size:77%; border-top:1px solid #666; padding:5px 0; } #ygrp-mlmsg #logo{ padding-bottom:10px; } #ygrp-vital{ background-color:#e0ecee; margin-bottom:20px; padding:2px 0 8px 8px; } #ygrp-vital #vithd{ font-size:77%; font-family:Verdana; font-weight:bold; color:#333; text-transform:uppercase; } #ygrp-vital ul{ padding:0; margin:2px 0; } #ygrp-vital ul li{ list-style-type:none; clear:both; border:1px solid #e0ecee; } #ygrp-vital ul li .ct{ font-weight:bold; color:#ff7900; float:right; width:2em; text-align:right; padding-right:.5em; } #ygrp-vital ul li .cat{ font-weight:bold; } #ygrp-vital a { text-decoration:none; } #ygrp-vital a:hover{ text-decoration:underline; } #ygrp-sponsor #hd{ color:#999; font-size:77%; } #ygrp-sponsor #ov{ padding:6px 13px; background-color:#e0ecee; margin-bottom:20px; } #ygrp-sponsor #ov ul{ padding:0 0 0 8px; margin:0; } #ygrp-sponsor #ov li{ list-style-type:square; padding:6px 0; font-size:77%; } #ygrp-sponsor #ov li a{ text-decoration:none; font-size:130%; } #ygrp-sponsor #nc { background-color:#eee; margin-bottom:20px; padding:0 8px; } #ygrp-sponsor .ad{ padding:8px 0; } #ygrp-sponsor .ad #hd1{ font-family:Arial; font-weight:bold; color:#628c2a; font-size:100%; line-height:122%; } #ygrp-sponsor .ad a{ text-decoration:none; } #ygrp-sponsor .ad a:hover{ text-decoration:underline; } #ygrp-sponsor .ad p{ margin:0; } o {font-size:0;} .MsoNormal { margin:0 0 0 0; } #ygrp-text tt{ font-size:120%; } blockquote{margin:0 0 0 4px;} .replbq {margin:4;} --> ____________________________________________________________________________________ Sucker-punch spam with award-winning protection. Try the free Yahoo! Mail Beta. http://advision.webevents.yahoo.com/mailbeta/features_spam.html [Non-text portions of this message have been removed]
