HDR*PowerBuilder0600}Л@RAPIDS main library - MDI frame, menu, base classes, structures.FRE*˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ŕ?˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙˙ů˙˙˙˙˙˙ŔNOD*MY JŚ ENT*0600ÔB:ąţA w_dddw.winENT*0600N÷Y-b?/w_emission_est.srwENT*06006Öđ,b? w_dddw.srwENT*0600´:ąţAw_emission_est.winENT*0600€ý:ąţAw_db_error.winENT*0600bĺń,b?w_er_diagram.srwENT*0600đ,b?8w_db_error.srwENT*0600”=D:ąţAw_er_diagram.winENT*0600žL":ąţA w_about.winENT*0600ÄĚň,b?w_error_message.srwENT*0600Öm7ë@ w_about.srwENT*0600 p$:ąţAw_error_message.winENT*0600€[T;ąţAu_selection_list.udoENT*0600üfö,b?$ w_filter.srwENT*0600@Ů;ň,b?&u_selection_list.sruENT*0600ž~;ąţA w_filter.winENT*0600Ň&;ąţAu_emis_period_no_end_date.udoENT*0600čůö,b?iw_get_string.srwENT*0600_-b?Qu_emis_period_no_end_date.sruENT*0600ć$;ąţAw_get_string.winENT*0600Üř;ąţAu_dw_list.udoENT*0600&Ą÷,b? w_list.srwENT*0600ę’ň,b? u_dw_list.sruENT*0600o ;ąţA w_list.winENT*0600č[;ąţAu_dw_freeform.udoENT*06008YLů,b? w_logon.srwENT*0600źPö,b?!u_dw_freeform.sruENT*0600*ő…;ąţA w_logon.winENT*0600ô ;ąţAu_dw_data_code.udoENT*0600 ů,b?2w_look_up.srwENT*0600Ś -b?#u_dw_data_code.sruENT*0600Ś˙+;ąţAw_look_up.winENT*0600úŸ-;ąţA u_dddw.udoENT*0600N fú,b?w_mdi_clock.srwENT*0600b„÷,b?R u_dddw.sruENT*0600Ćç;ąţAw_mdi_clock.winENT*0600ó;ąţA str_sort.strENT*0600p . ű,b?w_mdi_main.srwENT*0600Z~÷,b?( str_sort.srsENT*0600ćÎ <ąţAw_mdi_main.winENT*0600K<ąţAstr_parms.strENT*0600  Ż.-b?$w_rapids_info.srwENT*0600Nƒů,b?2str_parms.srsENT*0600ňÇq<ąţAw_rapids_info.winENT*0600H÷<ąţAstr_lookup.strENT*0600F ôü,b? w_set_toolbars.srwENT*0600F•ů,b?str_lookup.srsENT*0600°Ë=<ąţAw_set_toolbars.winENT*0600@ó<ąţAstr_level_rids.strENT*0600  ˘ü,b?`w_single_dw.srwENT*0600>ú,b?%str_level_rids.srsENT*0600ÖW(<ąţAw_single_dw.winENT*06008ń<ąţAstr_emission_parm.strENT*0600⠜>ţ,b?"w_single_table.srwENT*06006eű,b?str_emission_parm.srsENT*0600îëœ<ąţAw_single_table.winENT*0600.><ąţAs_rec_holder.strENT*0600Ä |ţ,b?" w_sort.srwENT*0600,>ü,b?Ys_rec_holder.srsENT*0600ą(<ąţA w_sort.winENT*0600 Ů `¨ţA rapids.sraENT*0600ţ ĆŃĘüź@Qw_sourcebulkdelete.srwENT*0600Q`¨ţA rapids.praENT*0600"ę(=ąţAw_sourcebulkdelete.winENT*0600Ν9ąţA rapids.aplENT*0600Q˙,b? w_splash.srwENT*0600n%’”°ţAproj_rapids.srjENT*0600$7=ąţA w_splash.winENT*0600Ňň˜-b? m_main_menu.srmENT*0600˛˙,b?#w_splash_ag.srwENT*0600<îŒ=ąţAm_main_menu.menENT*0600\?=ąţAw_splash_ag.winENT*06000Č Š­ń: d_splash.srdENT*0600,/ąţA d_splash.dwoNOD*Š 8cENT*0600lĚ%=ąţAw_system_error.winENT*0600.N˙,b?Uw_system_error.srwDAT*öPDW0800t’pdwPl‚hg````î ˙˙ F$˙˙˙˙tnnaaDAT* öčo @@DAT*"ö$ 536870912@X Z`  p_splash%  Topo_256.bmp Topo_256.bmp$ 0$4$42100$î DAT*$ö2798$0`.#%')+<!% Arial Black Arial Black$2$¸˙˙˙-72$ 1$"ź700$$[91$&„38DAT*&ö8$( 544$* 2057%,-RAPIDSRAPIDS`=/2468:<0!$1ä˙˙˙-28$3€128$5¤932$7Đ208$9î 2542DAT*(ö%;<Regional Air PollutantRegional Air Pollutant`C./2>68@$?41076%ABInventory DevelopmentInventory Development`I=/2D68F$EÄ1220%GHSystemSystem`TCDAT**öJ2MO8Q<K!$Lę˙˙˙-22$ND1604$P¤164%RSGREAT LAKES COMMISSIONGREAT LAKES COMMISSION`ZIJ2UO8W$V´1716%DAT*,öXYGREAT LAKES STATESGREAT LAKES STATES„T[\]2_Oacţ fversion_number<K!$^˙255$`”1428$bÉ2249&de [general] [general]@DAT*.ö„lkZij3version_numberversion_numberZmDAT*†nVersion Numberpr"qno"syesDAT*2örelease 6; datawindow(units=0 timer_interval=0 color=0 processing=0 print.documentname="" print.orientation = 0 print.margin.left = 110 print.margin.right = 110 print.margin.top = 97 print.margin.bottom = 97 print.paper.source = 0 print.paper.size = 0 print.prompt=no print.buttons=no print.preview.buttons=no ) summary(height=0 color="536870912" ) footer(height=0 color="536870912" ) detail(height=2904 color="536870912" ) table(column=(type=char(50) updatewhereclause=no name=version_number dbnaDAT*4öme="version_number" ) ) data("Version Number",) bitmap(band=detail filename="Topo_256.bmp" x="0" y="4" height="2100" width="2798" border="0" name=p_splash ) text(band=detail alignment="0" text="RAPIDS"border="0" color="0" x="91" y="388" height="544" width="2057" font.face="Arial Black" font.height="-72" font.weight="700" font.family="2" font.pitch="2" font.charset="0" font.italic="1" background.mode="1" background.color="536870912" ) text(band=detail alignment="0" text="Regional Air PollDAT*6öutant"border="0" color="0" x="128" y="932" height="208" width="2542" font.face="Arial Black" font.height="-28" font.weight="700" font.family="2" font.pitch="2" font.charset="0" background.mode="1" background.color="536870912" ) text(band=detail alignment="0" text="Inventory Development"border="0" color="0" x="128" y="1076" height="208" width="2542" font.face="Arial Black" font.height="-28" font.weight="700" font.family="2" font.pitch="2" font.charset="0" background.mode="1" background.color="DAT*8ö536870912" ) text(band=detail alignment="0" text="System"border="0" color="0" x="128" y="1220" height="208" width="2542" font.face="Arial Black" font.height="-28" font.weight="700" font.family="2" font.pitch="2" font.charset="0" background.mode="1" background.color="536870912" ) text(band=detail alignment="0" text="GREAT LAKES COMMISSION"border="0" color="0" x="128" y="1604" height="164" width="2542" font.face="Arial Black" font.height="-22" font.weight="700" font.family="2" font.pitch="2" fDAT*:öont.charset="0" background.mode="1" background.color="536870912" ) text(band=detail alignment="0" text="GREAT LAKES STATES"border="0" color="0" x="128" y="1716" height="164" width="2542" font.face="Arial Black" font.height="-22" font.weight="700" font.family="2" font.pitch="2" font.charset="0" background.mode="1" background.color="536870912" ) column(band=detail id=1 alignment="0" tabsequence=0 border="0" color="255" x="128" y="1428" height="164" width="2249" name=version_number font.face="ADAT*úrial Black" font.height="-22" font.weight="700" font.family="2" font.pitch="2" font.charset="0" font.italic="1" background.mode="1" background.color="536870912" ) htmltable(border="1" cellpadding="0" cellspacing="0" generatecss="no" nowrap="yes") DAT*>öŚ”@ˇ)b?=ąţAG”@”@3”@€‰p@p@ :@:@09@9@=`@`@Gj@j@Uk@k@al@l@um@m@€@€@‘‘@‘@ž¤@¤@Ť¸@¸@ş^@^@€XF@F@`p@€ ``€@hľp@€ ha€qbp@€ qb€|Ŕ˙˙ˆ"p@€ˆc€“$p@€ “d€ĄOp@€Ąe€§Sp@€ §f€Żcp@€ Żg€¸8p@€ ¸h€ÁWp@€ Ái€Ëdp@€ Ëj€DAT*@öÔUp@€ Ôk€ßp@€ ßl€î@p@€ îm€őAp@€ őn€-p@€ o€)`@€&5 Cq@q@Oq€÷p@€ r€$ňp@€ $s€- 8hp@€ 8t€Ap@€ Au€Uăp@€ Uv€^&p@€ ^w€mzp@€ zx€‚p m_main_menumenuwindowmenumergeoptionmenuitemtypestructuremailrecipientenvironmentmailfiledescriptionmDAT*Böailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€ DAT*Dö # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3DAT*Fö€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝DAT*Hö3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€DAT*Jö  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # DAT*Lö3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ DAT*NöĹ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝DAT*Pö3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€ DAT*Rö # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # DAT*Tö3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ DAT*VöĹ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝DAT*Xö3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  #DAT*Zö 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€DAT*\ö Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝3€  # 3€ Ĺ˝pointerw_imainw_exportw_securityprintwindoww_mdi_mainw_rapids_infow_geow_legalw_sourcew_devicew_processw_streamw_materialw_emission_DAT*^öestw_dataw_referencew_sourcebulkdeletestr_emission_parmgd_process_ridgl_source_ridtransactionsqlcaselect rid from rap_geographic_locations where name =' ' and type =' ' 58CF˙˙˙˙˙˙ž€˙˙U€˙˙˙˙=ąţAŕ€¨€˙˙˙˙˙˙˙˙˙˙˙˙=ąţAw_emissw_growthgs_inifilew_rpt_qcw_ccheck_parametersw_reportw_set_toolbarsgs_app_titlew_aboutČđ@h¸ŕ0X€DAT*`ö¨Đř Hp˜Ŕč8`ˆ°Ř(Px Čđ@h¸ŕ0X€¨Đř Hp˜Ŕč 8 ` ˆ ° Ř  ( P x   Č đ  @ h  ¸ ŕ  0 X DAT*bö€ ¨ Đ ř  H p ˜ Ŕ č 8`ˆ°Ř(Px Čđ@h¸ŕ0X€¨Đř Hp˜Ŕč8`ˆ°Ř(Px Čđ@h¸ŕ0DAT*döX€¨Đř Hp˜Ŕč8`ˆ°Ř(Px Čđ@h¸ŕ0ž¨ ŕ ä 2 m_main_menu˙˙ €QP/ mf_app_title+create+destroy+clicked Q xÝ _initsrcmenum_main_menuwindowmenumergeoptionmenuDAT*föitemtypestructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectm_filem_savem_closem_-m_importm_exportm_-1m_securitym_-2m_printm_printersetupm_-3m_exitm_editm_undom_cutm_copym_pastem_-4m_copyrecordm_pasterecordm_-5m_insertm_deletem_viewm_firstm_priorm_nextm_lastm_-6m_filterm_showallm_-9m_freeformm_tabularm_currentm_historym_-7m_expandm_originalm_-8m_rapidsenterprisem_datam_gDAT*höeographicm_legalm_sourcem_devicem_processm_streamm_materialm_emissionestimationm_-10m_otherdatam_-11m_referencem_-bdsm_sourcebulkdeletem_calculatem_emissionestimatorm_growthm_querym_queryreportingtoolm_gistoolarcviewm_statisticalanalysissasm_reportm_qaqcm_statisticalm_consistencym_runreportm_windowm_tilem_layerm_cascadem_-12m_toolbarm_helpm_usingrapidsm_-13m_1pointerw_imainw_exportw_securityw_mdi_mainw_rapids_infow_geow_legalw_sourcew_devicew_processwDAT*jö_streamw_materialw_emission_estw_dataw_referencew_sourcebulkdeletestr_emission_parmtransactionw_emissw_growthw_rpt_qcw_ccheck_parametersw_reportw_set_toolbarsw_aboutt ˙˙˙˙@˙˙˙˙"@˙˙)@˙˙9@˙˙F@˙˙P@˙˙^@˙˙j@˙˙~ @˙˙Š @˙˙š @‡˙˙§ @‡˙˙´ @|˙˙Ă@DAT*lö˙˙Ď$˙˙ÖŹ˙˙Ý˙˙ĺ$˙˙éÔ˙˙ň˙˙ű$˙˙ ü˙˙  ˙˙ Đ˙˙ . €˙˙' 0˙˙, €˙˙3˙˙:. €˙˙A0˙˙G*€˙˙Nsetri˙˙V_modes˙˙[cs˙˙h˙˙v˙˙{˙˙„8˙˙ĐDAT*nöz˙˙”0˙˙œë8˙˙¤˙˙Ť,ŕ˙˙˛˙˙ˇ ˙˙Ŕ!˙˙Ę"˙˙Ď#˙˙Ú$˙˙ä%3€˙˙î&€˙˙ř'˙˙ý( #Ô¤˙˙)˙˙*˙˙+á¤˙˙),3˙˙0-<˙˙=.˙˙E/€˙˙N0˙˙W13€˙˙a2Ĺ˝˙˙j33€DAT*pö˙˙u4 # ˙˙Š5˙˙6˙˙˙˙œ7 Đ˙˙˘8is˙˙Ž9uisha˙˙ľ:ttf_ck˙˙Č;ufarea˙˙Ô<rielap˙˙č=ndion˙˙ń>Ĺ˝˙˙ů?3€˙˙@ # ˙˙A3€˙˙8BĹ˝˙˙AC3€˙˙HD # ˙˙VE3€˙˙dFĹ˝˙˙pG3€˙˙yH # ˙˙€I3€˙˙ˆJĹ˝˙˙’K3€˙˙˜L # ˙˙DAT*rö˘M3€˙˙ŠNĹ˝˙˙ˇO3€˙˙˝P # ˙˙Á@3€˙˙É@Ĺ˝˙˙Ń@˙˙Ú˙˙@eria˙˙ĺ @if ˙˙đ @€˙˙ţ@˙˙p@ Mar˙˙  S@ollu˙˙"t:@unty˙˙$p@ ˙˙(&@˙˙1(@˙˙˙˙<*€@€˙˙K,@˙˙˙˙R.€@€˙˙^0"@˙˙#˙˙q2€@€˙˙ƒ5'@˙˙(˙˙7€@€˙˙—9,@˙˙-˙˙DAT*tö <€@€˙˙Š>1@˙˙2˙˙˝@€@€˙˙ĆB6@˙˙7˙˙ŐE€@đ …€Á€€€€€€€€€€€€€€€€€ €!€"€#€$€%€DAT*vö&€'€(€)€*€+€,€-€.€/€0€1€2€3€4€5€6€7€8€9€:€;€<€=€>€?€@€A€B€C€D€E€DAT*xöF€G€H€I€J€K€L€M€N€O€P€Q€R€S€T€U€V€W€X€Y€Z€[€\€]€^€€Ŕ˙˙€€˙˙"€€˙˙DAT*zö€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙ €€˙˙€€˙˙€€˙˙€€˙˙DAT*|ö€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙€€˙˙'€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€DAT*~ö˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€(€˙˙€€˙˙$€:€˙˙€:€˙˙€:€˙˙€:€˙˙€:€˙˙€:€˙˙DAT*€ö€:€˙˙€:€˙˙€:€˙˙€:€˙˙€:€˙˙€:€˙˙€:€˙˙€:€˙˙€€˙˙€I€˙˙€I€˙˙€€˙˙€L€˙˙€L€˙˙€L€˙˙€€˙˙DAT*‚ö€P€˙˙€Q€˙˙€Q€˙˙€P€˙˙€€˙˙€U€˙˙€U€˙˙€U€˙˙€U€˙˙€U€˙˙€€˙˙€[€˙˙€[€˙˙€[€˙˙d DAT*„ö  Z ‡*‡(*0‡@*H‡X*`‡t*|‡Œ*”‡¨*°‡Ä*̇Ü*ä‡ôü$$ $$$$$,$4$<$˛€ |  6Lbx Ž ¤ ş Đd Dŕ m_file€€m_edit € DAT*†ö€m_view8(€8(€m_dataP:€P:€m_calculatehI€hI€m_query„L€„L€m_reportm_wœP€œP€m_window ty¸U€¸U€m_helpÔ[€Ô[€itemě”@€ €8(€P:€hI€„L€œP€¸U€Ô[€ ( 0@ HX `t |Œ ”¨ °Ä ĚÜ äô ü      $ , 4 < „ DAT*ˆö$ $0$@$T$d$x$Œ$œ$*8FT b pd ¤H m_file€m_edit€m_view€((€m_data8:€m_calculateHI€m_query\L€m_reportlP€m_windowry€U€m_help”[€  0 @ T d x Œ œ €€€2 & mf_app_title+create+destDAT*Šöroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 Q m_filem_editm_viewm_datam_calculatem_querym_reportm_windowm_help´˙˙ €˙˙ €˙˙ (€˙˙ :€˙˙$ I€˙˙0 L€˙˙8 P€˙˙A U€˙˙J [€] o @Ř€1€ € @   DAT*Œö€€ € € (€ :€ I€ L€ P€ U€ [€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙˙˙˙˙x€˙˙˙˙Đ80…(*0‡@*H‡T*\‡p*x‡Œ*”‡¤*ʇŔ*ȇŘ*ŕ‡đ*ř‡*‡(DAT*Žö*0‡@*H‡X`$h$p$x$€$ˆ$$˜$ $¨$°$¸$˛€ |0F\rˆ ž ´ Ę ŕ ö "d Ŕ0 texte&Filem_save€€€m_close8€8€m_-P€P€m_importd€d€m_exporturi€€€€m_-1_-2œ€œ€m_securityr´€´DAT*ö€m_-2 m_ЀЀm_printč€č€m_printersetup€€m_-3  € €m_exito8!€8€itemm_P”@€8€P€d€€€œ€´€Đ€č€€  €8!€ ( 0@ HT \p xŒ ”¤ ŹŔ ČŘ ŕđ ř ( 0@ HX ` h p x € ˆ DAT*’ö ˜   ¨ ° ¸ Ž $ $,$@$T$d$x$ˆ$˜$°$Ŕ$Đ$*8FT b p ~ Œ šd Ř` m_save€m_close€m_-(€m_importse4€m_export_-H€m_-1\€m_securityl€m_-2€€m_print€m_printersetup €m_-3¸DAT*”ö €m_exit@Č!€  , @ T d x ˆ ˜ ° Ŕ Đ €€2  +create+destroy(€˙˙€Ŕ^@˙˙Ŕ2 e m_savem_closem_-m_importm_exportm_-1m_securitym_-2m_printm_printersetupm_-3m_exitđŔ˙˙ €˙˙ €˙˙ €˙˙ €˙˙$ €˙˙- €˙˙2 €˙˙˙˙= €€˙˙BDAT*–ö €˙˙J €˙˙Y €˙˙^ €] o @€1€ € @   €€ € € € € € € € € € € € €˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙°80…(800…DAT*˜ö\8d0…|8d0…”8œ0…´9}Ä9}4Nh‚–d Ě8 texte&Savemicrohelp Save the current recordtoolbaritemdownnameH Save!toolbaritemnamej toolbaritemtext„SavetoolbaritemvisibleĄ enabledź ( \ | ” ´ Ä d  JDAT*šö$)0888018E0)X8d ` parentwindow p@getactivesheet7Ŕ edit_actionssavetriggereventŔJ 0 X €€€2 " +create+destroy+clicked<˙˙Ŕ˙˙Ŕ˙˙Ŕ2  ] o @(€1€ € @  DAT*œö €€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙&˙˙˙˙x€˙˙˙˙b80…,840…`9}p9}4Hd x text&Closemicrohelp Close the current windowtoolbaritemvisibleM enabledh , `DAT*žö p 4$)08źľ@˝8d 8 parentwindow p@getactivesheet7Ŕ  0 €€2  +create+clicked(€˙˙€Ŕ^@˙˙Ŕ2  ] o @P€1€ € @   €€˙˙˙˙€DAT* ö˙˙˙˙&˙˙˙˙€˙˙˙˙ 80…d  text- €2  +create˙˙Ŕ2  ] o @x€1€ € @   €€˙˙˙˙€˙˙˙˙NDAT*˘ö80…,840…T9}4d \ text&Importmicrohelp Import datatoolbaritemvisible@  , T <:F@źľ@˝8Śź˜ľ@˝˜ś8d w_imain˙˙@`€ €€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  DAT*¤ö] o @ €1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙N80…,840…T9}4d \ text&Exportmicrohelp Export datatoolbaritemvisible@ DAT*Śö , T d  <:F@źľ@˝8Śź˜ľ@˝˜ś8d w_export˙˙@a€ €€€2 " +create+destroy+clicked<˙˙Ŕ˙˙Ŕ˙˙Ŕ2  ] o @Č€1€ € @   DAT*¨ö€€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙&˙˙˙˙x€˙˙˙˙ 80…d  text- €2  +create˙˙Ŕ2  ] o @đ€1€ € @  DAT*Şö €€˙˙˙˙€˙˙˙˙N80…,840…`9}4d h textSec&uritymicrohelp" Security administrationtoolbaritemvisibleL  , ` X:F@źľ@˝8Ś$1‹:@ź ľ@˝ ś8d w_seDAT*Źöcurity˙˙@b€  parentwindow p@ €€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  ] o @€1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙ 80…DAT*Žöd  text- €2  +create˙˙Ŕ2  ] o @@€1€ € @   €€˙˙˙˙€˙˙˙˙œ80…,840…d8l0…„8l0…DAT*°öœ8¤0…Ŕ9}4Nh‚d Č0 text&Printmicrohelp Print the current windowtoolbaritemdownnameM Print!toolbaritemname€s toolbaritemtextŒPrinttoolbaritemvisibleŞ  , d „ œ Ŕ °$)08‡•t8$)@8ź_ľ@˝_8‹ź€˝8ŞH$ź_ľ@˝_DAT*˛ö8‹ź€˝8",ptd activesheet˙˙ €P( parentwindow p@getactivesheet7Ŕ  p@7Ŕ  p@ 0 8 @ H €€2 % +create+clickedprintwindowP˙˙Ŕ˙˙Ŕ˙˙Ŕ˙˙Ŕ2  ] o @h€1€ € DAT*´ö@   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙N80…48<0…d9}4d l textPrinter Se&tup...microhelp* Set printer optionstoolbaritemvisibleP  4 d źÜľ@˝Ü$d DAT*śö  €€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  ] o @€1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙ 80…d  teDAT*¸öxt- €2  +create˙˙Ŕ2  ] o @¸€1€ € @   €€˙˙˙˙€˙˙˙˙N80…(800…P9}4d X textE&xitmicrDAT*şöohelp Exit RAPIDStoolbaritemvisible<  ( P  ,:W@)8d w_mdi_main˙˙@c€  triggerevent Ŕ €€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  ] o @ŕ€1€ € @   DAT*źö€€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙Œ 80…(*0‡@*H‡X*`‡p*x‡ˆ*‡¨*°‡Č*Їŕ*č‡ü*‡* ‡08$@$H$P$X$`$h$p$x$€$DAT*žö˛€ |0F\rˆ ž ´ Ę ŕ öd ˆ text&Editm_undo€€m_cut8€8€m_copyP €P €m_pasteh!€h!€m_-4eco€"€€"€m_copyrecordrd ˜#€˜#€m_pasterecord m¸$€¸$€m_-5 tyŘ%€Ř%€m_insertđ&€đ&€m_delete '€ '€item(”@€8€P €h!€€"€˜#€¸$€Ř%€đ&€ '€ (DAT*Ŕö 0@ HX `p xˆ ¨ °Č Đŕ čü   0 8 @ H P X ` h p x € ’ $ $0$@$P$h$€$$¤$¸$*8FT b p ~d ŔP m_undo€m_cutm_DAT*Âö€m_copy€( €m_paste8!€m_-4€H"€m_copyrecordX#€m_pasterecordp$€m_-5ˆ%€m_insert*˜&€m_deleteŹ'€  0 @ P h €  ¤ ¸ €€2  +create+destroy(˙˙Ŕ˙˙Ŕ2 [ m_undom_cutm_copym_pastem_-4m_copyrecordm_pasterecordm_-5m_insertm_deleteČ˙˙ €˙˙ €˙˙ €DAT*Äö˙˙ !€˙˙$ "€˙˙) #€˙˙6 $€˙˙D %€˙˙I &€˙˙R '€] o @€1€ € @   €€ € € € !€ "€ #€ $€ %€ &€ '€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙JDAT*Ćö$)0888018E0)X8d ` parentwindow€ p@getactivesheet€7Ŕ edit_actionsundotriggerevent€ŔJ 0 X b80…(800…X9}h9}4Hd p text&Undomicrohelp Undo the last changetoolbaritemvisibleE enabled`DAT*Čö ( X h €€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @0€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)X8DAT*Ęöd ` parentwindow p@getactivesheet7Ŕ edit_actionscuttriggereventeŔI 0 X b80…(800…l9}|9}4Hd „ text&Cutmicrohelp Cut the selected text to the clipboardtoolbaritemvisibleW enabledt ( l | €€2 DAT*Ěö +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @X€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)X8d ` pareDAT*4 öntwindow p@getactivesheet7Ŕ edit_actionscopytriggereventŔJ 0 X b80…(800…l9}|9}4Hd „ text&Copymicrohelp Copy the selected text to the clipboardtoolbaritemvisibleX enabledt ( l |  € €2  +clicked+create(˙˙Ŕ˙DAT*ĐöŚh@`¨ţA9ąţAAh@h@h@€‰`@`@%j@j@3k@k@?l@l@Sm@m@_€@€@o‘@‘@|¤@¤@‰¸@¸@˜^@^@A¤q@q@°˙˙ €śr@r@Í˙˙€Ós@s@ć˙˙€@ět@t@ě˙˙€€ňv@v@ň" €=úin= _s sTAA,rar7 ) MBME _Pme o^.i €i )w) …" =”P2 œAREŚprR´TYnĂr)eŮ éqDAT*Ňö ůx !2:|GU€\3g€ ~€!}€ ‰€ ”€ ¨5p@€9¨be€Rˇ4p@€yˇic€YĂ2p@€)Ăd"€"°so €.ň )€rÍct€ć€ě €Ě rapidsapplicationstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjecttransactionsqlcadynamicdDAT*Pöescriptionareasqldadynamicstagingareasqlsaerrormessagegs_versionnumbergd_versiondategi_open_sheet_numgl_cur_rowgl_geo_ridgl_source_ridgl_device_ridgi_geo_numgi_source_numgi_device_numgi_process_numgs_filtgb_filtergs_code_valuegd_process_ridgs_master_userRAPIDSgs_user_idRAP1gb_double_clickgs_scc_ams_codegs_materialgs_databasegs_error_messagegs_rolegs_app_titlegb_run_importge_envgs_apppathgs_inifilerapids.iniprintwindowprintsetupgetwindowsdirectoryw_system_errDAT*ÖöŚp@:)b?:ąţAp@p@p@€‰”@”@\@\@&[@[@2c@c@?U@U@P`@`@Zj@j@ńhk@k@tl@l@ˆm@m@a”€@€@¤‘@‘@ą¤@¤@ž¸@¸@Í^@^@qan€o8n@n@qCGn@€N;@;@Uq@q@a$€€g w_dddwwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemcoDAT*Řönnectioninfopowerobject€ Í˝UntitledSA€  Š datawindowu_dw_plainobjecttransactionsqlcaÜ2 w_dddw ˙˙ €4 adwas_columnwf_sharedddw+create+destroy1 ˙˙€ ˙˙ICdatawindow.SQ x  _initsrcwindoww_dddwmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentDAT*Úömailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowu_dw_plainobjecttransaction¸ ˙˙rcawin˙˙as@rder˙˙jetruc˙˙ec@nte˙˙$m@iled˙˙/m@essa˙˙;do@ldl˙˙Hm@view˙˙Yct@nfo˙˙ct@stor˙˙q io@ssag˙˙} @˙˙‘ @rue ˙˙ Co@3355˙˙­ Te@ze=-˙˙şig@00 ˙˙ÇeN@"Ari˙˙Öha@DAT*\ö Fon˙˙âns@Font˙˙ítF@y=Sw˙˙řPi@Font˙˙˙ab@đ …€Á€€Ŕ˙˙xX **°8z%)98…8$Ş8&Ş"b1˙˙˙˙‹Š)4ś81<Ń 1˙˙˙˙‹D$š‹}1‹}ÜóŰŞL$<Ż=)\8:;@˛ŚŠd$<Ż=DAT*ŢöŚn@;)b?;ąţAn@n@n@€éq@@a)…@…@a2`@`@<j@j@aJk@k@aVl@l@ajm@m@Av€@€@A†‘@‘@“¤@¤@ ¸@¸@Ż^@^@€ťp@p@Â@@Ë×Ŕ˙˙@ëv@v@ë€ó u_dw_listdatawindowborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectwindowdwbuffergs_databasefDAT*ŕö_oracle_connectionmessage2 u_dw_list˙˙ €' +dwnprocessenterflagsxposypos+mousemovewparamlparam+add_row+delete_row+first_row+prev_row+next_row+last_row+row_pasteduf_check_requireduf_is_modifiedsqldbcodesqlerrtextsqlsyntaxbufferrow+dberror+currentrow+rowfocuschanged+row+dwo+data+itemchanged+editchanged„X Ltr˙˙ ˙˙$˙˙LUIIoy(4˙˙ ;˙˙LUL4˙˙ ;˙˙DAT*âö4˙˙ ;˙˙4˙˙ ;˙˙4˙˙ ;˙˙4˙˙ ;˙˙IB­˙˙ˇ˙˙Â˙˙Ě˙˙€Ó˙˙LLSSCdwbuffer.Lŕ˙˙LL@ý˙˙˙˙€˙˙LLCdwobject.S€ý˙˙˙˙€˙˙ 8Tl„œ´Đ,` xÜ _initsrcdatawindowu_dw_listborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmaiDAT*äölmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectwindowdwbuffermessageh ˙˙˙˙@Š˙˙˙˙&@˙˙2@˙˙;ľ@ľ˙˙E@˙˙S@€˙˙_@˙˙sź@˙˙ @€˙˙ ź@˙˙œ @hars˙˙Š ch@tfam˙˙¸ se@ders˙˙Änd@onc˙˙Ëb_@tr_p˙˙Ôge@đ …€DAT*ćöကŔ ˙˙Š{.     pź_ľ@˝_811 1‹1‹źľ@˝8ź ľ@˝ 81^d  f11‹}1ľV:@ŠŠŠ9)śśś81<ŃvV1ľHŠˆ $68(z%8Dz&ź(ľ@˝(8z(8Mz&:)@źŽľ@˝Ž8DAT*ö)p8<)€8)”89ó 9  0v†ř(>!H"R%Vd# rowparent_wincolcolnameP˙˙˙˙ €˙˙˙˙ œ( findrequiredmŔ˙˙ Required Value Missing for on row . Please enter a value.setcolumnSGŔesetrowQŔxscrolltorow?Ŕˆ  p € ” hDAT*ęöŚn@;)b?;ąţAn@n@n@€‰!@@-…@…@6`@`@@j@j@Nk@k@Zl@l@nm@m@z€@€@Š‘@‘@—¤@¤@¤¸@¸@ł^@^@€żp@p@Ć@@ĎŰŔ˙˙@ďv@v@ď€÷ u_dw_freeformdatawindowborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectwindowdwbuffergs_databaDAT*ěösef_oracle_connectionmessage2 u_dw_freeform˙˙ €  +dwnprocessenterflagsxposypos+mousemovewparamlparam+add_row+delete_row+first_row+prev_row+next_row+last_row+row_pasteduf_is_modifieduf_check_requiredsqldbcodesqlerrtextsqlsyntaxbufferrow+dberror+row+dwo+data+itemchanged+editchangedtP Llo˙˙ ˙˙$˙˙LUIIpe 4˙˙ ;˙˙LUL4˙˙ ;˙˙4˙˙ ;˙˙DAT*îö4˙˙ ;˙˙4˙˙ ;˙˙4˙˙ ;˙˙IB­˙˙ˇ˙˙Â˙˙Ě˙˙€Ó˙˙LLSSCdwbuffer.Lŕ˙˙ĺ˙˙€ę˙˙LLCdwobject.S‚@ŕ˙˙ĺ˙˙€ę˙˙ 8Tl„œ´ĐP xŕ _initsrcdatawindowu_dw_freeformborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreDAT*đöeviewitemconnectioninfopowerobjectwindowdwbuffermessageh˙˙€éq˙˙!a@…@˙˙`@<˙˙*@k@a˙˙6a@m@˙˙?€@@†˙˙I@¤@˙˙W@^@˙˙c€@ť˙˙w@@˙˙ƒ @Ŕ˙˙“ v@@ë˙˙  @˙˙˙˙­ wb@r.L˙˙ź @ý˙˙Č@€˙˙Ď@wobj˙˙Ř@𠅀ကŔ ˙˙Š{.DAT*ňö     pź_ľ@˝_811 1‹1‹źľ@˝8ź ľ@˝ 81^d  h)81˙˙˙˙<Ľ*9),81Ĺ)D81Ĺ"*d L accepttextźŔmodifiedcount‹*ŔdeletedcountçŔ4 , D f11‹}1ľDAT*6 öV:@ŠŠŠ9)śśś81<ŃvV1ľHŠˆ $68(z%8Dz&ź(ľ@˝(8z(8Mz&:)@źŽľ@˝Ž8)p8<)€8)”89ó 9  0v†ř(>!H"R%Vd# rowparent_wincolcolnameP ˙˙er˙˙ €mo˙˙ra˙˙ œDAT*ööŚn@?)b?;ąţAn@n@$n@€éq"@@A.…@…@a7`@`@qAj@j@Ok@k@q[l@l@om@m@a{€@€@‹‘@‘@˜¤@¤@aĽ¸@¸@a´^@^@€Ôv@v@Ô@€aÜq@q@qč€aî u_dw_data_codedatawindowborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectd_data_codes_selectmessagetransactionsqlcaDAT*řö2 u_dw_data_code˙˙ €' uf_check_required+constructor BL xÝ _initsrcdatawindowu_dw_data_codeborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectmessagetransactionT˙˙€éq˙˙a@\@˙˙[@4˙˙+@U@a˙˙7a@j@˙˙@k@@v˙˙J@DAT*¤öm@a˙˙Xa@‘@˙˙d¤@@Ŕ˙˙x@^@a˙˙„ !p@@˙˙” …@@˙˙Ą @˙˙Ž ˙˙@˙˙˙˙˝ @˙˙É@˙˙Ń2@𠅀ကŔ˙˙Ÿz%ź11‹)8…’8 Ş"”08 0…8808B0źľ@˝89ś`6…9(DAT*üöŚn@;)b?;ąţAn@n@n@€éq@@a&…@…@/`@`@a9j@j@aGk@k@aSl@l@gm@m@s€@€@ƒ‘@‘@¤@¤@¸@¸@Ź^@^@¸*@*@˙˙€Ŕ@Ŕ˙˙Îv@v@΀Ö˙˙Ŕ˙˙€ć"p@€ć€ńq@q@ý€ u_dddwdatawindowborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjDAT*ţöectkeycodef_dddw_searchmessagef_validate_codew_mdi_maintransactionsqlca2 u_dddw˙˙ € +dwnprocessenter+dwescapekeykeyflags+dwnkeywparamlparam+highlight_dddw+validate_dataflagsxposypos+mousemove+retrieve_data+retrieve_dddw+key+keyflags+wparam+lparam+flags+xpos+yposrowdwodata+itemchanged+getfocus+row+dwo+data+editchanged+itemerror(@ Lpe#˙˙€'˙˙ LCkeycode.U8˙˙ ?˙˙DAT*öLUL8˙˙ ?˙˙e˙˙ k˙˙p˙˙LUIIl_n8˙˙ ?˙˙QĐ˙˙Ô˙˙€Ř˙˙LLCdwobject.S sô˙˙ů˙˙€ţ˙˙Đ˙˙Ô˙˙€Ř˙˙ 0LdŹŕ xč _initsrcdatawindowu_dddwborderstyledwobjectstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectkeyDAT*öcodemessagew_mdi_maintransaction|expo˙˙˙˙@˙˙˙˙#@˙˙/@˙˙8@˙˙B@˙˙P@˙˙\@˙˙p@˙˙| @€˙˙Œ @˙˙˙˙˙˙™ @ecti˙˙Ś th@_loo˙˙ľ ty@type˙˙Á f@comm˙˙Éwi@ w_l˙˙Ńd @ ty˙˙Üct@đ …€Ą€€Ŕ ˙˙Śy- DAT*ö'    Ę$1ĹZ)08…H$ŞZ)X8`$x$€$˜$)°8)Ŕ8)Đ8…’#Zč$ş9}80) 8($’Z09}80)88ź_ľ@˝_811 1‹1‹źľ@˝8ź ľ@˝ 81DAT*Äö0JŞ Â Î č ü*>Z¸d ls_col_namels_data(˙˙ j˙˙ @ˆ il_selected_rowgetcolumnname_vůŔ is_column_named8getrow_ŔP8idwc_dw_childPIh €is_child_nameˆgetitemstring[Ŕ setitemPŔ¸gettextŔČis_old_valueŘ#ib_enter_or_tabđ$validate_dataposteventŔŘ#đ$Ŕ 0 H DAT*öŚp@ˇ)b?:ąţAAp@p@p@€‰”@”@#\@\@.[@[@:c@c@GU@U@X`@`@bj@j@pk@k@|l@l@m@m@qœ€@€@qŹ‘@‘@š¤@¤@Ƹ@¸@Ő^@^@a ‚@‚@@@@#@@-@@8@@B@@N@@Z@@bž@ž@l0@0@vŽ@Ž@@€˙˙Ŕ˙˙‚@v@v@ńS€4Ŕ˙˙*F@F@2Mp@€ 2U€A"p@€AV€€˙LKp@€yLeW€DAT* öae6p@€ eX€yBp@€ yniY€zJp@€ioyZ€sĄDp@€yĄto[€ľYp@€ ľpo\€_Çfp@€iÇs_]€lßFp@€ißnt^€wó3”@€óin_€i˙%`@€` p@€y gra€ajp@€ipub€v)Ep@€i)ric€ 8ap@€ 8_fd€K w_emission_estwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreevDAT* öiewitemconnectioninfopowerobject˙€ ÄžstatictextfontcharsetfontpitchfontfamilyalignmentfillpatternborderstylepicturerectanglelinestylelineEmission EstimationEMIS_EST.ICO€ 0žGrowthMS Sans Serifweather.bmpgrowth_factor.bmpSeasonalsrc_spec.bmpgen_cons.bmpConstantsu_arrow.bmpd_arrow.bmpdoub-arr.bmpd-arr-r.bmpEmission Factorsef_spec.bmpprod_pro.bmpd-arr-d.bmpd-arr-l.bmpFACTORSgen_spec.bmpgen_emisDAT*ö.bmpmatrl_2.bmpscc_ams.bmpemis_pro.bmpprotocl.bmpsccamsmt.bmpSpeciationf_put_scroll_barsmessagef_menu_behavepointerw_emission_safw_mdi_mainw_emission_growth_factorw_emission_factor_aw_emission_factor_cw_emission_factor_sw_emission_factor_fw_product_profilew_scc_speciation_lookupw_emission_factor_gm_main_menustr_lookupw_look_upw_speciation_profilew_cal_protocolw_scc_ams_materialäœ2 w_emission_est˙˙ €87S DAT*ö+sizetype+newwidth+newheight+resize+activate+create+destroy+clicked5 ˙˙ ˙˙˙˙LUIILQ xň _initsrcwindoww_emission_estmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectstatictextst_6fontcharsetfontpitchfontfamilyalignmentfillpatternborderstylepicturep_gen_seasonp_src_DAT*öseasonst_5p_src_cnstp_gen_cnstst_4p_9p_4p_3p_15st_2p_src_spec_1p_src_spec_2p_prod_profilep_14p_13p_11p_8p_7p_6p_5p_2p_1st_1p_spc_factp_emi_factp_materialp_scc_amsp_emis_profilep_protoclp_sccamsmtrectangler_2linestyler_1lineln_3ln_4ln_5ln_6ln_7ln_8ln_9ln_11ln_12ln_13ln_14ln_15ln_16ln_17ln_18ln_20ln_10ln_21ln_1st_3messagepointerw_emission_safw_mdi_mainw_emission_growth_factorw_emission_factor_aw_emission_factor_cw_emission_factor_sw_emisDAT*ösion_factor_fw_product_profilew_scc_speciation_lookupw_emission_factor_gm_main_menustr_lookupw_look_upw_speciation_profilew_cal_protocolw_scc_ams_materialä ˙˙etwin˙˙.d@rint˙˙enints˙˙'Se@sysp˙˙,hs@getw˙˙7ct@kern˙˙CWi@sDir˙˙Pst@ror˙˙ae@n+c˙˙kte@stro˙˙y h@@€˙˙… @d va˙˙™ @ser_˙˙Ľ le@ckg˙˙ľ co@s_ma˙˙Âda@seg˙˙ĎssDAT*ö@gs_r˙˙Ţ_t@gb_˙˙ęg@vgs˙˙ős_ile˙˙út @ain ˙˙ o@tast˙˙.@˙˙ @˙˙%@˙˙1@ă!˙˙=@˙˙E˙˙Rě!˙˙_˙˙d<˙˙oid˙˙z€ME˙˙ w_sy˙˙ƒ wash_˙˙‡ h wit˙˙‹ n  typ˙˙ wa˙˙•pldata˙˙˘_dbjec˙˙ŻinTran˙˙žLCDAT*öldw_˙˙Ăie ˙˙ČinreDa˙˙Íld0 th˙˙Ńn lse ˙˙Ő5  if ˙˙Ů1  end˙˙Ý ˙˙˙˙˙˙á˙˙ĺ˙˙ę argum˙˙ő€˙˙˙˙  eun2˙˙˙˙$ ˙˙.!k>˙˙9@˙˙C"<˙˙Gso@ynum˙˙Q#nbsad˙˙Ub_@_val˙˙Z$teas_˙˙_%s_onal˙˙d&uipres˙˙i'tcDAT*öntyp˙˙n(atumnt˙˙s)im˙˙˙x*˙˙}++cre˙˙ƒ,oydbco˙˙‰-exlsyn˙˙.rdber˙˙•/$ż˙˙›0ČrÁ˙˙Ą1<˙˙§2˙˙­3€˙˙ł4<˙˙š5******˙˙ż6€€˙˙Ä7˙˙É//@rtm˙˙Ń!@˙˙Ů"@˙˙č$as@(m˙˙ó&@˙˙ (<@˙˙ *s_@˙˙4,€@˙˙H.@DAT*ö˙˙\0io@˙˙n2@˙˙†4@˙˙š6@˙˙Ś8@˙˙ą9@˙˙ť;@˙˙Đ=˝@˙˙ß?@đ …€€€€€€€€ €!€"€#€$€%€&€'€(€)€*€DAT*ö+€,€-€.€/€0€1€2€3€4€5€6€7€8€9€;€=€?€@€A€B€C€D€E€F€G€H€I€J€K€L€DAT* öM€N€O€P€Q€R€€Ŕ˙˙wW `*€€˙˙. €€˙˙0!€€˙˙0!€€˙˙. €€˙˙0!€€˙˙0!€€˙˙. €€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙.DAT*"ö €€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙. €€˙˙0!€€˙˙0!€€DAT*$ö˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!:€€˙˙ :€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€DAT*&ö˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ >€€˙˙ €€˙˙. Jź€˝8,•01>,$d1 +sizetype+newwidth+newheDAT*(öight::messageP˙˙ ˙˙˙˙˙˙'@S€ ˙˙ f808 08 0ź€˝8,•L1Z,$2d ::message˙˙@S€ base˙˙ J78*‡0*8‡P*X‡h*p‡„*Œ‡ *¨‡¸*Ŕ‡DAT**öĚ*ԇŕ*č‡ô*ü‡ *‡$*,‡D*L‡d*l‡„*Œ‡œ*¤‡´*ź‡Ě*Ô‡ŕ*č‡ô*ü‡*‡*$‡0*8‡D*L‡\*d‡x*€‡”*œ‡°*¸‡Ě*Ô‡ě*ô‡DAT*,ö*‡$*,‡8*@‡L*T‡d*l‡|*„‡”*œ‡Ź*´‡Ä*̇Ü*ä‡ô*ü‡ *‡$*,‡<*D‡T*\‡l*t‡„*Œ‡œ*¤‡´*ź‡Ě*Ô‡ä*ě‡ü*‡*DAT*.ö‡,*4‡DL$T$\$d$l$t$|$„$Œ$”$œ$¤$Ź$´$ź$Ä$Ě$Ô$Ü$ä$ě$ô$ü$$ $$$$$,$4$<$D$L$T$\$d$l$t$|DAT*0ö$„$Œ$”$œ$¤$Ź$´$ź$Ä$Ě$Ô$Ü$ä$ě$ô$˛€ 6|,BXn„ š ° Ć Ü ň4J`vŒ˘¸Îäú&<Rh~ ”!Ş"Ŕ#Ö$ě%&'.(D)Z*p+†,œ-˛.Č/Ţ0ô1 2 364L5b6x7Ž8¤d ü st_6*€€p_gen_seasonDAT*2ö +€ €p_src_season@,€@€st_5`-€`€p_src_cnstŔx.€x€p_gen_cnst”/€”€st_4°0 €° €p_9Č1!€Č!€p_4Ü2"€Ü"€p_3đ3#€đ#€p_15w_s4$€$€st_25%€%€p_src_spec_1˙46&€4&€p_src_spec_2T7'€T'€p_prod_profilent8(€t(€p_14<”9)€”)€p_13Ź:*€Ź*€p_11˜Ä;+€Ä+€p_8Ü<,€Ü,€p_7đ=-€đ-€p_6>.€.€p_5?/€DAT*4ö/€p_2,@0€,0€p_1@A1€@1€st_1lnTB2€T2€p_spc_factlC3€l3€p_emi_fact4ˆD4€ˆ4€p_material_¤E5€¤5€p_scc_amshŔF6€Ŕ6€p_emis_profileeÜG7€Ü7€p_protocl**üH8€ü8€p_sccamsmt*I9€9€r_24J;€4;€r_1HK=€H=€ln_3c =\L?€\?€ln_4agetM@€t@€ln_5eDeŒNA€ŒA€ln_6 as¤OB€¤B€ln_7l_rźPC€źC€ln_8juÔQD€ÔD€ln_9) ěRE€ěE€ln_11lnSF€F€DAT*6öln_121 TG€G€ln_13 s4UH€4H€ln_14f_LVI€LI€ln_15adWJ€dJ€ln_16k|XK€|K€ln_17x”YL€”L€ln_18oŹZM€ŹM€ln_20rÄ[N€ÄN€ln_10erÜ\O€ÜO€ln_21teô]P€ôP€ln_1pti ^Q€ Q€st_3res$_R€$R€control<c@*€ +€@,€`-€x.€”/€°0 €Č1!€Ü2"€đ3#€4$€5%€46&€T7'€t8(€”9)€Ź:*€Ä;+€Ü<,€đ=-€>.€?/€,@0€@A1€TBDAT*8ö2€lC3€ˆD4€¤E5€ŔF6€ÜG7€üH8€I9€4J;€HK=€\L?€tM@€ŒNA€¤OB€źPC€ÔQD€ěRE€SF€TG€4UH€LVI€dWJ€|XK€”YL€ŹZM€Ä[N€Ü\O€ô]P€ ^Q€$_R€ 0 8P Xh p„ Œ  ¨¸ ŔĚ Ôŕ čô ü  $ ,D Ld l„ Œœ ¤´ źDAT*:öĚ Ôŕ čô ü  $0 8D L\ dx €” œ° ¸Ě Ôě ô $ ,8 @L Td l| „” œŹ ´Ä ĚÜ äô ü  $ ,< DT \l t„ Œœ ¤´DAT*<ö źĚ Ôä ěü  , 4D L T \ d l t | „ Œ ” œ ¤ Ź ´ ź Ä Ě Ô Ü ä ě ô ü      $ , 4 < D L T \ d l t | „ Œ ” œ ¤ Ź ´ ź Ä Ě Ô DAT*>öÜ ä ě ô ú6$($@$P$d$x$ˆ$”$ $Ź$ź$Ě$ä$ü$$$$4$D$P$\$h$t$€$Œ$œ$°$Ä$Ř$ě$$$,$8$DAT*@öD$T$d$t$„$”$¤$´$Ä$Ô$ä$ô$$$$$4$D$T$d$t$„$*8FT b p ~ Œ š¨śÄŇŕîü &4BP^lzˆ– ¤!˛"Ŕ#Î$Ü%ę&ř'()"*0+>,L-Z.h/v0„1’2 3Ž4źDAT*Bö5Ę6Ř7ćd Œ° st_6**€p_gen_season*+€p_src_season*0,€st_5H-€p_src_cnstX.€p_gen_cnstl/€st_4€0 €p_91!€p_4œ2"€p_3¨3#€p_15´4$€st_2@!qÄ5%€p_src_spec_1@!qÔ6&€p_src_spec_2ě7'€p_prod_profile8(€p_149)€p_13,:*€p_11 = <;+€p_8L<,€p_7X=-€p_6d>.€p_5p?/€p_2|@0€p_1ˆA1€st_1”B2€p_spc_fact¤C3€p_emi_fact¸DDAT*Dö4€p_materialĚE5€p_scc_amsŕF6€p_emis_profileôG7€p_protocl H8€p_sccamsmt I9€r_24J;€r_1@K=€ln_3LL?€ln_4\M@€ln_5lNA€ln_6|OB€ln_7ŒPC€ln_8œQD€ln_9ŹRE€ln_11źSF€ln_12ĚTG€ln_13ÜUH€ln_14eněVI€ln_15üWJ€ln_16 XK€ln_17YL€ln_18,ZM€ln_20<[N€ln_10L\O€ln_21\]P€ln_1l^Q€st_3|_R€ ( @ P d x ˆDAT*Fö ”   Ź ź Ě ä ü  $ 4 D P \ h t € Œ œ ° Ä Ř ě   , 8 D T d t „ ” ¤ ´ Ä Ô ä ô   $ 4 D T d t „ €€€.€ó.2 K +resizef_put_scroll_bars+activatef_menu_behave+create+destroyDAT*Höx˙˙Ŕ˙˙Ŕ˙˙"Ŕ˙˙, Ŕ˙˙:Ŕ˙˙BŔ2 Ë xywidthheighttitlebartitlebackcolorcontrolmenuminboxmaxboxresizableiconst_6p_gen_seasonp_src_seasonst_5p_src_cnstp_gen_cnstst_4p_9p_4p_3p_15st_2p_src_spec_1p_src_spec_2p_prod_profilep_14p_13p_11p_8p_7p_6p_5p_2p_1st_1p_spc_factp_emi_factp_materialp_scc_amsp_emis_profilep_protoclp_sccamsmtr_2r_1ln_3ln_4ln_5ln_DAT*Jö6ln_7ln_8ln_9ln_11ln_12ln_13ln_14ln_15ln_16ln_17ln_18ln_20ln_10ln_21ln_1st_3(˙˙ ˙˙ l˙˙ € ˙˙h˙˙˙˙"{€˙˙(˙˙˙˙˙2˙˙˙>˙˙˙E˙˙˙L˙˙˙V€˙˙[ €˙˙` €˙˙m €˙˙z €˙˙ €˙˙Š €˙˙• €˙˙š !€˙˙DAT*Löž "€>€˙˙˘ #€˙˙Ś $€˙˙Ť %€˙˙° &€˙˙˝ '€;–˙˙Ę (€˙˙Ů )€˙˙Ţ *€˙˙ă +€˙˙č ,€˙˙ě -€˙˙đ .€˙˙ô /€˙˙ř 0€h_˙˙ü 1€it˙˙ 2€˙˙ 3€Ŕ˙˙ 4€ta˙˙ 5€ec˙˙& 6€an˙˙0 7€w_˙˙? 8€ ˙˙I 9€Da˙˙T ;€th˙˙XDAT*Nö =€e ˙˙\ ?€f ˙˙a @€nd˙˙f A€˙˙˙˙k B€˙˙p C€˙˙u D€um˙˙z E€˙˙ F€˙˙… G€2˙˙‹ H€˙˙‘ I€˙˙— J€˙˙ K€˙˙Ł L€˙˙Š M€um˙˙Ż N€ad˙˙ľ O€al˙˙ť P€s_˙˙Á Q€al˙˙Ć R€] o l€ h€{€ DAT*Pö €˙˙˙˙€€€€œ€1€˙˙˙€ @@€@ € € € € € € € !€ "€ #€ $€ %€ &€ '€ (€ )€ *€ +€ ,€ -€ .€ /€ 0€ 1€ 2€ 3€ 4€ 5€ 6€ 7€ 8€ 9€DAT*Rö ;€ =€ ?€ @€ A€ B€ C€ D€ E€ F€ G€ H€ I€ J€ K€ L€ M€ N€ O€ P€ Q€ R€',˙˙.€ó˙˙/1˙˙˙˙€˙˙93˙˙˙˙x€˙˙˙˙A3˙˙˙˙€˙˙˙˙2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweiDAT*Töghtfacenamefontfamilyfontpitch,˙˙ŕ ˙˙ l˙˙ ˙˙4˙˙˙˙!Ä€˙˙& €˙˙0 ˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cË€˙˙lÁ€˙˙wÁ€] oŕ l4 ř˙˙˙ź@€Á€Á€Ë€ DAT*Vö˙˙˙Ä€ €€@€ ~:F@źľ@˝8Ś#,%1‹:@ź ľ@˝ ś8,•d1r,$  Jd, w_emission_safw_mdi_main::message<˙˙#@U€˙˙%@V€˙˙"@S€ ˙˙ "€"2  +clicked˙˙Ŕ2 , xywidthheightpicturenDAT*Xöameborderx˙˙Š˙˙  ˙˙ ˙˙˙˙Ů€˙˙%Ŕ] oŠ    @Ů€Ŕ@€@@ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś',%1‹:@ź ľ@˝ ś8,•d1r,$  JdDAT*Zö6 w_emission_growth_factorw_mdi_main::message<˙˙'@W€˙˙!%@V€˙˙,@S€ ˙˙ "€"2  +clicked˙˙Ŕ2 ; xywidthheightpicturenameborderfocusrectangleŒ˙˙× ˙˙  ˙˙ ˙˙˙˙ĺ€˙˙%ž˙˙,ž] o×   DAT*\ö  @倞@€ž@ J1˙˙˙˙"€˙˙2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙˛˙˙ l˙˙ ˙˙4˙˙˙˙!÷€˙˙& €˙˙0 ˙˙?DAT*^ö˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cË€˙˙lľ€˙˙wľ€] o˛l4 ř˙˙˙ź@€ľ€ľ€Ë€ ˙˙˙÷€ €€@€ ~:F@źľ@˝8Ś),%1‹:@ź ľ@˝ ś8,•d1r,$DAT*`öJd1 w_emission_factor_aw_mdi_main::message<˙˙)@X€˙˙%@V€˙˙'@S€ ˙˙ "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙× ˙˙ P˙˙ ˙˙ ˙˙€˙˙%] o× P   DAT*bö @€@€@ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś+,%1‹:@ź ľ@˝ ś8,•d1r,$ Jd1 w_emission_factor_cw_mdi_main::message<˙˙+@Y€˙˙%@V€˙˙'@S€ ˙˙ "€"2  +clicked˙˙DAT*döŔ2 4 xywidthheightpicturenamefocusrectanglex˙˙Š˙˙ P˙˙ ˙˙ ˙˙ €˙˙%] oŠP    @ €@€@ J1˙˙˙˙"€˙˙2  2  xywidthheightenabledtextalignmDAT*föentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙ ˙˙ ˙˙ Ľ˙˙D˙˙˙˙!€˙˙&Á€˙˙0Á˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cË€˙˙lÁ€˙˙wÁ€] o  ĽD ř˙˙˙ź@€ÁDAT*hö€Á€Ë€ ˙˙˙€Á€€@€Á2  2 4 xywidthheightpicturenamefocusrectanglex˙˙î˙˙ @˙˙ I˙˙@˙˙$€˙˙%¸] oî@I@  @$€@€¸DAT*jö@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙î˙˙ œ˙˙ I˙˙@˙˙0€˙˙%Á] oîœI@  @0€@€Á@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙DAT*lö˙ň˙˙ X˙˙ @˙˙4˙˙<€˙˙%Á] oňX@4  @<€@€Á@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙;˙˙ D˙˙ I˙˙@˙˙I€˙˙%ÁDAT*nö] o;DI@  @I€@€Á@ 2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙ ˙˙ „˙˙ ˛˙˙4˙˙˙˙!U€˙˙& €˙˙0 ˙˙DAT*pö?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cË€˙˙lÁ€˙˙wÁ€] o „˛4 ř˙˙˙ź@€Á€Á€Ë€ ˙˙˙U€ €€@€ ~:F@źľ@˝8Ś-,%1‹:@ź ľ@˝ ś8,•d1r,DAT*rö$ Jd1 w_emission_factor_sw_mdi_main::message<˙˙-@Z€˙˙%@V€˙˙'@S€ ˙˙ "&€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙× ˙˙ ´˙˙ ˙˙ ˙˙f€˙˙%ˇ] o× ´  DAT*tö  @f€@€ˇ@ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś/,%1‹:@ź ľ@˝ ś8,•d1r,$Jd1 w_emission_factor_fw_mdi_main::message<˙˙/@[€˙˙%@V€˙˙'@S€ ˙˙ "'€"2  +clicDAT*vöked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙× ˙˙ ˙˙ ˙˙ ˙˙€˙˙%Ŕ] o×     @€@€Ŕ@ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś1,%1‹:@ź ľ@˝ DAT*xöś8,•d1r,$Jd/ w_product_profilew_mdi_main::message<˙˙1@\€˙˙%@V€˙˙%@S€ ˙˙ "(€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙%˙˙ đ˙˙ Ű˙˙˙˙r€˙˙%] DAT*zöo%đŰ  @r€@€@ J1˙˙˙˙"€˙˙2  2 4 xywidthheightpicturenamefocusrectanglex˙˙;˙˙ ô˙˙ I˙˙@˙˙I€˙˙%Ŕ] o;ôI@ DAT*|ö @I€@€Ŕ@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙`˙˙ @˙˙ I˙˙@˙˙<€˙˙%Á] o`@I@  @<€@€Á@ 2  2 4 DAT*~ö xywidthheightpicturenamefocusrectanglex˙˙Ž˙˙ |˙˙ I˙˙@˙˙€˙˙% ] oŽ|I@  @€@€ @ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙;˙˙ ü˙˙ I˙˙DAT*tö@˙˙I€˙˙% ] o;üI@  @I€@€ @ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙’˙˙ `˙˙ I˙˙@˙˙‹€˙˙%Á] o’`I@DAT*‚öŚp@ą)b?:ąţAp@p@p@€éq”@”@a\@\@*[@[@a6c@c@qCU@U@aT`@`@a^j@j@lk@k@Áxl@l@Œm@m@˜€@€@¨‘@‘@ľ¤@¤@¸@¸@Ń^@^@„@„@@@"@@ń,@@7–@–@E@@OS@S@X@@˙˙€ v@v@ €€d@d@Ŕ˙˙€, w_db_errorwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientDAT*„öenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectg i€ hpścommandbuttonfontcharsetfontpitchfontfamilymultilineeditalignmenttextcaseborderstyle˙˙đč˝Database Errore€ @&PrintMS Sans SerifOKarrow!e˙˙p[ˇmessagedragobjectf_block_textŕdœä2 DAT*†öw_db_error˙˙ €( +open+create+destroy+clicked LQ xp _initsrcwindoww_db_errormenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectcommandbuttoncb_printfontcharsetfontpitchfontfamilycb_okmultilineeditmle_messagealignmenttextcaseborderstylemessagedragobjectl€Ŕ˙˙DAT*ˆö'˙˙€@˙˙ ˙˙#@.˙˙( @˙˙3{@˙˙?@˙˙L@€€˙˙]˙˙@4˙˙g€@˙˙u @ ˙˙ @˙˙• @˙˙Ą on@file˙˙ą .I@j€˙˙ž@x% ˙˙Ë@vali˙˙Úow@dm˙˙ć@˙˙ô˙˙ýsp@eyco˙˙ at@prof˙˙ul@fect˙˙tha_ru˙˙$ti@end ˙˙2DAT*Šönoă!˙˙>@˙˙H@˙˙Qod@ě!˙˙]@˙˙e<@đ …€€€€€€Ŕ˙˙wW -*€€˙˙-€€˙˙-€€˙˙@2((`$$,,$6…,•F1T,4$,d message::message(DAT*Œö˙˙@€˙˙@€< mle_message,€text˙˙˙˙ $ , 4 „*‡,*4‡H*P‡`h$p$x$˛€ |,Bd €P cb_print*€€cb_ok$+€$€mle_message<,€<€controlXc@*€$+€<,€ , 4H PDAT*Žö` h p x 0$$$8$d @ cb_print*€cb_ok+€mle_message,,€ $ 8 €€&€ą&2  +open+create+destroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 X xywidthheighttitlebartitlebackcolorwindowtypecb_printcb_okmle_messageÜ˙˙Ž˙˙ -˙˙ DAT*öÓ˙˙Ĺ˙˙˙˙"Œ€˙˙(ŔŔŔ˙˙2Ŕ€˙˙= €˙˙F €˙˙L €] oŽ-ÓĹ€Œ€  €€Ŕ€€œ€1€ŔŔŔ  @@€@DAT*’ö € € €˙˙˙˙&€ą˙˙ ˙˙˙˙€˙˙˙˙ ˙˙˙˙x€˙˙˙˙Œ80źŕľ@˝ŕ8‹}$$4$61<‹ź€˝8…<8<ź3ľ@˝3$8O0ź)ľ@˝)8z'8Zz&ź—ľ@˝—$8^0ź)ľ@˝)8z(źČľ@˝Č8<8g0źČľ@˝Č8<6źČľ@˝Č8DAT*˛ö<źÎľ@˝Î8,•r1€,l$(fň<!Xd, ls_linels_err_msgli_prt::messageP˙˙ ˙˙ ˙˙˙˙"@€t Database Errormle_message,€text,Database error - mm/dd/yyyy - HH:MM:SS ˙˙$ 4 l "€"2  +clickedf_block_text(˙˙Ŕ˙˙Ŕ2 UDAT*–öŚp@˛)b?:ąţA"p@p@p@€éq”@”@a!\@\@a,[@[@a8c@c@aEU@U@qV`@`@a`j@j@nk@k@Ázl@l@Žm@m@qš€@€@QŞ‘@‘@ˇ¤@¤@ĸ@¸@Ó^@^@a@@`@@aŽ@Ž@!0@0@a€ ­v@v@­)'€ľŔ˙˙ĂŔ˙˙Ő3”@€Ő (€áF@F@éSp@€ůé*€ń"p@€ń+€ü w_er_diagramwindowmenuwindowtypewindowstatewindDAT*˜öowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjecti€ Č[ĂpictureborderstylelinelinestyleER.ICO€ ČĂÂdev.bmpemiscalc.bmpnew-legl.bmpstr.bmpproc.bmpsrc.bmpgeo2.bmpgs_app_titlemessagef_menu_behavef_put_scroll_barsm_main_menupointerw_legalw_mdi_mainŕ42 w_er_diagramDAT*šö˙˙ €` +open+activate+sizetype+newwidth+newheight+resize+close+create+destroy+clicked7 Lro˙˙ "˙˙,˙˙LUIIQ  x  _initsrcwindoww_er_diagrammenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectpicturep_devborderstylep_emiscalcp_leglp_matrlp_procDAT*œöp_srcp_geolineln_1linestyleln_2ln_3ln_4ln_5ln_6ln_7ln_8ln_9ln_10messagem_main_menupointerw_legalw_mdi_mainpforw˙˙l  w_d˙˙om@dow ˙˙ tcb_p˙˙%co@dbut˙˙* w@erro˙˙5e @e cb˙˙Aom@butt˙˙Nw_@rror˙˙_ @ mle˙˙iro@ltil˙˙w th@_db_˙˙ƒ t@ end˙˙— @ser_˙˙Ł le@ckg˙˙ł co@s_ma˙˙Ŕda@seg˙˙Íss@gs_r˙˙Ü_t@gb_˙˙čDAT*žög@vgs˙˙đs_ile˙˙öyl@mast˙˙r_2da˙˙ _rolde˙˙owdke˙˙˙˙#nd ă!˙˙)˙˙/@˙˙4  ě!˙˙9@˙˙C <˙˙H €˙˙M tw˙˙R ****˙˙W** ˙˙\ an ˙˙a e˙˙f˙˙k€ ˙˙q@˙˙y@8˙˙…@Ń˙˙@˙˙• (DAT* ö@đ …€€€€€€€€€€€€ €!€"€#€$€%€&€€Ŕ˙˙wW ;*€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€DAT*˘ö˙˙0!€€˙˙0!€€˙˙0!€€˙˙ €€˙˙ €€˙˙ €€˙˙ €€˙˙ €€˙˙ €€˙˙ €€˙˙ €€˙˙ €€˙˙ R,8z%…,•81F,$DAT*¤ö$d gs_app_title::message(˙˙@˙˙@'€, title  Data Model˙˙ $ f808 08 0ź€˝8,•L1Z, $2d ::message˙˙@'€ er˙˙ Jź€˝8,•01>,$d1 +sizeDAT*Śötype+newwidth+newheight::messageP˙˙ ˙˙˙˙˙˙'@'€ ˙˙ 4,•1(,$d ::message˙˙@'€ ˙˙ `*‡,*4‡D*L‡\*d‡t*|‡Œ*”‡¤*ʇź*ćÔ*܇DAT*¨öě*ô‡* ‡*$‡4*<‡L*T‡d*l‡|*„‡”*œ‡Ź´$ź$Ä$Ě$Ô$Ü$ä$ě$ô$ü$$ $$$$$,$4$˛€ |,BXn„ š ° Ć Ü ň4J`vd DAT*Şö <  p_dev*€€p_emiscalc +€ €p_legl<,€<€p_matrlT-€T€p_procl.€l€p_src„/€„€p_geoœ0€œ€ln_1˙´1€´€ln_2˙Ě2€Ě€ln_3˙ä3€ä€ln_4ü4 €ü €ln_55!€!€ln_6,6"€,"€ln_7D7#€D#€ln_8xp\8$€\$€ln_9t9%€t%€ln_10lnŒ:&€Œ&€control¤c@*€ +€<,€T-€l.€„/€œ0DAT*Źö€´1€Ě2€ä3€ü4 €5!€,6"€D7#€\8$€t9%€Œ:&€ , 4D L\ dt |Œ ”¤ Źź ÄÔ Üě ô   $4 <L Td l| „” œŹ ´ ź Ä Ě Ô Ü ä ě ô ü      $ , 4 ôDAT*Žö$$$4$D$T$d$t$„$”$¤$´$Ä$Ô$ä$ô$$$*8FT b p ~ Œ š¨śÄŇŕd ˆ p_dev*€p_emiscalcm+€p_legl€,,€p_matrl<-€p_procL.€p_src\/€p_geol0€ln_1|1€ln_2Œ2€DAT*°öln_3œ3€ln_4Ź4 €ln_5ź5!€ln_6Ě6"€ln_7Ü7#€ln_8verě8$€ln_9ü9%€ln_10 :&€ $ 4 D T d t „ ” ¤ ´ Ä Ô ä ô   €€€€&€.€Fą&ó.2 X +open+activatef_menu_behave+resizef_put_scroll_bars+close+create+destroy ˙˙Ŕ˙˙Ŕ˙˙Ŕ˙˙&ŔDAT*˛ö˙˙.Ŕ˙˙@Ŕ˙˙GŔ˙˙OŔ2 ť xywidthheighttitlebarbackcolorcontrolmenuminboxmaxboxresizableiconp_devp_emiscalcp_leglp_matrlp_procp_srcp_geoln_1ln_2ln_3ln_4ln_5ln_6ln_7ln_8ln_9ln_100˙˙ ˙˙ ˙˙ i ˙˙˙˙˙˙"˙˙˙˙˙,˙˙˙8˙˙˙?˙˙˙F˙˙˙P+€DAT*´ö˙˙U €˙˙[ €˙˙f €˙˙m €˙˙u €˙˙| €˙˙‚ €˙˙ˆ €˙˙ €se˙˙’ €€˙˙— €˙˙œ !€Sa˙˙Ą "€˙˙Ś #€˙˙Ť $€;–˙˙° %€˙˙ľ &€] o i €   €˙˙˙˙€€€DAT*śö€4€1€˙˙˙+€ @@€@ € € € € € € € € € € € !€ "€ #€ $€ %€ &€˙˙˙˙&€ą˙˙˙˙˙˙€˙˙70 ˙˙x.€ó˙˙?˙˙˙˙€F˙˙FDAT*¸ö5˙˙˙˙€˙˙˙˙N5˙˙˙˙€˙˙˙˙b,$$$:W@)<8,•H1V,D$.d m_main_menu::message(˙˙@(€˙˙@'€L m_data:€m_devicecm>€triggerevent€ Ŕ,˙˙ $ < D "€"2  +clicked˙˙Ŕ2 4 xDAT*şöywidthheightpicturenamefocusrectanglex˙˙ŕ˙˙ d˙˙ Ű˙˙ŕ˙˙\€˙˙%Á] oŕdŰŕ  @\€@€Á@ W˙˙˙˙"€˙˙b,$0$:W@)H8,•H1V,P$.dDAT*źö m_main_menu::message(˙˙@(€˙˙@'€X m_data:€m_emissionestimationB€triggerevent Ŕ8˙˙ 0 H P "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙˙˙ €˙˙ Ű˙˙ŕ˙˙d€˙˙%] o€ŰDAT*źöŕ  @d€@€@ W˙˙˙˙"€˙˙~:F@źľ@˝8Ś,!1‹:@ź ľ@˝ ś8,•d1r,$Jd% w_legalw_mdi_main::message<˙˙@*€˙˙!@+€˙˙@'€ ˙˙ "€"2  DAT*ŔöŚp@Œ7ë@:ąţAp@p@p@€‰”@”@\@\@'[@[@3c@c@@U@U@Q`@`@[j@j@ik@k@ul@l@‰m@m@•€@€@Ľ‘@‘@˛¤@¤@ż¸@¸@Î^@^@‚@‚@@@A@@%@@0@@:@@F@@R„@„@@€ăd@d@î˙Q v@v@ € w_aboutwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrDAT*Âöecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€  š statictextfontcharsetfontpitchfontfamilyalignmentfillpatternborderstylecommandbuttonAbout RAPIDS€ @§ MS Sans SerifEnnovation, Inc.Version DateArialVersion NumberRAPIDSOKdragobjectgs_versionnumbergd_versiondatemessageÜp2 w_about˙˙DAT*Äö €( +create+destroy+open+clicked QL x„ _initsrcwindoww_aboutmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectstatictextst_4fontcharsetfontpitchfontfamilyalignmentfillpatternborderstylest_version_datest_version_numberst_1commandbuttoncb_okdragobjectmessage”˙˙DAT*Ćö˙˙@˙˙˙˙ @˙˙%@˙˙0@˙˙<@˙˙I@˙˙Z@˙˙d@˙˙r @€˙˙~ @˙˙’ @ ˙˙ž @˙˙Ž 4€@ 5€˙˙ť@˙˙Č9€@ :€˙˙×@˙˙ă@˙˙î˙˙ó;€@˙˙˙@˙˙ @(€˙˙@˙˙@˙˙*ct@awă!DAT*Čö˙˙6˙˙F˙˙Xě!˙˙]@˙˙k<˙˙qta@"Ŕ˙˙|€@đ …€€€€€€€€Ŕ˙˙wW /*€€˙˙. €€˙˙. €€˙˙. €€˙˙. €€˙˙-Č*DAT*Ęö‡0*8‡T*\‡l*t‡„*Œ‡œ¤$Ź$´$ź$Ä$˛€ |,BXnd ̀ st_4*€€st_version_date +€ €st_version_number@,€@€st_1d-€d€cb_ok|.€|€control”c@*€ +€@,€d-€|.€ 0 8T \l tDAT*Ěö„ Œœ ¤ Ź ´ ź Ä L$($D$T$d$*8d l( st_4*€st_version_date+€st_version_number_v0,€st_1L-€cb_ok\.€ ( D T d Ş$,84,z%…,38=0ź)ľ@˝)8…\$d6…,•1ž,DAT*Îöl$(T vd: ls_dategs_versionnumbergd_versiondate::messageP˙˙ ˙˙@˙˙!@ ˙˙0@ €t( st_version_number,€text$Version MMMM DD, YYYYst_version_dateK+€$˙˙ , \ d l €€&€ą&2  +create+destroy+open<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 { DAT*Đö xywidthheighttitlebartitlecontrolmenuwindowtypebackcolorst_4st_version_datest_version_numberst_1cb_ok˙˙ű˙˙ ˙˙ Ž˙˙d˙˙˙˙"`€˙˙(ľ˙˙4ľ€˙˙?ŔŔŔ˙˙I €˙˙N €˙˙^ €˙˙p €˙˙u €] oűŽd€`€  €DAT*öľ€ľ€€p€1€ŔŔŔ  @@€@ € € € € €˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ ˙˙˙˙x&€ą˙˙2  2  xywidthheighttextsizeweightDAT*ÔöMain Menuforward global type m_main_menu from menu end type type m_file from menu within m_main_menu end type type m_save from menu within m_file end type type m_close from menu within m_file end type type m_- from menu within m_file end type type m_import from menu within m_file end type type m_export from menu within m_file end type type m_-1 from menu within m_file end type type m_security from menu within m_file end type type m_-2 from menu within m_file end type type m_prDAT*Ööint from menu within m_file end type type m_printersetup from menu within m_file end type type m_-3 from menu within m_file end type type m_exit from menu within m_file end type type m_file from menu within m_main_menu m_save m_save m_close m_close m_- m_- m_import m_import m_export m_export m_-1 m_-1 m_security m_security m_-2 m_-2 m_print m_print m_printersetup m_printersetup m_-3 m_-3 m_exit m_exit end type type m_edit from menu within m_main_menu end type type m_undo frDAT*Řöom menu within m_edit end type type m_cut from menu within m_edit end type type m_copy from menu within m_edit end type type m_paste from menu within m_edit end type type m_-4 from menu within m_edit end type type m_copyrecord from menu within m_edit end type type m_pasterecord from menu within m_edit end type type m_-5 from menu within m_edit end type type m_insert from menu within m_edit end type type m_delete from menu within m_edit end type type m_edit from menu within m_maDAT*Úöin_menu m_undo m_undo m_cut m_cut m_copy m_copy m_paste m_paste m_-4 m_-4 m_copyrecord m_copyrecord m_pasterecord m_pasterecord m_-5 m_-5 m_insert m_insert m_delete m_delete end type type m_view from menu within m_main_menu end type type m_first from menu within m_view end type type m_prior from menu within m_view end type type m_next from menu within m_view end type type m_last from menu within m_view end type type m_-6 from menu within m_view end type type m_filter from mDAT*Üöenu within m_view end type type m_showall from menu within m_view end type type m_-9 from menu within m_view end type type m_freeform from menu within m_view end type type m_tabular from menu within m_view end type type m_current from menu within m_view end type type m_history from menu within m_view end type type m_-7 from menu within m_view end type type m_expand from menu within m_view end type type m_original from menu within m_view end type type m_-8 from menu within m_vieDAT*Ţöw end type type m_rapidsenterprise from menu within m_view end type type m_view from menu within m_main_menu m_first m_first m_prior m_prior m_next m_next m_last m_last m_-6 m_-6 m_filter m_filter m_showall m_showall m_-9 m_-9 m_freeform m_freeform m_tabular m_tabular m_current m_current m_history m_history m_-7 m_-7 m_expand m_expand m_original m_original m_-8 m_-8 m_rapidsenterprise m_rapidsenterprise end type type m_data from menu within m_main_menu end type type m_geogDAT*ŕöraphic from menu within m_data end type type m_legal from menu within m_data end type type m_source from menu within m_data end type type m_device from menu within m_data end type type m_process from menu within m_data end type type m_stream from menu within m_data end type type m_material from menu within m_data end type type m_emissionestimation from menu within m_data end type type m_-10 from menu within m_data end type type m_otherdata from menu within m_data end type type DAT*âöm_-11 from menu within m_data end type type m_reference from menu within m_data end type type m_-bds from menu within m_data end type type m_sourcebulkdelete from menu within m_data end type type m_data from menu within m_main_menu m_geographic m_geographic m_legal m_legal m_source m_source m_device m_device m_process m_process m_stream m_stream m_material m_material m_emissionestimation m_emissionestimation m_-10 m_-10 m_otherdata m_otherdata m_-11 m_-11 m_reference m_referencDAT*äöe m_-bds m_-bds m_sourcebulkdelete m_sourcebulkdelete end type type m_calculate from menu within m_main_menu end type type m_emissionestimator from menu within m_calculate end type type m_growth from menu within m_calculate end type type m_calculate from menu within m_main_menu m_emissionestimator m_emissionestimator m_growth m_growth end type type m_query from menu within m_main_menu end type type m_queryreportingtool from menu within m_query end type type m_gistoolarcview from DAT*ćömenu within m_query end type type m_statisticalanalysissas from menu within m_query end type type m_query from menu within m_main_menu m_queryreportingtool m_queryreportingtool m_gistoolarcview m_gistoolarcview m_statisticalanalysissas m_statisticalanalysissas end type type m_report from menu within m_main_menu end type type m_qaqc from menu within m_report end type type m_statistical from menu within m_qaqc end type type m_consistency from menu within m_qaqc end type type m_qaqc DAT*čöfrom menu within m_report m_statistical m_statistical m_consistency m_consistency end type type m_runreport from menu within m_report end type type m_report from menu within m_main_menu m_qaqc m_qaqc m_runreport m_runreport end type type m_window from menu within m_main_menu end type type m_tile from menu within m_window end type type m_layer from menu within m_window end type type m_cascade from menu within m_window end type type m_-12 from menu within m_window end type type mDAT*ęö_toolbar from menu within m_window end type type m_window from menu within m_main_menu m_tile m_tile m_layer m_layer m_cascade m_cascade m_-12 m_-12 m_toolbar m_toolbar end type type m_help from menu within m_main_menu end type type m_usingrapids from menu within m_help end type type m_-13 from menu within m_help end type type m_1 from menu within m_help end type type m_help from menu within m_main_menu m_usingrapids m_usingrapids m_-13 m_-13 m_1 m_1 end type end forward gDAT*ěölobal type m_main_menu from menu m_file m_file m_edit m_edit m_view m_view m_data m_data m_calculate m_calculate m_query m_query m_report m_report m_window m_window m_help m_help end type global m_main_menu m_main_menu forward prototypes public subroutine mf_app_title () end prototypes public subroutine mf_app_title (); end subroutine on m_main_menu.create m_main_menu=this this.m_file=create m_file this.m_edit=create m_edit this.m_view=create m_view this.m_data=create mDAT*îö_data this.m_calculate=create m_calculate this.m_query=create m_query this.m_report=create m_report this.m_window=create m_window this.m_help=create m_help this.Item[]={this.m_file, & this.m_edit, & this.m_view, & this.m_data, & this.m_calculate, & this.m_query, & this.m_report, & this.m_window, & this.m_help} end on on m_main_menu.destroy destroy(this.m_file) destroy(this.m_edit) destroy(this.m_view) destroy(this.m_data) destroy(this.m_calculate) destroy(this.m_query) desDAT*đötroy(this.m_report) destroy(this.m_window) destroy(this.m_help) end on type m_file from menu within m_main_menu m_save m_save m_close m_close m_- m_- m_import m_import m_export m_export m_-1 m_-1 m_security m_security m_-2 m_-2 m_print m_print m_printersetup m_printersetup m_-3 m_-3 m_exit m_exit end type on m_file.create this.Text="&File" this.m_save=create m_save this.m_close=create m_close this.m_-=create m_- this.m_import=create m_import this.m_export=create m_exporDAT*ňöt this.m_-1=create m_-1 this.m_security=create m_security this.m_-2=create m_-2 this.m_print=create m_print this.m_printersetup=create m_printersetup this.m_-3=create m_-3 this.m_exit=create m_exit this.Item[]={this.m_save, & this.m_close, & this.m_-, & this.m_import, & this.m_export, & this.m_-1, & this.m_security, & this.m_-2, & this.m_print, & this.m_printersetup, & this.m_-3, & this.m_exit} end on on m_file.destroy destroy(this.m_save) destroy(this.m_close) destroy(thDAT*ôöis.m_-) destroy(this.m_import) destroy(this.m_export) destroy(this.m_-1) destroy(this.m_security) destroy(this.m_-2) destroy(this.m_print) destroy(this.m_printersetup) destroy(this.m_-3) destroy(this.m_exit) end on type m_save from menu within m_file end type on m_save.create this.Text="&Save" this.Microhelp="Save the current record" this.ToolBarItemDownName="Save!" this.ToolBarItemName="Save!" this.ToolBarItemText="Save" this.ToolBarItemVisible=false this.Enabled=false enDAT*ööd on on m_save.destroy end on event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "save") end event type m_close from menu within m_file end type on m_close.create this.Text="&Close" this.Microhelp="Close the current window" this.ToolBarItemVisible=false this.Enabled=false end on event clicked;Close(ParentWindow.GetActiveSheet()) end event type m_- from menu within m_file end type on m_-.create this.Text="-" end on type m_import from menDAT*řöu within m_file end type on m_import.create this.Text="&Import" this.Microhelp="Import data" this.ToolBarItemVisible=false end on event clicked;SetPointer(HourGlass!) Open (w_imain) end event type m_export from menu within m_file end type on m_export.create this.Text="&Export" this.Microhelp="Export data" this.ToolBarItemVisible=false end on on m_export.destroy end on event clicked;SetPointer(HourGlass!) Open (w_export) end event type m_-1 from menu within m_filDAT*úöe end type on m_-1.create this.Text="-" end on type m_security from menu within m_file end type on m_security.create this.Text="Sec&urity" this.Microhelp="Security administration" this.ToolBarItemVisible=false end on event clicked;SetPointer(HourGlass!) OpenSheet(w_security, ParentWindow, 0, Layered!) end event type m_-2 from menu within m_file end type on m_-2.create this.Text="-" end on type m_print from menu within m_file end type on m_print.create this.TeDAT*üöxt="&Print" this.Microhelp="Print the current window" this.ToolBarItemDownName="Print!" this.ToolBarItemName="Print!" this.ToolBarItemText="Print" this.ToolBarItemVisible=false end on event clicked;window activeSheet activeSheet = ParentWindow.GetActiveSheet() if IsValid(activeSheet) then PrintWindow(Handle(ParentWindow.GetActiveSheet())) else PrintWindow(Handle(ParentWindow)) end if end event type m_printersetup from menu within m_file end type on m_printersetup.creDAT*ţöate this.Text="Printer Se&tup..." this.Microhelp="Set printer options" this.ToolBarItemVisible=false end on event clicked;PrintSetup() end event type m_-3 from menu within m_file end type on m_-3.create this.Text="-" end on type m_exit from menu within m_file end type on m_exit.create this.Text="E&xit" this.Microhelp="Exit RAPIDS" this.ToolBarItemVisible=false end on event clicked;w_mdi_main.TriggerEvent(Close!) end event type m_edit from menu within m_main_menu DAT*ö m_undo m_undo m_cut m_cut m_copy m_copy m_paste m_paste m_-4 m_-4 m_copyrecord m_copyrecord m_pasterecord m_pasterecord m_-5 m_-5 m_insert m_insert m_delete m_delete end type on m_edit.create this.Text="&Edit" this.m_undo=create m_undo this.m_cut=create m_cut this.m_copy=create m_copy this.m_paste=create m_paste this.m_-4=create m_-4 this.m_copyrecord=create m_copyrecord this.m_pasterecord=create m_pasterecord this.m_-5=create m_-5 this.m_insert=create m_insert this.m_deleDAT*öte=create m_delete this.Item[]={this.m_undo, & this.m_cut, & this.m_copy, & this.m_paste, & this.m_-4, & this.m_copyrecord, & this.m_pasterecord, & this.m_-5, & this.m_insert, & this.m_delete} end on on m_edit.destroy destroy(this.m_undo) destroy(this.m_cut) destroy(this.m_copy) destroy(this.m_paste) destroy(this.m_-4) destroy(this.m_copyrecord) destroy(this.m_pasterecord) destroy(this.m_-5) destroy(this.m_insert) destroy(this.m_delete) end on type m_undo from menu withDAT*öin m_edit end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "undo") end event on m_undo.create this.Text="&Undo" this.Microhelp="Undo the last change" this.ToolBarItemVisible=false this.Enabled=false end on type m_cut from menu within m_edit end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "cut") end event on m_cut.create this.Text="&Cut" this.Microhelp="Cut the selected text to the clipboard" this.DAT*öToolBarItemVisible=false this.Enabled=false end on type m_copy from menu within m_edit end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "copy") end event on m_copy.create this.Text="&Copy" this.Microhelp="Copy the selected text to the clipboard" this.ToolBarItemVisible=false this.Enabled=false end on type m_paste from menu within m_edit end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "paste") end eDAT*övent on m_paste.create this.Text="&Paste" this.Microhelp="Paste the text from clipboard" this.ToolBarItemVisible=false this.Enabled=false end on type m_-4 from menu within m_edit end type on m_-4.create this.Text="-" end on type m_copyrecord from menu within m_edit end type event clicked;//TriggerEvent(ParentWindow.GetActiveSheet(), "opendefault") TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "copy_record") end event on m_copyrecord.create this.Text="DAT* öCopy &Record" this.Microhelp="Copy the current record to the structure" this.ToolBarItemDownName="copyrec.bmp" this.ToolBarItemName="copyrec.bmp" this.ToolBarItemText="Copy Record" this.ToolBarItemVisible=false this.ToolBarItemSpace=1 this.Enabled=false end on type m_pasterecord from menu within m_edit end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "paste_record") end event on m_pasterecord.create this.Text="P&aste Record" this.Microhelp=DAT* ö"Paste the record from the structure" this.ToolBarItemDownName="pasterec.bmp" this.ToolBarItemName="pasterec.bmp" this.ToolBarItemText="Paste Record" this.ToolBarItemVisible=false this.Enabled=false end on type m_-5 from menu within m_edit end type on m_-5.create this.Text="-" end on type m_insert from menu within m_edit end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "insert") end event on m_insert.create this.Text="&Insert" this.MDAT*öicrohelp="Insert a new record" this.ToolBarItemDownName="Insert!" this.ToolBarItemName="Insert!" this.ToolBarItemText="Insert" this.ToolBarItemVisible=false this.Enabled=false end on type m_delete from menu within m_edit end type on m_delete.create this.Text="D&elete" this.Microhelp="Delete the current record" this.ToolBarItemDownName="Clear!" this.ToolBarItemName="Clear!" this.ToolBarItemText="Delete" this.ToolBarItemVisible=false this.Enabled=false end on event clicked;TrDAT*öiggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "delete") end event type m_view from menu within m_main_menu m_first m_first m_prior m_prior m_next m_next m_last m_last m_-6 m_-6 m_filter m_filter m_showall m_showall m_-9 m_-9 m_freeform m_freeform m_tabular m_tabular m_current m_current m_history m_history m_-7 m_-7 m_expand m_expand m_original m_original m_-8 m_-8 m_rapidsenterprise m_rapidsenterprise end type on m_view.create this.Text="&View" this.m_firsDAT*öt=create m_first this.m_prior=create m_prior this.m_next=create m_next this.m_last=create m_last this.m_-6=create m_-6 this.m_filter=create m_filter this.m_showall=create m_showall this.m_-9=create m_-9 this.m_freeform=create m_freeform this.m_tabular=create m_tabular this.m_current=create m_current this.m_history=create m_history this.m_-7=create m_-7 this.m_expand=create m_expand this.m_original=create m_original this.m_-8=create m_-8 this.m_rapidsenterprise=create m_rapidsenterpDAT*örise this.Item[]={this.m_first, & this.m_prior, & this.m_next, & this.m_last, & this.m_-6, & this.m_filter, & this.m_showall, & this.m_-9, & this.m_freeform, & this.m_tabular, & this.m_current, & this.m_history, & this.m_-7, & this.m_expand, & this.m_original, & this.m_-8, & this.m_rapidsenterprise} end on on m_view.destroy destroy(this.m_first) destroy(this.m_prior) destroy(this.m_next) destroy(this.m_last) destroy(this.m_-6) destroy(this.m_filter) destroy(this.m_showaDAT*öll) destroy(this.m_-9) destroy(this.m_freeform) destroy(this.m_tabular) destroy(this.m_current) destroy(this.m_history) destroy(this.m_-7) destroy(this.m_expand) destroy(this.m_original) destroy(this.m_-8) destroy(this.m_rapidsenterprise) end on type m_first from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "first") end event on m_first.create this.Text="&First" this.Microhelp="Go to the first record" this.ToolBarDAT*öItemDownName="VCRFirst!" this.ToolBarItemName="VCRFirst!" this.ToolBarItemText="First" this.ToolBarItemVisible=false this.ToolBarItemSpace=1 this.Enabled=false end on type m_prior from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "prior") end event on m_prior.create this.Text="&Prior" this.Microhelp="Go to the previous record" this.ToolBarItemDownName="VCRPrior!" this.ToolBarItemName="VCRPrior!" this.ToolBarItemText=DAT*ö"Prior" this.ToolBarItemVisible=false this.Enabled=false end on type m_next from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "next") end event on m_next.create this.Text="&Next" this.Microhelp="Go to the next record" this.ToolBarItemDownName="VCRNext!" this.ToolBarItemName="VCRNext!" this.ToolBarItemText="Next" this.ToolBarItemVisible=false this.Enabled=false end on type m_last from menu within m_view end type DAT*ö event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "last") end event on m_last.create this.Text="&Last" this.Microhelp="Go to the last record" this.ToolBarItemDownName="VCRLast!" this.ToolBarItemName="VCRLast!" this.ToolBarItemText="Last" this.ToolBarItemVisible=false this.Enabled=false end on type m_-6 from menu within m_view end type on m_-6.create this.Text="-" end on type m_filter from menu within m_view end type event clicked;TriggerEvenDAT*öt(ParentWindow.GetActiveSheet(), "edit_actions", 0, "select") end event on m_filter.create this.Text="F&ilter..." this.Microhelp="Filter records" this.ToolBarItemDownName="Search!" this.ToolBarItemName="Search!" this.ToolBarItemText="Filter" this.ToolBarItemVisible=false this.Enabled=false end on type m_showall from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "selectall") end event on m_showall.create this.Text="&DAT* öShow All" this.Microhelp="Show all records" this.ToolBarItemDownName="Selectall!" this.ToolBarItemName="Selectall!" this.ToolBarItemText="Show All" this.ToolBarItemVisible=false this.Enabled=false end on type m_-9 from menu within m_view end type on m_-9.create this.Text="-" end on type m_freeform from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "freeform") end event on m_freeform.create this.Text="Fr&eeForm" DAT*"ö this.Microhelp="Freeform style" this.ToolBarItemDownName="form!" this.ToolBarItemName="form!" this.ToolBarItemText="Freeform" this.ToolBarItemVisible=false this.Enabled=false end on type m_tabular from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "edit_actions", 0, "tabular") end event on m_tabular.create this.Text="Ta&bular" this.Microhelp="Tabular style" this.ToolBarItemDownName="Cursor!" this.ToolBarItemName="Cursor!" this.ToolBarIDAT*$ötemText="Tabular" this.ToolBarItemVisible=false this.Enabled=false end on type m_current from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "current_view") end event on m_current.create this.Text="S&napshot" this.Microhelp="Snapshot view of activity data" this.ToolBarItemDownName="snapshot.bmp" this.ToolBarItemName="snapshot.bmp" this.ToolBarItemText="Snapshot" this.ToolBarItemVisible=false this.Enabled=false end on type m_history frDAT*&öom menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "history_view") end event on m_history.create this.Text="&History" this.Microhelp="History view of activity data" this.ToolBarItemDownName="history.bmp" this.ToolBarItemName="history.bmp" this.ToolBarItemText="History" this.ToolBarItemVisible=false this.Enabled=false end on type m_-7 from menu within m_view end type on m_-7.create this.Text="-" end on type m_expand from menu within DAT*(öm_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "expand_view") end event on m_expand.create this.Text="Enlarge &Related Info" this.Microhelp="Enlarge the related information area" this.ToolBarItemVisible=false this.Enabled=false end on type m_original from menu within m_view end type event clicked;TriggerEvent(ParentWindow.GetActiveSheet(), "original_view") end event on m_original.create this.Text="Enlarge &General Info" this.Microhelp="Enlarge tDAT**öhe general information area" this.ToolBarItemDownName="binocs.bmp" this.ToolBarItemName="binocs.bmp" this.ToolBarItemText="Enlarge General" this.ToolBarItemVisible=false this.Enabled=false end on type m_-8 from menu within m_view end type on m_-8.create this.Text="-" end on type m_rapidsenterprise from menu within m_view end type on m_rapidsenterprise.create this.Text="RAPIDS Enterprise..." this.Microhelp="Open the RAPIDS Enterprise Window" this.ToolBarItemVisible=false eDAT*,önd on event clicked;SetPointer(HourGlass!) OpenSheet(w_rapids_info, ParentWindow, 0, Layered!) end event type m_data from menu within m_main_menu m_geographic m_geographic m_legal m_legal m_source m_source m_device m_device m_process m_process m_stream m_stream m_material m_material m_emissionestimation m_emissionestimation m_-10 m_-10 m_otherdata m_otherdata m_-11 m_-11 m_reference m_reference m_-bds m_-bds m_sourcebulkdelete m_sourcebulkdelete end type on m_data.create DAT*.ö this.Text="&Data" this.m_geographic=create m_geographic this.m_legal=create m_legal this.m_source=create m_source this.m_device=create m_device this.m_process=create m_process this.m_stream=create m_stream this.m_material=create m_material this.m_emissionestimation=create m_emissionestimation this.m_-10=create m_-10 this.m_otherdata=create m_otherdata this.m_-11=create m_-11 this.m_reference=create m_reference this.m_-bds=create m_-bds this.m_sourcebulkdelete=create m_sourcebulkdeleDAT*0öte this.Item[]={this.m_geographic, & this.m_legal, & this.m_source, & this.m_device, & this.m_process, & this.m_stream, & this.m_material, & this.m_emissionestimation, & this.m_-10, & this.m_otherdata, & this.m_-11, & this.m_reference, & this.m_-bds, & this.m_sourcebulkdelete} end on on m_data.destroy destroy(this.m_geographic) destroy(this.m_legal) destroy(this.m_source) destroy(this.m_device) destroy(this.m_process) destroy(this.m_stream) destroy(this.m_material) destroDAT*2öy(this.m_emissionestimation) destroy(this.m_-10) destroy(this.m_otherdata) destroy(this.m_-11) destroy(this.m_reference) destroy(this.m_-bds) destroy(this.m_sourcebulkdelete) end on type m_geographic from menu within m_data end type on m_geographic.create this.Text="&Geographic..." this.Microhelp="Open Geographic window" this.ToolBarItemDownName="geo.bmp" this.ToolBarItemName="geo.bmp" this.ToolBarItemText="Geographic" this.ToolBarItemVisible=false this.ToolBarItemSpace=1 endDAT*4ö on event clicked;SetPointer(HourGlass!) OpenSheet(w_geo, ParentWindow, 0, Layered!) end event type m_legal from menu within m_data end type event clicked;SetPointer(HourGlass!) OpenSheet(w_legal, ParentWindow, 0, Layered!) end event on m_legal.create this.Text="Legal..." this.Microhelp="Open Legal window" this.ToolBarItemDownName="legal.bmp" this.ToolBarItemName="legal.bmp" this.ToolBarItemText="Legal" this.ToolBarItemVisible=false end on type m_source from menu within DAT*6öm_data end type event clicked;SetPointer(HourGlass!) OpenSheet(w_source, ParentWindow, 0, Layered!) end event on m_source.create this.Text="&Source..." this.Microhelp="Open Source window" this.ToolBarItemDownName="source.bmp" this.ToolBarItemName="source.bmp" this.ToolBarItemText="Source" this.ToolBarItemVisible=false end on type m_device from menu within m_data end type event clicked;SetPointer(HourGlass!) OpenSheet(w_device, ParentWindow, 0, Layered!) end event on m_dDAT*8öevice.create this.Text="&Device..." this.Microhelp="Open Device window" this.ToolBarItemDownName="device.bmp" this.ToolBarItemName="device.bmp" this.ToolBarItemText="Device" this.ToolBarItemVisible=false end on type m_process from menu within m_data end type event clicked;SetPointer(HourGlass!) OpenSheet(w_process, ParentWindow, 0, Layered!) end event on m_process.create this.Text="&Process..." this.Microhelp="Open Process window" this.ToolBarItemDownName="process.bmp" thiDAT*:ös.ToolBarItemName="process.bmp" this.ToolBarItemText="Process" this.ToolBarItemVisible=false end on type m_stream from menu within m_data end type event clicked;SetPointer(HourGlass!) OpenSheet(w_stream, ParentWindow, 0, Layered!) end event on m_stream.create this.Text="S&tream..." this.Microhelp="Open Stream window" this.ToolBarItemDownName="stream.bmp" this.ToolBarItemName="stream.bmp" this.ToolBarItemText="Stream" this.ToolBarItemVisible=false end on type m_material fDAT*<örom menu within m_data end type on m_material.create this.Text="&Material..." this.Microhelp="Open Material window" this.ToolBarItemDownName="material.bmp" this.ToolBarItemName="material.bmp" this.ToolBarItemText="Material" this.ToolBarItemVisible=false end on event clicked;SetPointer(HourGlass!) OpenSheet(w_material, ParentWindow, 0, Layered!) end event type m_emissionestimation from menu within m_data end type event clicked;SetPointer(HourGlass!) OpenSheet(w_emission_esDAT*>öt, ParentWindow, 0, Layered!) end event on m_emissionestimation.create this.Text="&Emission Estimation..." this.Microhelp="Open Emission Estimation window" this.ToolBarItemDownName="calc.bmp" this.ToolBarItemName="calc.bmp" this.ToolBarItemText="Emis. Estimation" this.ToolBarItemVisible=false end on type m_-10 from menu within m_data end type on m_-10.create this.Text="-" end on type m_otherdata from menu within m_data end type event clicked;SetPointer(HourGlass!) OpenSDAT*@öheet(w_data, ParentWindow, 0, Layered!) end event on m_otherdata.create this.Text="&Other Data..." this.Microhelp="Open Other Data Table selection window" end on type m_-11 from menu within m_data end type on m_-11.create this.Text="-" end on type m_reference from menu within m_data end type event clicked;SetPointer(HourGlass!) // Open(w_select_ref) OpenSheet(w_reference, ParentWindow, 0, Layered!) end event on m_reference.create this.Text="&Reference..." this.MicrDAT*Böohelp="Open Reference Table selection window" this.ToolBarItemDownName="ref.bmp" this.ToolBarItemName="ref.bmp" this.ToolBarItemText="Reference" this.ToolBarItemVisible=false end on type m_-bds from menu within m_data end type on m_-bds.create this.Text="-" end on type m_sourcebulkdelete from menu within m_data end type on m_sourcebulkdelete.create this.Text="&Bulk Delete" this.Microhelp="Open Source Bulk Delete window" end on event clicked;SetPointer(HourGlass!) // OpeDAT*Dön(w_select_ref) //OpenSheet(w_sourcebulkdelete, ParentWindow, 0, Layered!) //mkc1555 - 9/9/2003 //added for Bulk delete sources open(w_sourcebulkdelete) end event type m_calculate from menu within m_main_menu m_emissionestimator m_emissionestimator m_growth m_growth end type on m_calculate.create this.Text="&Calculate" this.m_emissionestimator=create m_emissionestimator this.m_growth=create m_growth this.Item[]={this.m_emissionestimator, & this.m_growth} end on on m_calcDAT*Föulate.destroy destroy(this.m_emissionestimator) destroy(this.m_growth) end on type m_emissionestimator from menu within m_calculate end type event clicked;Window lw_ptr str_emission_parm str_parm Long ll_Rid SetPointer(HourGlass!) // Figure out what window is current lw_ptr = ParentWindow.GetActiveSheet() //mdy 1/99 fixed DOWNSTRMDIS = 0 problem // [lw_ptr was matching w_process when no sheets were open, because both are // invalid object references (w_process is invalid wheDAT*Hön it is not open and // ldw_ptr would also be invalid when no sheets are open)] if isValid(lw_ptr) then choose case lw_ptr case w_process str_parm.level = "Process" str_parm.rid = gd_process_rid case w_source str_parm.level = "Source" str_parm.rid = gl_source_rid case w_geo // set ls_type to nation, state, county // pass structure to w_emiss to allow for this selection // mlk 4/98 str_parm.level = w_geo.is_level_type str_parm.name = w_geo.dw_1.object.nDAT*Jöame[w_geo.dw_1.GetRow()] select rid into :str_parm.rid from rap_geographic_locations where name = :str_parm.name and type = :str_parm.Level using SQLCA; end choose end if OpenWithParm(w_emiss, str_parm) end event on m_emissionestimator.create this.Text="&Emission Estimator" this.Microhelp="Open Emission Calculation" end on type m_growth from menu within m_calculate end type event clicked; open(w_growth) end event on m_growth.create this.Text="DAT*Lö&Growth" this.Microhelp="Calculate Emissions Growth" end on type m_query from menu within m_main_menu m_queryreportingtool m_queryreportingtool m_gistoolarcview m_gistoolarcview m_statisticalanalysissas m_statisticalanalysissas end type on m_query.create this.Text="&Query/Analysis" this.m_queryreportingtool=create m_queryreportingtool this.m_gistoolarcview=create m_gistoolarcview this.m_statisticalanalysissas=create m_statisticalanalysissas this.Item[]={this.m_queryreportingtool, DAT*Nö& this.m_gistoolarcview, & this.m_statisticalanalysissas} end on on m_query.destroy destroy(this.m_queryreportingtool) destroy(this.m_gistoolarcview) destroy(this.m_statisticalanalysissas) end on type m_queryreportingtool from menu within m_query end type event clicked;string ls_query, ls_pvdir, ls_run_command SetPointer(HourGlass!) // Get the values of all of the parameters from query section in rapids.ini // If this section does not exist, try the powerviewer section lDAT*Pös_query = ProfileString(gs_iniFile, "query", "runquery", "not found") if ls_query = "not found" or ls_query = '' then ls_pvdir = ProfileString(gs_iniFile, "powerviewer", "pvdir", "not found") if ls_pvdir = "not found" or ls_pvdir = '' then MessageBox('Query/Reporting Tool', "Error finding " + gs_iniFile + ", powerviewer section~n" + & "or pvdir key in the ProfileString function.~n" + & "Contact your technical support.", StopSign!) return end if // Check to see if PowerViDAT*Röewer is installed if Not FileExists(ls_pvdir + '\pv030.exe') then MessageBox('Query/Reporting Tool', & 'Sorry! PowerViewer is required to run queries.') return end if ls_run_command = ls_pvdir + '\pv030.exe' // Run the PowerViewer If Run(ls_run_command) = -1 then MessageBox('PowerViewer', "Error invoking PowerViewer.", StopSign!) end if else // Check to see if query tool is installed if Not FileExists(ls_query) then MessageBox('Query/Reporting Tool', & DAT*Tö'Sorry! Query tool ' + ls_query + ' was not found.') return end if ls_run_command = ls_query // Run the query tool If Run(ls_run_command) = -1 then MessageBox('Query/Reporting Tool', "Error invoking query tool " + ls_query + ".", StopSign!) end if end if end event on m_queryreportingtool.create this.Text="&Query/Reporting Tool" this.Microhelp="Open a query/reporting tool" end on type m_gistoolarcview from menu within m_query end type event clicked;string ls_gis DAT*Vö SetPointer(HourGlass!) // Get the values of all of the parameters from gis section in rapids.ini // If this section does not exist, display the error message ls_gis = ProfileString(gs_iniFile, "gis", "rungis", "not found") if ls_gis = "not found" or ls_gis = '' then MessageBox('GIS Tool', "Error finding " + gs_iniFile + ", gis section~n" + & "or RunGis key in the ProfileString function.~n" + & "Contact your technical support.", StopSign!) return else // Check to see ifDAT*Xö gis tool is installed if Not FileExists(ls_gis) then MessageBox('GIS Tool', & 'Sorry! GIS tool ' + ls_gis + ' was not found.') return end if // Run the gis tool If Run(ls_gis) = -1 then MessageBox('GIS Tool', "Error invoking GIS tool " + ls_gis + ".", StopSign!) end if end if end event on m_gistoolarcview.create this.Text="&GIS Tool (ArcView)" this.Microhelp="Open ArcView" end on type m_statisticalanalysissas from menu within m_query end type event clickeDAT*Zöd;string ls_sas SetPointer(HourGlass!) // Get the values of all of the parameters from sas section in rapids.ini // If this section does not exist, display the error message ls_sas = ProfileString(gs_iniFile, "sas", "sasexe", "not found") if ls_sas = "not found" or ls_sas = '' then MessageBox('Statistical Analysis', "Error finding " + gs_iniFile + ", sas section~n" + & "or sasexe key in the ProfileString function.~n" + & "Contact your technical support.", StopSign!) return DAT*\ö else // Check to see if sas is installed ls_sas = ls_sas + '\sas.exe' if Not FileExists(ls_sas) then MessageBox('Statistical Analysis', & 'Sorry! ' + ls_sas + ' was not found.') return end if // Run the sas If Run(ls_sas) = -1 then MessageBox('Statistical Analysis', "Error invoking SAS " + ls_sas + ".", StopSign!) end if end if end event on m_statisticalanalysissas.create this.Text="&Statistical Analysis (SAS)" this.Microhelp="Open SAS" end on type m_rDAT*^öeport from menu within m_main_menu m_qaqc m_qaqc m_runreport m_runreport end type on m_report.create this.Text="&Report" this.m_qaqc=create m_qaqc this.m_runreport=create m_runreport this.Item[]={this.m_qaqc, & this.m_runreport} end on on m_report.destroy destroy(this.m_qaqc) destroy(this.m_runreport) end on type m_qaqc from menu within m_report m_statistical m_statistical m_consistency m_consistency end type on m_qaqc.create this.Text="&QA/QC" this.Microhelp="QA/QC reDAT*`öport" this.m_statistical=create m_statistical this.m_consistency=create m_consistency this.Item[]={this.m_statistical, & this.m_consistency} end on on m_qaqc.destroy destroy(this.m_statistical) destroy(this.m_consistency) end on type m_statistical from menu within m_qaqc end type event clicked;SetPointer(HourGlass!) OpenSheet(w_rpt_qc, w_mdi_main, 0, Layered!) end event on m_statistical.create this.Text="&Statistical" end on type m_consistency from menu within m_qaqc eDAT*bönd type event clicked;SetPointer(HourGlass!) //OpenSheet(w_ccheck_parameters, w_mdi_main, 0, Original!) Open(w_ccheck_parameters, w_mdi_main) end event on m_consistency.create this.Text="&Consistency" end on type m_runreport from menu within m_report end type event clicked;open(w_report) end event on m_runreport.create this.Text="&Run Report" this.Microhelp="Open analytical report window" end on type m_window from menu within m_main_menu m_tile m_tile m_layer m_layer DAT*dö m_cascade m_cascade m_-12 m_-12 m_toolbar m_toolbar end type on m_window.create this.Text="&Window" this.ShiftToRight=true this.m_tile=create m_tile this.m_layer=create m_layer this.m_cascade=create m_cascade this.m_-12=create m_-12 this.m_toolbar=create m_toolbar this.Item[]={this.m_tile, & this.m_layer, & this.m_cascade, & this.m_-12, & this.m_toolbar} end on on m_window.destroy destroy(this.m_tile) destroy(this.m_layer) destroy(this.m_cascade) destroy(this.m_-12) desDAT*fötroy(this.m_toolbar) end on type m_tile from menu within m_window end type event clicked;ArrangeSheets(w_mdi_main, TILE!) end event on m_tile.create this.Text="&Tile" this.Microhelp="Arrange all as tiled" this.ToolBarItemVisible=false end on type m_layer from menu within m_window end type event clicked;ArrangeSheets(w_mdi_main, LAYER!) end event on m_layer.create this.Text="&Layer" this.Microhelp="Arrange all as layered" this.ToolBarItemVisible=false end on type mDAT*hö_cascade from menu within m_window end type event clicked;ArrangeSheets(w_mdi_main, CASCADE!) end event on m_cascade.create this.Text="&Cascade" this.Microhelp="Arrange all as cascaded" this.ToolBarItemVisible=false end on type m_-12 from menu within m_window end type on m_-12.create this.Text="-" end on type m_toolbar from menu within m_window end type event clicked;OpenWithParm (w_set_toolbars, ParentWindow) end event on m_toolbar.create this.Text="Tool&bar..." DAT*jöthis.Microhelp="Customize toolbar" end on type m_help from menu within m_main_menu m_usingrapids m_usingrapids m_-13 m_-13 m_1 m_1 end type on m_help.create this.Text="&Help" this.ShiftToRight=true this.m_usingrapids=create m_usingrapids this.m_-13=create m_-13 this.m_1=create m_1 this.Item[]={this.m_usingrapids, & this.m_-13, & this.m_1} end on on m_help.destroy destroy(this.m_usingrapids) destroy(this.m_-13) destroy(this.m_1) end on type m_usingrapids from menu withDAT*löin m_help end type event clicked;string ls_dir_name SetPointer(HourGlass!) // Get working directory from the rapids.ini file ls_dir_name = ProfileString(gs_iniFile, "directory", "wdir", "not found") if ls_dir_name = "not found" then MessageBox("Using " + gs_app_title, "Error finding " + gs_iniFile + ", directory section~n" + & "or wdir key in the ProfileString function.~n" + & "Contact you technical support.", StopSign!) Halt end if if Right(ls_dir_name, 1) <> '\' then DAT*ô ls_dir_name = ls_dir_name + '\' end if ShowHelp(ls_dir_name + "newrap.hlp", Index!) end event on m_usingrapids.create this.Text="&RAPIDS Help..." this.Microhelp="RAPIDS Online Help" this.ToolBarItemVisible=false end on type m_-13 from menu within m_help end type on m_-13.create this.Text="-" end on type m_1 from menu within m_help end type event clicked;Open(w_about) end event on m_1.create this.Text="&About..." this.ToolBarItemText="m_aboutrapids" end on DAT*pöNEW! Project for RAPIDS 2.0EXE:P:\rapids\GLC\dev80\rapids.exe,p:\rapids\resource\rapids.pbr,0,1 CMP:0,0,0,2,0,0 COM:Sybase, Inc. DES:Sybase, Inc. Product File CPY: PRD:Powerbuilder Enterprise Series VER:8.0.3.9704 PBD:C:\RAPIDS\GLC\Dev80\rap_base.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_main.pbl,,0 PBD:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_func.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,,DAT*rö1 PBD:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_reports.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_export.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_nei_import.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_import.pbl,,1 PBD:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,,1 OBJ:C:\RAPIDS\GLC\Dev80\rap_main.pbl,rapids,a DAT*töOBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_process_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_stream_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_cal_protocol,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,d_ss_tv_result_set,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_scc_ams_speciation_code,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_metrics,s OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,d_istream,d OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,m_imain,m OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pblDAT*vö,f_menu_off,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_qc_act_data_2,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_permit,w OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_cal_protocol,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_oracle_connection,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_code,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_reference_codes,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_stream_act,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_transmittal,u OBJ:C:\RAPIDS\GLC\DeDAT*xöv80\rap_import.pbl,f_get_stream_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,w_ifiles,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_scc_ams_material,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,d_concheck,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_splash_ag,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_regulation,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_emission_factor,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_oper_daily_schd,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_emiDAT*zös_period_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_streams,u OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_look_up,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_process_schedule,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_season_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,str_populate_level_rids,s OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_area_emission_period,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_insertactivity,f OBJ:C:\RAPIDS\GLC\DevDAT*|ö80\rap_entr.pbl,u_dw_act_pro,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_process_schedules,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_act_src,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_factor_base,w OBJ:c:\rapids\glc\dev80\rap_main.pbl,u_dddw,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_reference_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,d_ss_group_source_criteria,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_qc_act_data_3,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_insertemissionfactorDAT*~ö,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_security_revoke,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_legal_relation,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_sou_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_factor_c,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_locgrp_src,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geo_equipment_counts,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_cal_protocol_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_loc,u OBJ:C:\RAPIDS\GLC\Dev80DAT*€ö\rap_entr.pbl,w_source,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_dev_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_legal_entity,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_legal_entity,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_pro_schedule_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_dw_get_attributes,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_act_str,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_src_sic_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_dddw_search,f OBJ:C:\RAPIDS\GLC\Dev80\rDAT*‚öap_export.pbl,u_emis_period,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_locgrp_geo,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_accuracy_method,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_nei_cache_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_split_factor,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_device_ids,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_document,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_retrieve_metric_codes,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_scc_ams_maDAT*„öterial_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_write_line,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_scc_ams_default_factors,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,d_exp_device,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_filter,w OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_metric_maps,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_device_sequence,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_act_dev,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_use_type,w OBJ:C:\RAPIDS\GLC\Dev80\rapDAT*†ö_dw2.pbl,d_matrl_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_value_type_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,w_export,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_scc_ams_surrogate_codes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,str_nei_file_names,s OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_material,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_look_up,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_delete_leg_ent,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_method_metric,DAT*ˆöd OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,d_exp_materials,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_sic_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_point_control_equipment,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_source_location_coordinates,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_actvities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_loc_coord_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_scc_speciation_lookup,w OBDAT*ŠöJ:c:\rapids\glc\dev80\rap_main.pbl,w_about,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,u_pollutant,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_area_control_equipment,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_devices,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,d_progress,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_permit_conditions,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_factor_a,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_cc_source,u OBJ:C:\RAPIDS\DAT*ŒöGLC\Dev80\rap_dw2.pbl,d_process_ids,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_process,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_ref_table_exportbase,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_activities,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_speciation_profile,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_speed_2_mph,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_security_grant,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_contact,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_odbc_connectiDAT*Žöon,f OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,f_recalc_notify,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_group_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_aircraft_engine,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_emission_release_point,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_emis_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_processes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_speciation_profile,w OBJ:C:\RAPDAT*öIDS\GLC\Dev80\rap_ee.pbl,uo_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,w_select_level,w OBJ:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,d_dm_population_date,d OBJ:C:\RAPIDS\GLC\Dev80\rap_reports.pbl,w_report_body,w OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_toolbar_profile,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_coord_cal_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_gener_emis_factor,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_area_fac_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_grouDAT*’öps.pbl,d_ss_group_result_set,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,str_parms,s OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_process_ids_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_stream,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_growth_factors,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_system_error,w OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_device_id,s OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_material_alias,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_rap_operating_months,u ODAT*”öBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_point_emission_period,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_reference_codes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,uo_header,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_security,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_device,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_oper_weekly_schd,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_area_emission_period,u OBJ:C:\RAPIDS\GLC\DAT*–öDev80\rap_import.pbl,f_get_metric_map_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_scc_ams_list,d OBJ:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,f_elapsedtime,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_mdi_clock,w OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,n_ds_cache_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_reports.pbl,u_dw_reference_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_surrogate_codes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_onroad_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rapDAT*˜ö_nei_import_nif2.pbl,n_ds_nei_import_rap_proc_spec_schedules,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_group,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_find_col,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,str_connect_context,s OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_saf,w OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_boolean_to_string,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_token,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_global_replace,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_material_displaDAT*šöy,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_shift_highlight,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,str_emission_parm,s OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_src_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_reports.pbl,str_rpt_parms,s OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_db_error,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_legal_act,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_sic_naics_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,str_act,s OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_act_geo,uDAT*œö OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_composite_ef,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_block_text,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_method,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_metric_map,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_activity_detail,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_process,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_permit_info,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_progress_buttonface,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,w_logstat,w OBJ:C:\RADAT*žöPIDS\GLC\Dev80\rap_export.pbl,uonv_src_contacts,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geo_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_scc_ams_material,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,d_exportlist,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_site,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_connections,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,d_iheader,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_emission_factor,f OBJ:C:\RAPIDS\DAT* öGLC\Dev80\rap_import.pbl,f_get_emis_fact_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_menu_on,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_act_leg,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_pro_schedule,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_loc_coord,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_log_file,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_units_dddw_on_qcchecker,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_contact_reason_src,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_area_facDAT*˘öility_road_types,u OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,u_ds_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_sequence,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_emission_process,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,f_populate_levels,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_activity,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_connect,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,str_use_type,s OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_ref_code_table_dddw,u OBJ:C:\RAPIDS\GLCDAT*¤ö\Dev80\rap_base.pbl,u_dw_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_form,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_group_dev,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_dw_get_objects_attrib,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_device,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_level,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,w_concheck_view,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,w_concheck_edit,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geo_activity,u OBJ:C:\RAPIDS\GLC\Dev80\DAT*Śörap_export.pbl,uonv_device_act,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_reason,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_processes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_geo_locs,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_method_metrics,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_reference,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_state_names,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,f_stringglobalreplace,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_srDAT*¨öc_group_member,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_pro_group_member,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,d_ss_group_data,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_activity_query,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_cc_stream,u OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_set_toolbars,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_source_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_primary_key_checks,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,d_nei_traDAT*Şönsmittal_user_input,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_devices,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,s_rec_holder,s OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_permit_condition,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_dev_group_member,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_tier_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_spec_split_factor,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_aircraft_def_tim,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_units,s OBJ:C:\RDAT*ŹöAPIDS\GLC\Dev80\rap_func.pbl,f_menu_behave,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_recs,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_put_scroll_bars,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_dev_contacts,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_conversion_lookup_codes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_device_location_coordinates,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_activity_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_retrieve_loDAT*Žöcations,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_exportbase,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_getseq,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_process,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_single_table,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_cal_protocol,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,f_speciation_value_type,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_dev_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_system_error,d OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,w_imain,w OBDAT*°öJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_src_leg_ent_rel,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_measurement,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_area_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_contact_reasons,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_c,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,f_display_file,f OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_file_display,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_rpt_qc,w OBJ:C:\RAPIDS\GLC\Dev80\rDAT*˛öap_export.pbl,uonv_value_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,str_type_rid,s OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_emission_release_pt,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_county_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,w_nei_transmittal_user_input,w OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_county_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_legal_entity,f OBJ:C:\RAPIDS\GLC\Dev80DAT*´ö\rap_dw2.pbl,d_mat_names_for_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_product_profile,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,w_growth,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,w_concheck_export,w OBJ:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,w_report,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,u_dw_unit_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_process_act,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_connection,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_gener_spec_profile,u OBJ:C:\RADAT*śöPIDS\GLC\Dev80\rap_export.pbl,uonv_application,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_onroad_emission_period,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,d_concheck_edit,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_cst_nei_import,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_area_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_area_emission_process,u OBJ:C:\RAPIDS\DAT*¸öGLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_point_emission_process,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_processes,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_qc_act_data_imp,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_metric_maps,s OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_split_factors,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,str_level,s OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_cc_geo,u OBJ:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,n_ds_dm_transfer,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,DAT*şöuonv_cal_method,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_material,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_scc_ams_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geo_member,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_point_control_equipment,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_area_emission_process,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_sources,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,uo_loadlog,u OBJ:C:\RAPIDAT*źöDS\GLC\Dev80\rap_func.pbl,f_del_group_member,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_group_geo,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,uo_toplevel,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_pro_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_cc_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_locgrp_dev,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_metric_level,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_method_metric,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_streams,f OBJ:C:\RADAT*žöPIDS\GLC\Dev80\rap_func.pbl,f_act_dddw_retrieve,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,u_selection_list,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_source_ids_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_ref_codes_table_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_contact_reason_dev,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_seasonal_adj_factor,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,d_ss_group_filter_criteria,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_emission_unit,u DAT*Ŕö OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_filter,d OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_population_via_surrogate,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_retrieve_group_types,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_retrieve_unit_codes,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_set_value_amt,f OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_growth_parameters,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_source,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_legal_entity_type,u OBJ:C:\RAPIDS\GLC\Dev8DAT*Âö0\rap_export.pbl,uonv_use_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_scc_ams_rel,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_metrics,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,d_iloadlog,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_location_coordinates,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_copy_record,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_paste_record,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_form,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_unit_sql,f OBJ:DAT*ÄöC:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_ref_code,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_device_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_connections,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,u_dw_freeform,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,u_dw_ref_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,d_process_cc,d OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,u_class_source_group,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_insertsource,f OBJ:C:\RAPIDS\GLC\Dev80\rap_DAT*Ćödw1.pbl,d_cal_protocol,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_sas_config,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_aircraft_cat,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_aircraft_ef,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_emission_types,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_onroad_emission_period,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_nei_location_cache_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_emis_unit_devices,DAT*Čöu OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_state_activities,u OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_single_dw,w OBJ:c:\rapids\glc\dev80\rap_main.pbl,u_emis_period_no_end_date,u OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_mdi_main,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_contact_reason_leg,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_naics_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,u_class_ss_client,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_emissDAT*Ęöion_release_pt,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_process_specific_schedules,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_location_coordinates,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_check_dates_nt,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_retrieve_codes,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_contact_reasons,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_loccord_src,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_metric,u OBJ:C:\RAPIDS\GLC\DDAT*Ěöev80\rap_export.pbl,uonv_roadway_types,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_arraystring,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_emis_rel_pt_devices,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_activity_master,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_point_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_site_release_point,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_master_detail,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_geo,w DAT*ÎöOBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_check_dates,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,str_lookup,s OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_stream_from,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_check_matrl_group,f OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_calc_protocol,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_array_breakarrayintoblocks,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,d_exp_mat_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,f_create,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_data_codDAT*Đöe,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_gis_emissions,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,f_sqlcheck,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_cst_nei_export,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_qc_act_data_imp2,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_dev_pro,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_seasonal_adj_factor,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_growth_factors_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_scc_ams_code,s OBJ:C:\RAPDAT*ŇöIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_emissions,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_insertdevice,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_data_for_emission_factor_m6,s OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_legal_entities,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_device_ids_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_states_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_device_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_vehicle_cat,u OBJ:C:\RAPIDS\GLC\DeDAT*Ôöv80\rap_export.pbl,uonv_geo_emission_factors,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_msgstring,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_output_stream_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_state_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_sources,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_units,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_pro_names_for_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,str_stream_context,s OBJ:C:\RDAT*ÖöAPIDS\GLC\Dev80\rap_dw3.pbl,d_speciation_profiles,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_county_select,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,d_streams_cc,d OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geo_surrogates,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_transmittal,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_fugitive_release_point,u OBJ:c:\rapids\glc\dev80\rap_main.pbl,u_dw_list,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_stringency_level_selectDAT*Řö,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_loccord_dev,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_stream,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_nei_conversion_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_source_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_group_members,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_location_groups,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,f_parsereDAT*Úöcordstring,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_sort,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_geo_loc,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_data,w OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_save_toolbar_profile,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_rapids_info,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_source_act,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_area_control_equipment,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_site,u OBJ:C:\RDAT*ÜöAPIDS\GLC\Dev80\rap_dw3.pbl,d_security,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_window_count,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_material,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_geo_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_f,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,w_file_display,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_legal_rel_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_form_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,str_record_count,s OBJ:C:\RAPIDS\GDAT*ŢöLC\Dev80\rap_import.pbl,f_insertstream,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_getgeorid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_sql,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_device,w OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_src,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_sourcebulkdelete,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_str_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_reports.pbl,w_report_print,w OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,u_help_bar,u OBJ:C:\RAPIDS\GLC\Dev80\rapDAT*ŕö_func.pbl,f_del_legal_entity_relations_rec,f OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,w_select_file_mode,w OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_er_diagram,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geo_group_member,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_point_emission_period,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_insertprocess,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_doc_lookup,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_leg_ent_rel,f OBJ:C:\RAPIDS\GLC\Dev80\rapDAT*âö_dw1.pbl,d_data_codes_select,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_ref_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,f_print_file,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,m_main_menu,m OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_temp_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_input_stream_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_import_rap_sources,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_measurement_for_unit,f OBJDAT*äö:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_emission_unit,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,w_export_filter,w OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_map_codes,s OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_connect_from,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_use_types_sel,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_time_period_select,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_dw,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_cc_device,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonDAT*ćöv_unit,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_doc_lookup,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_gis_facility,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,w_confirm_file_operations,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_factor_f,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,u_cc_process,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_mode,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_oper_day,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_scc_ams_spec_code,u OBJ:C:\RADAT*čöPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_units,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_location_coordinate_groups,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_window_close,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_mat_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,d_ds_log_file,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_sources_grpby_statecounty,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_ierror,s OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_legal_entity_relations,fDAT*ęö OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_contact,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_act,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_f_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_scc_ams_spec,d OBJ:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,n_ds_dm_emissions,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_db_error,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_leg_contacts,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_oper_month,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pblDAT*ěö,uonv_vehicle_type,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_emission_unit,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_rap_metric_lookups,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_doc,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_sort,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_source_select,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_logon,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uo_export,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_loccord_geo,u OBJ:C:\RADAT*îöPIDS\GLC\Dev80\rap_nei_export_nif3.pbl,n_ds_nei_n3_exp_point_emission_process,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_process_specific_schedule,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_compare_date_time,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,f_countoccurrences,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_factor_g,w OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,d_emission_factor_matches,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_dev_sic_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,w_DAT*đöccheck_parameters,w OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_act_doc_lookup,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_process_sequence,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_s_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_list_by_profile,d OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_source_id,s OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,n_cst_conversion_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_gemap_ar,u OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,u_DAT*ňötv_selection_tree,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_contacts,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_validate_geo_loc,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_method_metric_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,d_streams_cc_2,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_error_message,w OBJ:C:\RAPIDS\GLC\Dev80\rap_base.pbl,n_ds_conversion_base,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_geographic,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,d_ds_nei_import_rapids_DAT*ôöbase,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_factors,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_leg_ent_rid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_gemap_pt,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,w_source_selector,w OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_material_groups,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_highlight_button,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_check_dup_act,f OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_get_string,f OBJ:C:\RAPIDS\GLDAT*ööC\Dev80\rap_func.pbl,f_highlight_row,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,nvo_locations,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_metric_code_dddw,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,gf_build_fatal_message,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_oper_yearly_schd,u OBJ:C:\RAPIDS\GLC\Dev80\rap_groups.pbl,w_test_client,w OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_state_location_coordinates,u OBJ:C:\RAPIDS\GLC\DevDAT*řö80\rap_nei_import_nif2.pbl,n_ds_nei_import_conversion_lookup_codes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,f_dlookup,f OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_getrid,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_pro_group,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_get_string,w OBJ:c:\rapids\glc\dev80\rap_main.pbl,str_sort,s OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_delete_geo_loc,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_growth_factor,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_scc_amsDAT*úö_material,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_pro_scc_dddw,d OBJ:c:\rapids\glc\dev80\rap_main.pbl,d_splash,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,gf_db_message,f OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_metric_lookup,u OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_emission_est,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_speciation_profile_list,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,w_emiss_status,w OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_activity,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ccheck.pbl,d_device_DAT*üöcc,d OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_primary_site,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,d_import_files,d OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_legal,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,w_emission_factor_s,w OBJ:c:\rapids\glc\dev80\rap_main.pbl,u_dw_data_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,w_emiss,w OBJ:c:\rapids\glc\dev80\rap_main.pbl,w_splash,w OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_app,f OBJ:c:\rapids\glc\dev80\rap_main.pbl,rapids,a OBJ:C:\RADAT*ţöPIDS\GLC\Dev80\rap_func.pbl,f_qc_act_data_1,f OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_geo_loc_names_for_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_data_mart.pbl,u_data_mart_population_interface,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_material_grp_member,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_conversion_lookup_codes,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_county_location_coordinates,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,w_iretry,w OBJ:C:\RAPIDS\GLC\Dev80\rap_imporDAT*öt.pbl,w_iabout,w OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_group_pro,u OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_group_src,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_sou_names_for_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw3.pbl,d_seasonal_adj_factor_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,uo_loader,u OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_listobjects,f OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_exp_onroad_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_ds_cache_prDAT*Âöocess_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,f_get_metrics,f OBJ:C:\RAPIDS\GLC\Dev80\rap_entr.pbl,u_dw_group_mat,u OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_emission_factor_c_freeform,d OBJ:C:\RAPIDS\GLC\Dev80\rap_ee.pbl,u_pollutant_ee,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_import_nif2.pbl,n_ds_nei_tmp_ctrl_equip_activities,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_ref_code,u OBJ:C:\RAPIDS\GLC\Dev80\rap_export.pbl,uonv_oper_hour,u OBJ:C:\RAPIDS\GLC\Dev80\rap_nei_export_nif2.pbl,n_dDAT*öfontcharsetfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle@pe˙˙%mm˙˙ _d˙˙ [25˙˙LWi˙˙ř˙˙˙t=˙˙"ź0 ˙˙)€al˙˙5€le˙˙?€ci˙˙J˜€ s˙˙S" ˙˙]in˙˙gng˙˙oŚ€ S˙˙t €˙˙~ ] o%[L DAT*öř˙˙˙ꀀ€˜€ Ś€ €€@€ 2  2  xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle@˙˙%˙˙ `˙˙ [˙˙@˙˙ř˙˙˙˙˙"ź˙˙)€DAT*ö˙˙5€˙˙?€˙˙J˜€˙˙S˙˙]˙˙g˙˙oˇ€˙˙t€˙˙~] o%`[@ ř˙˙˙ꀀ€˜€ ˇ€€€@€2  2  xywidthheighttexDAT*Řötsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle@˙˙%˙˙ ˙˙ [˙˙`˙˙ň˙˙˙˙˙"ź˙˙)€˙˙5€˙˙?€˙˙JÄ€˙˙S˙˙]˙˙g˙˙oĘ€˙˙t€˙˙~] o%[`DAT* öŚp@˛)b?:ąţAp@p@p@€‰”@”@$\@\@/[@[@;c@c@HU@U@Y`@`@cj@j@qk@k@}l@l@‘m@m@€@€@­‘@‘@ş¤@¤@Ǹ@¸@Ö^@^@ „@„@@@A&@@0@@;–@–@@I@@SS@S@A\@@˙˙€ˆ@v@v@A€!d@d@A,˙˙€˙9 w_error_messagewindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuDAT*öremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€ ¸Őcommandbuttonfontcharsetfontpitchfontfamilymultilineeditalignmenttextcaseborderstyle˙˙¸—˝Fatal Error€ 8šPrintMS Sans SerifClose˙˙Ô3 gs_error_messagemessagedragobjectgs_app_titleähœŕDAT*^ö2 w_error_message˙˙ €( +open+create+destroy+clicked LQ x{ _initsrcwindoww_error_messagemenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectcommandbuttoncb_printfontcharsetfontpitchfontfamilycb_okmultilineeditmle_error_messagealignmenttextcasebordeDAT*öŚ`@<)b?;ąţA `@`@t!`@€éqj@j@a)k@k@q5l@l@qIm@m@aU€@€@qe‘@‘@r¤@¤@a¸@¸@AŽn@n@™^@^@qĽ str_sortstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfodatawindowpowerobject2   xĽ structurestr_sortmailrecipientenvironmentmailfiledescriptionmailmessageDAT*äödatawindowchildlistviewitemtreeviewitemconnectioninfodatawindowpowerobjectđ˙˙@˙˙ű˙˙@˙˙)@˙˙5@˙˙I @ ˙˙U@˙˙e@˙˙r@˙˙ ż@˙˙Ž @€˙˙™ ż@𠁀€Ŕ˙˙2  2  dwtitle(˙˙ €É˙˙  €DAT*öŚ`@<)b?<ąţA `@`@d#`@€éaj@j@q*k@k@q6l@l@QJm@m@aV€@€@qf‘@‘@as¤@¤@q€¸@¸@A^@^@aTX str_parmsstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectl˙˙ đ‡ ˙˙şÂ˙˙đ‡ ˙˙şÂ˙˙  DAT*öđ‡ ˙˙ şÂ˙˙  đ‡ ˙˙şÂ˙˙ đ‡ ˙˙ şÂ˙˙ đ‡ œÄě<dŒ´Ü,2   x› structurestr_parmsmailrecipientenvironmentmailfiledescriptionmailmeDAT*össagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectÜ˙˙@˙˙˙˙@˙˙*@˙˙6@˙˙J@˙˙V@˙˙f@˙˙s@˙˙€ @˙˙ @𠁀€Ŕ˙˙ 2  2 X string_arge char_argameinteger_arglong_argawiDAT*ödate_argme datetime_arg time_arg boolean_argreal_arg decimal_arg canceleddouble_arg ,D\t¨ŔŘđđ-, -D8-\P-th- ^@€-¨œ- Ŕ´-ŘĚ-đä-˙˙üDAT*sd@-œ€1Ā1ě€1€1<€1 d€1Œ€1 ´€1Ü€1€1,€1DAT*QRAPIDS.ICOü˙˙˙؄"alqq؄"Ŕ ř_N\âwÄáđáw°N˙˙˙˙\âwÍŤşÜčá=áw\âw°N˙˙˙˙¸WtNâš=áw\âw°N˙˙˙˙Ú_áwe c\ö˙"Arialhe(ęXçö˙"Arial ůwö˙"ArialĐ!˙˙˙oĐ!ĺsN|˜çö˙"Arial(ꓜ˙˙˙DAT*"öRapids application object.forward global type rapids from application end type global transaction sqlca global dynamicdescriptionarea sqlda global dynamicstagingarea sqlsa global error error global message message end forward global variables string gs_versionNumber date gd_versionDate integer gi_open_sheet_num; long gl_cur_row=1; long gl_geo_rid; long gl_source_rid; long gl_device_rid; integer gi_geo_num; integer gi_source_num; integer gi_device_num; integer gi_process_numDAT*$ö; string gs_filt; boolean gb_filter; string gs_code_value; decimal gd_process_rid; string gs_master_user='RAPIDS'; string gs_user_id='RAP1'; boolean gb_double_click; string gs_scc_ams_code; string gs_material; string gs_database; //set to 'ODBC' or 'ORACLE' at login string gs_error_message; string gs_role; //decimal gd_total_fug_emission; string gs_app_title; boolean gb_run_import environment ge_env string gs_appPath string gs_iniFile = "rapids.ini" end variables global tDAT*&öype rapids from application string appname = "rapids" end type global rapids rapids type prototypes FUNCTION INT PrintWindow (int wHandle) LIBRARY "rapids.dll" FUNCTION INT PrintSetup (int orient, int wHandle) LIBRARY "rapids.dll" Function UINT GetWindowsDirectory(ref String SysPath, UINT SysPathSize) library "kernel.exe" end prototypes type variables boolean ib_run_imp_flg end variables event systemerror; Open (w_system_error) end event event open; string ls_appPath DAT*(ö GetEnvironment(ge_env) if Upper(CommandParm()) = '-IMP' then gb_run_import = TRUE end if //SET VERSION INFORMATION gs_versionNumber = "2.4.1" gd_versionDate = date("2005/01/31") //grab the application path from the registry registryGet("HKEY_LOCAL_MACHINE\SOFTWARE\RAPIDS20", "Path", RegString!, gs_appPath) if isNull(gs_appPath) or trim(gs_appPath) = "" then gs_appPath = "" end if //create fully qualified reference to the ini file gs_iniFile = gs_appPath + "\" + gs_iniFile DAT**ö gs_app_title = ProfileString(gs_iniFile, 'w_mdi_main', 'app_title', 'not found') if gs_app_title = 'not found' then // Do this in case that rapids.ini does not have this key gs_app_title = 'RAPIDS' SetProfileString(gs_iniFile, 'w_mdi_main', 'app_title', gs_app_title) end if If Upper(gs_app_title) = 'AG RAPIDS' then Open(w_splash_ag) Else Open(w_splash) End if //open(w_logon) end event event close; disconnect using sqlca; end event on rapids.create appname="rapDAT* ids" message=create message sqlca=create transaction sqlda=create dynamicdescriptionarea sqlsa=create dynamicstagingarea error=create error end on on rapids.destroy destroy(sqlca) destroy(sqlda) destroy(sqlsa) destroy(error) destroy(message) end on DAT*>Structure to hold the datawindow dataobject name and all column values in the datawindow.global type s_rec_holder from structure string dw_data_object string string_arg[] long long_arg[] date date_arg[] datetime datetime_arg[] time time_arg[] decimal {15} decimal_arg[] end type DAT*0öŚ`@=)b?<ąţA `@`@+`@€éqj@j@a-k@k@a9l@l@aMm@m@QY€@€@ai‘@‘@av¤@¤@aƒ¸@¸@a’^@^@Q0 s_rec_holderstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectni˙˙ „‰˝˙˙Ő˝˙˙  „‰˝˙˙ Ő˝˙˙  DAT*2ö„‰˝˙˙ Ő˝ Čđ@h2   xž structures_rec_holdermailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectÜ ˙˙on@ect˙˙orruct˙˙ci@ten˙˙-ma@lede˙˙9ma@ssag˙˙Mow@dli˙˙Yt@iewi˙˙itiDAT*4ö@fop˙˙vd@indo˙˙ƒ ld@˙˙’ @𠁀€Ŕ˙˙2  2 Ź0 dw_data_objectstring_arg  long_argdate_argmes datetime_argvie time_argmt decimal_arg $<Tpˆ Œ ˙˙ t$-in<0-mTH- onp`-ipDAT*\ˆ|- at ”-  €1Ȁ1đ€1 €1@€1 h€1DAT*eglobal type str_emission_parm from structure string level string name long rid end type DAT*:öŚ`@=)b?<ąţA `@`@)`@€‰$j@j@2k@k@>l@l@Rm@m@^€@€@n‘@‘@{¤@¤@Aˆ¸@¸@—^@^@Ł str_emission_parmstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject2   xŁ structurestr_emission_parmmailrecipientenvironmentmailfiledescriptionmailmessagedatawDAT*<öindowchildlistviewitemtreeviewitemconnectioninfopowerobjectÜ ˙˙dt@ight˙˙tiback˙˙$ro@umi˙˙2x@zabl˙˙>pe@1r_˙˙Rie@_del˙˙^i@lete˙˙nra@tion˙˙{e@˙˙ˆ te@stro˙˙— @𠁀€Ŕ˙˙2  2  levelnamerid<Ŕ˙˙ ˙˙  ˙˙  DAT*DAT*Structure to store rids of geo levelsglobal type str_level_rids from structure string level_type long nat_rid long sta_rid long cnt_rid long cit_rid long src_rid long dev_rid long pro_rid long str_rid long act_rid end type DAT*BöŚ`@=)b?<ąţA `@`@'`@€éq!j@j@a/k@k@;l@l@aOm@m@a[€@€@ak‘@‘@ax¤@¤@a…¸@¸@a”^@^@  str_level_ridsstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject2   x  structurestr_level_ridsmailrecipientenvironmentmailfiledescriptionmailmessagedatawindowcDAT*DöhildlistviewitemtreeviewitemconnectioninfopowerobjectÜ ˙˙ow@˙˙_fing˙˙!_l@4˙˙/ht@D˙˙;to@X˙˙O@/€˙˙[@cb_v˙˙k@gb_1˙˙x"€@*˙˙… @@˙˙” @𠁀€Ŕ˙˙ 2  2 [ level_typenat_ridsta_ridcnt_ridcit_ridsrc_riddev_ridpro_ridstr_ridact_ridČ˙˙DAT* ˙˙˙˙˙˙#˙˙+˙˙3˙˙;˙˙C˙˙K˙˙S DAT*•Structure for lookup windowglobal type str_lookup from structure string sqlstatement string wintitle string current_code end type DAT*JöŚ`@<)b?<ąţA `@`@%`@€‰j@j@+k@k@7l@l@Km@m@W€@€@g‘@‘@t¤@¤@¸@¸@^@^@œ str_lookupstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject2   xœ structurestr_lookupmailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlisDAT*LötviewitemtreeviewitemconnectioninfopowerobjectÜ˙˙@˙˙˙˙@˙˙+@˙˙7@˙˙K@˙˙W@˙˙g@˙˙t@ ˙˙ @@˙˙ €@𠁀€Ŕ˙˙2  2 + sqlstatementwintitlecurrent_code<˙˙ ˙˙ ˙˙  DAT*  DAT*ƒAll-in-one structure of arrays of simple datatypesglobal type str_parms from structure string string_arg[] char char_arg[] int integer_arg[] long long_arg[] date date_arg[] datetime datetime_arg[] time time_arg[] boolean boolean_arg[] real real_arg[] decimal {2} decimal_arg[] boolean canceled double double_arg[] end type DAT*Röorw_splash_agw_splash2› sqlcasqldasqlsaerrormessagegs_versionnumbergd_versiondategi_open_sheet_numgl_cur_rowgl_geo_ridgl_source_ridgl_device_ridgi_geo_numgi_source_numgi_device_numgi_process_numgs_filtgb_filtergs_code_valuegd_process_ridgs_master_usergs_user_idgb_double_clickgs_scc_ams_codegs_materialgs_databasegs_error_messagegs_rolegs_app_titlegb_run_importge_envgs_apppathgs_inifilerapids¨SE˙˙ € T˙˙ €ch˙˙DAT*Tö €="˙˙ €CO˙˙ €ch˙˙( UM˙˙9 ck˙˙HME˙˙Zle˙˙eE=˙˙pr_˙˙~AM˙˙Œro˙˙—_i˙˙Ľ"p˙˙łg)˙˙ tr˙˙Ęs ˙˙Ô ˙˙â> ˙˙ńŇ€˙˙ä€˙˙ ˙˙ ˙˙+ ˙˙7 ˙˙C E=˙˙TDAT*Vö od˙˙\ ap˙˙i"=˙˙w €) ˙˙~ id˙˙‰r€ME˙˙” €Î whandleprintwindowrapids.dllPrintWindoworientprintsetupPrintSetupsyspathsyspathsizegetwindowsdirectorykernel.exeGetWindowsDirectory+systemerrorcommandline+open+close+create+destroyc ˙˙II3˙˙˙˙IIIP˙˙X˙˙ NRSNQ¤˙˙QS4T x DAT*Xö _initsrcapplicationrapidsstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjecttransactiondynamicdescriptionareadynamicstagingareaerrormessage_globsrcw_system_errorw_splash_agw_splash¸˙˙˙˙^@^@˙˙@˙˙˙˙^@^@˙˙$ @˙˙ ˙˙.^@@^@˙˙<@˙˙˙˙H^@@^@˙˙\@˙˙˙˙hh@@h@˙˙x@˙˙˙˙… h@@DAT*öö€˙˙’ @˙˙˙˙˙˙Ą @d") ˙˙­ E=@_act˙˙šar@te_t˙˙ĐMN@E="r˙˙ăie@er_i˙˙é(N@"rap˙˙ńs.e") ˙˙ú6E=@_act˙˙ 8mm@text˙˙:NA@đ …€ą€‰€€Ŕ˙˙ "Ś7ź˜ľ@˝˜ś8d w_system_errorpe˙˙7@€ ŞźLľ@˝Lś8źDAT*~Used to pass parameters to w_sort windowglobal type str_sort from structure datawindow dw string title end type DAT*löˆl$ŞŚ*)€81<Ĺ–1‹Ś1ý˙˙˙‹ŇŠ)˜ś81<Ńâ1ü˙˙˙‹ 1<RŻĐ‡´6…,)Ě8)ŕ8*)č81<ĹŠ1‹š1ű˙˙˙‹1‹ , R b źę<X‚’–Ś Ş!Ň$â&' (8*L+v,†-Š0šdR DAT*`örstylemessagedragobjectl ˙˙siumbe˙˙€@˙˙rsMMM˙˙(s@rsio˙˙-@$˙˙8@˙˙D@|˙˙Ql@c@˙˙b@@˙˙l€@˙˙z @€˙˙† @@˙˙š @itch˙˙Ś y@nmen˙˙ś er@rder˙˙Ăer@_dat˙˙Đon@ber˙˙ßnd@onc˙˙ëbj@mess˙˙ů˙˙;€@˙˙@˙˙@(€˙˙#DAT*vö˙˙)@˙˙7vendă!˙˙I@˙˙S@˙˙\@ě!˙˙h@˙˙p<@đ …€€€€€€Ŕ˙˙wW -*€€˙˙-€€˙˙-€€˙˙@2((V$,,6…,•<1J,4$"d#DAT*döBase standard dw user object for external datawindow which contains only one dddw.forward global type u_dddw from datawindow end type end forward global type u_dddw from datawindow int Width=489 int Height=360 int TabOrder=1 boolean LiveScroll=true event dwnprocessenter pbm_dwnprocessenter event dwescape pbm_dwescape event dwnkey pbm_dwnkey event highlight_dddw pbm_custom01 event validate_data pbm_custom02 event mousemove pbm_mousemove event retrieve_data pbm_custom03 event retriDAT*föeve_dddw ( ) end type global u_dddw u_dddw type variables long il_selected_row datawindowchild idwc_dw_child string is_child_name string is_column_name string is_msg_name string is_msg_text string is_validation_table string is_old_value boolean ib_enter_or_tab boolean ib_check_required boolean ib_process_focus = false end variables event dwnprocessenter;string ls_col_name, ls_data if il_selected_row > 0 then ls_col_name = This.GetColumnName() if ls_col_name = is_column_nDAT*höame then This.SetItem(This.GetRow(), is_column_name, & idwc_dw_child.GetItemString(il_selected_row, is_child_name)) ls_data = This.GetText() if Not IsNull(ls_data) then if (ls_data <> is_old_value) then ib_enter_or_tab = TRUE This.PostEvent('validate_data') end if if IsNull(is_old_value) then ib_enter_or_tab = TRUE This.PostEvent('validate_data') end if end if end if end if Send(Handle(This), 256, 9, Long(0,0)) return 1 end evenDAT*jöt on dwescape;string ls_col_name if il_selected_row > 0 then ls_col_name = This.GetColumnName() if ls_col_name = is_column_name then This.SetItem(This.GetRow(), is_column_name, is_old_value) f_dddw_search(This, idwc_dw_child, is_child_name, il_selected_row) This.PostEvent("highlight_dddw") end if end if end on on dwnkey;string ls_col_name, ls_data if KeyDown(keytab!) then if il_selected_row > 0 then ls_col_name = This.GetColumnName() if ls_col_name = isDAT*lö_column_name then This.SetItem(This.GetRow(), is_column_name, & idwc_dw_child.GetItemString(il_selected_row, is_child_name)) ls_data = This.GetText() if Not IsNull(ls_data) then if (ls_data <> is_old_value) then ib_enter_or_tab = TRUE This.PostEvent('validate_data') end if if IsNull(is_old_value) then ib_enter_or_tab = TRUE This.PostEvent('validate_data') end if end if end if end if end if end on on highlight_ddDAT*nödw;if il_selected_row > 0 then idwc_dw_child.SelectRow(il_selected_row, TRUE) end if end on on validate_data;if Not f_validate_code(This.GetText(), is_child_name, is_validation_table) then MessageBox(is_msg_name, is_msg_text) This.SetFocus() else This.TriggerEvent('retrieve_data') end if end on on mousemove;SetMicroHelp(w_mdi_main, This.Tag) end on event retrieve_dddw;//This event should be overridden in descendant objects where //retrieval arguments are needed for the ddDAT*pödw //MDY 5/99 idwc_dw_child.Retrieve() end event event itemchanged;string ls_col_name ls_col_name = This.GetColumnName() if ls_col_name = is_column_name then if Not f_validate_code(This.GetText(), is_child_name, is_validation_table) then MessageBox(is_msg_name, is_msg_text) return 1 else il_selected_row = idwc_dw_child.GetRow() // 11/22/94, swj This.TriggerEvent('retrieve_data') end if end if end event event getfocus;string ls_col_name ls_col_name = This.GDAT*röetColumnName() if ls_col_name = '' then return if ib_process_focus then ls_col_name = ls_col_name end if if GetChild(ls_col_name, idwc_dw_child) = -1 then MessageBox('DataWindow Error', & 'Column ' + ls_col_name + ' - Not a DataWindowChild') ib_process_focus = false return end if // If the first value for code is 0 (the dddw has not been retrieved yet), // retrieve a list of valid codes for this dddw if idwc_dw_child.RowCount() > 0 then if idwc_dw_child.GetItemString(1DAT*tö, ls_col_name) = '0' then idwc_dw_child.SetTransObject(SQLCA) //removed default retrieve(), since for descendant objects //sometimes retrieval arguments are required. Placed retrieve //code in user event that can be overridden by descendants //when retrieval args are required MDY 5/99 //idwc_dw_child.Retrieve() this.trigger event retrieve_dddw() end if end if il_selected_row = 0 is_column_name = ls_col_name is_old_value = This.GetItemString(This.GetRow(), DAT*Ţls_col_name) ib_process_focus = false end event on editchanged;string ls_col_name ls_col_name = This.GetColumnName() if ls_col_name = is_column_name then il_selected_row = & f_dddw_search(this, idwc_dw_child, is_child_name, il_selected_row) if il_selected_row > 0 then This.PostEvent("highlight_dddw") end if end if end on event itemerror;// Accept the data value. Data value has been validated in itemchanged // event return 2 end event DAT*xö gs_error_message::message(˙˙@˙˙@€< mle_error_message,€text$˙˙ , 4 „*‡,*4‡P*X‡hp$x$€$˛€ |,Bd ˆP cb_print*€€cb_ok$+€$€mle_error_message<,€<€control`c@*€$+€<,€ DAT*zö, 4P Xh p x € 0$$$@$d H cb_print*€cb_ok+€mle_error_messagee_,,€ $ @ €€&€ą&2  +open+create+destroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 j xywidthheighttitlebartitlebackcolorcontrolmenuwindowtypecb_printcb_okmle_DAT*|öerror_messageđ ˙˙Jca˙˙ Ľur˙˙ îvi˙˙Ńsc˙˙e˙˙"€st˙˙(ŔŔŔte˙˙2Ŕow˙˙>Ŕ€on˙˙I €na˙˙R €ar˙˙X €] oJĽîŃ€€  €Ŕ€Ŕ€€œ€1€ŔŔŔ  @DAT*~ö@€@ € € €˙˙˙˙&€ą˙˙ ˙˙˙˙€˙˙˙˙ ˙˙˙˙x€˙˙˙˙”4 źÜľ@˝Ü$źßľ@˝ß$‹}<1d‹80źĘľ@˝Ę8<1‹8 01î˙˙˙‹1ź‹:@:@99źŇľ@˝Ň 8 <1‹źŮľ@˝Ů8<1DAT*ŕö‹80źĘľ@˝Ę8<1‹źŮľ@˝Ů8<1d‹80źĘľ@˝Ę8<1d‹80źĘľ@˝Ę8<1d‹880źĘľ@˝Ę8<1d‹8O0źĘľ@˝Ę8<1d‹8e0źĘľ@˝Ę8<1d‹8z0źĘľ@˝Ę8<1d‹8”0źĘľ@˝Ę8<1d‹8Ž,z%8şz&źĘľ@˝Ę8<1d‹80źDAT*‚öŚg@˛)b?;ąţA#g@g@dg@€éa$X@X@a0c@c@a=@@aI`@`@qSj@j@ak@k@ml@l@m@m@€@€@‘@‘@ޤ@¤@ˇ¸@¸@Ć^@^@ü‚@‚@@@@@q@@ń(@@q2@@ń>n@n@`I…@…@qRĄ@Ą@paS@S@ty€lźq@q@qń*@*@av@v@a!€Ŕ˙˙ Ŕ˙˙,teŔ˙˙"9F@F@aAd@d@aL u_selection_listuserobjectuserobjectsDAT*„öwindowobjectborderstylestructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€ X statictextfontcharsetfontpitchfontfamilyalignmentfillpatterndatawindowdwobjectsinglelineedittextcasen € °< € (P transactionnot foundMS Sans Serifd_find_colFind:keycodearrow!messagef_dw_get_objects_attribf_get_DAT*†ötokenf_get_stringpointerdragobjectÔl”2 u_selection_list˙˙ €j wparamlparam+entry_chosenuf_create_ddlbuf_filteruf_return_selecteduf_unfilterptran_objps_select_statementps_cur_codeuf_create_datawindowkey+key_pressedkeyflags+ue_keydown+wparam+lparam+create+destroyrowdwodata+itemchangedxposypos+clicked+currentrow+rowfocuschanged+xpos+ypos+row+dwo+doubleclicked+key+keyflags+modifiedJ@DAT*ˆö ˙˙ ˙˙LULQS\˙˙€f˙˙z˙˙BCtransaction.SSor_›˙˙LHn›˙˙ €Ź˙˙ LCkeycode.Uâ˙˙ć˙˙€ę˙˙LLCdwobject.Sh@ü˙˙˙˙â˙˙ć˙˙€LIILCdwobject.V˙˙LLd,˙˙2˙˙8˙˙=˙˙€L(`p”Č x› _initsrcuserobjectu_selection_listuserobjectswindowobjectborderstylestructureDAT*Šömailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectstatictextst_err_msgfontcharsetfontpitchfontfamilyalignmentfillpatterndatawindowdw_2dwobjectst_1dw_1singlelineeditsle_findtextcasetransactionkeycodemessagepointerdragobjectĐ˙˙^ Ü˙˙b@Â˙˙RŔ˙˙-P@°˙˙9$@!z˙˙Fň@'˙˙Rp@,š˙˙\¸@2â˙˙jR@DAT*Œö8Ž˙˙vę@@D˙˙Š ő@ç˙˙˙– ŕ˙@ŕ˙˙˙Ś ç˙@…˙˙ł @0˙˙Ŕ @0˙˙Ďë@8˙˙Ű`@˙˙ćj…˙˙ń8@0˙˙ý@ź˙˙@˙˙@˙˙ľ@@˙˙(@;ź˙˙38˙˙8s_@gă!˙˙A˙˙F˙˙Kpp@ě!˙˙Z˙˙c<@˙˙lni@ntwi˙˙xse@getw˙˙€ct@w_DAT*Žösy˙˙ˆ!w@ash_˙˙"h@𠅀ခ€€€€€€Ŕ˙˙7+ *!€€. €€˙˙žy%€€. €€˙˙žy%€€˙˙=-##4,•1(,$d" +wparam+lparam::DAT*ömessage<˙˙ ˙˙˙˙@!€ ˙˙ l$8Š )(ś81˙˙˙˙<Ľf8008S0źľ@˝8˜$Š8 08§08Š0ź€˝ś8}1‹}1‹}äóŰŢ<ŻÁ8ą0ź€˝ś8…´$8źz%)Ě98…<ŻÁ8ą0ź€˝DAT*’öś8…8ÔŞÚŘ$8ŕz%)č98…8đŞ88ňz%8z&…$)8… 1),8 <846)L8 <8T6)`8 <8h6)t8óÚ|$1)„8˜ 18T)°8…¸$18Ŕ$6)Č88` f ˛DAT*”ö Äň*^–ŞŢň8R|ŚĐÚŢ !.do ls_cols ls_labells_tmpls_visls_col_namels_col_idli_num_colsli_cur_col_numli_cntdwcČ-˙˙ ˙˙% ˙˙, ˙˙3 ˙˙? ˙˙I˙˙U˙˙d˙˙k €Đ  dw_2"€colgetchildoŔApplication Error - uf_create_ddlbcol DAT*–ö- Not a DataWindowChild. Contact your technical support.dw_1$€column*visible @$€.iddescribejŔŔ1$€_t.textjŔŔ!evaluate('wordcap("")',1)$€jŔŔinsertrow!sŔ column_labelsetitem*@•ŔAcolumn_name•ŔAcolumn_id•ŔA"€(Ŕ is_col_nameŒ)getitemstring[Ŕ "€Œ)PŔA ( ˜ ´ Ě Ř č   , L ` t | „ ˜ DAT*˜ö° ¸ Ŕ Č Ř $$8,0…8$H9}X$8`Š)pś81˙˙˙˙<Ľ¨8x08–0źľ@˝88Ó)ü88) 8¤z'12‹8(08,0ź €˝8…’#Ň:F@źľ@˝88*)888@)L8z'8Tz&z&8_z&…h$)|8„$)”8DAT*šö$B z ˘¨$>–śd, ls_filter_patternls_filter_expdwc<˙˙ ˙˙ ˙˙( €œp sle_find%€textildst_err_msg-!€visible@dw_2P"€colgetchildoŔdApplication Error - uf_filtercol - Not a DataWindowChild. Contact your technical support.Please enter filter criteria for getrowbŔőcolumn_labelgetitemstring[ŔAMatch(Upper(#bŔőDAT*œöcolumn_id*@[Ŕ), Upper(''))dw_1c$€setfilterIŔpc$€filterféŔŒ $ 8 H X p ü   8 L h | „ ” „$1ĹT($0$1‹)H8…pŠźľ@˝ś86PT pd ls_ret_val˙˙ P il_selected_row&dw_1 $€&getitemstringeŔDAT* ö8 ( 0 H  :F@źľ@˝8$$8,0…8$H9}X$8,)l8t$)„8>\~d Œ@ sle_find%€textst_err_msg-!€visible@dw_1P$€setfilterIŔ`P$€filteréŔ| $ 8 H X l t „ ä$) 88(DAT* öŚp@˛)b?;ąţA#p@p@p@€‰”@”@\@\@([@[@4c@c@AU@U@R`@`@\j@j@jk@k@vl@l@Šm@m@q–€@€@aŚ‘@‘@ał¤@¤@Ŕ¸@¸@Ď^@^@n@n@@@@…@…@$„@„@2@@>@@H@@’€ńF@€@q@q@€n0cha8v@v@q8 €@tiLd@d@WaF@F@iŘ w_filterwindowmenuwindowtypewindowstDAT*˘öatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€ ¨K datawindowborderstyledwobjectcommandbuttonfontcharsetfontpitchfontfamilyFilter Records!€€ ܨ € M Click one row to selectCancelMS Sans SerifSelectd_filtergs_app_titletransactionsqlcaDAT*¤ö,select PBC_HDR , COLUMN_NAME , DATA_TYPE , COLUMN_ID from SYS.ALL_TAB_COLUMNS , system.pbcatcol where OWNER =' ' and TABLE_NAME =' ' and TABLE_NAME =PBC_TNAM and COLUMN_NAME =PBC_CNAM and Upper ( PBC_HDR ) not like '%RID%' order by PBC_HDR €mp„ţ€€headingcursor˙˙˙˙0€ €˙˙.€$€(€;ąţAx€˙˙˙˙˙˙˙˙˙˙˙˙˙˙;ąţA¸€˙˙˙˙˙˙˙˙˙˙˙˙˙˙;ąţA ($,select PDAT*ŽöBC_HDR , COLUMN_NAME , DOMAIN_NAME , COLUMN_ID from SYS.SYSTABLE , SYS.SYSCOLUMN , SYS.SYSDOMAIN , rapids.pbcatcol where TABLE_NAME =' ' and SYS.SYSTABLE.TABLE_ID =SYS.SYSCOLUMN.TABLE_ID and SYS.SYSCOLUMN.DOMAIN_ID =SYS.SYSDOMAIN.DOMAIN_ID and COLUMN_NAME =PBC_CNAM and TABLE_NAME =PBC_TNAM and PBC_HDR not like '%Rid%' order by PBC_HDR ilř€˙˙˙˙0€n€˙˙€ €t€;ąţA°€˙˙˙˙˙˙˙˙˙˙˙˙˙˙;ąţAđ€˙˙˙˙˙˙˙˙˙˙DAT*¨öDatawindow used to select data codeforward global type u_dw_data_code from datawindow end type end forward global type u_dw_data_code from datawindow int Width=1170 int Height=104 int TabOrder=1 string DataObject="d_data_codes_select" boolean Border=false end type global u_dw_data_code u_dw_data_code type variables string is_ref_code end variables forward prototypes public function boolean uf_check_required () end prototypes public function boolean uf_check_required ();//DAT*Şö Function: uf_check_required // // Purpose: To validate reference code is selected // // Scope: public // // Parameter: none // // Return: boolean - TRUE denotes validation passed; FALSE if validation // failed. // // Log: // Date Who What // -------- ----- ----------------------------- // 3/17/95 SWJ Initial version string ls_ref_code ls_ref_code = This.GetItemString(1, 1) if IsNull(ls_ref_code) or ls_ref_code = '' then is_ref_code = "" MessageBox('Data Code', 'Sorry!DAT*Źö Data Code is required') return FALSE else is_ref_code = ls_ref_code return TRUE end if end function event constructor;DataWindowChild dwc // Retrieve data for reference code dddw //Get the handle of the child datawindow if This.GetChild("code", dwc) = -1 then MessageBox('u_dw_data_code', "Application Error:~nReference Code - " + & "Not a DataWindowChild.~nContact your technical support.") return end if dwc.SetTransObject(SQLCA) dwc.Retrieve() This.SetTransObject(DAT**SQLCA) This.InsertRow(0) end event DAT*°ö˙˙˙˙;ąţAgs_filtmessagegs_databasedragobjectgb_filterpointerÜdŒţ  $ * (@ x € ¸ Ŕ ř ţ  ntx ° ¸ đ ř 2 w_filter˙˙ €* populatedddwwf_oracle_dwwf_watcom_dwwf_oracle_filterwf_watcom_filterrownumwf_oracle_in_operatorrow_numwf_watcom_in_opeDAT*˛örator+open+create+destroyxposyposrowdwo+clicked+rowcount+retrieveend+currentrow+rowfocuschanged+row+dwo+data+itemchanged+scrollpos+scrollverticalH QyQ˙˙SLbn˙˙LctŁ˙˙¨˙˙­˙˙ą˙˙€LIILCdwobject.nž˙˙LLŐ˙˙ň˙˙÷˙˙€ü˙˙LLCdwobject.SdwŁ˙˙¨˙˙­˙˙ą˙˙€˙˙Ő˙˙ ,l|ˆźěřDAT*´ö xx _initsrcwindoww_filtermenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowdw_2borderstyledwobjectcommandbuttoncb_cancelfontcharsetfontpitchfontfamilycb_selectdw_1transactionmessagedragobjectpointer”˙˙˙˙@˙˙˙˙!@˙˙&@˙˙DAT*śö1@˙˙=@˙˙J@˙˙[@˙˙e@˙˙s @˙˙ @˙˙“ @chf˙˙Ÿ al@ent˙˙Ż n@wind˙˙źob@st_˙˙Égl@eedi˙˙Řt@ase˙˙än@ode˙˙ďindrag˙˙ô@˙˙@˙˙ ľ@@˙˙;ź˙˙!@8˙˙-ro@) ă!˙˙7@˙˙B˙˙Lufě!˙˙Q@˙˙]DAT*¸ö<@˙˙e ni@ntwi˙˙p"se@𠅀ခ€€€€€Ŕ ˙˙~^  0*€€˙˙žy%€€˙˙-€€˙˙-€€˙˙žy%  d  Ş,¤…8Ş680…($¤DAT*şö… ΀,Ď΀ĎÎ€Ď ŠŠŠŠ ΀,Ď €€1‹},0$1ĽŽ@$1)T8\$<8d6)t8|$<8„80)8˜$<8 80)°8¸$<8Ŕ80)Č8Đ$<8Ř6)ä8ě$<8ô6)8$<8)DAT*Îö8ŠŠŠŠ ΀,Ď Ŕ€1<R‹}Ź Î€,Ď,6NtšŹĆčN‚ ś!č"#H$n%Š'Ž(žd~ is_headingis_col_nameis_data_typels_app_titlels_table_namell_col_idli_countergs_app_titlesqlcaheadingcursorČ˙˙ ˙˙ ˙˙ ˙˙, ˙˙9 ˙˙G˙˙Q˙˙\@˙˙iDAT*žöBase datawindow in freeform styleforward global type u_dw_freeform from datawindow end type end forward global type u_dw_freeform from datawindow int Width=517 int Height=360 int TabOrder=1 boolean Border=false event dwnprocessenter pbm_dwnprocessenter event mousemove pbm_mousemove event add_row pbm_custom01 event delete_row pbm_custom02 event first_row pbm_custom03 event prev_row pbm_custom04 event next_row pbm_custom05 event last_row pbm_custom06 event type integer row_pasted DAT*Ŕö( ) end type global u_dw_freeform u_dw_freeform type variables boolean ib_obj_modified; end variables forward prototypes public function boolean uf_is_modified () public function boolean uf_check_required () end prototypes event dwnprocessenter;Send(Handle(This), 256, 9, Long(0,0)) return 1 end event public function boolean uf_is_modified ();// return true if there are any modified or deleted rows // or if the dataindow does not pass validations if this.accepttext() = -1 theDAT*Âön return true return this.modifiedcount() > 0 or this.deletedcount() > 0 end function public function boolean uf_check_required ();// check to see if all required fields have been entered // position the user to the row and column in error long row window parent_win integer col string colname row = 1 col = 1 // Loop to find all instances DO WHILE row <> 0 // Check to be sure the function worked. if this.FindRequired(primary!,row,col,colname,TRUE) < 0 then exit // If roDAT*Äöw is not 0, a required row,column was found without a value. // Display a message. if row <> 0 then parent_win = parent MessageBox(parent_win.title,"Required Value Missing for "+ colname +" on row " + string (row)+'. Please enter a value.',stopsign! ) // Make the column and row without a value current. this.SetColumn(col) this.SetRow(col) this.ScrollToRow(row) return false end if // This row and column was ok, increment the column to check this // row in the next colDAT*Ćöumn. col++ LOOP return true end function event dberror;string ls_db_err_txt, ls_field_name, ls_table_name long ll_db_err, ll_left_pos, ll_mid_pos, ll_right_pos //*** Updated obsolete code (10-15-97 MDY) //ll_db_err = DBErrorCode(This) //ls_db_err_txt = DBErrorMessage() ll_db_err = sqldbcode ls_db_err_txt = sqlerrtext // comment this messagebox out // if SetActionCode to 0 (display default message) // -196 is Watcom database error number if ll_db_err = -196 then DAT*Čö // If it is the integrity constraint error for unique index violation, // overwrite the default database error with costomize error message ll_right_pos = Pos(ls_db_err_txt, "' would not be unique") ll_left_pos = Pos(ls_db_err_txt, "UNIQUE (") if ll_left_pos = 0 then ll_left_pos = Pos(ls_db_err_txt, "index '") ll_mid_pos = Pos(ls_db_err_txt, "' for table '") ls_field_name = Mid(ls_db_err_txt, ll_left_pos + 7, & ll_mid_pos - (ll_left_pos + 7)) ls_table_name = Mid(ls_db_errDAT*Ęö_txt, ll_mid_pos + 13, & ll_right_pos - (ll_mid_pos + 13)) else ll_mid_pos = Pos(ls_db_err_txt, ")' for table '") ls_field_name = Mid(ls_db_err_txt, ll_left_pos + 8, & ll_mid_pos - (ll_left_pos + 8)) ls_table_name = Mid(ls_db_err_txt, ll_mid_pos + 14, & ll_right_pos - (ll_mid_pos + 14)) end if if ls_table_name = 'rap_location_coordinat' then MessageBox("Save", "Only one location coordinate group is allowed." + & "~r~nNo changes made to database."DAT*Ěö) else MessageBox("Save", "Duplicate record with same " + ls_field_name + & " found.~r~nNo changes made to database.") end if else // Replace default error message with this customized message MessageBox("Database ErrorCode: " + String(ll_db_err), & ls_db_err_txt) // Check for a lost connection in Oracle if gs_database = 'ORACLE' then f_oracle_connection(ll_db_err) end if end if // Do not display the default message //*** Updated obsolete code (10DAT* -15-97 MDY) //SetActionCode(This, 1) return 1 end event on itemchanged;ib_obj_modified = TRUE end on on editchanged;ib_obj_modified = TRUE end on DAT*Đö@€˙˙o@€>$ AG RAPIDSRAPIDSis_table_name/˙˙dw_18-€insertrow(ŔH8-€fieldsetitemPŔj8-€operatorPŔj8-€select_value1PŔj8-€logicalPŔj8-€data_typePŔj8-€column_namePŔj8-€column_id)OŔj( 0 @ T \ t |  ˜ ° ¸ Č Đ ä ě    Ž,$6…DAT*–ö,$6…΀,Ď΀($Ď ŠŠŠŠÎ€,Ď ¸€1‹},0$1Ľr@$1)T8\$<8d6)t8|$<8„80)8˜$<8 80)°8¸$<8Ŕ80)Č8Đ$<8Ř6)ä8ě$<8ô6)8$DAT*ÔöŚg@¸)b?;ąţA"g@€g@€‰0X@X@<c@c@I@@U@@a@@k@@v@@€@@Œ^@^@˛S@S@ť8@8@ěƒ@ƒ@ő`@`@˙j@j@ k@k@l@l@-m@m@9€@€@I‘@‘@V¤@¤@c¸@¸@€ž8 u_emis_period_no_end_dateu_emis_perioduserobjectswindowobjectborderstylefontcharsetfontpitchfontfamilyalignmentfillpatternpowerobjectMS Sans SerifEnd:Start:teDAT*Ööxtcasemaskdatatype˙˙ ˙ mmm dd, yyyyí˙đ?jan 1, 1900~dec 31, 2100~DE˙˙˜źÂt Teđ?JAN 1, 1900~DEC 31, 2100Interval:Yearlys ˙˙ Řtž{€Emission Period€ „h˝checkboxstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfo€ źˇInclude recorDAT*Řöds with no end dateČ$P„Ät2" u_emis_period_no_end_date˙˙ €  +create+destroy Q x _initsrcu_emis_periodu_emis_period_no_end_dateuserobjectswindowobjectborderstyleu_emis_period`st_3st_3fontcharsetfontpitchfontfamilyalignmentfillpatternpowerobjectu_emis_period`st_2st_2u_emis_period`em_endem_endtextcasemaskdatatypeu_emis_period`em_startem_stDAT*Úöartu_emis_period`st_1st_1u_emis_period`ddlb_intervalddlb_intervalu_emis_period`gb_1gb_1checkboxcbx_withnoenddatestructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfo  ˙˙oniod˙˙ m@be e˙˙n Date˙˙9@$€˙˙E@T˙˙R@˙˙^˝€€˙˙q8Ă˙˙v @˙˙‚@dö ˙˙ŒŞ@˙˙—Ž@˙˙Ą DAT*Üö@tSiz˙˙­ We@=700˙˙šac€e="M˙˙ĚifontF˙˙ŃFa€=Swi˙˙ćitontP˙˙í bl@end ˙˙ö @Ď˙˙€˙˙ ˙˙# €˙˙6 ˙˙; €˙˙W ă!˙˙e€˙˙x˙˙} @ě!˙˙†˙˙˜<@˙˙˘@id˙˙°@ME˙˙ź@”˙˙Đ@€˙˙Ü@˙˙ě@˜˙˙ůDAT*Ţö@˙˙@đ …€€ €€€€ €€€€ €€€€ €€€€ €€€€ €€€€ €!€€€€€Ŕ˙˙2' )!€€˙˙. €€˙˙. €€˙˙G900€€˙˙G900€€˙˙.DAT*ŕö €€˙˙G7%%€€˙˙%€€˙˙-v€8$*,‡<$š‹}D1<RŻĐL$‡(Dd icurrent˙˙T( createcbx_withnoenddate(€€control4c@4c@(€$ ,< D L &€8$$dDAT*âö , destroycbx_withnoenddate(€$ €€2  +create+destroy(˙˙Ŕ˙˙Ŕ2 ' widthheightcbx_withnoenddate<˙˙ň˙˙˙˙ €] oň @@€t€1€ÔĐČ    DAT*äö@€ Ŕ€  € € € € € € € €˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙2  2  ] oi,ŠH ř˙˙˙ź@€ľ €ľ €˜€ €ÔĐČŚ€ź € €@€źDAT*ćö2  2  ] o[źˇH ř˙˙˙ź@€  €  €˜€ €ÔĐČŤ€Ŕ € €@€ŔL$,2  2  ] o(÷T Eř˙˙˙ź€Á €DAT*čöÁ €˜€ @@ @ €€Ȁ1€@ż€đ€ż €€L$,2  2  ] o´÷T Eř˙˙˙ź€ż €ż €˜€ @@DAT*üö @ €€$€1€@Ŕ€đ€Ŕ P€X€2  2  ] oP÷H ř˙˙˙ź@€Ŕ €Ŕ €˜€ €ÔĐČq€  € €@€ DAT*ěöBase datawindow in tabular styleforward global type u_dw_list from datawindow end type end forward global type u_dw_list from datawindow int Width=517 int Height=360 int TabOrder=1 BorderStyle BorderStyle=StyleLowered! boolean HScrollBar=true boolean VScrollBar=true boolean HSplitScroll=true boolean LiveScroll=true event dwnprocessenter pbm_dwnprocessenter event mousemove pbm_mousemove event add_row pbm_custom01 event delete_row pbm_custom02 event first_row pbm_custom03 event pDAT*îörev_row pbm_custom04 event next_row pbm_custom05 event last_row pbm_custom06 event type integer row_pasted ( ) end type global u_dw_list u_dw_list type variables boolean ib_obj_modified; end variables forward prototypes public function boolean uf_check_required () public function boolean uf_is_modified () end prototypes event dwnprocessenter;Send(Handle(This), 256, 9, Long(0,0)) return 1 end event public function boolean uf_check_required ();// check to see if all required DAT*đöfields have been entered // position the user to the row and column in error long row window parent_win integer col string colname row = 1 col = 1 // Loop to find all instances DO WHILE row <> 0 // Check to be sure the function worked. if this.FindRequired(primary!,row,col,colname,TRUE) < 0 then exit // If row is not 0, a required row,column was found without a value. // Display a message. if row <> 0 then parent_win = parent MessageBox(parent_win.title,"Required VaDAT*ňölue Missing for "+ colname +" on row " + string (row)+'. Please enter a value.',stopsign! ) // Make the column and row without a value current. this.SetColumn(col) this.SetRow(col) this.ScrollToRow(row) return false end if // This row and column was ok, increment the column to check this // row in the next column. col++ LOOP return true end function public function boolean uf_is_modified ();// return true if there are any modified or deleted rows // or if the datDAT*ôöaindow does not pass validations if this.accepttext() = -1 then return true return this.modifiedcount() > 0 or this.deletedcount() > 0 end function event dberror;string ls_db_err_txt, ls_field_name, ls_table_name long ll_db_err, ll_left_pos, ll_mid_pos, ll_right_pos //*** Updated obsolete code (10-15-97 MDY) //ll_db_err = DBErrorCode(This) //ls_db_err_txt = DBErrorMessage() ll_db_err = sqldbcode ls_db_err_txt = sqlerrtext // comment this messagebox out // if SetActionCode to 0 DAT*öö(display default message) // -196 is Watcom database error number if ll_db_err = -196 then // If it is the integrity constraint error for unique index violation, // overwrite the default database error with costomize error message ll_left_pos = Pos(ls_db_err_txt, "UNIQUE (") if ll_left_pos = 0 then ll_left_pos = Pos(ls_db_err_txt, " index '") ll_mid_pos = Pos(ls_db_err_txt, "' for table '") else ll_mid_pos = Pos(ls_db_err_txt, ")' for table '") end if ll_right_pos = PDAT*řöos(ls_db_err_txt, "' would not be unique") ls_field_name = Mid(ls_db_err_txt, ll_left_pos + 8, & ll_mid_pos - (ll_left_pos + 8)) ls_table_name = Mid(ls_db_err_txt, ll_mid_pos + 14, & ll_right_pos - (ll_mid_pos + 14)) if ls_table_name = 'rap_location_coordinat' then MessageBox("Save", "Only one location coordinate group is allowed." + & "~r~nNo changes made to database.") else MessageBox("Save", "Duplicate record with same " + ls_field_name + & " found.~r~nNo changes mDAT*úöade to database.") end if else // Replace default error message with this customized message MessageBox("Database ErrorCode: " + String(ll_db_err), & ls_db_err_txt) // Check for a lost connection in Oracle if gs_database = 'ORACLE' then f_oracle_connection(ll_db_err) end if end if // Do not display the default message //*** Updated obsolete code (10-15-97 MDY) //SetActionCode(This, 1) return 1 end event on rowfocuschanged;long ll_clicked_row long ll_selected_DAT*ârow ll_clicked_row = GetRow(This) if ll_clicked_row > 0 then ll_selected_row = GetSelectedRow(this, 0) // Un-highlighted the previous selected row and highlight the new // selected row if ll_selected_row > 0 and ll_selected_row <> ll_clicked_row then SelectRow(This, ll_selected_row, FALSE) end if SelectRow(This, ll_clicked_row, TRUE) end if end on on itemchanged;ib_obj_modified = TRUE end on on editchanged;ib_obj_modified = TRUE end on DAT*ţöL$2  2  ] oD÷Đ  Eř˙˙˙ź@€ľ €ľ €˜€ @@ @@„€1€2  2  widthheighttext<˙˙×˙˙ô˙˙œ€] o DAT*ţö×ô ř˙˙˙ź€ € €˜€ €ÔĐČ@œ€€2  2  xywidthheightbringtotoptextborderstylerighttolefttextcolorbackcolortextsizeweightfacenamefontcharsetfontfamilyfontpitch@˙˙%˙˙ ˙˙ Ž˙˙L˙˙˙˙$€˙˙)DAT*öŚp@ł)b?;ąţAp@p@tp@€éq”@”@a!\@\@q,[@[@a8c@c@1EU@U@aV`@`@q`j@j@ank@k@zl@l@Žm@m@š€@€@Ş‘@‘@ˇ¤@¤@ĸ@¸@Ó^@^@Ą@Ą@@@A#@@-@@8S@S@A@@M„@„@€Ď#`@€Ův@v@Ů„€€ád@d@ě w_get_stringwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmenDAT*ötmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€ P singlelineeditfontcharsetfontpitchfontfamilytextcaseborderstylecommandbuttonUntitled€ (Hž€ H¡ MS Sans SerifCancelOKstr_parmsmessagedragobjectŕdŒ2 w_get_string˙˙ €( +open+create+destroy+clickDAT*öed LQ xp _initsrcwindoww_get_stringmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectsinglelineeditsle_strfontcharsetfontpitchfontfamilytextcaseborderstylecommandbuttoncb_cancelcb_okstr_parmsmessagedragobjectl˙˙˙˙@ˇ˙˙˙˙%@˙˙*DAT*ö@˙˙5 @ ˙˙A@˙˙N@€˙˙_@˙˙iŔ@˙˙w @€˙˙ƒ Ŕ@˙˙— @mily˙˙Ł f@atte˙˙ł it@em_˙˙Ŕse@kdat˙˙Íta@t_1˙˙Üst@ddlb˙˙čgr@oxg˙˙÷jeessa˙˙˙@˙˙ @˙˙@˙˙ ls@nd t˙˙) @ ˙˙5@˙˙ă!˙˙C˙˙M˙˙S˙˙@ě!˙˙]@DAT* ö˙˙e<@đ …€Ą€€€€€Ŕ˙˙wW .*€€˙˙;-##€€˙˙-€€˙˙-üŠ,$ˆ$1Ż=6…8$Şr0$D:S@‰Ţ8LŞŞP$X:S@‰Ţ8`ŞŢd$l:S@‰€DAT* ö”$1Ż=}œ$Ź´$}ź$ĚÔ$1Ż=6…äě$1Ż=6…ô$}ü$—<ĹÜ$—‹}1<ĹJ1(<`‹}$$,$14$@$<`<Y‹}P$X`$h$p$x$5€@k@Vˆ$$@]5˜DAT*ö]}Ź$´ź$Ä$Ě$Ô$5ŕ@k@V5čV})8‡$$$<<Y5 Ik@V}1 <ŃŘ1 ‹}($0$@$<<Y5HIk@V}1 <ŃN1 ‹})X8`$)t8|$1F„$Œ$—F) 8,•DAT*öâ1đ,¨$:Nn† Ś!ž'Ţ(+,/b0Ž5˘7Ü8đ9:f;ć?JBbC˛DŘE(GNJhL„MČdM ls_char_caselw_fatherli_xli_yli_max_widthparmmessage::message ˙˙ ˙˙ €˙˙˙˙$˙˙)˙˙6 €˙˙;@€˙˙C@€°đ ˙˙ ^@string_argUsle_str&*€textcase8S@L&DAT*ö*€8S@A&*€8S@ii_max_lent-integer_argˆ&*€limit‰¤t-&*€textÄtitleÜ t-Ü Ü width &*€  &*€x‚@<cb_ok‚@H,€<&*€<&*€ @H,€ 9@cb_cancelô +€<&*€<&*€ @9@parentwindowPŔđ˙˙˙˙ @˙˙˙˙height8DAT* ö@move?ŔP&*€setfocus<Ŕh&*€&*€Äselecttext9Ŕ”˙˙  0 D P X d l € ” œ Ź ´ ź Ě Ô ä ě ô ü    $ , 4 @ P X ` h p x €ˆ  ˜Ź ´ ź Ä Ě Ô ŕč     DAT*" ö)81˙˙˙˙<Ľ*9),81Ĺ)D81Ĺ"*d L accepttext€źŔmodifiedcount*Ŕdeletedcount˙çŔ4 , D f6…1<˙˙˙Ľě 8źÄľ@˝Ä8 1ĽŹ 8źÄľ@˝Ä8 8źÄľ@˝Ä8Đ 8(źÄľ@˝Ä8 87źÄľ@˝Ä8DAT*öŚp@ł)b?;ąţAp@p@p@€‰”@”@\@\@&[@[@ń2c@c@ń?U@U@ńP`@`@ńZj@j@ńhk@k@tl@l@ˆm@m@a”€@€@¤‘@‘@ą¤@¤@ž¸@¸@Í^@^@an@€p@@…@…@˙˙€T w_listwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectDAT*ö€ „Z˝u_dw_listborderstyledwobjectUntitled€  A Ü,2 w_list˙˙ € +create+destroy Q x _initsrcwindoww_listmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectu_dw_listdw_1bDAT*"öorderstyledwobject¸ ˙˙rcawin˙˙is@rder˙˙jetruc˙˙ec@nte˙˙$m@iled˙˙/m@essa˙˙;do@ldl˙˙Hm@view˙˙Yct@nfo˙˙ct@owd˙˙q ss@€˙˙} @˙˙˙˙˙˙‘ @if l˙˙ _r@ 0 a˙˙­ ct@ow <˙˙şed@ the˙˙Çec@(Thi˙˙Öct@ow, ˙˙âen@ ˙˙ěThll_c˙˙ń, @) e˙˙ý o@đ …€DAT*öObject used to select emission period and also to select records with no end dateforward global type u_emis_period_no_end_date from u_emis_period end type type cbx_withnoenddate from checkbox within u_emis_period_no_end_date end type end forward global type u_emis_period_no_end_date from u_emis_period int Width=1010 int Height=516 cbx_withnoenddate cbx_withnoenddate end type global u_emis_period_no_end_date u_emis_period_no_end_date on u_emis_period_no_end_date.create int iCurrentDAT* ö call super::create this.cbx_withnoenddate=create cbx_withnoenddate iCurrent=UpperBound(this.Control) this.Control[iCurrent+1]=this.cbx_withnoenddate end on on u_emis_period_no_end_date.destroy call super::destroy destroy(this.cbx_withnoenddate) end on type gb_1 from u_emis_period`gb_1 within u_emis_period_no_end_date int Width=983 int Height=500 string Text="" end type type cbx_withnoenddate from checkbox within u_emis_period_no_end_date int X=37 int Y=400 int Width=942 iDAT*snt Height=76 boolean BringToTop=true string Text="Include records with no end date" BorderStyle BorderStyle=StyleLowered! boolean RightToLeft=true long TextColor=8388608 long BackColor=80269524 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontCharSet FontCharSet=Ansi! FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type DAT*&ö€€€Ŕ˙˙wW +*€€˙˙Š{.@*‡(0$˛€ |d 8 dw_1A *€€control c@*€ ( 0 $d  dw_1 *€ €€2  +create+destroy(˙˙Ŕ ˙˙Ŕ2 [DAT*ŹöŚp@ś)b?=ąţAp@p@2p@€éq”@”@a\@\@q([@[@a4c@c@AU@U@R`@`@a\j@j@qjk@k@vl@l@Šm@m@q–€@€@qŚ‘@‘@ł¤@¤@Ŕ¸@¸@Ď^@^@an@n@`@@a…@…@€U@fv@v@f˙˙€€@np@€ n˙˙€€@v w_splashwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawiDAT*(ö xywidthheighttitlebartitlebackcolorcontrolmenuminboxmaxboxresizabledw_1đ˙˙Ą^@˙˙ ˙˙ .^@˙˙á ˙˙^@˙˙"#€˙˙(ŔŔŔ^@˙˙2Ŕ˙˙>Ŕc@˙˙EŔ˙˙LŔd@˙˙V €] oĄ .á€#€  €ŔŔŔŔ€€€DAT*4 ö€,€1€ŔŔŔ  @@€@ €˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ś-ˇ&ż/͞Ő<2  2  xywidthheightP ˙˙sw˙˙ }wi˙˙ üte˙˙] os}üDAT*,öŚp@´)b?;ąţA1p@p@tp@€éq”@”@a\@\@1'[@[@13c@c@1@U@U@aQ`@`@a[j@j@aik@k@aul@l@‰m@m@a•€@€@aĽ‘@‘@˛¤@¤@ż¸@¸@Î^@^@aĄ@Ą@@@a@@a)@@ń4S@S@q=@@aI‚@‚@T@@q^@@aj‡@‡@`ô„@„@Ptr€s6sa AF@F@Iq@q@Uú,€=[_ah4p@€h˙˙-€t2p@€tŒ.€}v@v@}ŕ/€DAT*.ö…d@d@œŔ˙˙r§ie˛@ÁŔ˙˙Œ<”"p@€i”ě!1€Ÿp w_logonwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€ Ŕsinglelineeditfontcharsetfontpitchfontfamilytextcaseborderstylestatictextalignmentfillpatterndropdownlistbox˙˙DAT*0ö hXś˙˙ Ŕ˙˙ hXścommandbuttonUser Log On€  Ŕ€ ”ŻMS Sans SerifDBMS:˙˙ `˙˙  Ŕ˙˙ `Logon ID:Database Name:Server:Profile Name:CancelOKPassword:Systemgs_inifilepointertransactionsqlcags_app_titlew_splash_agDAT*2öw_splashmessagedragobjectgs_databasef_db_errorgs_user_idgs_master_usergf_db_message, select arg_role from rapids.appl_role_grants_v role_cursor˙˙˙˙ €˙˙˙˙ڀЀ˙˙;ąţAP€˙˙˙˙˙˙˙˙˙˙˙˙˙˙;ąţAgs_rolew_mdi_mainÜ|¤Ě8tœÄĐ Ö P T 2 w_logon˙˙ €[ wf_add_to_profilewDAT*4öf_save_profile+close+open+create+destroy+modified+clicked QL x* _initsrcwindoww_logonmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectsinglelineeditsle_dbmsfontcharsetfontpitchfontfamilytextcaseborderstylestatictextst_5alignmentfillpatterndropdownlistboxddlb_databaseddlb_serverddlb_profilest_4sDAT*6öt_3st_2st_1commandbuttoncb_cancelcb_okst_passwordsle_passwordsle_logidpointertransactionw_splash_agw_splashmessagedragobjectw_mdi_mainč ˙˙rcawin˙˙re@mbo˙˙dwcts˙˙ ai@ipie˙˙%me@ailf˙˙0ti@ailm˙˙<aw@wchi˙˙Iwi@tree˙˙Zon@ioni˙˙dbj@wind˙˙r r@age˙˙~ m@ge˙˙˙’ á˙@…˙˙ž @0˙˙Ž @0˙˙ťë@8˙˙Č`@˙˙×DAT*8öj@…˙˙ă8@0˙˙ňź˙˙ű@˙˙@˙˙ľ@@˙˙@;ź˙˙%@8˙˙1@ă!˙˙<˙˙A@˙˙K@ě!˙˙W@˙˙g<˙˙uid˙˙€ME˙˙Žurn ˙˙“ cwith˙˙˜ pa,sle˙˙ on ˙˙˘@˙˙° p@p@˙˙ş N˙˙O˙˙Ŕ p@p@˙˙ĚS˙˙T˙˙ŮDAT*:öp@p@˙˙ăX@˙˙Y˙˙ëp@@p@˙˙÷"]@˙˙^˙˙$p@@p@˙˙ &˙˙@™˙˙(n@&˙˙/@𠅀ခ€€€€ €!€"€#€$€&€'€(€)€*€€Ŕ˙˙yY :*€€;-##€€DAT*<ö. €€˙˙G7%%€€˙˙G7%%€€˙˙G7%%€€. €€. €€. €€. %€€˙˙-%€€˙˙-€€. €€˙˙;-##€€˙˙;-##Œ,6808080źëľ@˝ë8…DAT*>ö,680808z%8z&0$@$z&8z&źľ@˝8,6:@:@:@:]@ź:ľ@˝:8}80źAľ@˝A88HT$\$z%8dz&źAľ@˝A88fx$€$z%źAľ@˝A88ˆ $¨$z%źAľ@˝A88°Č$Đ$z%źAľ@˝A8Ř$ŕ$8čŞĐ8í$$DAT*~öz%źAľ@˝A88($0$z%źAľ@˝A8880źAľ@˝A88?0źAľ@˝A8n8í0źAľ@˝A880źAľ@˝A888H$P$z%źAľ@˝A88?0źAľ@˝A8ź/ľ@˝/8@ Ź ćJ‚şňPˆŞĚĐňLnd# pstringfilenumgs_inifile<˙˙ ˙˙DAT*BöSelects entry as user types charactersforward global type u_selection_list from UserObject end type type st_err_msg from statictext within u_selection_list end type type dw_2 from datawindow within u_selection_list end type type st_1 from statictext within u_selection_list end type type dw_1 from datawindow within u_selection_list end type type sle_find from singlelineedit within u_selection_list end type end forward global type u_selection_list from UserObject int Width=2770 intDAT*Dö Height=1223 boolean Border=true long BackColor=12632256 long PictureMaskColor=25166016 long TabTextColor=33554432 long TabBackColor=67108864 event entry_chosen pbm_custom01 st_err_msg st_err_msg dw_2 dw_2 st_1 st_1 dw_1 dw_1 sle_find sle_find end type global u_selection_list u_selection_list type variables long il_selected_row; string is_filt; string is_select_from_list; string is_col_name; end variables forward prototypes public subroutine uf_create_ddlb () public suDAT*Föbroutine uf_filter () public function string uf_return_selected () public subroutine uf_unfilter () public function boolean uf_create_datawindow (transaction ptran_obj, string ps_select_statement, string ps_cur_code) end prototypes on entry_chosen;//selectedValue = wf_return_selected() end on public subroutine uf_create_ddlb ();string ls_cols[], ls_label, ls_tmp, ls_vis, ls_col_name, ls_col_id integer li_num_cols, li_cur_col_num, li_cnt DataWindowChild dwc if dw_2.GetChild("col",DAT*Hö dwc) = -1 then MessageBox("Application Error - uf_create_ddlb", & "col - Not a DataWindowChild.~nContact your technical support.") return end if li_num_cols = f_dw_get_objects_attrib(dw_1,ls_cols,'column','*','visible') li_cnt = 1 for li_cur_col_num = 1 to li_num_cols ls_col_name = f_get_token(ls_cols[li_cur_col_num],'~n') // Get the column name ls_col_id = dw_1.Describe(ls_col_name+".id") // Get the column id ls_vis = f_get_token(ls_cols[li_cur_col_num],'~n') // is it visiDAT*Jöble if ls_vis = '1' then // if not visible then do not allow sorting on it ls_label = dw_1.describe(ls_col_name+"_t.text") if ls_label = '!' then // ls_label not found to use the column name ls_tmp = "evaluate('wordcap(~""+ls_col_name+"~")',1)" // make it pretty ls_label = dw_1.describe(ls_tmp) end if dwc.InsertRow(0) dwc.SetItem(li_cnt, 'column_label', ls_label) dwc.SetItem(li_cnt, 'column_name', ls_col_name) dwc.SetItem(li_cnt, 'column_id', ls_col_id) li_cnt++ DAT*Lö end if next dw_2.InsertRow(0) is_col_name = dwc.GetItemString(1, "column_name") dw_2.SetItem(1, "col", is_col_name) end subroutine public subroutine uf_filter ();string ls_filter_pattern, ls_filter_exp DataWindowChild dwc sle_find.Text = '' st_err_msg.Visible = FALSE // Get the handle of the child datawindow if dw_2.GetChild("col", dwc) = -1 then MessageBox("Application Error - uf_filter", & "col - Not a DataWindowChild.~nContact your technical support.") return end iDAT*Nöf // Open the dialog box for filter criteria ls_filter_pattern = f_get_string("Please enter filter criteria for " + & Upper(dwc.GetItemString(dwc.GetRow(), "column_label")), 50, "A", "") // If user enters the filter criteria, construct the filter expression // and perform the filter function. Filter is case-insensitive. if Not IsNull(ls_filter_pattern) then SetPointer(HourGlass!) ls_filter_exp = "Match(Upper(#" + dwc.GetItemString(dwc.GetRow(), "column_id") + & "), Upper('" + DAT*Pöls_filter_pattern + "'))" dw_1.SetFilter(ls_filter_exp) dw_1.Filter() end if end subroutine public function string uf_return_selected ();// String Function RETURN_SELECTED () in U_SELECTION_LIST string ls_ret_val if il_selected_row > 0 then ls_ret_val = GetItemString(dw_1, il_selected_row, 1) else SetNull(ls_ret_val) end if return ls_ret_val end function public subroutine uf_unfilter ();SetPointer(HourGlass!) sle_find.Text = '' st_err_msg.Visible = FALSE dw_DAT*Rö1.SetFilter('') dw_1.Filter() end subroutine public function boolean uf_create_datawindow (transaction ptran_obj, string ps_select_statement, string ps_cur_code);// Function: uf_create_datawindow // // Purpose: To create datawindow dynamically // // Scope: public // // Parameters: // ptran_obj (transaction/value) - contains the transaction object // ps_select_statement (string/value) - contains the sql statement for // the data source of the datawindow // ps_cur_coce (string/vaDAT*Tölue) - contains the default lookup value // // Return: boolean - TRUE denotes datawindow create successfully; // FALSE if it failed. // // Log: // Date Who What // -------- ----- ------------------- // Initial version from PowerSoft // Modified by Radian string ls_dw_syntax, ls_create_err, ls_style, ls_token, ls_col_name int li_total_col, li_col_cnt, li_width long ll_p, ll_row_number, ll_found_row int li_number_of_columns, li_column_index Reset(dw_1) ls_stDAT*Vöyle = "datawindow(units=2) style(type=grid) " + & "column(font.face='MS Sans Serif' font.weight=700 font.height=-8) " + & "text(color=8388608 font.face='MS Sans Serif' font.weight=700)" ls_dw_syntax = & SyntaxFromSQL (ptran_obj, ps_select_statement, ls_style, ls_create_err) if Len(ls_dw_syntax) > 0 then if Create (dw_1, ls_dw_syntax, ls_create_err) = -1 then MessageBox ("Error", "Error creating DataWindow: " + ls_create_err) return FALSE end if SetTransObject (dw_1,DAT*Xö ptran_obj) SetSort (dw_1, "1A") li_number_of_columns = integer(dw_1.Describe("datawindow.column.count")) li_column_index = 0 do while li_column_index < li_number_of_columns li_column_index = li_column_index + 1 SetTabOrder (dw_1, li_column_index, 0) // Protect column loop // SetTabOrder (dw_1, 1, 0) // Protect the first column // SetTabOrder (dw_1, 2, 0) // Protect the second column // SetTabOrder (dw_1, 3, 0) // Protect the third column // SetTabOrder (dw_1,DAT*Zö 4, 0) // Protect the forth column Retrieve (dw_1) // Create dropdowndatawindow uf_create_ddlb() // If the lookup value exists before opening the lookup window, // then move to the row which matches the lookup value if Not (IsNull(ps_cur_code) or ps_cur_code = '') then sle_find.Text = ps_cur_code sle_find.PostEvent(Modified!) else // Clear out anything left from previous use of this UO il_selected_row = 0 is_filt = "" end if else MessageBox ("Error", "ErroDAT*\ör creating DataWindow: " + ls_create_err) return FALSE end if return TRUE end function on u_selection_list.create this.st_err_msg=create st_err_msg this.dw_2=create dw_2 this.st_1=create st_1 this.dw_1=create dw_1 this.sle_find=create sle_find this.Control[]={ this.st_err_msg,& this.dw_2,& this.st_1,& this.dw_1,& this.sle_find} end on on u_selection_list.destroy destroy(this.st_err_msg) destroy(this.dw_2) destroy(this.st_1) destroy(this.dw_1) destroy(this.sle_find) eDAT*^önd on type st_err_msg from statictext within u_selection_list int X=1124 int Y=1149 int Width=1618 int Height=71 boolean Visible=false boolean Enabled=false string Text="not found" boolean FocusRectangle=false long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type dw_2 from datawindow within u_selection_list int X=178 int Y=7 int Width=754 int HeDAT*`öight=93 int TabOrder=30 string DataObject="d_find_col" boolean Border=false end type event itemchanged;DataWindowChild dwc string ls_sort_list if dw_2.getChild("col", dwc) = -1 then MessageBox("Application Error", "col - Not a DataWindowChild" + & "~nContact your technical support.") return end if is_col_name = dwc.GetItemString(dwc.GetRow(), "column_name") // Sort the datawindow based on the selected column ls_sort_list = is_col_name + " A" dw_1.SetSort(ls_sort_list) DAT*bödw_1.Sort() // Clear out anything left from previous use sle_find.Text = '' SelectRow (dw_1, il_selected_row, FALSE) il_selected_row = 0 is_filt = "" end event type st_1 from statictext within u_selection_list int X=4 int Y=29 int Width=168 int Height=61 boolean Enabled=false string Text="Find:" Alignment Alignment=Right! boolean FocusRectangle=false long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FonDAT*dötFamily=Swiss! FontPitch FontPitch=Variable! end type type dw_1 from datawindow within u_selection_list int X=22 int Y=132 int Width=2713 int Height=1005 int TabOrder=20 BorderStyle BorderStyle=StyleLowered! boolean HScrollBar=true boolean VScrollBar=true boolean HSplitScroll=true end type event clicked;// Clicked Script for dw_1 in U_SELECT_LIST SelectRow (dw_1, il_selected_row, FALSE) // Un-highlight old row st_err_msg.Visible = FALSE //Updated obsolete code (10-15-97 MDDAT*föY) //il_selected_row = GetRow(dw_1) il_selected_row = row if il_selected_row > 0 then SelectRow (dw_1, il_selected_row, TRUE) // Highlight new row sle_find.text = GetItemString(dw_1, il_selected_row, is_col_name) is_filt = sle_find.Text is_select_from_list = uf_return_selected() end if end event on rowfocuschanged;//long ll_old_selected_row // //il_selected_row = GetRow(This) // //if il_selected_row > 0 then // ll_old_selected_row = GetSelectedRow(this, 0) // // Un-hDAT*höighlighted the previous selected row and highlight the new // // selected row // if ll_old_selected_row > 0 and ll_old_selected_row <> il_selected_row then // SelectRow(This, ll_old_selected_row, FALSE) // end if // SelectRow(This, il_selected_row, TRUE) //end if // //sle_find.text = GetItemString(dw_1, il_selected_row, 1) //is_filt = sle_find.Text //is_select_from_list = uf_return_selected() end on on doubleclicked;// DoubleClicked Script for dw_1 in U_SELECT_LIST TriggerEDAT*jövent (this, Clicked!) end on type sle_find from singlelineedit within u_selection_list event key_pressed pbm_char event ue_keydown pbm_keydown int X=971 int Y=17 int Width=1682 int Height=81 int TabOrder=10 BorderStyle BorderStyle=StyleLowered! boolean AutoHScroll=false string Pointer="arrow!" long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on key_pressed;This.PostDAT*löEvent(Modified!) //// Key_Pressed Script for SLE_FIND // //string ls_ch //long ll_found_row //int li_num_chars, li_start, li_select_len // //ls_ch = Char (message.wordparm) ////messagebox("message.wordparm", string(message.wordparm)) //if message.wordparm = 8 /* backspace */ then // li_num_chars = Len (is_filt) // choose case li_num_chars // case 1 // is_filt = "" // case is > 0 // is_filt = Left(is_filt, li_num_chars - 1) // Throw away last character //DAT*nö end choose //else // if This.SelectedText() <> '' then // li_start = This.SelectedStart() // li_select_len = This.SelectedLength() // is_filt = Left(This.Text, li_start - 1) + ls_ch + & // Right(This.Text, Len(This.Text) - (li_start + li_select_len) + 1) // else // is_filt = is_filt + ls_ch // end if //end if // ////messagebox("is_filt", is_filt) ////messagebox("len", string(len(is_filt))) //if Len (is_filt) > 0 then // Do case-insensitive search //// ll_found_row = dDAT*pöwFind (dw_1, "Lower(#1)>=~"" + Lower(is_filt) + "~"", & //// 1, 99999) // ll_found_row = dwFind (dw_1, "Lower(" + is_col_name + ")>=~"" + Lower(is_filt) + "~"", & // 1, 99999) // if ll_found_row > 0 then // ScrollToRow (dw_1, ll_found_row) // SetRedraw (dw_1, FALSE) // SelectRow (dw_1, il_selected_row, FALSE) // SelectRow (dw_1, ll_found_row, TRUE) // SetRedraw (dw_1, TRUE) // else // Filter function did not find any matching row // Beep(1) // li_num_chars = LenDAT*rö (is_filt) // if li_num_chars > 0 then is_filt = Left (is_filt, li_num_chars - 1) // // Throw away last character // message.processed = true // // end if //else // Filter length is 0, so unhighlight former selected row // SelectRow (dw_1, il_selected_row, FALSE) //end if // //il_selected_row = ll_found_row // Remember number of highlighted row // // // end on on ue_keydown;This.PostEvent(Modified!) //string ls_selected_text //integer li_start, li_select_lDAT*töen //long ll_found_row // //if message.wordparm = 46 then // 46 is for 'delete' key // // ls_selected_text = This.SelectedText() // // if This.Text = ls_selected_text then // // // Clear out anything left from previous use // SelectRow (dw_1, il_selected_row, FALSE) // il_selected_row = 0 // is_filt = "" // // else // // li_start = This.SelectedStart() // li_select_len = This.SelectedLength() // is_filt = Left(This.Text, li_start - 1) + & // Right(This.Text, Len(This.TeDAT*vöxt) - (li_start + li_select_len) + 1) // // ll_found_row = dwFind (dw_1, "Lower(" + is_col_name + ")>=~"" + Lower(is_filt) + "~"", & // 1, 99999) // if ll_found_row > 0 then // ScrollToRow (dw_1, ll_found_row) // SetRedraw (dw_1, FALSE) // SelectRow (dw_1, il_selected_row, FALSE) // SelectRow (dw_1, ll_found_row, TRUE) // SetRedraw (dw_1, TRUE) //// else // Filter function did not find any matching row //// Beep(1) //// li_num_chars = Len(is_filt) //// if DAT*xöli_num_chars > 0 then is_filt = Left (is_filt, li_num_chars - 1) //// // Throw away last character //// message.processed = true // // end if // // il_selected_row = ll_found_row // Remember number of highlighted row // // end if // //end if end on event modified;long ll_found_row int li_num_chars, li_start, li_select_len is_filt = This.Text //messagebox("is_filt", is_filt) if Len (is_filt) > 0 then // Do case-insensitive search ll_found_row DAT*zö= find(dw_1, "Lower(" + is_col_name + ")>=~"" + Lower(is_filt) + "~"", & 1, dw_1.RowCount()) if ll_found_row > 0 then if Lower(is_filt) <> & Lower(Left(dw_1.GetItemString(ll_found_row, is_col_name), & Len(is_filt))) then SelectRow (dw_1, il_selected_row, FALSE) ll_found_row = 0 st_err_msg.Text = is_filt + ' not found' st_err_msg.Visible = TRUE else st_err_msg.Visible = FALSE ScrollToRow (dw_1, ll_found_row) SetRedraw (dw_1, FALSE) DAT*|ö SelectRow (dw_1, il_selected_row, FALSE) SelectRow (dw_1, ll_found_row, TRUE) SetRedraw (dw_1, TRUE) end if else // Filter function did not find any matching row SelectRow (dw_1, il_selected_row, FALSE) ll_found_row = 0 st_err_msg.Text = is_filt + ' not found' st_err_msg.Visible = TRUE // Beep(1) // li_num_chars = Len (is_filt) // if li_num_chars > 0 then is_filt = Left (is_filt, li_num_chars - 1) // // Throw away last character // message.proDAT*cessed = true end if else // Filter length is 0, so unhighlight former selected row SelectRow (dw_1, il_selected_row, FALSE) st_err_msg.Visible = FALSE end if il_selected_row = ll_found_row // Remember number of highlighted row end event DAT*€ö˙˙@X profileprofiles'','ddlb_profile . €text8[profile . €8]dbms=sle_dbmsl*€8servername=ddlb_server”-€8database=ddlb_databaseş,€8l*€8ODBCuserid=sle_logidő7*€8dbpass=sle_password6)€8logid=logpass=ő7*€80 @ T \ x €   ¨ Č Đ Ř ŕ   ( 0DAT*‚ö H P  (:F@źľ@˝8,68080($8$6źľ@˝8,68@08F0T$\$6źľ@˝8,68@08d0|$„$6źľ@˝8,68@08Œ0¤$Ź$6źľ@˝8´$ź$8ÄŞt,68@08É0Ü$ä$6źľ@˝8,68@08ě0$DAT*„ö$6źľ@˝8,68@08080źľ@˝8,68@08080źľ@˝82,68@08É080źľ@˝8,68@08ě080źľ@˝8,68@080 $($6źľ@˝8, 0$6…,68@08806źľ@˝8,68?08806źľ@˝8,6ź4ľ@˝4DAT*†ö8,6ź6ľ@˝68}8CP$X$z%8`z&…Šź=ľ@˝=ś8}››ş1œ˙˙˙<ľ!ŽŠź=ľ@˝=ś8}Xź/ľ@˝/81œ˙˙˙<Ľđ)t8š,68|ˆ$$z%8F0˜$ $6źľ@˝8,68|¨$°$z%8d0¸$Ŕ$6źľ@˝8,68|Č$DAT*ˆöĐ$z%8Œ0Ř$ŕ$6źľ@˝8č$đ$8ÄŞš,68|ř$$z%8É0$$6źľ@˝8,68|$ $z%8ě0($0$6źľ@˝8,68|8$@$z%8080źľ@˝8,68|H$P$z%8080źľ@˝8š,68|X$`$DAT*Šöz%8É080źľ@˝8,68|h$p$z%8ě080źľ@˝8,68|x$€$z%80ˆ$$6źľ@˝8  d Ž řBh˛ü6ptŽč!2#L$„(ź)Ţ+,2.X/„0Ş2Ž4Ć6Ú8ě;đ=P?°BC6E–GöIFK–LšNęP:dR filenumbytesreadfilelenlinedatasectionnamels_dbparmgs_inifilesqlca ˙˙DAT*Œö˙˙˙˙˙˙" ˙˙+ ˙˙7 ˙˙A@˙˙L @,€˜° profilecurrentddlb_profile. €text0sqlcadbmssle_dbmsK*€0servernameddlb_servero-€0databaseddlb_database•,€0K*€0ODBCuseridsle_logid˝Đ7*€0dbpasssle_passwordó6)€0logidlogpassĐ7*€0˙˙dbparmsas[profile @!P. €0DAT*Žö]wf_add_to_profilewŔbprofile . €0K*€0. €0o-€0. €0•,€0K*€0. €0Đ7*€0. €0ó6)€0. €0. €0. €0. €0. €0Đ7*€0( 8 T \ | „ ¤ Ź ´ ź Ü ä     ( 0 P X t ˆ  ˜   DAT*ö¨ ° ¸ Ŕ Č Đ Ř ŕ č đ ř       ( 0 8 @ H P X ` h p x € ˆ  €,!¤8Ş4,#źľ@˝8L,%źľ@˝8,'•f1t,'$04Ld4 gs_app_titlew_splash_agw_splash::messageP˙˙!@˙˙#@DAT*’ö-€˙˙!%@.€˙˙*'@/€ AG RAPIDSrr˙˙ â$),8,68408<08E0źëľ@˝ë8…8EŞĘX$68`,z%8oz&8‚z&8˛z&:)@źŽľ@˝Ž88Ň1źĹľ@˝Ĺ81ľ´1Yźoľ@˝o8…Ř$6)č8—1RYźľ@˝8…8Ň1DAT*”öźĹľ@˝Ĺ8ôđ$6)ř8,68408080źëľ@˝ë8… $61‹) 84$D,68L08R080źëľ@˝ë8…l$t,68L08|080źëľ@˝ë8…$˜,68L08 080źëľ@˝ë8…¨$°$8¸Ş Č$Đ,68L08ŘDAT*–ö080źëľ@˝ë8…ě$ô,68L08ü080źëľ@˝ë8…Ž$ ,68L08080źëľ@˝ë8…$$,68L08,080źëľ@˝ë8…,'•Č1Ö,'4$ \ p ĆĘô.R†°´Ř!F"˜#ę&<'b(´)* +\.Žd? pstringpnamecurprofilestartposgs_inifDAT*˜öile::messagex˙˙ ˙˙ ˙˙ ˙˙!˙˙*@˙˙5'@/€<Đ ddlb_profile. €setfocusŔ profileprofilesnot foundtitleO Error finding , profile section or profiles key in the ProfileString function. Contact your technical support.','h@. €additem1Ŕŕ. €1Ŕŕcurrent ty. €selectitemCŔddlb_server(-€text˙<sqlcaservernameddlb_dataDAT*šöbase],€<databasesle_dbms…*€<dbms…*€<ODBCsle_logid˝7*€<useridsle_passwordß6)€<dbpass˝7*€<logidß6)€<logpass˙˙ , X Ř č đ ř     4 D l t  ˜ ¨ ° Č Đ ě ô     $ 4 ú*‡,*4‡L*T‡hDAT*œö*p‡ˆ*‡ *¨‡¸*Ŕ‡Đ*؇č*đ‡* ‡*$‡8*@‡X*`‡t*|‡Œ”$œ$¤$Ź$´$ź$Ä$Ě$Ô$Ü$ä$ě$ô$ü$˛€ |,BXn„ š ° Ć Ü ň4dDAT*žö X sle_dbms*€€st_58$+€$€ddlb_databaseë<,€<€ddlb_server\-€\€ddlb_profileprox. €x €st_4ile˜/!€˜!€st_3€°0"€°"€st_2h@Č1#€Č#€st_1€ŕ2$€ŕ$€cb_cancelľř3&€ř&€cb_ok4'€'€st_password,5(€,(€sle_password‚@H6)€H)€sle_logid˙˙h7*€h*€control„c@*€$+€<,€\-€x. €˜/!€°0"€Č1#€ŕ2$€řDAT* ö3&€4'€,5(€H6)€h7*€ , 4L Th pˆ   ¨¸ ŔĐ Řč đ   $8 @X `t |Œ ” œ ¤ Ź ´ ź Ä Ě Ô Ü ä ě ô ü Ę$$$<$P$h$x$ˆ$˜$DAT*˘ö¨$ź$Ě$ŕ$ř$ $*8FT b p ~ Œ š¨śd p sle_dbms*€st_5€+€ddlb_database,,€ddlb_serverD-€ddlb_profileX. €st_4p/!€st_3*€0"€st_21#€st_1 2$€cb_cancel°3&€cb_ok!Ä4'€st_passwordÔ5(€sle_password€č6)€sle_logid7*€ $ < P h x ˆDAT*F ö ˜ ¨ ź Ě ŕ ř   €€€&€w€x€Fą&2 H wf_add_to_profilewf_save_profile+close+open+create+destroyx˙˙Ŕ˙˙Ŕ˙˙*Ŕ˙˙1Ŕ˙˙7Ŕ˙˙?žŔ2 Ě xywidthheighttitlebartitlebackcolorwindowtypesle_dbmsst_5ddlb_databaseddlb_serverddlb_profilest_4st_3st_2st_1cb_cancelcb_okst_passwordsle_passwordsDAT*Ü öD^†”Źd ls_ref_code ˙˙ h getitemstring5/Ŕis_ref_codeINE!Data CodeSorry! Data Code is required! 0 ` 8Š)ś81˙˙˙˙<ĽŠ8 08/8Tz%źľ@˝8,•v1„,Œ$,)¤8)¸8,)Ŕ81)Ô8,•ţ1 ,Ü$DAT*¨öŚp@´)b?;ąţA$p@p@tp@€‰”@”@\@\@)[@[@5c@c@BU@U@S`@`@]j@j@akk@k@wl@l@‹m@m@q—€@€@a§‘@‘@´¤@¤@Á¸@¸@Đ^@^@„@„@€@@A@@(@@3g@€`DX@X@P@@€€Ź%`@€Bv@v@B%€Jq@q@V˙˙&€€@\d@d@ńg!`@€pn@n@{,p@€‰{*€‚€( w_look_upwindowmenuwindowDAT*Şötypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€ đ commandbuttonfontcharsetfontpitchfontfamilyu_selection_listuserobjectsborderstyle€ čGž€ T str_lookup€ Ě­UnfilterMS Sans SerifFilter...Sort...gă!€ DAT*ŽöXé˝CancelSelectmessagetransactionsqlcadragobjectstr_sortdatawindoww_sortgs_code_valueÜ\„¸ 2 w_look_up˙˙ € ( +open+create+destroy+clicked LQ x1 _initsrcwindoww_look_upmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemcoDAT*Ęöndowchildlistviewitemtreeviewitemconnectioninfopowerobjecto2€ d3 datawindowborderstyledwobject2€ ŒWżd_splashgs_versionnumbermessagew_logonÜ$2 w_splash ˙˙ €& +open+timer+create+destroy LQ x _initsrcwindoww_splashmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailDAT*°önnectioninfopowerobjectcommandbuttoncb_unfilterfontcharsetfontpitchfontfamilycb_filtercb_sortu_selection_listuo_1userobjectsborderstyleu_selection_list`st_err_msgu_selection_list`dw_2u_selection_list`st_1u_selection_list`dw_1u_selection_list`sle_findcb_cancelcb_selectstr_lookupmessagetransactiondragobjectstr_sortdatawindoww_sort\glob˙˙dwa_co˙˙ta@ow ˙˙11int ˙˙" @TabO˙˙'ri@ataO˙˙2at@des_˙˙>oo@ BoDAT*˛ör˙˙K e@ype ˙˙\dw@a_co˙˙fta@e ˙˙t €@˙˙€ v@@ë˙˙” @˙˙  ˙˙@˙˙˙˙° @˙˙˝@˙˙Ę2@|Y ˙˙Ů@2˙˙ĺ¸@(Nś˙˙óœC¸˙˙˙@˙˙ @˙˙@˙˙ *€˙˙*8˙˙2" @ssă!˙˙C˙˙H@˙˙T @ě!˙˙`€˙˙|<€˙˙’UE€d if˙DAT*´ö˙¨ ti€ th˙˙ž sw€& t˙˙Ř giend ˙˙â hŔ˙˙ě€@P˙˙÷se@úŔ˙˙˙Pr@eStr˙˙ Fi@& ˙˙" @lb_p˙˙ t,@gid"˙˙*! s@đ …€Ą€€€€€ €€€ €€€ €€€ €€€ !€€€"€#€€Ŕ˙˙wW 1*€€˙˙-DAT*śö€€˙˙-€€˙˙-€€˙˙7+ *!€€˙˙-€€˙˙-Đ, $ˆ08$L$6…\$,d$|$6„$œ$6)ź8,•ś1Ä,Ä$Hœd messagesqlca::message<˙˙@%€˙˙@&€DAT*¸ö˙˙@%€Ě` istr_lookupparm0$€˙˙ ^@title( 0$€wintitle@uo_1T-€0$€sqlstatementl0$€current_codeŒuf_create_datawindow€6Ŕ¤˙˙  0 8 L \ d | „ œ ź Ä ę*‡0*8‡H*P‡`*h‡|*„‡˜* ‡°¸$Ŕ$DAT*şöČ$Đ$Ř$ŕ$˛€ |,BXn„d č˜ cb_unfilter*€€cb_filter$+€$€cb_sort@,€@€uo_1X-€X€cb_cancelp."€p"€cb_selectdeŒ/#€Œ#€control¨c@*€$+€@,€X-€p."€Œ/#€ 0 8H P` h| „˜  ° ¸ Ŕ Č Đ Ř ŕDAT*źö Z$($8$H$\$p$*8Fd x0 cb_unfilter*€cb_filter_f+€cb_sort0,€uo_1rt@-€cb_cancel_1P."€cb_selectd/#€ ( 8 H \ p €€&€ą&2  +open+create+destroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 ” xywidthheighttitlebaDAT*žörbackcolorcontrolmenuresizablewindowtypecb_unfiltercb_filtercb_sortuo_1cb_cancelcb_selectistr_lookupparm@˙˙˙˙ Ů˙˙ 3 ˙˙É˙˙˙˙"ŔŔŔ˙˙,Ŕ˙˙8Ŕ˙˙BŔ€˙˙M €˙˙Y €˙˙c €˙˙k €˙˙p "€˙˙z #€˙˙„$€] oŮ3 É€DAT*Ŕö   €ŔŔ€Ŕ€€¸€1€ŔŔŔ  @@€@ € € € € "€ #€$€˙˙˙˙&€ą˙˙ ˙˙˙˙€˙˙˙˙ ˙˙˙˙x€˙˙˙˙P$)$DAT*Âö8,•61D,,$d ::message˙˙@%€4 uo_1-€uf_unfilter5Ŕ˙˙ $ , "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙ź˙˙ Í˙˙ ˙˙a˙˙<˙˙"ŕ€˙˙'DAT*â öř˙˙˙˙˙0ź˙˙7é€˙˙@€˙˙K€] oźÍa< ř˙˙˙ź@€€€é€ @ŕ€˙˙˙˙"€˙˙P$)$8,•61D,,$d ::message˙˙@%€4 uoDAT*ô öX ` x € ˜ ° Ŕ Đ č    ( 0 8 $1Ĺę)08…H$Şę)X8`$x$6)ˆ8 $*¸$6Ŕź€˝ś88Č0)ä8,•1,ě$0JˆÎ ęd ls_col_name::message(˙˙ DAT*ČöŚp@´)b?;ąţAp@p@ p@€É”@”@ \@\@+[@[@q7c@c@aDU@U@aU`@`@a_j@j@ńmk@k@ńyl@l@m@m@™€@€@Š‘@‘@ś¤@¤@ø@¸@Ň^@^@‚@‚@@@@@)@@4@@1>@@aJ@@ €ŔČv@v@Č€@Đ w_mdi_clockwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmaiDAT*Ěölmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectar € đ Ŕstatictextfontcharsetfontpitchfontfamilyalignmentfillpatternborderstyle  € <  € ?ś12/12/12 09:12 pmMS Sans SerifmessageŕX€2 w_mdi_clock˙˙ €N section+wininichangewf_parent_resized+open+timer+create+destroy DAT*źöfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowdw_splashborderstyledwobjectmessagew_logonŕ ˙˙loon_c˙˙gr@fun˙˙ctuctu˙˙!ip@env˙˙&ai@edes˙˙1ai@sage˙˙=wc@lis˙˙Jtr@ewit˙˙[io@opo˙˙etr@ctio˙˙s vi@f_d˙˙ em@˙˙“ @tupd˙˙Ÿ et@ero˙˙Ż o@tbuf˙˙źel@sort˙˙Éof@darr˙DAT*Îö ˙˙LSQL xE _initsrcwindoww_mdi_clockmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectstatictextst_timefontcharsetfontpitchfontfamilyalignmentfillpatternborderstylemessage ˙˙˙˙@˙˙˙˙$@˙˙)@˙˙4@˙˙˙˙@DAT*Đö@˙˙M@˙˙^@˙˙h@˙˙v @¨%˙˙‚ @˙˙– @pbm_˙˙˘ ev@mous˙˙˛ mo@ove ˙˙żri@data˙˙Ěm0@vent˙˙Űdd@ ) ˙˙çgl@ u_d˙˙ň ile˙˙ú@˙˙@˙˙@˙˙@*€˙˙%@8˙˙1 @ iă!˙˙=@𠅀ခ€€Ŕ˙˙yXDAT*Ňö!,*€€. $$$,$4$<<R‹}<$D$L$T$<<R‹}d$<<Y1–Y‹}t$<<Y1Y‹})„8 B„˛ŕd, li_winhtli_winwdli_thisxli_thisyP˙˙j˙˙˙˙^@˙˙#ŒX DAT*Ôö iw_parent_window1/3+€˙˙+€˙˙+€˙˙+€˙˙widtht \height lmovelid?Ŕ| $ , 4 < D L T d t „ ě)48‡DT$\$}lt$|$}1<I+ź1ľ@˝18:ZW@)”8)°8,•Ň1ŕ,¸$ Fl Ž Ś ¸dDAT* ö ::message ˙˙@€ŔX iw_parent_window+€parentwindow<PŔ$width<st_timeL*€<heightdL*€dtriggerevent Ŕ„wf_parent_resizedYxŔœ˙˙ 4 D T \ l t | ” ° ¸ ´$ ź3ľ@˝3$8(0ź)ľ@˝)880z&ź—ľ@˝—$820ź)ľ@˝)8z(…,•š1¨,@DAT*ŘöAbout windowforward global type w_about from window end type type st_4 from statictext within w_about end type type st_version_date from statictext within w_about end type type st_version_number from statictext within w_about end type type st_1 from statictext within w_about end type type cb_ok from commandbutton within w_about end type end forward global type w_about from window integer x = 763 integer y = 512 integer width = 1198 integer height = 868 boolean titlebar = true DAT*Úö string title = "About RAPIDS" boolean controlmenu = true windowtype windowtype = response! long backcolor = 79741120 st_4 st_4 st_version_date st_version_date st_version_number st_version_number st_1 st_1 cb_ok cb_ok end type global w_about w_about on w_about.create this.st_4=create st_4 this.st_version_date=create st_version_date this.st_version_number=create st_version_number this.st_1=create st_1 this.cb_ok=create cb_ok this.Control[]={this.st_4,& this.st_version_date,& thDAT*Üöis.st_version_number,& this.st_1,& this.cb_ok} end on on w_about.destroy destroy(this.st_4) destroy(this.st_version_date) destroy(this.st_version_number) destroy(this.st_1) destroy(this.cb_ok) end on event open; string ls_date st_version_number.text = "Version " + gs_versionNumber ls_date = string(gd_versionDate, "MMMM DD, YYYY") st_version_date.text = ls_date end event type st_4 from statictext within w_about integer x = 37 integer y = 512 integer width = 1115 intDAT*Ţöeger height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 67108864 boolean enabled = false string text = "Ennovation, Inc." alignment alignment = center! boolean focusrectangle = false end type type st_version_date from statictext within w_about integer x = 37 integer y = 352 integer width = 1115 integer heDAT*ŕöight = 64 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 67108864 boolean enabled = false string text = "Version Date" alignment alignment = center! boolean focusrectangle = false end type type st_version_number from statictext within w_about integer x = 37 integer y = 256 integer width = 1115 integer height = 96DAT*âö integer textsize = -14 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "Arial" long textcolor = 33554432 long backcolor = 67108864 boolean enabled = false string text = "Version Number" alignment alignment = center! boolean focusrectangle = false end type type st_1 from statictext within w_about integer x = 37 integer y = 32 integer width = 1115 integer height = 224 integer textsize = -36 iDAT*ôönteger weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "Arial" long textcolor = 8388608 long backcolor = 67108864 boolean enabled = false string text = "RAPIDS" alignment alignment = center! boolean focusrectangle = false end type type cb_ok from commandbutton within w_about integer x = 347 integer y = 656 integer width = 512 integer height = 80 integer taborder = 20 integer textsize = -8 integer weiDAT* DAT*čöŚp@ľ)b?<ąţA+p@p@d"p@€éq”@”@\@\@*[@[@6c@c@CU@U@T`@`@q^j@j@Alk@k@Axl@l@Œm@m@a˜€@€@q¨‘@‘@ľ¤@¤@¸@¸@Ń^@^@a“@“@€€ˆ| p@€|˙˙€ˆv@v@aˆng€tF@F@˜$p@€ ˜˙˙€Ś ą÷p@€ąQ€šp@€š€Áľp@€Á€Ęăp@€Ę€Óňp@€Ó€Ü€éŔ˙˙3”@DAT*ęö€€Ŕ˙˙Ŕ˙˙& w_mdi_mainwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€"€ 0 mdiclientm_main_menuRAPIDS.ICO`"€ Ě­"€ (9 w_mdi_clockmessagepointerw_rapids_infogs_inifilew_emissw_imainw_expDAT*ěöortw_reportw_growthgs_app_titlef_save_toolbar_profilef_get_toolbar_profilef_recalc_notifyŕ,T2 w_mdi_main˙˙ € xposypos+movewparamlparam+show_rapids+xpos+ypos+close+closequery+open+sizetype+newwidth+newheight+resize+create+destroyo ˙˙ ˙˙LII˙˙ ˙˙LULLm@X˙˙ b˙˙l˙˙LUIIQ$D xW _initsDAT*îörcwindoww_mdi_mainmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectmdiclientmdi_1w_mdi_clockmessagepointerw_rapids_infow_emissw_imainw_exportw_reportw_growthm_main_menuX ˙˙urr_so˙˙ip@env˙˙aiedes˙˙#ai@sage˙˙(wc@lis˙˙3tr@ewit˙˙?io@oda˙˙Low@ject˙˙]DAT*đöb_@k_re˙˙gpr@s_fo˙˙u €@˙˙ ş@˙˙˙˙˙˙• @˙˙Ą ˙˙@˙˙˙˙ą @˙˙ž@˙˙Ë@˙˙Ú@˙˙ć@˙˙đ˙˙ö@˙˙@˙˙ @˙˙@;ź˙˙ @8˙˙(@˙˙0@E=˙˙9!@od˙˙B#@ap˙˙K'@đ …€Ą€€DAT* ö€Ŕ˙˙yW",*€€˙˙ R,•,)8,•81F,$$ d* +xpos+yposw_mdi_clock::messageP ˙˙w˙˙am˙˙@€um˙˙ @€, wf_parent_resizedxŔ˙˙ $ |:F@źľ@˝8Ś1‹:@ź ľ@˝ ś8,•b1DAT*ôöŚp@ˇ)b?<ąţA,p@p@$p@€éq”@”@q"\@\@-[@[@a9c@c@qFU@U@W`@`@aaj@j@qok@k@{l@l@m@m@q›€@€@aŤ‘@‘@¸¤@¤@Ÿ@¸@Ô^@^@a@@`@@q‚@‚@€'@@3@@=@@ńH@@ńR@@€Ň3”@€Ň4€€Ţv@v@ŢhĆ5€€ć ót_Ŕ˙˙_t_Ŕ˙˙7!d@d@a,F@F@q4Řp@€y4t8€sFp@€ F9€DAT*ööŔS"p@€S:€^ăp@€ ^;€g w_rapids_infowindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject$€ đn pictureborderstylestatictextfontcharsetfontpitchfontfamilyalignmentfillpatternRAPINFO.ICO$€ ¨D $€ „fżDAT*řöe-arrow.bmpExitMS Sans SerifsgIcon.bmpse-arrow.bmpSaved Groupsexport.bmpdb.bmpdh-arrow.bmpsw-arrow.bmpHelpData ImportQuery/ AnalysisQC CheckerReportsEmissions Calculationreportin.bmpquery.bmpqc-chekr.bmphelp.bmpexit.bmpemis-est.bmpfileimp.bmp Data Exportm_main_menumessagegs_app_titlegb_run_importf_put_scroll_barsf_menu_behavedragobjectpointerw_source_selectorw_er_diagramw_mdi_mainw_reportŕl”2 w_rapids_info˙˙DAT*úö €† wparamlparam+ue_run_import+clicked+wparam+lparam+open+sizetype+newwidth+newheight+resize+activate+create+destroyS ˙˙ ˙˙LULLD˙˙ N˙˙X˙˙LUIIQ( x3 _initsrcwindoww_rapids_infomenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerDAT*üöobjectpicturep_e3borderstylestatictextst_2fontcharsetfontpitchfontfamilyalignmentfillpatternp_ssp_sest_5p_upldp_dbp_1p_dhp_e2p_swp_se2st_16st_11st_10st_8st_7st_1p_reportp_queryp_qcp_helpp_exitp_emisp_dataimptst_4m_main_menumessagedragobjectpointerw_source_selectorw_er_diagramw_mdi_mainw_report° ˙˙rmruct˙˙ci@ten˙˙malede˙˙&ma@ssag˙˙+ow@dli˙˙6t@iewi˙˙Bti@fop˙˙Ol@DAT*ţö ˙˙`@˙˙j@swf˙˙x co@pct˙˙„ s@3€˙˙˜ @d@˙˙¤ @˙˙˙˙´ g@@g@˙˙Á@˙˙˙˙Îg@@g@˙˙Ý @˙˙ ˙˙ég@@g@˙˙ń˙˙˙˙ö€@˙€˙˙˙˙@ent˙˙ scion˙˙e@wind˙˙st@˙˙(@ă!˙˙3@˙˙=@˙˙Iě!˙˙N˙˙S<˙˙X €˙˙_38€˙DAT*ö˙d €˙˙h ˙˙m ˙˙r ched˙˙w Řx ˙˙}˙˙ƒT˙˙‰˙˙ř˙˙”˙˙™” ˙˙ž˙˙§˙˙Ż˙˙´˙˙ť˙˙Â˙˙É˙˙Ôteelea˙˙Ů@€˙˙ĺ@˙˙í"re@tc2˙˙ř#@˙˙$@˙˙&p@>˙˙DAT*ö($@˙˙**<@đ …€Ą€€€€€€€ €!€"€#€$€%€&€'€(€)€*€+€,€-€.€/€0€1€2€3€DAT*ö€Ŕ˙˙xW!E*€€˙˙0!€€˙˙. €€˙˙0!€€˙˙0!€€˙˙. €€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙. €€˙˙. €€˙˙.DAT*ö €€˙˙. €€˙˙. €€˙˙. €€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙0!€€˙˙. b,$$$:W@)<8,•H1V,D$.DAT*öd. +wparam+lparamm_main_menu::messageP˙˙ ˙˙˙˙@4€˙˙$@5€L m_file€m_import€triggerevent Ŕ,˙˙ $ < D v,8z%…,B8$0)<8,•\1j,D$&Bd- gs_app_titlegb_run_import::message<˙˙@˙˙@DAT* öDisplay database error messages; opened by db_error funcforward global type w_db_error from Window end type type cb_print from commandbutton within w_db_error end type type cb_ok from commandbutton within w_db_error end type type mle_message from multilineedit within w_db_error end type end forward global type w_db_error from Window int X=654 int Y=301 int Width=1747 int Height=1221 boolean TitleBar=true string Title="Database Error" long BackColor=12632256 WindowType WindowTypDAT* öe=response! cb_print cb_print cb_ok cb_ok mle_message mle_message end type global w_db_error w_db_error on open;///////////////////////////////////////////////////////////////////////// // // Event: Open for w_db_error // // Purpose: W_DB_ERROR is "called" from public function f_db_error. // The error message from the parameter is placed in // the multi line edit for viewing. // // Log: // // DATE NAME REVISION //------ --------------------------------------DAT*ö----------------------- // Powersoft Corporation INITIAL VERSION // ///////////////////////////////////////////////////////////////////////// mle_message.text = message.stringparm end on on w_db_error.create this.cb_print=create cb_print this.cb_ok=create cb_ok this.mle_message=create mle_message this.Control[]={ this.cb_print,& this.cb_ok,& this.mle_message} end on on w_db_error.destroy destroy(this.cb_print) destroy(this.cb_ok) destroy(this.mle_message) end on type cDAT*öb_print from commandbutton within w_db_error int X=970 int Y=977 int Width=247 int Height=97 int TabOrder=20 string Text="&Print" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;///////////////////////////////////////////////////////////////////////// // Event : w_db_error.cb_print.clicked! // Purpose: // The clicked event of cb_print is designed to create a print // file usinDAT*ög the database error message information and print // the file. // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // ///////////////////////////////////////////////////////////////////////// string ls_line, ls_err_msg int li_prt li_prt = printopen("Database Error") /* Pass the multi line message to public function block_text which will return the message in the necesDAT*ösary format to string ls_err_msg */ ls_err_msg = f_block_text ( mle_message.text, 60 ) print(li_prt, "Database error - "+string(today(),"mm/dd/yyyy")+" - "+string(now(),"HH:MM:SS")) print(li_prt, " ") print(li_prt, ls_err_msg) printclose(li_prt) return end on type cb_ok from commandbutton within w_db_error int X=435 int Y=977 int Width=247 int Height=97 int TabOrder=10 string Text="OK" boolean Default=true int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif"DAT*ö FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;///////////////////////////////////////////////////////////////////////// // Event : w_db_error.cb_ok.clicked! // Purpose: // The clicked event of cb_ok closes w_db_error. // Control is passed back to function f_db_error. // // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // ////////////////DAT*Ó///////////////////////////////////////////////////////// close(parent) return end on type mle_message from multilineedit within w_db_error int X=51 int Y=33 int Width=1633 int Height=909 boolean VScrollBar=true boolean DisplayOnly=true string Pointer="arrow!" long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type DAT*ö˙˙#@5€L title  Enterpriseue_run_importposteventŔ2˙˙ < D Jź€˝8,•01>,$d1 +sizetype+newwidth+newheight::messageP˙˙ ˙˙˙˙˙˙'@5€ ˙˙ f808 08 0ź€˝8,•L1Z,$DAT*ö2d ::message˙˙@5€ base˙˙ ’*‡(*0‡@*H‡X*`‡p*x‡ˆ*‡ *¨‡´*ź‡Ě*ԇä*ě‡ü*‡*‡,*4‡D*L‡\*d‡t*|‡Œ*”‡¤*ʇDAT*öŔ*ȇŘ*ŕ‡đ*ř‡*‡ *(‡8*@‡T*\‡l*t‡„Œ$”$œ$¤$Ź$´$ź$Ä$Ě$Ô$Ü$ä$ě$ô$ü$$ $$$$$,$4$<$D$L$T$˛DAT* ö€ |,BXn„ š ° Ć Ü ň4J`vŒ˘¸Îäú&<d \x p_e3*€€st_2 +€ €p_ss8,€8€p_seP-€P€st_5h.€h€p_upld€/€€€p_db˜0 €˜ €p_1°1!€°!€p_dh@Ä2"€Ä"€p_e2@Ü3#€Ü#€p_swô4$€ô$€p_se2 5%€ %€st_16$6&€$&€st_11<7'€<'€st_10DAT*"öT8(€T(€st_8˙l9)€l)€st_7„:*€„*€st_1˙œ;+€œ+€p_report˙´<,€´,€p_queryĐ=-€Đ-€p_qc č>.€č.€p_helpb?/€/€p_exit@0€0€p_emis0A1€01€p_dataimptHB2€H2€st_4dC3€d3€control|c@*€ +€8,€P-€h.€€/€˜0 €°1!€Ä2"€Ü3#€ô4$€ 5%€$6&€<7'€T8(€l9)€„:*€œ;+€´<,€Đ=-€č>.€?/€@0€0A1€HBDAT*$ö2€dC3€ ( 0@ HX `p xˆ   ¨´ źĚ Ôä ěü  , 4D L\ dt |Œ ”¤ ŹŔ ČŘ ŕđ ř   (8 @T \l t„ Œ ” œ ¤ Ź ´ ź Ä ĚDAT*&ö Ô Ü ä ě ô ü      $ , 4 < D L T r$ $0$@$P$`$p$|$Œ$œ$Ź$ź$Ě$Ü$ě$ü$ $$0$@$P$`$p$€$”$¤DAT*(ö$*8FT b p ~ Œ š¨śÄŇŕîü &4BP^d ŹĐ p_e3*€st_2€+€p_ss€(,€p_se8-€st_5€H.€p_upld€X/€p_dbh0 €p_1x1!€p_dh„2"€p_e2”3#€p_sw¤4$€p_se2´5%€st_16@Ä6&€st_11Ô7'€st_10ä8(€st_8ô9)€st_7:*€st_1;+€p_report$<,€p_query8=-€p_qcH>.€p_helpDAT**ö@X?/€p_exit@h@0€p_emisxA1€p_dataimptˆB2€st_4œC3€  0 @ P ` p | Œ œ Ź ź Ě Ü ě ü    0 @ P ` p € ” ¤ €€€&€.€w€Ową&ó.2 ` +ue_run_import+open+resizef_put_scroll_bars+activatef_menu_behave+create+destroy ˙˙Ŕ˙˙Ŕ˙˙DAT*,öŔ˙˙% Ŕ˙˙7Ŕ˙˙A!Ŕ˙˙OŔ˙˙WŔ2  xywidthheighttitlebarbackcolorcontrolmenuminboxmaxboxresizablewindowstateiconp_e3st_2p_ssp_sest_5p_upldp_dbp_1p_dhp_e2p_swp_se2st_16st_11st_10st_8st_7st_1p_reportp_queryp_qcp_helpp_exitp_emisp_dataimptst_4ib_run_import ˙˙’˙˙ P˙˙ ˙˙Ŕ˙˙˙˙"˙˙DAT*.ö˙˙˙,˙˙˙8˙˙˙?˙˙˙F˙˙˙P˙€˙˙\^€˙˙a €˙˙f €˙˙k €˙˙p €˙˙u €˙˙z €˙˙ €˙˙† !€ ˙˙Š "€˙˙ #€˙˙” $€˙˙™ %€ĐŸ˙˙Ÿ &€8Â˙˙Ľ '€ ˙˙Ť (€@˙˙ą )€˙˙ś *€˙˙ť +€˙˙˙˙ŔDAT*0ö ,€˙˙É -€˙˙Ń .€se˙˙Ö /€ll˙˙Ý 0€el˙˙ä 1€ke˙˙ë 2€pe˙˙ö 3€ec˙˙ű] o’P Ŕ€   €˙˙˙˙€€€˙€”€1€˙˙˙^€ @@€@DAT*2ö € € € € € € € !€ "€ #€ $€ %€ &€ '€ (€ )€ *€ +€ ,€ -€ .€ /€ 0€ 1€ 2€ 3€ ˙˙w€O˙˙>$˙˙˙˙&€ą˙˙cL(˙˙x.€ó˙˙k$˙˙˙˙€˙˙uQ˙˙˙˙€˙˙˙˙}Q˙˙˙˙€˙˙˙˙DAT*4ö2  2 4 xywidthheightpicturenamefocusrectanglex˙˙é˙˙  ˙˙ R˙˙@˙˙ź€˙˙%ˇ] oé R@  @ź€@€ˇ@ 2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolDAT*<öortextsizeweightfacenamefontfamilyfontpitch,˙˙i ˙˙ ŕ˙˙ ˙˙@˙˙˙˙!Č€˙˙&˝€˙˙0˝˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cÍ€˙˙lľ€˙˙wľ€] oi ŕ @ ř˙˙˙ź@€ľ€ľ€Í€DAT*8öforward global type w_dddw from Window end type end forward global type w_dddw from Window int X=1039 int Y=554 int Width=573 int Height=577 boolean Visible=false boolean TitleBar=true string Title="Untitled" boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true end type global w_dddw w_dddw forward prototypes public function integer wf_sharedddw (datawindow adw, string as_column) end prototypes public function integer wf_sharedddw (dataDAT*:öwindow adw, string as_column);int i,i_num_controls string s_dataobject datawindowchild ldw_child datawindow ldw u_dw_plain ldw_plain s_dataobject = adw.describe(as_column+".dddw.name") if s_dataobject = "!" or s_dataobject = "?" then return -1 end if if adw.Getchild(as_column,ldw_child) < 0 then return -1 end if i_num_controls = upperBound(control) for i= 1 to i_num_controls if control[i].TypeOf() = DataWindow! then ldw = control[i] if ldw.Dataobject = s_dataobjectDAT*ę then if ldw.ShareData(ldw_child) > 0 then return 1 else return -3 end if end if end if next if openUserObject(ldw_plain) < 0 then return -4 end if Control[i_num_controls+1] = ldw_plain ldw_plain.dataobject = s_dataObject ldw_plain.SetTransObject(SQLCA) ldw_plain.Retrieve() if ldw_plain.ShareData(ldw_child) > 0 then return 1 else return -5 end if return 1 end function on w_dddw.create end on on w_dddw.destroy end on DAT*>ö ˙˙˙Č€˝€€@€˝j:F@źľ@˝8Ś%ź˜ľ@˝˜ś8,•P1^,$6d$ w_source_selector::message(˙˙%@8€˙˙@5€ ˙˙ "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙DAT*@ö€˙˙ Ŕ˙˙ ×˙˙ŕ˙˙Ű€˙˙%ľ] o€Ŕ×ŕ  @Ű€@€ľ@ %$˙˙˙˙"€˙˙2  2 4 xywidthheightpicturenamefocusrectanglex˙˙i˙˙ €˙˙ ×˙˙ŔDAT*Bö˙˙ć€˙˙%Ŕ] oi€×Ŕ  @ć€@€Ŕ@ 2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙n˙˙ ˙˙ I˙˙€˙˙˙˙!ó€˙˙DAT*Dö&€˙˙0˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cÍ€˙˙l €˙˙w €] onI€ ř˙˙˙ź@€ € €Í€ ˙˙˙ó€€€@€b,$$$:W@)<8,•H1DAT*FöV,D$.d m_main_menu::message(˙˙@4€˙˙@5€L m_file€m_export€triggerevent Ŕ,˙˙ $ < D "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙W˙˙ ˙˙ ˙˙ ˙˙€˙˙%žDAT*Hö] oW    @€@€ž@ %$˙˙˙˙"€˙˙~:F@źľ@˝8Ś',)1‹:@ź ľ@˝ ś8,•d1r,$Jd* w_er_diagramw_mdi_main::message<˙˙'@9€˙˙)@:€˙˙ @5€ ˙˙DAT*Jö " €"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙i˙˙ 0˙˙ E˙˙0˙˙ €˙˙%Á] oi0E0  @ €@€Á@ %$˙˙˙˙"€˙˙2  DAT*Lö2 4 xywidthheightpicturenamefocusrectanglex˙˙é˙˙  ˙˙ E˙˙´˙˙€˙˙%] oé E´  @€@€@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙é˙˙ @˙˙ DAT*ŞöE˙˙Ŕ˙˙€˙˙%ľ] oé@EŔ  @€@€ľ@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙×˙˙  ˙˙ R˙˙@˙˙ź€˙˙%¸] o× R@DAT*PöEmission estimation window contains two buttonsforward global type w_emission_est from Window end type type st_6 from statictext within w_emission_est end type type p_gen_season from picture within w_emission_est end type type p_src_season from picture within w_emission_est end type type st_5 from statictext within w_emission_est end type type p_src_cnst from picture within w_emission_est end type type p_gen_cnst from picture within w_emission_est end type type st_4 from statictext DAT*Röwithin w_emission_est end type type p_9 from picture within w_emission_est end type type p_4 from picture within w_emission_est end type type p_3 from picture within w_emission_est end type type p_15 from picture within w_emission_est end type type st_2 from statictext within w_emission_est end type type p_src_spec_1 from picture within w_emission_est end type type p_src_spec_2 from picture within w_emission_est end type type p_prod_profile from picture within w_emission_est end tDAT*Töype type p_14 from picture within w_emission_est end type type p_13 from picture within w_emission_est end type type p_11 from picture within w_emission_est end type type p_8 from picture within w_emission_est end type type p_7 from picture within w_emission_est end type type p_6 from picture within w_emission_est end type type p_5 from picture within w_emission_est end type type p_2 from picture within w_emission_est end type type p_1 from picture within w_emission_est end type DAT*Vö type st_1 from statictext within w_emission_est end type type p_spc_fact from picture within w_emission_est end type type p_emi_fact from picture within w_emission_est end type type p_material from picture within w_emission_est end type type p_scc_ams from picture within w_emission_est end type type p_emis_profile from picture within w_emission_est end type type p_protocl from picture within w_emission_est end type type p_sccamsmt from picture within w_emission_est end type type rDAT*Xö_2 from rectangle within w_emission_est end type type r_1 from rectangle within w_emission_est end type type ln_3 from line within w_emission_est end type type ln_4 from line within w_emission_est end type type ln_5 from line within w_emission_est end type type ln_6 from line within w_emission_est end type type ln_7 from line within w_emission_est end type type ln_8 from line within w_emission_est end type type ln_9 from line within w_emission_est end type type ln_11 from line wiDAT*Zöthin w_emission_est end type type ln_12 from line within w_emission_est end type type ln_13 from line within w_emission_est end type type ln_14 from line within w_emission_est end type type ln_15 from line within w_emission_est end type type ln_16 from line within w_emission_est end type type ln_17 from line within w_emission_est end type type ln_18 from line within w_emission_est end type type ln_20 from line within w_emission_est end type type ln_10 from line within w_emission_DAT*\öest end type type ln_21 from line within w_emission_est end type type ln_1 from line within w_emission_est end type type st_3 from statictext within w_emission_est end type end forward global type w_emission_est from Window int X=672 int Y=620 int Width=2944 int Height=1640 boolean TitleBar=true string Title="Emission Estimation" long BackColor=16777215 boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true string Icon="EMIS_EST.ICO" st_6 stDAT*^ö_6 p_gen_season p_gen_season p_src_season p_src_season st_5 st_5 p_src_cnst p_src_cnst p_gen_cnst p_gen_cnst st_4 st_4 p_9 p_9 p_4 p_4 p_3 p_3 p_15 p_15 st_2 st_2 p_src_spec_1 p_src_spec_1 p_src_spec_2 p_src_spec_2 p_prod_profile p_prod_profile p_14 p_14 p_13 p_13 p_11 p_11 p_8 p_8 p_7 p_7 p_6 p_6 p_5 p_5 p_2 p_2 p_1 p_1 st_1 st_1 p_spc_fact p_spc_fact p_emi_fact p_emi_fact p_material p_material p_scc_ams p_scc_ams p_emis_profile p_emis_profile p_protocl p_protocl p_DAT*`ösccamsmt p_sccamsmt r_2 r_2 r_1 r_1 ln_3 ln_3 ln_4 ln_4 ln_5 ln_5 ln_6 ln_6 ln_7 ln_7 ln_8 ln_8 ln_9 ln_9 ln_11 ln_11 ln_12 ln_12 ln_13 ln_13 ln_14 ln_14 ln_15 ln_15 ln_16 ln_16 ln_17 ln_17 ln_18 ln_18 ln_20 ln_20 ln_10 ln_10 ln_21 ln_21 ln_1 ln_1 st_3 st_3 end type global w_emission_est w_emission_est on resize;f_put_scroll_bars(This) end on on activate;f_menu_behave('base', '', '') end on on w_emission_est.create this.st_6=create st_6 this.p_gen_season=createDAT*bö p_gen_season this.p_src_season=create p_src_season this.st_5=create st_5 this.p_src_cnst=create p_src_cnst this.p_gen_cnst=create p_gen_cnst this.st_4=create st_4 this.p_9=create p_9 this.p_4=create p_4 this.p_3=create p_3 this.p_15=create p_15 this.st_2=create st_2 this.p_src_spec_1=create p_src_spec_1 this.p_src_spec_2=create p_src_spec_2 this.p_prod_profile=create p_prod_profile this.p_14=create p_14 this.p_13=create p_13 this.p_11=create p_11 this.p_8=create p_8 this.p_7=creDAT*döate p_7 this.p_6=create p_6 this.p_5=create p_5 this.p_2=create p_2 this.p_1=create p_1 this.st_1=create st_1 this.p_spc_fact=create p_spc_fact this.p_emi_fact=create p_emi_fact this.p_material=create p_material this.p_scc_ams=create p_scc_ams this.p_emis_profile=create p_emis_profile this.p_protocl=create p_protocl this.p_sccamsmt=create p_sccamsmt this.r_2=create r_2 this.r_1=create r_1 this.ln_3=create ln_3 this.ln_4=create ln_4 this.ln_5=create ln_5 this.ln_6=create ln_6 thiDAT*fös.ln_7=create ln_7 this.ln_8=create ln_8 this.ln_9=create ln_9 this.ln_11=create ln_11 this.ln_12=create ln_12 this.ln_13=create ln_13 this.ln_14=create ln_14 this.ln_15=create ln_15 this.ln_16=create ln_16 this.ln_17=create ln_17 this.ln_18=create ln_18 this.ln_20=create ln_20 this.ln_10=create ln_10 this.ln_21=create ln_21 this.ln_1=create ln_1 this.st_3=create st_3 this.Control[]={this.st_6,& this.p_gen_season,& this.p_src_season,& this.st_5,& this.p_src_cnst,& this.p_gen_cDAT*hönst,& this.st_4,& this.p_9,& this.p_4,& this.p_3,& this.p_15,& this.st_2,& this.p_src_spec_1,& this.p_src_spec_2,& this.p_prod_profile,& this.p_14,& this.p_13,& this.p_11,& this.p_8,& this.p_7,& this.p_6,& this.p_5,& this.p_2,& this.p_1,& this.st_1,& this.p_spc_fact,& this.p_emi_fact,& this.p_material,& this.p_scc_ams,& this.p_emis_profile,& this.p_protocl,& this.p_sccamsmt,& this.r_2,& this.r_1,& this.ln_3,& this.ln_4,& this.ln_5,& this.ln_6,& this.ln_7,& this.lnDAT*jö_8,& this.ln_9,& this.ln_11,& this.ln_12,& this.ln_13,& this.ln_14,& this.ln_15,& this.ln_16,& this.ln_17,& this.ln_18,& this.ln_20,& this.ln_10,& this.ln_21,& this.ln_1,& this.st_3} end on on w_emission_est.destroy destroy(this.st_6) destroy(this.p_gen_season) destroy(this.p_src_season) destroy(this.st_5) destroy(this.p_src_cnst) destroy(this.p_gen_cnst) destroy(this.st_4) destroy(this.p_9) destroy(this.p_4) destroy(this.p_3) destroy(this.p_15) destroy(this.st_2) deDAT*löstroy(this.p_src_spec_1) destroy(this.p_src_spec_2) destroy(this.p_prod_profile) destroy(this.p_14) destroy(this.p_13) destroy(this.p_11) destroy(this.p_8) destroy(this.p_7) destroy(this.p_6) destroy(this.p_5) destroy(this.p_2) destroy(this.p_1) destroy(this.st_1) destroy(this.p_spc_fact) destroy(this.p_emi_fact) destroy(this.p_material) destroy(this.p_scc_ams) destroy(this.p_emis_profile) destroy(this.p_protocl) destroy(this.p_sccamsmt) destroy(this.r_2) destroy(this.r_1) deDAT*nöstroy(this.ln_3) destroy(this.ln_4) destroy(this.ln_5) destroy(this.ln_6) destroy(this.ln_7) destroy(this.ln_8) destroy(this.ln_9) destroy(this.ln_11) destroy(this.ln_12) destroy(this.ln_13) destroy(this.ln_14) destroy(this.ln_15) destroy(this.ln_16) destroy(this.ln_17) destroy(this.ln_18) destroy(this.ln_20) destroy(this.ln_10) destroy(this.ln_21) destroy(this.ln_1) destroy(this.st_3) end on type st_6 from statictext within w_emission_est int X=2528 int Y=1132 int Width=DAT*pö256 int Height=52 boolean Enabled=false string Text="Growth" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_gen_season from picture within w_emission_est int X=2217 int Y=1184 int Width=288 int Height=256 string PictureName="weather.bmp" boolean Border=true end type event clickedDAT*rö;// Open window for seasonal adjustment factors //w_emission_factor w_local_emis_fact SetPointer(HourGlass!) //OpenSheetwithparm(w_local_emis_fact, "C", w_mdi_main, 0, Layered!) OpenSheet(w_emission_saf, w_mdi_main, 0, Layered!) end event type p_src_season from picture within w_emission_est int X=2519 int Y=1184 int Width=288 int Height=256 string PictureName="growth_factor.bmp" boolean Border=true boolean FocusRectangle=false end type event clicked;// Open window for DAT*tögrowth factors //w_emission_factor w_local_emis_fact SetPointer(HourGlass!) //OpenSheetwithparm(w_local_emis_fact, "C", w_mdi_main, 0, Layered!) OpenSheet(w_emission_growth_factor, w_mdi_main, 0, Layered!) end event type st_5 from statictext within w_emission_est int X=2226 int Y=1132 int Width=274 int Height=52 boolean Enabled=false string Text="Seasonal" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TexDAT*vötSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_src_cnst from picture within w_emission_est int X=2519 int Y=848 int Width=288 int Height=268 string PictureName="src_spec.bmp" boolean FocusRectangle=false end type on clicked;// Open window for other constants emission factors SetPointer(HourGlass!) OpenSheet(w_emission_factor_a, w_mdi_main, 0, Layered!) end on type p_gen_cnst from pictuDAT*xöre within w_emission_est int X=2217 int Y=848 int Width=288 int Height=268 string PictureName="gen_cons.bmp" boolean FocusRectangle=false end type on clicked;// Open window for other constants emission factors //w_emission_factor w_local_emis_fact SetPointer(HourGlass!) //OpenSheetwithparm(w_local_emis_fact, "C", w_mdi_main, 0, Layered!) OpenSheet(w_emission_factor_c, w_mdi_main, 0, Layered!) end on type st_4 from statictext within w_emission_est int X=2304 int Y=800 iDAT*zönt Width=421 int Height=68 boolean Enabled=false string Text="Constants" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_9 from picture within w_emission_est int X=1774 int Y=832 int Width=73 int Height=64 string PictureName="u_arrow.bmp" boolean FocusRectangle=false end type typeDAT*|ö p_4 from picture within w_emission_est int X=1774 int Y=924 int Width=73 int Height=64 string PictureName="d_arrow.bmp" boolean FocusRectangle=false end type type p_3 from picture within w_emission_est int X=242 int Y=344 int Width=64 int Height=52 string PictureName="doub-arr.bmp" boolean FocusRectangle=false end type type p_15 from picture within w_emission_est int X=2107 int Y=1348 int Width=73 int Height=64 string PictureName="d-arr-r.bmp" boolean FocusRectangle=falsDAT*~öe end type type st_2 from statictext within w_emission_est int X=2304 int Y=132 int Width=434 int Height=52 boolean Enabled=false string Text="Emission Factors" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_src_spec_1 from picture within w_emission_est int X=2519 int Y=180 int WDAT*€öidth=288 int Height=268 string PictureName="ef_spec.bmp" boolean FocusRectangle=false end type on clicked;// Open window for source specific emission factors //w_emission_factor w_local_emis_fact SetPointer(HourGlass!) OpenSheet(w_emission_factor_s, w_mdi_main, 0, Layered!) //OpenSheetwithparm(w_local_emis_fact, "S", w_mdi_main, 0, Layered!) end on type p_src_spec_2 from picture within w_emission_est int X=2519 int Y=516 int Width=288 int Height=268 string PictureName="DAT*‚ösrc_spec.bmp" boolean FocusRectangle=false end type on clicked;// Open window for source specific emission factors //w_emission_factor w_local_emis_fact SetPointer(HourGlass!) OpenSheet(w_emission_factor_f, w_mdi_main, 0, Layered!) //OpenSheetwithparm(w_local_emis_fact, "F", w_mdi_main, 0, Layered!) end on type p_prod_profile from picture within w_emission_est int X=1573 int Y=1008 int Width=475 int Height=256 string PictureName="prod_pro.bmp" boolean FocusRectangle=false eDAT*„önd type on clicked;// Product Profile line SetPointer(HourGlass!) OpenSheet(w_product_profile, w_mdi_main, 0, Layered!) end on type p_14 from picture within w_emission_est int X=2107 int Y=1268 int Width=73 int Height=64 string PictureName="d-arr-r.bmp" boolean FocusRectangle=false end type type p_13 from picture within w_emission_est int X=352 int Y=832 int Width=73 int Height=64 string PictureName="doub-arr.bmp" boolean FocusRectangle=false end type type p_11 from piDAT*†öcture within w_emission_est int X=1166 int Y=892 int Width=73 int Height=64 string PictureName="d-arr-d.bmp" boolean FocusRectangle=false end type type p_8 from picture within w_emission_est int X=2107 int Y=508 int Width=73 int Height=64 string PictureName="d-arr-r.bmp" boolean FocusRectangle=false end type type p_7 from picture within w_emission_est int X=1426 int Y=608 int Width=73 int Height=64 string PictureName="d-arr-l.bmp" boolean FocusRectangle=false end type DAT*ˆö type p_6 from picture within w_emission_est int X=562 int Y=212 int Width=73 int Height=64 string PictureName="d-arr-l.bmp" boolean FocusRectangle=false end type type p_5 from picture within w_emission_est int X=562 int Y=116 int Width=73 int Height=64 string PictureName="d-arr-l.bmp" boolean FocusRectangle=false end type type p_2 from picture within w_emission_est int X=585 int Y=580 int Width=73 int Height=64 string PictureName="d-arr-r.bmp" boolean FocusRectangle=falsDAT*Šöe end type type p_1 from picture within w_emission_est int X=2107 int Y=636 int Width=73 int Height=64 string PictureName="d-arr-r.bmp" boolean FocusRectangle=false end type type st_1 from statictext within w_emission_est int X=2313 int Y=36 int Width=416 int Height=60 boolean Enabled=false string Text="FACTORS" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans DAT*ŒöSerif" boolean Underline=true FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_spc_fact from picture within w_emission_est int X=2217 int Y=512 int Width=288 int Height=272 string PictureName="gen_spec.bmp" boolean FocusRectangle=false end type event clicked;// Open window for speciation emission factors open(w_scc_speciation_lookup) ////w_emission_factor w_local_emis_fact // //SetPointer(HourGlass!) ////OpenSheetwithparm(w_local_emis_fact, "P"DAT*Žö, w_mdi_main, 0, Layered!) //OpenSheet(w_emission_factor_p, w_mdi_main, 0, Layered!) end event type p_emi_fact from picture within w_emission_est int X=2217 int Y=180 int Width=288 int Height=268 string PictureName="gen_emis.bmp" boolean FocusRectangle=false end type on clicked;// Open window for general emission factors //w_emission_factor w_local_emis_fact SetPointer(HourGlass!) //OpenSheetwithparm(w_local_emis_fact, "G", w_mdi_main, 0, Layered!) OpenSheet(w_emissionDAT*ö_factor_g, w_mdi_main, 0, Layered!) end on type p_material from picture within w_emission_est int X=1573 int Y=480 int Width=475 int Height=288 string PictureName="matrl_2.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_material.triggerevent(clicked!) end on type p_scc_ams from picture within w_emission_est int Y=448 int Width=512 int Height=352 string PictureName="scc_ams.bmp" boolean FocusRectangle=false end type event clicked;//if f_loDAT*’öok_up(This, "scc_ams_code_t", "SCC AMS Code Lookup", & // "select code, desc_1, desc_2, desc_3, desc_4, control_1_device_code, " + & // "control_2_device_code, device_code, material_code, process_code, " + & // "source_code, valid_flag from rap_scc_ams_codes order by code") then // This.ib_obj_modified = TRUE //end if string ls_obj_name_str, ls_obj_name str_lookup lstr_lookup long ll_pos_num //ls_obj_name_str = dw_obj.dwGetObjectAtPointer() //ls_obj_name = Left(ls_obj_name_str, Pos(DAT*”öls_obj_name_str, "~t") - 1) SetPointer(HourGlass!) //if ls_obj_name = fld_name then // Assign SQL statement for the code lookup to the structure variable lstr_lookup.sqlStatement = "select code, desc_1, desc_2, desc_3, desc_4, " + & "device_code, material_code, process_code, " + & "source_code, type, epa_invalid_flag, inventory_invalid_flag, " + & "mode_type, tier_code, unit_code, nei_material_id, material_io_code " + & "from rap_scc_ams_codes order by code" // Assign wiDAT*–öndow title to be display in the look up window to the // structure variable lstr_lookup.winTitle = "SCC/AMS Code Lookup" // // Assign current code to be display on the edit box of the lookup window // lstr_lookup.current_code = ps_cur_code // Open the look up window with parameters OpenWithParm(w_look_up, lstr_lookup) // if Not (IsNull(gs_code_value) or gs_code_value = '') then // ll_pos_num = Pos(ls_obj_name, "_t") // if ll_pos_num > 0 then // ls_obj_name = Left(ls_obDAT*˜öj_name, ll_pos_num - 1) // end if // dw_obj.SetItem(dw_obj.GetRow(), ls_obj_name, gs_code_value) // return TRUE // end if //end if //return false end event type p_emis_profile from picture within w_emission_est int X=933 int Y=960 int Width=475 int Height=256 string PictureName="emis_pro.bmp" boolean FocusRectangle=false end type on clicked;// Emission Profile line OpenSheet(w_speciation_profile, w_mdi_main, 0, Layered!) end on type p_protocl from picture withiDAT*šön w_emission_est int Width=549 int Height=320 string PictureName="protocl.bmp" boolean FocusRectangle=false end type on clicked;SetPointer(HourGlass!) OpenSheet(w_cal_protocol, w_mdi_main, 0, Layered!) end on type p_sccamsmt from picture within w_emission_est int X=731 int Y=480 int Width=658 int Height=320 string PictureName="sccamsmt.bmp" boolean FocusRectangle=false end type on clicked;SetPointer(HourGlass!) OpenSheet(w_scc_ams_material, w_mdi_main, 0, Layered!) end oDAT*œön type r_2 from rectangle within w_emission_est int X=2231 int Y=48 int Width=622 int Height=1440 boolean Enabled=false int LineThickness=4 long LineColor=12632256 end type type r_1 from rectangle within w_emission_est int X=2194 int Y=16 int Width=640 int Height=1456 boolean Enabled=false int LineThickness=4 long FillColor=16777215 end type type ln_3 from line within w_emission_est boolean Enabled=false int BeginX=384 int BeginY=1120 int EndX=928 int EndY=1120 int LDAT*žöineThickness=12 long LineColor=33554432 end type type ln_4 from line within w_emission_est boolean Enabled=false int BeginX=1792 int BeginY=476 int EndX=1792 int EndY=244 int LineThickness=12 long LineColor=33554432 end type type ln_5 from line within w_emission_est boolean Enabled=false int BeginX=1669 int BeginY=864 int EndX=1211 int EndY=864 int LineThickness=12 end type type ln_6 from line within w_emission_est boolean Enabled=false int BeginX=1202 int BeginY=864 DAT* öint EndX=1202 int EndY=932 int LineThickness=12 end type type ln_7 from line within w_emission_est boolean Enabled=false int BeginX=1216 int BeginY=1300 int EndX=2126 int EndY=1300 int LineThickness=12 end type type ln_8 from line within w_emission_est boolean Enabled=false int BeginX=1861 int BeginY=148 int EndX=1861 int EndY=500 int LineThickness=12 end type type ln_9 from line within w_emission_est boolean Enabled=false int BeginX=206 int BeginY=1380 int EndX=2149 DAT*˘ö int EndY=1380 int LineThickness=12 end type type ln_11 from line within w_emission_est boolean Enabled=false int BeginX=2057 int BeginY=668 int EndX=2176 int EndY=668 int LineThickness=12 end type type ln_12 from line within w_emission_est boolean Enabled=false int BeginX=1810 int BeginY=804 int EndX=1810 int EndY=1012 int LineThickness=12 end type type ln_13 from line within w_emission_est boolean Enabled=false int BeginX=2034 int BeginY=540 int EndX=2162 int EndY=5DAT*¤ö40 int LineThickness=12 end type type ln_14 from line within w_emission_est boolean Enabled=false int BeginX=1449 int BeginY=644 int EndX=1550 int EndY=644 int LineThickness=12 end type type ln_15 from line within w_emission_est boolean Enabled=false int BeginX=1202 int BeginY=1220 int EndX=1202 int EndY=1300 int LineThickness=12 end type type ln_16 from line within w_emission_est boolean Enabled=false int BeginX=274 int BeginY=368 int EndX=274 int EndY=484 int LineTDAT*Śöhickness=12 end type type ln_17 from line within w_emission_est boolean Enabled=false int BeginX=1669 int BeginY=804 int EndX=1669 int EndY=868 int LineThickness=12 end type type ln_18 from line within w_emission_est boolean Enabled=false int BeginX=384 int BeginY=900 int EndX=384 int EndY=1120 int LineThickness=12 end type type ln_20 from line within w_emission_est boolean Enabled=false int BeginX=315 int BeginY=612 int EndX=649 int EndY=612 int LineThickness=12 endDAT*¨ö type type ln_10 from line within w_emission_est boolean Enabled=false int BeginX=640 int BeginY=148 int EndX=1861 int EndY=148 int LineThickness=12 long LineColor=33554432 end type type ln_21 from line within w_emission_est boolean Enabled=false int BeginX=201 int BeginY=704 int EndX=201 int EndY=1380 int LineThickness=12 end type type ln_1 from line within w_emission_est boolean Enabled=false int BeginX=626 int BeginY=244 int EndX=1792 int EndY=244 int LineThicknessDAT*š=12 long LineColor=33554432 end type type st_3 from statictext within w_emission_est int X=2304 int Y=464 int Width=434 int Height=52 boolean Enabled=false string Text="Speciation" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type DAT*Źö  @ź€@€¸@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙e˙˙ @˙˙ ×˙˙Ŕ˙˙€˙˙%ľ] oe@×Ŕ  @€@€ľ@ DAT*Žö2  2 4 xywidthheightpicturenamefocusrectanglex˙˙×˙˙ @˙˙ ×˙˙Ŕ˙˙ć€˙˙% ] o×@×Ŕ  @ć€@€ @ 2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolorDAT*6 ötextsizeweightfacenamefontfamilyfontpitch,˙˙E˙˙ ŕ˙˙ ˙˙@˙˙˙˙!,€˙˙&Á€˙˙0Á˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cÍ€˙˙lż€˙˙wż€] oEŕ @ ř˙˙˙ź@€ż€ż€Í€DAT*˛öŚp@ľ)b?<ąţAp@p@t&p@€éa”@”@a#\@\@q.[@[@a:c@c@aGU@U@aX`@`@abj@j@qpk@k@|l@l@m@m@œ€@€@Ź‘@‘@š¤@¤@Ƹ@¸@Ő^@^@A ƒ@ƒ@€@@!@@+@@6@@aB@@N„@„@p\Š@Š@por€rv@v@a‘#€ah@€€Ţ$€!%d@d@0 w_set_toolbarswindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructurDAT*´öemailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject@&€ h checkboxfontcharsetfontpitchfontfamilyborderstyleradiobuttoncommandbuttongroupboxCustomize Toolbar&€ Ě&ś&€ ČĂÂShow Te&xtMS Sans Serif&Floating&Left&Right&Bottom&Top&Done&HideMovemessagerapidsdragobjectäx 2DAT*śö w_set_toolbars˙˙ € ( +open+create+destroy+clicked LQ x­ _initsrcwindoww_set_toolbarsmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectcheckboxcbx_showtextfontcharsetfontpitchfontfamilyborderstyleradiobuttonrb_floatingrb_leftrb_rightrb_bottomrb_topcommandbuttoDAT*¸öncb_2cb_visiblegroupboxgb_1messagerapidsdragobjectř˙˙€‰˙˙@k@˙˙l@K˙˙'@€@˙˙,@¤@˙˙7¸@@˙˙C@˙˙P@˙˙a@ ˙˙k@@˙˙y .€@˙˙… @˙˙™ @ ˙˙Ľ @˙˙ľ €@ €˙˙Â@˙˙Ď€@€˙˙Ţ@˙˙ę@˙˙ó˙˙@3˙˙ €@źDAT*şö€˙˙@˙˙!_f@miss˙˙-_m@˙˙9asă!˙˙E˙˙M˙˙Vě!˙˙`˙˙g<@˙˙u˙˙z opemis˙˙…@˙˙Ž ˙˙“@˙˙›@˙˙˘@đ …€Ą€€€€€€€€ €DAT*źö"€€Ŕ˙˙wW 4*€€˙˙-€€˙˙-€€˙˙-€€˙˙-€€˙˙-€€˙˙-€€˙˙-€€˙˙-!€€˙˙%Z,$ˆ $($:U@˛b<$L9}nT$\$:U@˛Śl$DAT*žöt9}n|$„$:U@˛ę˜$ 9}n¨$°$:U@˛.Ŕ$Č9}nĐ$Ř$:U@˛ně$ô9}ü$$°$(800…Ô8$@8H0…,\$t$|9}&„$Œ9},•@1N,”$@^„˘Čć  * P DAT*ŔönˆŹ°Ôć&d! messagerapids::message<˙˙@#€˙˙@$€˙˙@#€œ win_ref3€˙˙ ^@3€˙˙U@rb_bottom0.€checkedD3€˙˙U@rb_leftd,€D3€˙˙U@rb_rightŒ-€D3€˙˙U@rb_top¸/€D3€˙˙U@rb_floatingŕ+€D3€˙˙cb_visible@ 1 €text@ &Hide@ 1 € &Showtoolbartext NDAT*Âöcbx_showtext˙˙˙d*€Dd*€D˙˙   ( < L T \ l t | „ ˜   ¨ ° Ŕ Č Đ Ř ě ô ü   ( 8 @ \ t | „ Œ ” P * ‡4*<‡L*T‡h*p‡„*Œ‡œ*¤‡´*ź‡ĐDAT*Äö*؇č*đ‡$$$ $($0$8$@$H$˛€ |,BXn„ š ° Ćd Pŕ cbx_showtext*€€rb_floating(+€(€rb_leftD,€D€rb_right\-€\€rb_bottom€x.€x€rb_top”/€”€cb_2˙Ź0€Ź€cb_visibleÄ1 €Ä €gb_1ŕ2"€ŕ"€controlřDAT*Ćöc@*€(+€D,€\-€x.€”/€Ź0€Ä1 €ŕ2"€  4 <L Th p„ Œœ ¤´ źĐ Řč đ      ( 0 8 @ H „ $,$<$P$d$t$„$˜$¨$*8FT b pd °DAT*ČöH cbx_showtext*€rb_floating +€rb_left4,€rb_rightD-€rb_bottomX.€rb_topl/€cb_2|0€cb_visibleŒ1 €gb_1 2"€ , < P d t „ ˜ ¨ €€&€ą&2  +open+create+destroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 Ť xywidthheighttitlebartitlebackcolorcontrolmenuresizablewindowtypecbx_showtextrb_floatDAT*Ęöingrb_leftrb_rightrb_bottomrb_topcb_2cb_visiblegb_1win_ref˙˙S˙˙ Ő˙˙ |˙˙ő˙˙˙˙"e€˙˙(ŔŔŔ˙˙2Ŕ˙˙>Ŕ˙˙HŔ€˙˙S €˙˙` €˙˙l €˙˙t €˙˙} €˙˙‡ €˙˙Ž €˙˙“ €˙˙ž "€˙˙Ł€] oSŐDAT*Ěö|ő€e€  €ŔŔ€Ŕ€€ €1€ŔŔŔ  @@€@ € € € € € € € € "€€˙˙˙˙&€ą˙˙ ˙˙˙˙€˙˙˙˙ ˙˙˙˙xDAT*Îö€˙˙˙˙t$*,$9}@,,9},•Z1h,4$&*@d rapids::message(˙˙@$€˙˙@#€< checkedtoolbartext˙˙ $ , 4 "€"2  +clicked˙˙Ŕ2 l xywidthheighttextborderstyletextcolorbackcolortextsizeDAT*Đöweightfacenamefontfamilyfontpitch˙˙˙˙ y˙˙ ź˙˙I˙˙Č€˙˙€˙˙*€˙˙4ŔŔŔ˙˙>ř˙˙˙˙˙Gź˙˙NÓ€˙˙WÁ€˙˙bÁ€] oyźI ř˙˙˙ź€Á€Á€Ó€ €ŔŔŔ@Č€@DAT*Ňö€˙˙˙˙"€˙˙ě$:U@‰ $(4$D$5P@k@V}X$`l$5|$5ˆ@kd@V},•Ň1ŕ,˜$ h¸d ::message˙˙@#€ p win_ref3€˙˙U@3€˙˙ x0width<DAT*Ôö@3€˙˙!yhheightt @@˙˙   ( 4 D PX ` l | ˆ˜ "€"2  +clicked˙˙Ŕ2 l xywidthheighttextborderstyletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙˙˙ Ů˙˙ w˙˙I˙˙á€˙˙Á€˙˙DAT*z ö*€˙˙4ŔŔŔ˙˙>ř˙˙˙˙˙Gź˙˙NÓ€˙˙WŔ€˙˙bŔ€] oŮwI ř˙˙˙ź@€Ŕ€Ŕ€Ó€ €ŔŔŔ@á€@Á€˙˙˙˙"€˙˙T$:U@‰,•:1H, $DAT*ŘöŚp@ľ)b?<ąţAp@p@(p@€‰”@”@ \@\@+[@[@7c@c@DU@U@U`@`@_j@j@qmk@k@yl@l@m@m@a™€@€@Š‘@‘@ś¤@¤@ø@¸@Ň^@^@qn@n@`@@…@…@(ž@ž@20@0@<@@€|q@q@A°"p@€°€ťv@v@ť€Ă˙˙€€@É@@ńŇ w_single_dwwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremDAT*Úöailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject(€ ¨r datawindowborderstyledwobjectrectanglelinestylefillpatternUntitledlba(€ Ř×transaction(€ €đ w_mdi_mainmessagesqlcadwbufferŕTˆ2 w_single_dw˙˙ €^ wf_check_pendingp_dwwf_undowfDAT*Üö_savewf_check_codewf_initialize_varswparamlparam+add_row+delete_row+next_row+previous_row+first_row+last_row+page_up+page_down+save+query+rolbackxposyposrowdwo+mousemove+flags+xpos+ypos+open+create+destroy+row+dwo+getfocussqldbcodesqlerrtextsqlsyntaxbuffer+dberror+losefocus€ Bve˙˙€QCdatawindow._r˙˙€BCdatawindow.QO˙˙ V˙˙LULO˙˙ V˙˙O˙˙ V˙˙O˙˙ V˙˙O˙˙ VDAT*Ţö˙˙O˙˙ V˙˙O˙˙ V˙˙O˙˙ V˙˙O˙˙ V˙˙O˙˙ V˙˙O˙˙ V˙˙É˙˙Î˙˙Ó˙˙×˙˙€LIILCdwobject.ć˙˙ í˙˙ó˙˙LUIILu$˙˙.˙˙9˙˙C˙˙€Ó˙˙LLSSCdwbuffer.L (D`x¨ŔŘđ 8Pź xX _initsrcwindowDAT*ŕöw_single_dwmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowdw_1borderstyledwobjectrectangler_1linestylefillpatterntransactionw_mdi_mainmessagedwbufferXglob˙˙r_l_ri˙˙ru@e ˙˙letype˙˙$ n@id ˙˙)ta@ ˙˙4_r@ ˙˙@id@ lo˙˙M @long˙˙^ @DAT*âöng p˙˙h @ str˙˙v lo@ct_r˙˙‚ pe@˙˙– @char˙˙˘ tc@ntfa˙˙˛ rs@rad˙˙żb_@ting˙˙Ěb_@trb˙˙Ű_t@omma˙˙çb_@_vis˙˙ňbo_1m˙˙÷id@agob˙˙€@ź€˙˙ @˙˙_fmiss˙˙_m@˙˙$@asă!˙˙0@˙˙<@˙˙G@ě!˙˙O@𠅀ခ€€DAT*äö€Ŕ ˙˙|\  1*€€ ˙˙Şy1€€˙˙ 9d  d p_dw˙˙ € d lb_save_result˙˙ 9d p_dw˙˙ € .8080źDAT*ćöľ@˝8d  ImportantDo not forget to set is_delete_column and is_delete_text in function called wf_initialize_vars or delete will not workR,80)8,•81F,$$d0 +flags+xpos+yposw_mdi_main::messaged˙˙ ˙˙˙˙˙˙@€˙˙&@€, ReadysetmicrohelpZDAT*čöŔ˙˙ $ Œ$)$8,$,)D8L$)`8,•r1€,h$<Xd sqlca::message(˙˙@€˙˙@€p8 dw_1*€setfocusŔ*€settransobject^Ŕ4*€retrieve1ŔT˙˙ $ , D L ` h b*‡$*,‡DAT*ęö<D$L$˛€ |,d T8 dw_1*€€r_1 +€ €control4c@*€ +€ $ ,< D L "$$d $ dw_1*€r_1+€  €€$€&€w€x€y€z€{€•$ą&2 l wf_check_pendingwf_undowf_savewf_check_codewf_inDAT*ěöitialize_vars+mousemove+open+create+destroy´˙˙Ŕ˙˙Ŕ+˙˙!Ŕ˙˙)€Ŕ˙˙7€Ŕ˙˙JŔŔ˙˙UŔ˙˙[ŔŔ˙˙c€Ŕ2 ° xywidthheighttitlebartitlebackcolorcontrolmenuminboxmaxboxresizablewindowtypedw_1r_1ib_modifiedis_delete_columnis_delete_textit_transactionidw_active|˙˙Ą˙˙ ˙˙ +˙˙áDAT*” ö˙˙˙˙"H€o˙˙(ŔŔŔ˙˙2Ŕc˙˙>Ŕ˙˙EŔ˙˙LŔar˙˙VŔ€€˙˙a €˙˙f €as˙˙jŔ˙˙v˙˙‡di˙˙–€e˙˙Ľ€] oĄ+á€H€  €ŔŔŔŔ€Ŕ€€ˆ€1€ŔŔŔ  DAT*đöŚp@ś)b?<ąţA.p@p@*p@€‰”@”@#\@\@.[@[@:c@c@GU@U@X`@`@bj@j@pk@k@|l@l@m@m@aœ€@€@qŹ‘@‘@š¤@¤@Ƹ@¸@Ő^@^@a ‚@‚@`@@#@@-@@8@@B@@N@@Zn@€€h…@…@qn@€`{ž@ž@`…0@0@ t€Ŕn@n@Ë+`@€Ev@v@qEć%€MíŔ˙˙[óŔ˙˙jLUurq@q@a~&€„ŔDAT*ňö˙˙’F@F@š"p@€š(€ ĽŻÁŔ˙˙Ó w_single_tablewindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjecttro*€ ř‘statictextfontcharsetfontpitchfontfamilyalignmentfillpatternborderstyleu_dw_freeformdwobjectu_dw_listrectanglelinestyleUntitled*€ DAT*ôöčÖ˝datawindows_rec_holder*€ đ] No records present. Use insert to create a new recordMS Sans Serifmessagef_copy_recordf_paste_recordgs_filttransactionsqlcaf_menu_behavepointerw_mdi_maingb_filtergi_open_sheet_numf_put_scroll_barsä˜Ř2 w_single_table˙˙ €7 wparamlparam+edit_actions+filter+unfilter+ue_open_filter_winwf_freeform_viewwf_savewinDAT*öönamewf_select_allwf_select_onewf_tabular_viewwf_check_pendingwf_undo_dw1wf_check_requiredpdw_objwf_deletewf_check_rid+validate_delete+wparam+lparam+open+closequery+close+sizetype+newwidth+newheight+resize+activate+create+destroy+rowsinserted+rowsupdated+rowsdeleted+updateend+add_row+getfocus+flags+xpos+ypos+mousemove+rowcount+retrieveend+last_row+next_row+prev_row+first_row+losefocus+delete_rowxposyposrowdwo+clicked˙Ř ˙˙ ˙˙DAT*řöLUL˙˙ ˙˙˙˙ ˙˙˙˙ ˙˙QBc˙˙€QCwindow.ieĆ˙˙#€QCdatawindow.io˙˙ ˙˙˙˙ ˙˙L ˙˙ )˙˙3˙˙LUIIa˙˙o˙˙|˙˙LLLL˙ö˙˙ ţ˙˙§˙˙ Ž˙˙´˙˙Ĺ˙˙LLö˙˙ ţ˙˙ö˙˙ ţ˙˙ö˙˙ ţ˙˙ö˙˙ ţ˙˙a˙˙o˙˙|˙˙ö˙˙ ţ˙˙DAT*úö§˙˙ Ž˙˙´˙˙Ĺ˙˙ö˙˙ ţ˙˙ö˙˙ ţ˙˙ö˙˙ ţ˙˙ö˙˙ ţ˙˙ö˙˙ ţ˙˙˙˙!˙˙&˙˙*˙˙€LIILCdwobject.$<Tpˆ¤źŘ0Hl|”ŹÄÜ<H`x¨Ŕ xß _initsrcwindoww_single_tabDAT*üölemenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectstatictextst_no_record_greyfontcharsetfontpitchfontfamilyalignmentfillpatternborderstylest_no_record_whiteu_dw_freeformdw_2dwobjectu_dw_listdw_1rectangler_1linestyledatawindows_rec_holdermessagetransactionpointerw_mdi_main4glob˙˙mdock ˙˙w @ X=6˙˙27DAT*ţönt W˙˙'in@ight˙˙,an@bled˙˙7ng@kCol˙˙C6 @lean˙˙Pls@indo˙˙aow@=pop˙˙k w@icha˙˙y ni@€˙˙… @˙˙™ @…˙˙Ľ @0˙˙ľ @0˙˙Âë@8˙˙Ď`@˙˙Ţj@…˙˙ę8@0˙˙őź˙˙@˙˙@˙˙ľ@@˙˙(@;ź˙˙2@8˙˙>@ă!˙˙J˙˙]@DAT*ö˙˙kě!˙˙p@˙˙y<@˙˙ƒid˙˙ˆ@ME˙˙’˙˙–@˙˙ @˙˙Ť@˙˙¸ @˙˙Ŕ%€@˙˙Ě(@˙˙Ô)@𠅀ခ€€€€!€€Ŕ ˙˙…a$ 4*€€ . €€ . €€ DAT*ö˙˙Ş{/ €€ ˙˙Ş{/  €€˙˙      n0,!$80ź)ľ@˝)8…8Şś($)88„@$)H8˛X$68`0źľ@˝8:8xŞę€$)ˆ8:8Ş”$)œ8:8¤ŞRŹ$)´DAT*ö8:8źŞšČ$Üź€˝ś8:8䪺ô$üź€˝ś8ś$)8…8 Ş^($@9}H$8P0)h8ś8pŞśx$€9}ˆ$8P0)8:8˜Ş" $)´81<Ľź$8Ä0)Ě8:8ÔŞ`DAT*öÜ$8ä0)ô8:8üŞž$8 0)8:8 ŞÜ($800)<8:8DŞL$8T0)`8:8hŞXp$8x0)„8:8ŒŞ‚)¤8:8ŹŞŹ)Č8:8ĐŞč)č8)8:8Ş) 8:8(Ş:)8DAT*ö8,!•T1b,!@$2Fd€ „ ˛ Ęćţ2Nf–Žŕ4Z r"%ś&Î'ř*-6/\0t2š3˛5Ř6đ89.;T<l>~?–A¨BŔCŇEäFüHI(M:d7 wparamlparammessagecase3case26::messagex˙˙ ˙˙˙˙!@%€˙˙ ˙˙% ˙˙-!@%€Hx ˙˙addressundoidw_active/#€DAT* öcanundoDŔ0/#€SŔtitleP Sorry! Nothing to undo!copy/#€FŔxcut/#€GŔpaste/#€IŔ¤copy_record/#€istr_recordĐ3$€paste_record˙˙˙/#€Đ3$€/#€classname8Ŕ dw_1 -€ib_obj_modified0 -€row_pastedtriggerevent Ŕ[dw_2˙˙˙p,€0p,€ Ŕ[insert/#€accepttextźŔ¨/#€add_row Ŕ[delete/#€validate_delete Ŕ[first8/#€first_row Ŕ[priorDAT* ö$/#€prev_row} Ŕ[next8/#€next_row8 Ŕ[last/#€last_row Ŕ[tabularwf_tabular_viewŔ”freeformwf_freeform_view8{Ŕľselectwf_check_pending€Ŕ×wf_select_one~Ŕđselectallwf_select_all}Ŕsavewf_save|Ŕ-˙˙ ( 8 @ H X € ˆ ” œ Ź ´ Č Ü ô ü   ( @ H h x € ˆ   DAT*ö ´ ź Ě Ü ô   ( < L ` p „ ¤ Č č    8 @ p$)(80$)H8R‹}P$)`8‹}h$,$)|8„$)”8œ$)¤8<Ľˆ´$68ź0:)@źŽľ@˝Ž8ä$8ě)đ8ř$)8$DAT*ž ö<)8$$:NW@)<8<8DL$)T8\$)d8Rź(ľ@˝(8z'…l$8tz%8‰z&)¸98Ŕ$:NW@)Č8,!•V1d,!Đ$B h ˆ ¤ Ě">b„ˆâ<dI wparamlparamli_total_recli_cur_rowls_totalgs_filt::messageŒ˙˙ ˙˙˙˙DAT*öŚp@ś)b?<ąţAp@p@d,p@€‰q”@”@\@\@&[@[@2c@c@?U@U@qP`@`@Zj@j@qhk@k@tl@l@ˆm@m@q”€@€@a¤‘@‘@ą¤@¤@ž¸@¸@Í^@^@a„@„@@@@@(@@3n@n@@>@@J…@…@A€Ă!`@€@Ěv@v@Ě˙˙€€@ÔŔ˙˙ě˙˙Ŕ˙˙‚@řd@d@ w_sortwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailreDAT*öcipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject€,€  Ůžcommandbuttonfontcharsetfontpitchfontfamilydatawindowborderstyledwobject,€ Ŕx ,€ TgCancelMS Sans SerifOKd_sortstr_sortmessagef_dw_get_objects_attribf_get_tokendragobjectÜT|2 w_sort u˙˙ €(DAT*ö +open+create+destroy+clicked LQ xb _initsrcwindoww_sortmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectcommandbuttoncb_cancelfontcharsetfontpitchfontfamilycb_okdatawindowdw_1borderstyledwobjectstr_sortmessagedragobjectlglob˙˙relder˙˙ct@ ˙˙_dobje˙˙DAT*öri@trin˙˙$ @g lo˙˙/ @te d˙˙; @atet˙˙Hme@[] ˙˙Yim@g[] ˙˙cal@} de˙˙q ] @ typ˙˙} me@˙˙‘ @đ ˙˙ @˙˙˙˙­ @ěA ˙˙ş@˙˙ ˙˙Ç@đ ˙˙Ö@˙˙˙˙â@ěA ˙˙đź˙˙ú@˙˙@˙˙ľ@@˙˙;ź˙˙!@8˙˙,ll ă!˙˙1@˙˙=@˙˙FDAT*ö @ě!˙˙O@˙˙W<@đ …€Ą€€€€€Ŕ˙˙wW /*€€˙˙-€€˙˙-€€˙˙žy%ě$Š ,$ˆ $$‡8 H$6…P8X `$z%…h$Š8p08w08y0ź€˝ś8}DAT*ö 1‹}1‹}üóŰŒ<ŻÁ80ź€˝ś8…<ŻÁ80ź€˝ś8…8ƒŞˆˆ$8z%)¤98…8ŹŞ8Žz%8Âz&…Ě$)Ô8…ä$8ě 8đz%z&)ü98 ó$1)8ň $8ě 8đ)(8DAT*ö0$88)l8…—1Ĺ8t06źľ@˝8x$8€)˜8…1źľ@˝88ŹŞœ—1Yźoľ@˝o8… 1‹}—1ŐŠ8 0ź€˝ś8Ł…Š8˘0ź€˝ś8… ó¤$ <8ě6)´8ź$ <8Ä6)Đ8ŽŘ$č1nDAT* öđ$8ř)8źeľ@˝e8<<`R‹}$$08$@$1<R‹}T$\d$l$}t|$„$Œ$”$<<R1‚R‹},•Ň1ŕ,œ$4 V ~ Ę Ü BzŽÂÖö\fˆŒ¸ŕ !B"œ#Ž$Â%ň&'((Z)Œ+,ö-6/f0¸db cols labeDAT*~ öltmprespcolviscol_namenum_colsicntparmmessage::message-˙˙ ˙˙" ˙˙& ˙˙+ ˙˙/ ˙˙3 ˙˙<˙˙E˙˙G˙˙K €˙˙P@€˙˙X@€¤` ˙˙ ^@idw_dw-€dw €is_title,.title@@ Sort - @-€column*visible 1= 0-€_t.textdescriDAT*$öŚp@Çüź@=ąţA>p@p@-p@€‰"”@”@'\@\@2[@[@>c@c@KU@U@\`@`@fj@j@tk@k@€l@l@”m@m@ €@€@°‘@‘@˝¤@¤@ʸ@¸@Ů^@^@An@n@€@@'…@…@0g@€JX@X@€ƒ@ƒ@‰@@A•@@Ÿ@@AŞn@€Í„@„@@Ű.n@€‚@‚@@@@@@(Š@Š@01S@S@:8@8@˜/g@€@@(Ą@Ą@070g@€I×a@DAT*&ö€`ˆŠ@Š@‘1n@€€Hq@q@Do@€@Nc€TF@F@\Ŕ˙˙jě!Ŕ˙˙ Ŕ˙˙3Ŕ˙˙BŔ˙˙cPŔ˙˙qŔ˙˙{Ŕ˙˙đŔ˙˙űd@d@ v@v@ g€ Ŕ˙˙ u@u@a$ e p/ ŕ w_sourcebulkdeletewindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjeDAT*(öct€-€ ҡdatawindowborderstyledwobjectu_emis_period_no_end_dateuserobjects1€-€ ă checkboxfontcharsetfontpitchfontfamilyu_dw_data_coded_data_codes_selectcommandbuttonuo_loadlogMessage Logd_iloadlogR_LOG.ICOstatictextalignmentfillpatterneditmasktextcasemaskdatatype˙˙čp ˙˙Ŕ u_pollutant-€ 8 ˙˙DAT**öˆĂ˙˙8 radiobuttonsinglelineeditu_class_ss_clientu_class_source_group-€ Ü.śgroupboxu_dw_ref_coded_ref_code_dddwBulk Delete-€ ŒĹ RunCancelBULKDEL-€ x. ˙˙ŒĹ transactiond_progress_buttonface-€ ° MS Sans SerifMaterialCreation Date RangeEmission PeriodDAT*,ö Date RangeArial&Disable Screen Msgsd_ds_log_fileEnd:Start:mmm dd, yyyyJAN 1, 1900~DEC 31, 2100 ˙˙ŔŸ đ?đ?jan 1, 1900~dec 31, 2100˙˙V đ?đ?-€ D ˙˙Đ ˙˙D Delete only stream activities for selected source(s)Delete selected source(s) and all child recordsSelect...File Name:Directory:DAT*.öReadyClose-€ $ażSelect Log File Directory and FileCalculation Periodd_reference_codesu_ds_basesqlcapointerf_arraystringf_del_activitiesSelect Rid From Rap_Sources Where Rid =0 '(˙˙˙˙˙˙Ś€˙˙{€˙˙˙˙=ąţA€ä€Ź€˙˙˙˙˙˙˙˙˙˙˙˙=ąţAf_del_group_memberf_del_contactsf_del_location_coordinate_groupsf_del_devicesf_del_appf_del_leg_ent_relDelete from Rap_Sources Where Rid =0 #$DAT*0ö˙˙˙˙˙˙´€˙˙€˙˙˙˙=ąţAf_db_errordragobjectmessagef_get_tokenextobjectgs_inifilečXHp¤Ěô`źř l8`hŒ¸ŔČđÔŚŹ ä č ´¸ 2 w_sourcebulkdelete˙˙ €:y pctwf_progresswf_runbulkdeletewf_runbulkdeletesourcesab_enabledwf_enableoDAT*2öbjectswf_runbulkdeletesourceactivitieswf_getsourcesqlas_messagewf_writelogmessagenparentridtransbdeletewf_del_sourceswf_progress_2ncountnindas_displayas_sectionab_updateas_togglewf_setdisplay2+destroy+create+open+constructor+clickedpagenumbercopy+printpage+modifiedô8 ˙˙QFIrdeA˙˙QBSerŽ˙˙ISŹ˙˙ˇ˙˙c€˝˙˙LLCtransaction.B€˙˙â˙˙é˙˙î˙˙ů˙˙˙˙˙˙DAT*4öQLLSSBSQLT˙˙_˙˙LLL0@x„Ř x˝ _initsrcwindoww_sourcebulkdeletemenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowdw_progress_2borderstyledwobjectu_emis_period_no_end_dateuo_emissionperioduserobjectsu_emis_period_no_end_date`st_3u_emis_period_no_endDAT*6ö_date`st_2u_emis_period_no_end_date`em_endu_emis_period_no_end_date`em_startu_emis_period_no_end_date`st_1u_emis_period_no_end_date`ddlb_intervalu_emis_period_no_end_date`gb_1u_emis_period_no_end_date`cbx_withnoenddatecheckboxcbx_materialfontcharsetfontpitchfontfamilycbx_creationdatecbx_datacodeu_dw_data_codedw_datacodecbx_emissionperioddatecommandbuttoncb_disable_msguo_loadlogdw_logstatictextst_endalignmentfillpatternst_starteditmaskcr_starttextcasemaskdatatypecr_endDAT*8öu_pollutantuo_pollutantu_pollutant`dw_material_groupu_pollutant`cb_remove_allu_pollutant`cb_add_allu_pollutant`st_2u_pollutant`dw_materialu_pollutant`st_1u_pollutant`gb_1radiobuttonrb_deletestreamsonlyrb_deletesourcescb_selectst_filest_dirsinglelineeditsle_dirsle_namest_displaycb_closecb_runbulkdeletedw_progressu_class_ss_clientuo_ssu_class_ss_client`cb_debugu_class_ss_client`pb_printu_class_ss_client`st_data_levelu_class_ss_client`st_4u_class_ss_client`st_result_countDAT*:öu_class_ss_client`st_3u_class_ss_client`st_filter_countu_class_ss_client`st_source_countu_class_ss_client`st_2u_class_ss_client`st_1u_class_ss_client`cb_source_selectoru_class_source_groupgroupboxgb_selectcbx_referencecodegb_intervalu_dw_ref_codedw_ref_codetransactionu_ds_basepointerdragobjectmessageextobject4˙˙˙˙@˙˙˙˙+@˙˙0@˙˙;@˙˙G@˙˙T@˙˙eDAT*<ö@˙˙o@˙˙} @˙˙‰ @˙˙ @˙˙Š @˙˙š @˙˙Ć@˙˙Ó@ €˙˙â@˙˙î€@ !€˙˙ů˙˙&€@ 4€˙˙@˙˙ľ@@˙˙6;ź˙˙H@8˙˙Ts_€gă!˙˙s€˙˙’€˙˙łpp€ě!˙˙Ö€˙˙ő <€˙˙ ni€ntwi˙˙< se€getw˙˙hDAT*>öct@w_sy˙˙q wash_˙˙~h@˙˙Š@˙˙”@˙˙Ÿ ˙˙°˙˙˝@˙˙Ě˙˙Ř˙˙ď@˙˙ý˙˙ @˙˙^˙˙p@p@˙˙@€˙˙)˙˙(€˙˙0˙˙@…˙˙:@˙˙F€ta˙˙O @+€˙˙X˙˙a!€@K˙˙j"@˙˙w˙˙~#€@S˙˙ŠDAT*@ö-˙˙—<€˙˙ľ€€˙˙Ď+€€˙˙ć€˙˙÷€˙˙€˙˙ €˙˙1$g@˙˙=˙˙R ‹˙˙c!z–˙˙m"z+ľ@˙˙u#+˙˙|%SR@_ier˙˙‹$˙˙“%elap˙˙œ&ndtion˙˙§'<˙˙°(˙˙Á)-B€˙˙Í&@<˙˙ß*Œ_ż˙˙ĺ+€B€˙˙,€˙˙-DAT*Bö€3pľ˙˙;.€˙˙R/€˙˙t0€}ľ˙˙‹1-€˙˙­2<€˙˙Ď3€Ŕ˙˙ć4€€˙˙ý5€˙˙"'@˙˙7(@˙˙@6o@˙˙J7Ú˙˙Ű˙˙\8o@o@˙˙h)ß@˙˙˙˙v9€€˙˙‚+@˙˙˙˙Ž,€@¸€˙˙˜.@˙˙ 8@˙˙Ť9@¨˙˙ł<@𠅀ခ€€DAT*Dö €€€ €€€ €€€ €€€ €€€ €€€ €€€ €€€"€&€'€)€*€,€.€0€3€5€8€:€ ;€€9€ <€€9€ =€€9€ >€€9€ ?€€9€ @€€9€ A€ €9€C€D€E€F€DAT*FöG€I€J€K€L€M€N€P€ Q€€O€ R€€O€ S€€O€ T€€O€ U€€O€ V€€O€ W€€O€ X€ €O€ Y€!€O€ Z€"€O€ [€#€O€^€_€`€b€€Ŕ ˙˙a  U*€€˙˙žy%€€˙˙2' )!!€€˙˙-!€DAT*Hö€˙˙-!€€˙˙-(€€˙˙Ÿz%!€€˙˙-+€€˙˙--€€˙˙˘}%/€€˙˙. /€€˙˙. 4€€˙˙G9004€€˙˙G9009€€˙˙5* +!B€€˙˙-B€€˙˙-+€€˙˙-/€€˙˙. /€€˙˙.DAT*Jö H€€˙˙;-##H€€˙˙;-##/€€˙˙. +€€˙˙-+€€˙˙-€€˙˙žy%O€€˙˙4( 1!]€€˙˙%!€€˙˙-]€€˙˙%a€€˙˙Ÿz%     J4€?Č$9)(84ŕD0DAT*Lö$188)D8}1<ľĚź(ľ@˝(8ź(ľ@˝(8źľ@˝8L$8Tp$?cO†ź(ľ@˝(8z')€98ˆ$9)86Fx Ě!$d pctresp(˙˙ ˙˙ ˜H dw_progressBN€setredraw!ŔBN€pctsetitemOŔ<BN€bar.width = ii_bar_widthaHmodifyzŔxBN€!DAT*NöŔ ( 0 D L p € ˆ  ŕ$)$8#^8,08<0:)@źŽľ@˝Ž81˙˙˙˙‹t$„$8ŒŞ$˜$’"Ü8 08ź0:)@źŽľ@˝Ž81˙˙˙˙‹đ$)8$,$()L8:)x8€$ˆ$)œ89)°8¸$Đ$ä$ě$DAT*Pöz%8ôz&:I@9)81‹ N^žĚ"Ü%ř&'$((,:/t1Ęd ¨ uo_ssCP€of_hasdata3ŔSource SelectorPlease select information from Source Selector.sle_dirl=I€text|$l=I€|Log File Directory and FilePlease Select Log File Directory and File.dw_logç2.€reset/Ŕřrb_deletesources9D€checked$wf_runbulkdeletesourcesyŔ4wf_runbulkdDAT*Röeletesourceactivities{ŔTç2.€ç2.€rowcount4Ŕselectrow@Ŕ¤ç2.€is_directoryŔJsle_namexisŘ>J€|.TXTsaveas6Ŕů $ t „  ˜ đ   , L x € ˆ œ ° ¸ Đ ä ě  d>j ‡•#X8(08.0:)@źŽľ@˝Ž81˙˙˙˙‹t8|0…,-)¤8´$ĚDAT*Tö$Š)äś8<1Ń 1˙˙˙˙‹8ě0ź+ľ@˝+81˙˙˙˙‹:F@źľ@˝8$$($Ž0$8$P$ŽX$`$x$Ž€$ˆ$ $Ž)´81Ń‹,-ź$6ź+ľ@˝+81˙˙˙˙‹1H)Đ81H)č88đ0…ř$1) 88DAT*Vö$$<źBľ@˝B8)@8 8H0…8[ z%)`88h$<źBľ@˝B8)p88xź3ľ@˝3$ź—ľ@˝—$źľ@˝88‚0ź)ľ@˝)8z')œ88¤0)č88đź(ľ@˝(8z')81őÝ`$80˛9n<98]ƒD$8L0˛9nXDAT*Xö98^…l$| z%…9)8:F@źľ@˝8 8˜z%…8đ0)¸88Ŕz%)ä8ü1L˜,-9)81˙˙˙˙Ľćő8z%z'…8z%)P8,-(8Xź(ľ@˝(8z'8dz&)x8,- IIkž‚ )€8úˆ$$)¤8DAT*ZöŹ$)Ä88Ě0)Đ88đşL8Řz%…—1Yźoľ@˝o8…6)ü88Ě0)8Yź(ľ@˝(88 z&ź(ľ@˝(8z(8z&),88Ě0)488<ź3ľ@˝3$ź—ľ@˝—$źľ@˝88‚0ź)ľ@˝)8z')T8:F@źľ@˝81‹   HXDAT*\ötŒÄÔü  &'Đ(ŕ)34:6V9h<Š=Ä>Ö?ö@0AšBśEčRSXVžYÄ\Ú^ô_ `&cFd\g„h”ižjźkÜlâmćn"r(sFu\x`y†|˘~žŇ€č‚0†L‡¨ˆÄ‹.‘4“Ndž lds_resultsetli_retll_rcll_rowll_sourcecountll_sourceidfailedld_sourceridls_sourceidsfailedls_sourceidls_displayld_percentls_messagesqlca˙˙ d€˙˙˙˙˙˙#˙˙*DAT*^ö˙˙9˙˙K ˙˙X ˙˙k ˙˙w˙˙‚ ˙˙ ˙˙˜-@c€\Č Source ID: u_ds_basedad€Errorwf_runbulkdelete; lds_resultSet object creation failure.dataobjectgd_ds_sourcebulkdeletesettransobjectľ@âŔ’uo_ssëŹCP€iclass_group•ź,$€of_modobjectsqlŔÔof_modObjectSQL() failed.ŹCP€ź,$€il_nationarrayŹCP€ź,$€il_statearrayDAT*`öoy@ŹCP€ź,$€il_countyarray˙hŹCP€ź,$€il_sourcearrayoretrievet_1śŔ¨˙˙ wf_progresswŔÄwf_progress_2tyŔŘdw_logń2.€deleterow čŔ=ii_log_lengthMwf_writelogmessage}Ŕ,RAPIDS Bulk Delete==}Ŕ,M}Ŕ,Started: m-d-yy h:mm am/pm;'none'}Ŕ,Bulk Delete Type: Delete selected source(s) and all child recordsa}Ŕ,Sources Selected: }Ŕ,object …@source_rid__get_attribute_itemŔ'DAT*~ö …@source_ide_Ŕ'st_display`?K€texttsetredrawoxYŔ„Deleting Data for Source ID: le}Ŕ,Removing records for Source ID: }Ŕ,il_sourcecountěTwf_del_sourcesn~Ŕ, Failed deleting all records for Source ID: }Ŕ,A total of record(s) removed}Ŕ,wŔÄŹCP€ź,$€of_reset$Ŕ˜ŹCP€of_setcounts2Ŕ´ }Ŕ,Bulk Delete failed for Source(s): I}Ŕ,}Ŕ, out of sources were deletedt}Ŕ,}Ŕ,DAT*döWindow shows rapids ER diagramforward global type w_er_diagram from Window end type type p_dev from picture within w_er_diagram end type type p_emiscalc from picture within w_er_diagram end type type p_legl from picture within w_er_diagram end type type p_matrl from picture within w_er_diagram end type type p_proc from picture within w_er_diagram end type type p_src from picture within w_er_diagram end type type p_geo from picture within w_er_diagram end type type ln_1 from line wDAT*föithin w_er_diagram end type type ln_2 from line within w_er_diagram end type type ln_3 from line within w_er_diagram end type type ln_4 from line within w_er_diagram end type type ln_5 from line within w_er_diagram end type type ln_6 from line within w_er_diagram end type type ln_7 from line within w_er_diagram end type type ln_8 from line within w_er_diagram end type type ln_9 from line within w_er_diagram end type type ln_10 from line within w_er_diagram end type end forward DAT*hö global type w_er_diagram from Window int X=672 int Y=260 int Width=2921 int Height=1556 boolean TitleBar=true long BackColor=16777215 boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true string Icon="ER.ICO" p_dev p_dev p_emiscalc p_emiscalc p_legl p_legl p_matrl p_matrl p_proc p_proc p_src p_src p_geo p_geo ln_1 ln_1 ln_2 ln_2 ln_3 ln_3 ln_4 ln_4 ln_5 ln_5 ln_6 ln_6 ln_7 ln_7 ln_8 ln_8 ln_9 ln_9 ln_10 ln_10 end type global w_er_dDAT*jöiagram w_er_diagram on open;This.Title = gs_app_title + ' Data Model' end on on activate;////f_menu_behave("bmp_win", FALSE) //w_mdi_main.ToolbarVisible = FALSE //f_menu_off() f_menu_behave('er', '', '') end on on resize;f_put_scroll_bars(This) end on on close;//w_mdi_main.ToolbarVisible = TRUE //f_menu_behave("mdi_main", FALSE) end on on w_er_diagram.create this.p_dev=create p_dev this.p_emiscalc=create p_emiscalc this.p_legl=create p_legl this.p_matrl=create p_matrl tDAT*löhis.p_proc=create p_proc this.p_src=create p_src this.p_geo=create p_geo this.ln_1=create ln_1 this.ln_2=create ln_2 this.ln_3=create ln_3 this.ln_4=create ln_4 this.ln_5=create ln_5 this.ln_6=create ln_6 this.ln_7=create ln_7 this.ln_8=create ln_8 this.ln_9=create ln_9 this.ln_10=create ln_10 this.Control[]={this.p_dev,& this.p_emiscalc,& this.p_legl,& this.p_matrl,& this.p_proc,& this.p_src,& this.p_geo,& this.ln_1,& this.ln_2,& this.ln_3,& this.ln_4,& this.ln_5,& this.lDAT*nön_6,& this.ln_7,& this.ln_8,& this.ln_9,& this.ln_10} end on on w_er_diagram.destroy destroy(this.p_dev) destroy(this.p_emiscalc) destroy(this.p_legl) destroy(this.p_matrl) destroy(this.p_proc) destroy(this.p_src) destroy(this.p_geo) destroy(this.ln_1) destroy(this.ln_2) destroy(this.ln_3) destroy(this.ln_4) destroy(this.ln_5) destroy(this.ln_6) destroy(this.ln_7) destroy(this.ln_8) destroy(this.ln_9) destroy(this.ln_10) end on type p_dev from picture within w_er_diagrDAT*pöam int X=736 int Y=612 int Width=475 int Height=224 string PictureName="dev.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_device.TriggerEvent(Clicked!) end on type p_emiscalc from picture within w_er_diagram int X=1815 int Y=896 int Width=475 int Height=224 string PictureName="emiscalc.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_emissionestimation.TriggerEvent(Clicked!) end on type p_legl from picture within w_DAT*röer_diagram int X=1815 int Y=324 int Width=475 int Height=224 string PictureName="new-legl.bmp" boolean FocusRectangle=false end type event clicked;//m_main_menu.m_data.m_legal.TriggerEvent(Clicked!) SetPointer(HourGlass!) OpenSheet(w_legal, w_mdi_main, 0, Layered!) end event type p_matrl from picture within w_er_diagram int X=736 int Y=1172 int Width=475 int Height=224 string PictureName="str.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_streaDAT*töm.TriggerEvent(Clicked!) end on type p_proc from picture within w_er_diagram int X=736 int Y=896 int Width=475 int Height=224 string PictureName="proc.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_process.TriggerEvent(Clicked!) end on type p_src from picture within w_er_diagram int X=736 int Y=324 int Width=475 int Height=224 string PictureName="src.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_source.TriggerEvenDAT*vöt(Clicked!) end on type p_geo from picture within w_er_diagram int X=731 int Y=32 int Width=475 int Height=224 string PictureName="geo2.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_data.m_geographic.TriggerEvent(Clicked!) end on type ln_1 from line within w_er_diagram boolean Enabled=false int BeginX=965 int BeginY=260 int EndX=965 int EndY=340 int LineThickness=4 long LineColor=33554432 end type type ln_2 from line within w_er_diagram boolean EDAT*xönabled=false int BeginX=1216 int BeginY=432 int EndX=1815 int EndY=432 int LineThickness=4 long LineColor=33554432 end type type ln_3 from line within w_er_diagram boolean Enabled=false int BeginX=2053 int BeginY=736 int EndX=2053 int EndY=548 int LineThickness=4 long LineColor=33554432 end type type ln_4 from line within w_er_diagram boolean Enabled=false int BeginX=960 int BeginY=1124 int EndX=960 int EndY=1172 int LineThickness=4 long LineColor=33554432 end type DAT*zötype ln_5 from line within w_er_diagram boolean Enabled=false int BeginX=1221 int BeginY=1012 int EndX=1824 int EndY=1012 int LineThickness=4 long LineColor=33554432 end type type ln_6 from line within w_er_diagram boolean Enabled=false int BeginX=1216 int BeginY=1284 int EndX=2053 int EndY=1284 int LineThickness=4 long LineColor=33554432 end type type ln_7 from line within w_er_diagram boolean Enabled=false int BeginX=1216 int BeginY=736 int EndX=2048 int EndY=736 int DAT*|öLineThickness=4 long LineColor=33554432 end type type ln_8 from line within w_er_diagram boolean Enabled=false int BeginX=2053 int BeginY=1284 int EndX=2053 int EndY=1108 int LineThickness=4 long LineColor=33554432 end type type ln_9 from line within w_er_diagram boolean Enabled=false int BeginX=965 int BeginY=544 int EndX=965 int EndY=624 int LineThickness=4 long LineColor=33554432 end type type ln_10 from line within w_er_diagram boolean Enabled=false int BeginX=965 DAT*g int BeginY=844 int EndX=965 int EndY=924 int LineThickness=4 long LineColor=33554432 end type DAT*€öBULK DELETE COMPLETED: }Ŕ, t ¤ ´ Ě ä   ( 0 8 P X ` x € ˆ   ´ ź Đ č ř   $ @ ` h p œ č   < D X l |  ¸ ä ü  P x € ˆ  ¤ Ź Ä Đ ü  , 4 T $DAT*‚ö $@ƒ<>5HŠPPX$@ƒp>5xŠÖ”€LLdL]ƒÖˆLLkL]5d;ź~ľ@˝~8Iƒ¨>5°Š¸Ŕ$Č>@]ƒĐ>ƒ#NL5Řdƒ#|ŕč>}œđř>} $ $($L@V}8$@H$DAT*„öP$L@V}d$lt$|$L@V}”$œ¤$Ź$L@V}Č$ĐŘ$ŕ$L@V}ô$ü$ $L@V}$$,4$<$L@V}X$h}€$ˆ}¨$°}Č$Đ}ä$ě}$DAT*†ö}$$,}@$H}X$`}t$|}”$œ}¸$Ŕ}Ô$Ü}ě$ô}ü$#}Php ”#Ö%(0,N.X/x1|3œ4Ú56V7”8Ň9<N=l>Š?¨@ĆAäBC D>E\FzG˜HśIÔJňdD ab_enabledli_differenceld_ratioli_heigDAT*ˆöhtld_intermediated˙˙˙˙˙˙!˙˙* ˙˙4   ĘOB heightid_activityheightľ@(R8(Rid_difference`S`S`Sđżid_bulkheightŔ˜Q˜Q`S`Sđż˜Q(Rst_display?K€y?K€dw_log02.€02.€dw_progressXBN€XDAT*ŠöBN€cb_disable_msgt„1,€„1,€cb_runbulkdelete´AM€´AM€cb_closeč@L€č@L€dw_progress_2*€*€cbx_creationdateD-&€visible`cbx_datacodep.'€`cbx_emissionperioddate0*€`cbx_material¸,"€`dw_datacodeŘ/)€`dw_ref_codeôGb€`cbx_referencecode˝E_€`gb_interval4F`€`cr_endP68€`cr_DAT*Œöstarth55€`uo_pollutant„7:€`uo_emissionperiodč¤+€`st_start(Č43€`st_endä30€`XBN€`al_a @<'¤ó‰ű? < HP X p x€ ˆ ¨ °¸ Ŕ Č Đ Řŕ č đ ř      ( 8 @ H P d l t | ” œ ¤ Ź Č Đ ŘDAT*Žö ŕ ô ü    $ , 4 < X h € ˆ ¨ ° Č Đ ä ě   $ , @ H X ` t | ” œ ¸ Ŕ Ô Ü ě ô ü  ˆf :F@źľ@˝8 j ‡ •#r8(08.0:)@źŽľ@˝Ž81˙˙˙˙‹ t8|0… ,-)Ź8DAT*ö ź$Ô$Š )ěś8< 1Ń&1˙˙˙˙‹8ô0ź+ľ@˝+81˙˙˙˙‹ 8)08…)H8…8ş8Pz%z&…8Vz%8pz&… )|8…8ş8„08Žz%źľ@˝81˙˙˙˙‹Ä$1)Ř88ŕđ$<źBľ@˝B8) 880…8'DAT*’öz%),88ŕ4$<źBľ@˝B8)<88Dź3ľ@˝3$ź—ľ@˝—$źľ@˝88N0ź)ľ@˝)8z')h88p0)¸88ŔÔ$Ü$ô$šź(ľ@˝(8z')ü8$,$žH$\$l$6źľ@˝8†t$„$Œ$6źľ@˝8†8”ź$Ä$Ě$z%8Ôz&DAT*”öÜ$ä$ě$z&)ô8$$–,$4$6źľ@˝8†D$L$6źľ@˝8†8Tt$|$z%8Ôz&„$Œ$z&)”8Ź$´$$Č$)ä8ě$$6…8z%) 8$1˙˙˙˙‹<$D$˛X$)`8˘h$p$6…8xDAT*–öz%)”8˛1˙˙˙˙‹Ź$´$řĚ$ŠŠ)čśś81<éđ$ř$9Ť!l8080:)@źŽľ@˝Ž81˙˙˙˙‹ř1ú<ĹÂ8408F0:)@źŽľ@˝Ž81˙˙˙˙‹ř8xŽź €˝8z')”8:F@źľ@˝8  œ$¤$ź$ŽÄ$Ě$ä$Žě$ô$DAT*˜ö $Ž$$$$Ž333366Ž)8 8  1ŃF  ‹,-@$6ź+ľ@˝+81˙˙˙˙‹F 1H)X880…80… 1˘  ő  Ý\  h$8p0 ˛9n”98]ƒ œ$8¤0 ˛9n°986{ö 8¸0)ź8 Ä$8¤DAT*šö0 ˛9nĚ98^…ŕ$čz%…8đz%…6)89)$8:F@źľ@˝8L˜Ś-9ź €˝ś81˙˙˙˙<ĽÔ  őL1ź(ľ@˝(88,z&z'…8/L1ź(ľ@˝(8z'8[z&… 8]L1ź(ľ@˝(8z'8xz&…6)ˆ8  IIkž‚)8˜ ˜$DAT*œö $)´8ź$)Ô88¸0)Ü88ş< 8äz%…—1Yźoľ@˝o8…8 z%8[z&)@ 8  Yź(ľ@˝(88H z& ź(ľ@˝(8z(8Q z&)h 88¸0)p 88x ź3ľ@˝3$ź—ľ@˝—$źľ@˝88N0ź)ľ@˝)8z') 8 ˜ $  8¨ 0…:F@źľ@˝DAT*žö81‹1‹#&'((4)b/r0Ž2Ś3Ţ4î59&<F?^@rAB°CÎDâEJM@NzOŒPŹQćRPSl[ž\Ř]^TbžcŘd e@i–j°kÎlđmns$u>v\w~xžy˘˛Ě„ř…*†Xˆh‰€ŠŽ‹žŒÂ‘ř’›ôœ 2 žB ĽF Śb §t ކ ¸° ťö ź> ˝Z ž  żĆ ŔÜ Äö Ĺ Č& É\ Ęf ˚ ĚĐ ÍÔ Ň Ő$ ÖB ŘX Ű\ ܂ ޞ áş âÎ ăä ä č< é˜ ę´ íô$őH÷b rd( li_num_emittantsls_temp_emDAT* öittants ld_emstartld_emendld_startld_endls_datacodels_referencecodell_sourceridll_sourceidfailedlds_resultsetli_retll_rcll_rowld_activityridls_sourceidsfailedls_sourceidls_displayld_percentls_sqlls_wherels_errorls_messagesqlca,ŕ˙˙,-˙˙8 ˙˙C ˙˙L ˙˙U ˙˙\˙˙h˙˙y˙˙†˙˙˜ d€˙˙ŚDAT*˘ö˙˙­˙˙ł˙˙ş ˙˙É ˙˙Ü ˙˙č ˙˙ó ˙˙ţ ˙˙ ˙˙ ˙˙ ˙˙"-@c€Ž h Source ID: u_ds_based€Errorwf_runbulkdelete; lds_resultSet object creation failure.dataobjectgd_ds_sourcebulkdelete_activitiessettransobjectâŔuo_ss˝´CP€iclass_groupÄ,$€of_modobjectsqlŔÜoDAT*¤öf_modObjectSQL() failed.DataWindow.Table.selectdescribe`Ŕ&wf_getsourcesql|Ŕ8 and DataWindow.Table.select=''modify­ŔrDatastore Select unchanged. Contact Technical Support.dw_logeź2.€deleterowčŔĚ=ii_log_lengthâMwf_writelogmessage€}ŔřRAPIDS Bulk Delete==$€}ŔřâM}ŔřStarted: m-d-yy h:mm am/pm;'none'}ŔřBulk Delete Type: Delete only stream activities for selected sources(s)}ŔřSources Selected: ´CP€Ä,$€il_sourDAT*Śöcearrayä}Ŕřcbx_emissionperioddate0*€checked$uo_emissionperiod4+€em_startP$€textd4+€em_end|#€dEmission Period Date Range Selected: 4+€P$€d to €4+€|#€d}Ŕřcbx_creationdatefonü-&€$cr_startmil 55€dcr_end<68€dCreate Date Range Selected: ial 55€d<68€d}Ŕřcbx_datacodellœ.'€$dw_datacodeź/)€uf_check_requiredDAT*¨öt_žŔĐź/)€is_ref_codeôData Code Selected: rio}Ŕřcbx_referencecodeu_(E_€$dw_ref_codeLGb€žŔĐLGb€ôReference Code Selected: al}Ŕřcbx_materialommœ,"€$uo_pollutantdrź7:€uf_get_emittantsnam2ŔÔœ,"€$Required Parameter MissingPlease select emittants.To many emittantsThere can be no more then 250 emittants selected.Material Code(s) Selected: }Ŕř´CP€Ä,$€il_nationarrayŹ´CP€Ä,$€il_DAT*ŞöstatearrayPPÔ´CP€Ä,$€il_countyarraygü´CP€Ä,$€äretrieveśŔ,˙˙ wf_progress_2ÂŔHobject`…@activities_rid__get_attribute_itemŔ`…@source_id€Ŕ }Ŕř`…@Ŕst_display€Ô?K€dDeleting Data for Source ID: }ŔřsetredrawYŔ, Unable to delete Stream Activity with rid: .Stream Activity with rid: was removed.}ŔřŔH´CP€Ä,$€of_resetse $Ŕ¨´CP€of_setcouDAT*ŹöntsMet2ŔÄ}ŔřBulk Delete failed for Activity(ies): Unable to delete the following stream activities: }Ŕř out of records were deleted }Ŕř}ŔřBULK DELETE COMPLETED: }ŔřÔ?K€dReady t Ź ź Ô ě 0 H | Ä Ř đ   , 4 < h ¸ Ô Ü ô ü  , H \ l t „ Œ ź Ä Ě Ü ä DAT*Žöě ô   , 4 D L t | „ Œ ” Ź ´ Č ä ě    < D X ` h p ” Ź ´ Ě č đ ř ” œ ¤ ź Ä Ě ä ě ô     $ 8 @ X h ” œ ° ź Ä Ě ŕ č  $ ˆ  ˜DAT*°ö   ´ ź Ô Ü @ h p  ˜   â%Ô$ä$8ěz%8đz&z&8öz&8ůz&z&8z& z&…$8$@$ź8Hz%z&8Mz&…8Vz%…8Şú6…8Zz%z&…t$|$8ěz%8đz& z&8öz&… —1Ĺ ’#!ź8ůz%DAT*˛ö8z& z&8öz&z'…8„z%…8Şú6…8Zz%z&…”$œ$Ş8¤z%8§z& z&8öz&…8ŞŒ6…Ş8Zz%z&…Ŕ$Č$<8¤z%8§z& z&8öz&…8Ş6…<8Zz%z&…ŕ$č$Î8¤z%8đz&z&8Vz&…DAT*´ö8ް6…Î8Zz%z&…6)*-p.”0ź3Ň4ć5ö6ú;<2=d>‚@źCŇDćEöFúKL2OdPxQˆRŒWŞXÄ[ö\ ]^c<dVgˆhœiŹj°nÎd˙ ls_sqlls_termls_start_columnls_end_columnls_creationdate_columnls_datacode_columnls_referencecode_columnls_material_columnls_start_argls_end_argls_creationstart_argls_creationend_argls_datacode_argls_referencecode_argls_material_DAT*śöarg,˙˙˙˙ ˙˙ ˙˙'˙˙5˙˙L0˙˙_:˙˙wI˙˙ŠW˙˙—e˙˙˘q˙˙ˇƒ˙˙ʓ˙˙ڟ˙˙ď°řh start_dateend_datecreation_date_timedata_codereference_codematerial_codeadt_startdateadt_enddateadt_creationstartadt_creationendas_datacodeas_referencecodeas_materialsDAT*¸öcbx_emissionperioddate˝0*€checkedÜ(( >= : ) and ( <= :uo_emissionperiodntc+€cbx_withnoenddate‚@$(€Ü or IS NULL )) and cbx_creationdate˙˙˙`-&€Ü)cbx_datacode†.'€Ü( = :cbx_referencecodeŹE_€Ücbx_materialĐ,"€Ü IN ( :Ô ä  8 @ t | ” œ Ŕ Č ŕ č J $9)$8,$1)@8DAT*şö1ѰH$9)P81˙˙˙˙‹8X0ź+ľ@˝+81˙˙˙˙‹|$Œ$8”0˛)°98¸$)Ě8Ô$9)Ü81‹ HXx  $°'ô*,4d as_messagell_row(˙˙ ˙˙äh dw_log2.€setredrawě!Ŕ2.€insertrow&(Ŕ42.€!ŔFailed inserting row into log DAT*– öfile.2.€objects„…@line__set_attribute_itemtaŔ™2.€scrolltorow?ŔŔ2.€!Ŕ $ , @ H P | Œ ° ¸ Ě Ô Ü œ<1ŃuŠč€$1Ľ1Ĺ!F$,$6…840…668B0)X8ź €˝81ÝÄR1DAT*žö˙Řse@ionr˙˙äet@ultn˙˙ďź˙˙ů@˙˙@˙˙ľ@@˙˙@đ …€€€€Ŕ˙˙wW +*€€˙˙žy%Ź$$$8501˛8,,z%)\9981I+ź2ľ@˝28,•’1 ,d$Txd# gDAT*Ŕös_versionnumber::message( ˙˙@t˙˙@€l dw_splashhe*€objectx…@Version version_number__set_attribute_itemontŔD˙˙ $ \ d r1I+ź1ľ@˝18Śź˜ľ@˝˜ś8,•X1f,$">d w_logon::message(8˙˙@€ś˙˙@€ ˙˙ @*‡,DAT*. ö4$˛€ |d < dw_splashht*€€control$c@*€ , 4 $d  dw_splash‡*€ €€&€1€ą&12 & +open+timer+create+destroyP$ ˙˙Ŕ˙˙Ŕ˙˙Ŕ˙˙Ŕ2 8 xywidthheightbackcolorwindowtypedw_splashŒDAT* s_exp_point_emission,u OBJ:C:\RAPIDS\GLC\Dev80\rap_import.pbl,str_ifile,s OBJ:C:\RAPIDS\GLC\Dev80\rap_dw2.pbl,d_permit_condition_metrics,d OBJ:C:\RAPIDS\GLC\Dev80\rap_dw1.pbl,d_dev_names_for_group,d OBJ:C:\RAPIDS\GLC\Dev80\rap_func.pbl,f_del_ref_activities,f DAT*ĆöFatal error message windowforward global type w_error_message from Window end type type cb_print from commandbutton within w_error_message end type type cb_ok from commandbutton within w_error_message end type type mle_error_message from multilineedit within w_error_message end type end forward global type w_error_message from Window int X=586 int Y=421 int Width=1774 int Height=1233 boolean TitleBar=true string Title="Fatal Error" long BackColor=12632256 boolean ControlMenu=trDAT*Čöue WindowType WindowType=response! cb_print cb_print cb_ok cb_ok mle_error_message mle_error_message end type global w_error_message w_error_message on open;mle_error_message.text = gs_error_message end on on w_error_message.create this.cb_print=create cb_print this.cb_ok=create cb_ok this.mle_error_message=create mle_error_message this.Control[]={ this.cb_print,& this.cb_ok,& this.mle_error_message} end on on w_error_message.destroy destroy(this.cb_print) destroy(this.cb_DAT*Ęöok) destroy(this.mle_error_message) end on type cb_print from commandbutton within w_error_message int X=865 int Y=973 int Width=243 int Height=97 int TabOrder=30 string Text="Print" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;// Print a fax document describing the fatal error int job,xcoord,ycoord long ll_start, ll_end string ls_msg, ls_print_string boolean lb_quit PrintSeDAT*Ěötup() job = PrintOpen() //PrintRect(job,0,0,8000,10500,25) Print(job,100,"") PrintDefineFont(job,2,"Courier 10Cpi",-18,700,Default!,AnyFont!,False,True) PrintSetFont(job,2) Print(job,1800,"Fatal Error Message Fax Document") PrintSetFont(job,0) Print(job,100,"") Print(job,100,"") Print(job,100," To: Radian Corp") Print(job,100," Location: Austin, TX") Print(job,100,"Attention: Dan Radin") Print(job,100," Phone: (512) 454-4797") Print(job,100," Fax: (512) 345-9684") PrinDAT*Îöt(job,100," Subject: " + gs_app_title + " Oracle Fatal Error Message") Print(job,100,"") Print(job,100," From:______________________") Print(job,100," Phone:( )_________________") Print(job,100," Fax:( )_________________") Print(job,100,"") xcoord=PrintX(job) ycoord=PrintY(job) Print(job,100,"") PrintSetFont(job,2) Print(job,3500,"Message") PrintSetFont(job,0) Print(job,100,"") ls_msg = mle_error_message.text ll_start = 1 ll_end = 60 do while ll_start + ll_end < DAT*Đölen(ls_msg) lb_quit = false do while mid(ls_msg, ll_start + ll_end, 1) <> " " and not lb_quit if ll_end > ll_start + 1 then ll_end = ll_end - 1 else ll_end = 60 lb_quit = true end if loop ls_print_string = mid(ls_msg, ll_start, ll_end) if mid(ls_print_string,1,1) = " " then ls_print_string = mid(ls_print_string,2,len(ls_print_string)) end if ll_start = ll_start + ll_end ll_end = 60 print(job, 100, ls_print_string) loop ls_pDAT*Ňörint_string = mid(ls_msg, ll_start, ll_end) if mid(ls_print_string,1,1) = " " then ls_print_string = mid(ls_print_string,2,len(ls_print_string)) end if print(job, 100, ls_print_string) //print(job,100,w_error_message.mle_error_message.text) PrintClose(job) end on type cb_ok from commandbutton within w_error_message int X=558 int Y=973 int Width=247 int Height=97 int TabOrder=20 string Text="Close" boolean Default=true int TextSize=-8 int Weight=700 string FaceName="MSDAT*Ôö Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;// Application must be closed due to fatal error halt end on type mle_error_message from multilineedit within w_error_message int X=170 int Y=101 int Width=1367 int Height=821 int TabOrder=10 BorderStyle BorderStyle=StyleLowered! boolean DisplayOnly=true long TextColor=33554432 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPDAT*itch=Variable! end type DAT*ŘöŚp@ś)b?#ąţAp@p@t4p@€éa”@”@a \@\@a+[@[@17c@c@aDU@U@aU`@`@a_j@j@amk@k@ayl@l@m@m@q™€@€@AŠ‘@‘@ś¤@¤@ø@¸@Ň^@^@q@@0@@a€€Q w_splash_agwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject €4€DAT*Úö (y pictureborderstyle4€ Řf agrapids.bmpŕ2 w_splash_ag˙˙ €  x˙ _initsrcwindoww_splash_agmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectpicturep_1borderstyle¤on m˙˙DAT*Üöteis.T˙˙" @s.Mi˙˙ave cu˙˙$rd@his.˙˙)mD@ame=˙˙4hi@olBa˙˙@"S@" t˙˙MrI@ext=˙˙^is@lBar˙˙he=@e t˙˙v d=@e e˙˙‚ @˙˙– @crea˙˙˘ w @s.m_˙˙˛ e @lp ˙˙ż]=@s.m_˙˙Ěhi@edit˙˙Űm_@, & ˙˙çta@ thi˙˙ďat th˙˙ó, @đ …€€€€ŔwW DAT*Ţö+*€€0!2  2 2 xywidthheightbackcolorwindowtypep_1Œ m˙˙s.˙˙ s.˙˙ he˙˙is˙˙me˙˙#€.T˙˙. €] o€   €€€€€1€  DAT*Ą@@€@ €2  2 ! widthheightpicturename< m˙˙hi˙˙ t˙˙ ] o  @ @€@@ DAT*âöŚp@ˇ)b?#ąţAp@p@5p@€éq”@”@q#\@\@Q.[@[@:c@c@aGU@U@aX`@`@abj@j@apk@k@a|l@l@m@m@aœ€@€@aŹ‘@‘@š¤@¤@Ƹ@¸@Ő^@^@a n@n@`@@#…@…@,„@„@:@@aF@@QP@@q m€rĎ w_system_errorwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchDAT*äöildlistviewitemtreeviewitemconnectioninfopowerobjecthel5€ x-datawindowborderstyledwobjectcommandbuttonfontcharsetfontpitchfontfamilySystem Error5€ `˙ d_system_error&PrintMS Sans SerifExit The Program&Continueäh2 w_system_error˙˙ €  x_ _initsrcwindoww_system_errormenuwindowtypewindowstatewindowobjecttoDAT*ćöolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowdw_errorborderstyledwobjectcommandbuttoncb_printfontcharsetfontpitchfontfamilycb_exitcb_continueDeven˙˙wi act˙˙ @veSh˙˙ntow.G˙˙'ee@ i˙˙,ac@Shee˙˙7 P@Wind˙˙CPa@Wind˙˙Pve@t())˙˙a P@Wind˙˙kPa@Wind˙˙y if@d ev˙˙…DAT*čö @@˙˙™ @crea˙˙Ľ w @s.m_˙˙ľ e @lp ˙˙Â]=@s.m_˙˙Ďhi@edit˙˙Ţm_@, & ˙˙ęta@ thi˙˙őat th˙˙ţ, @his.˙˙ & @s.m_˙˙ t@m_he˙˙!n ii_˙˙*2@ ˙˙6_-@ ă!˙˙@@˙˙K˙˙S& đ …€€€€€€€ŔwW .*DAT*ęö€€žy%€€-€€-€€-2  2 c xywidthheighttitlebartitlebackcolorwindowtypedw_errorcb_printcb_exitcb_continueđ ˙˙m_˙˙ en˙˙ te˙˙il˙˙en˙˙" io˙˙(wi˙˙2€it˙˙= €nn˙˙F €je˙˙O €_c˙˙WDAT*ěö €] o€   €€€€h€1€  @@€@ € € € €2  2 9 xywidthheighttaborderdataobjectborderstyleŒ˙˙˙˙ DAT*îö˙˙ ˙˙˙˙˙˙" ˙˙-€] o @  @ € €2  2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙˙˙ DAT*đö˙˙ ˙˙˙˙˙˙" ˙˙'˙˙0˙˙7 ˙˙@€˙˙K€] o @€€€  @ 2  2 ] xywidthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitDAT*ňöchđ˙˙˙˙ ˙˙ ˙˙˙˙˙˙" ˙˙'˙˙/˙˙8˙˙? ˙˙H€˙˙S€] o @€€€  @ 2  2 U xywidthheightDAT*ÚtabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙˙˙ ˙˙ ˙˙˙˙˙˙" ˙˙'˙˙0˙˙7 ˙˙@€˙˙K€] o @€€€  @ DAT*łght = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" string text = "OK" end type on clicked;Close(Parent) end on DAT*řöľ@˝$¤8ŞL9}8 0…80źľ@˝8†808C0:G@Şźđľ@˝đś8’Ł8HŞ"ę8H0… 8Iz% z&… 68K08V08`0źëľ@˝ë8…8`ŞŚ8j0… 68K08V06źľ@˝8¤8qŞŢŚ9ź˜ľ@˝˜ś8úŚ;ź˜ľ@˝˜ś8@ L ^DAT*úö‚¸ŘęH\n Ś!ž"Ú#Ţd4 commandlinels_apppathw_splash_agw_splashP˙˙ ^@˙˙ ˙˙9@€^@˙˙+;@€{ -IMP2.4.12005/01/31HKEY_LOCAL_MACHINE\SOFTWARE\RAPIDS20Path\w_mdi_mainapp_titlenot foundRAPIDSAG RAPIDS ,<d sqlca˙˙<@ € f80…=j(‡<j<‡>j\‡?jx‡DAT*fö@jˆ‡(6DRd( messagesqlcasqldasqlsaerrord˙˙=@€˙˙<@ €˙˙>@€˙˙?@€˙˙"@@€0 appnamerapidsmessage€transaction0 €dynamicdescriptionareaD€dynamicstagingaread€error€€ (<\xˆ$,<,>,?,@,= d( sqlcasqldasqlsDAT*ţöPop up window for filtering the rowsforward global type w_filter from Window end type type dw_2 from datawindow within w_filter end type type cb_cancel from commandbutton within w_filter end type type cb_select from commandbutton within w_filter end type type dw_1 from datawindow within w_filter end type end forward global type w_filter from Window int X=297 int Y=520 int Width=2418 int Height=908 boolean TitleBar=true string Title="Filter Records" long BackColor=12632256 booDAT*ölean ControlMenu=true WindowType WindowType=response! dw_2 dw_2 cb_cancel cb_cancel cb_select cb_select dw_1 dw_1 end type global w_filter w_filter type variables integer ii_clicked_dw1_row; string is_table_name; end variables forward prototypes public subroutine populatedddw () public subroutine wf_oracle_dw () public subroutine wf_watcom_dw () public subroutine wf_oracle_filter () public subroutine wf_watcom_filter () public function string wf_oracle_in_operator (long rownuDAT*öm) public function string wf_watcom_in_operator (long row_num) end prototypes public subroutine populatedddw ();// This function is for dddw style which does not work now. //string colName, attr //integer yCoord, titleH, rowH // Move the DropDownDataWindow to the appropriate position and make it // visible; yCursorPos() is an external function which returns the y // coordinate of the cursor in window units //yCoord = yCursorPos() //messagebox("ycoord", ycoord) //choose case yCoDAT*öord // case 192 to 206 // dw_2.y = 130 // case 209 to 224 // dw_2.y = 202 // case 227 to 242 // dw_2.y = 274 // case 245 to 260 // dw_2.y = 346 // case 263 to 278 // dw_2.y = 418 // case 282 to 296 // dw_2.y = 490 //end choose //colName = "select_value_t" //attr = colName + ".height" //titleH = Integer(dw_1.dwDescribe(attr)) //colName = "select_value" //attr = colName + ".height" //rowH = Integer(dw_1.dwDescribe(attr)) //dw_2.y = dw_1.y + titleH + 4 + ((rowH + 7) DAT*ö* (dw_1.GetRow() -1)) //dw_2.Visible = TRUE // Have trouble converting window units to PB units; Need more conversion // information. Use the above hard-coded scheme temporarily. // //messagebox("window units", yCursorPos()) //messagebox("dw_2.y", (dw_1.y + titleH + 4 + ((rowH + 7) * (dw_1.GetRow() -1)))) //dw_2.y = PixelsToUnits(yCursorPos(), yPixelsToUnits!) - Parent.y end subroutine public subroutine wf_oracle_dw ();string is_heading, is_col_name, is_data_type, ls_app_title, DAT*öls_table_name long ll_col_id integer li_counter ls_app_title = Upper(gs_app_title) if ls_app_title = 'AG RAPIDS' then ls_app_title = 'RAPIDS' ls_table_name = Upper(is_table_name) // Get column heading, column name, data type and column id from // Oracle and PowerBuilder system data dictionary and put them into // one datawindow row per column. declare headingCursor cursor for select PBC_HDR, COLUMN_NAME, DATA_TYPE, COLUMN_ID from SYS.ALL_TAB_COLUMNS, system.pbcatcol where ODAT* öWNER = :ls_app_title and TABLE_NAME = :ls_table_name and TABLE_NAME = PBC_TNAM and COLUMN_NAME = PBC_CNAM and Upper(PBC_HDR) not like '%RID%' order by PBC_HDR; open headingCursor; fetch headingCursor into :is_heading, :is_col_name, :is_data_type, :ll_col_id; li_counter = 1 do while sqlca.sqlcode = 0 dw_1.InsertRow(0) SetItem(dw_1, li_counter, "field", is_heading) SetItem(dw_1, li_counter, "operator", "") SetItem(dw_1, li_counter, "select_value", "") SDAT* öetItem(dw_1, li_counter, "logical", "") SetItem(dw_1, li_counter, "data_type", is_data_type) SetItem(dw_1, li_counter, "column_name", is_col_name) SetItem(dw_1, li_counter, "column_id", ll_col_id) fetch headingCursor into :is_heading, :is_col_name, :is_data_type, :ll_col_id; li_counter = li_counter + 1 loop close headingCursor; commit; end subroutine public subroutine wf_watcom_dw ();string ls_heading, ls_col_name, ls_data_type, ls_user, ls_password long ll_col_id integerDAT*ö li_counter ls_user = sqlca.userid ls_password = sqlca.dbpass // Get column heading, column name, data type and column id from // Oracle and PowerBuilder system data dictionary and put them into // one datawindow row per column. /* Removed SYS.SYSUSERPERM so this would return rows MDY 10/98 */ declare headingCursor cursor for select PBC_HDR, COLUMN_NAME, DOMAIN_NAME, COLUMN_ID from /* SYS.SYSUSERPERM, */ SYS.SYSTABLE, SYS.SYSCOLUMN, SYS.SYSDOMAIN, rapids.pbcatcol where /DAT*ö/USER_NAME = :ls_user and //PASSWORD = :ls_password and //USER_ID = CREATOR and TABLE_NAME = :is_table_name and SYS.SYSTABLE.TABLE_ID = SYS.SYSCOLUMN.TABLE_ID and SYS.SYSCOLUMN.DOMAIN_ID = SYS.SYSDOMAIN.DOMAIN_ID and COLUMN_NAME = PBC_CNAM and TABLE_NAME = PBC_TNAM and PBC_HDR not like '%Rid%' order by PBC_HDR; open headingCursor; fetch headingCursor into :ls_heading, :ls_col_name, :ls_data_type, :ll_col_id; li_counter = 1 do while sqlca.sqlcoDAT*öde = 0 dw_1.InsertRow(0) SetItem(dw_1, li_counter, "field", ls_heading) SetItem(dw_1, li_counter, "operator", "") SetItem(dw_1, li_counter, "select_value", "") SetItem(dw_1, li_counter, "logical", "") SetItem(dw_1, li_counter, "data_type", ls_data_type) SetItem(dw_1, li_counter, "column_name", ls_col_name) SetItem(dw_1, li_counter, "column_id", ll_col_id) fetch headingCursor into :ls_heading, :ls_col_name, :ls_data_type, :ll_col_id; li_counter = li_counter + 1 loop DAT*ö close headingCursor; commit; end subroutine public subroutine wf_oracle_filter ();// This function builds the filter expression for SetFilter function. // This function is used for ORACLE DBMS integer i, li_prev_row_num string ls_sel_pattern, ls_col_id, ls_value, ls_col_name long ll_total_row ll_total_row = dw_1.RowCount() // Define the filter expression for i = 1 to ll_total_row if GetItemString(dw_1, i , "select_value") <> "" or & GetItemString(dw_1, i, "operator") = "DAT*öis null" or & GetItemString(dw_1, i, "operator") = "is not null" then //messagebox("Debug: datatype",GetItemString(dw_1, i, "data_type")) /* MDY 5/99 Changed filter to use column name instead of column number */ //ls_col_id = "#" + String(GetItemNumber(dw_1, i, "column_id")) ls_col_id = " " + dw_1.GetItemString(i, "column_name") + " " // If the filter column is a rid field, get rid value from the // hidden column ls_col_name = Upper(dw_1.GetItemString(i, "coluDAT*ömn_name")) if ls_col_name = 'GEOGRAPHIC_COUNTY_RID' or & ls_col_name = 'GEOGRAPHIC_INCORP_RID' or & ls_col_name = 'GEOGRAPHIC_STATE_RID' then ls_value = String(dw_1.GetItemNumber(i, "rid_value")) else ls_value = dw_1.GetItemString(i, "select_value") // Take out the quotes on both ends if there is any if (Right(ls_value, 1) = "'" and Left(ls_value, 1) = "'") or & (Right(ls_value, 1) = '"' and Left(ls_value, 1) = '"') then ls_value = Mid(ls_value, 2, Len(ls_value) DAT*ö- 2) end if end if // Operator is LIKE if GetItemString(dw_1, i, "operator") = "like" then ls_sel_pattern = "Match(Upper(" + ls_col_id + "), Upper('" + & ls_value + "'))" // Operator is NOT LIKE elseif GetItemString(dw_1, i, "operator") = "not like" then ls_sel_pattern = "(NOT (Match(Upper(" + ls_col_id + "), Upper('" + & ls_value + "'))))" // Operator is IS NULL elseif GetItemString(dw_1, i, "operator") = "is null" then ls_sel_pattern = "IsNull("DAT*ö + ls_col_id + ")" // Operator is IS NOT NULL elseif GetItemString(dw_1, i, "operator") = "is not null" then ls_sel_pattern = "(NOT(IsNull(" + ls_col_id + ")))" // Operator is IN elseif GetItemString(dw_1, i, "operator") = "in" then ls_sel_pattern = wf_oracle_in_operator(i) // Operator is anything other than the above else // If data type is NUMBER if GetItemString(dw_1, i, "data_type") = "NUMBER" then ls_sel_pattern = ls_col_id + " " + & GetIDAT*ötemString(dw_1, i, "operator") + " " + ls_value // If data type is DATE elseif GetItemString(dw_1, i, "data_type") = "DATE" then ls_sel_pattern = ls_col_id + " " + & GetItemString(dw_1, i, "operator") + " date('" + ls_value + "')" // data type is everything other than NUMBER and DATE else ls_sel_pattern = "Upper(" + ls_col_id + ") " + & GetItemString(dw_1, i, "operator") + " Upper('" + ls_value + "')" end if end if if IsNull(gs_filt) then DAT* ö gs_filt = ls_sel_pattern + GetItemString(dw_1, i, "logical") + " " else if not (Right(gs_filt, 4) = "and " or Right(gs_filt, 3) = "or ") then Beep(1) SetRow(dw_1, li_prev_row_num) MessageBox(This.Title, "Please select a logical operator", & StopSign!) return end if gs_filt = gs_filt + ls_sel_pattern + GetItemString(dw_1, i, "logical") + " " end if li_prev_row_num = i end if next end subroutine public subroutine wf_watcom_filter ();// This funcDAT*"ötion builds the filter expression for SetFilter function. // This function is used for WATCOM DBMS integer ll_total_row, i, li_prev_row_num string ls_col_id, ls_value, ls_sel_pattern, ls_col_name ll_total_row = dw_1.RowCount() // Define the filter expression for i = 1 to ll_total_row if GetItemString(dw_1, i , "select_value") <> "" or & GetItemString(dw_1, i, "operator") = "is null" or & GetItemString(dw_1, i, "operator") = "is not null" then //messagebox("Debug: datatypeDAT*$ö",GetItemString(dw_1, i, "data_type")) /* MDY 5/99 Changed filter to use column name instead of column number */ //ls_col_id = "#" + String(dw_1.GetItemNumber(i, "column_id")) ls_col_id = " " + dw_1.GetItemString(i, "column_name") + " " // If the filter column is a rid field, get rid value from the // hidden column ls_col_name = Upper(dw_1.GetItemString(i, "column_name")) if ls_col_name = 'GEOGRAPHIC_COUNTY_RID' or & ls_col_name = 'GEOGRAPHIC_INCORP_RID' or & DAT*&ö ls_col_name = 'GEOGRAPHIC_STATE_RID' then ls_value = String(dw_1.GetItemNumber(i, "rid_value")) else ls_value = dw_1.GetItemString(i, "select_value") // Take out the quotes on both ends if there is any if (Right(ls_value, 1) = "'" and Left(ls_value, 1) = "'") or & (Right(ls_value, 1) = '"' and Left(ls_value, 1) = '"') then ls_value = Mid(ls_value, 2, Len(ls_value) - 2) end if end if // Operator is LIKE if GetItemString(dw_1, i, "operator") = "like" then DAT*(ö ls_sel_pattern = "Match(Upper(" + ls_col_id + "), Upper('" + & ls_value + "'))" // Operator is NOT LIKE elseif GetItemString(dw_1, i, "operator") = "not like" then ls_sel_pattern = "(NOT (Match(Upper(" + ls_col_id + "), Upper('" + & ls_value + "'))))" // Operator is IS NULL elseif GetItemString(dw_1, i, "operator") = "is null" then ls_sel_pattern = "IsNull(" + ls_col_id + ")" // Operator is IS NOT NULL elseif GetItemString(dw_1, i, "oDAT**öperator") = "is not null" then ls_sel_pattern = "(NOT(IsNull(" + ls_col_id + ")))" // Operator is IN elseif GetItemString(dw_1, i, "operator") = "in" then ls_sel_pattern = wf_watcom_in_operator(i) // Operator is anything other than the above else // If data type is numeric if GetItemString(dw_1, i, "data_type") = "numeric" then ls_sel_pattern = ls_col_id + " " + & GetItemString(dw_1, i, "operator") + " " + ls_value // If data type is date DAT*,öelseif GetItemString(dw_1, i, "data_type") = "date" then ls_sel_pattern = ls_col_id + " " + & GetItemString(dw_1, i, "operator") + " date('" + & ls_value + "')" // data type is everything other than numeric and date else ls_sel_pattern = "Upper(" + ls_col_id + ") " + & GetItemString(dw_1, i, "operator") + " Upper('" + ls_value + "')" end if end if if IsNull(gs_filt) then gs_filt = ls_sel_pattern + GetItemString(dw_1, i, "logical") + " " DAT*.öelse if not (Right(gs_filt, 4) = "and " or Right(gs_filt, 3) = "or ") then Beep(1) SetRow(dw_1, li_prev_row_num) MessageBox(This.Title, "Please select a logical operator", & StopSign!) return end if gs_filt = gs_filt + ls_sel_pattern + GetItemString(dw_1, i, "logical") + " " end if li_prev_row_num = i end if next end subroutine public function string wf_oracle_in_operator (long rownum);// This function constructs the filter expression for IN operaDAT*0ötor // This function is for oracle DBMS long ll_comma_pos string ls_sel_value, ls_data_value, ls_sel_pattern, ls_col_id // Get the column id ls_col_id = "#" + String(GetItemNumber(dw_1, rowNum, "column_id")) // Get the select value user entered ls_sel_value = dw_1.GetItemString(rowNum, "select_value") // Get the position for the first comma ll_comma_pos = Pos(ls_sel_value, ",") // Initialize the ls_sel_pattern variable ls_sel_pattern = '' // If user enters more than one selDAT*2öect value, parse out the values do while ll_comma_pos > 0 ls_data_value = Trim(Left(ls_sel_value, ll_comma_pos - 1)) ls_sel_value = Right(ls_sel_value, Len(ls_sel_value) - ll_comma_pos) if ls_sel_pattern <> '' then ls_sel_pattern = ls_sel_pattern + " or " end if // If data type is NUMBER if GetItemString(dw_1, rowNum, "data_type") = "NUMBER" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = " + ls_data_value // If data type is DATE elseif GetItemString(dwDAT*4ö_1, rowNum, "data_type") = "DATE" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = date('" + & ls_data_value + "')" // data type is everything other than NUMBER and DATE else ls_sel_pattern = ls_sel_pattern + "Upper(" + ls_col_id + & ") = Upper('" + ls_data_value + "')" end if ll_comma_pos = Pos(ls_sel_value, ",") loop // The following statements are for the last select value in the list or // for the only select value user entered if ls_sel_pattern <>DAT*6ö '' then ls_sel_pattern = ls_sel_pattern + " or " end if // If data type is NUMBER if GetItemString(dw_1, rowNum, "data_type") = "NUMBER" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = " + Trim(ls_sel_value) // If data type is DATE elseif GetItemString(dw_1, rowNum, "data_type") = "DATE" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = date('" + & Trim(ls_sel_value) + "')" // data type is everything other than NUMBER and DATE else ls_sel_pattern = ls_sel_paDAT*8öttern + "Upper(" + ls_col_id + & ") = Upper('" + Trim(ls_sel_value) + "')" end if // Return the filter expression return ls_sel_pattern end function public function string wf_watcom_in_operator (long row_num);// This function constructs the filter expression for IN operator // This function is for WATCOM DBMS long ll_comma_pos string ls_sel_value, ls_data_value, ls_sel_pattern, ls_col_id // Get the column id ls_col_id = "#" + String(GetItemNumber(dw_1, row_num, "column_id")) DAT*:ö // Get the select value user entered ls_sel_value = dw_1.GetItemString(row_num, "select_value") // Get the position for the first comma ll_comma_pos = Pos(ls_sel_value, ",") // Initialize the ls_sel_pattern variable ls_sel_pattern = '' // If user enters more than one select value, parse out the values do while ll_comma_pos > 0 ls_data_value = Trim(Left(ls_sel_value, ll_comma_pos - 1)) ls_sel_value = Right(ls_sel_value, Len(ls_sel_value) - ll_comma_pos) if ls_sel_pattern <> DAT*<ö'' then ls_sel_pattern = ls_sel_pattern + " or " end if // If data type is numeric if GetItemString(dw_1, row_num, "data_type") = "numeric" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = " + ls_data_value // If data type is date elseif GetItemString(dw_1, row_num, "data_type") = "date" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = date('" + & ls_data_value + "')" // data type is everything other than numeric and date else ls_sel_pattDAT*>öern = ls_sel_pattern + "Upper(" + ls_col_id + & ") = Upper('" + ls_data_value + "')" end if ll_comma_pos = Pos(ls_sel_value, ",") loop // The following statements are for the last select value in the list or // for the only select value user entered if ls_sel_pattern <> '' then ls_sel_pattern = ls_sel_pattern + " or " end if // If data type is numeric if GetItemString(dw_1, row_num, "data_type") = "numeric" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = " + TrDAT*@öim(ls_sel_value) // If data type is date elseif GetItemString(dw_1, row_num, "data_type") = "date" then ls_sel_pattern = ls_sel_pattern + ls_col_id + " = date('" + & Trim(ls_sel_value) + "')" // data type is everything other than numeric and date else ls_sel_pattern = ls_sel_pattern + "Upper(" + ls_col_id + & ") = Upper('" + Trim(ls_sel_value) + "')" end if // Return the filter expression return ls_sel_pattern end function event open;is_table_name = Message.StringParm DAT*Bö dw_1.SetTransObject(SQLCA) dw_1.SetRowFocusIndicator(FocusRect!) // Retrieve the DataWindow without any data in it dw_1.Retrieve() if gs_database = 'ORACLE' then wf_oracle_dw() else wf_watcom_dw() end if // Resize the width of the DataWindow; If the data row is less than 7, // deduct the width of the vertical scroll bar from the width of the // DataWindow. if (dw_1.Rowcount() < 7) then dw_1.Resize(dw_1.Width - 75, dw_1.Height) end if end event on w_filter.creaDAT*Döte this.dw_2=create dw_2 this.cb_cancel=create cb_cancel this.cb_select=create cb_select this.dw_1=create dw_1 this.Control[]={this.dw_2,& this.cb_cancel,& this.cb_select,& this.dw_1} end on on w_filter.destroy destroy(this.dw_2) destroy(this.cb_cancel) destroy(this.cb_select) destroy(this.dw_1) end on type dw_2 from datawindow within w_filter int X=1129 int Y=120 int Width=1097 int Height=496 int TabOrder=20 boolean Visible=false boolean TitleBar=true string Title="CliDAT*Föck one row to select" BorderStyle BorderStyle=StyleShadowBox! boolean HScrollBar=true boolean VScrollBar=true boolean LiveScroll=true end type event clicked;integer li_clicked_row li_clicked_row = row if li_clicked_row > 0 then choose case dw_2.DataObject case 'd_county_name', 'd_city_names', 'd_state_names' dw_1.SetItem(ii_clicked_dw1_row, "select_value", & dw_2.GetItemString(li_clicked_row, "name")) dw_1.SetItem(ii_clicked_dw1_row, "rid_value", & dw_2.GetIDAT*HötemNumber(li_clicked_row, "rid")) end choose dw_2.Visible = FALSE end if end event on retrieveend;// Un-highlight the first row This.SelectRow(1, FALSE) end on on rowfocuschanged;long ll_clicked_row long ll_selected_row ll_clicked_row = GetRow(This) if ll_clicked_row > 0 then ll_selected_row = GetSelectedRow(this, 0) // Un-highlighted the previous selected row and highlight the new // selected row if ll_selected_row > 0 and ll_selected_row <> ll_clicked_row then DAT*Jö SelectRow(This, ll_selected_row, FALSE) end if SelectRow(This, ll_clicked_row, TRUE) end if end on on itemchanged;// The following statement is for dddw style which does not work now //DataWindowChild dwc // //if dw_2.DataObject = "d-b-20-samp-event" then // dw_2.dwGetChild("sn_samp_event", dwc) // dw_1.SetItem(dw_1.GetRow(), "select_value", & // String(dwc.GetItemNumber(dwc.GetRow(), "uid_samp_event"))) // dw_1.SetText(dw_2.GetItemString(dw_2.GetRow(), "sn_samp_event")) DAT*Lö //elseif dw_2.DataObject = "d-b-20-cont-grp" then // dw_2.dwGetChild("sn_container_grp", dwc) // dw_1.SetItem(dw_1.GetRow(), "select_value", & // String(dwc.GetItemNumber(dwc.GetRow(), "uid_container_grp"))) //elseif dw_2.DataObject = "d-b-20-loc-inst" then // dw_2.dwGetChild("sn_loc", dwc) // dw_1.SetItem(dw_1.GetRow(), "select_value", & // String(dwc.GetItemNumber(dwc.GetRow(), "uid_loc_type_inst"))) //end if //dw_2.Visible = FALSE end on type cb_cancel from commandbutton witDAT*Nöhin w_filter int X=1280 int Y=688 int Width=293 int Height=80 int TabOrder=40 string Text="Cancel" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;Close(Parent) end on type cb_select from commandbutton within w_filter int X=823 int Y=688 int Width=293 int Height=80 int TabOrder=30 string Text="Select" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FoDAT*PöntFamily=Swiss! FontPitch FontPitch=Variable! end type event clicked;SetNull(gs_filt) dw_1.AcceptText() // Define the filter expression if gs_database = 'ORACLE' then wf_oracle_filter() else wf_watcom_filter() end if //messagebox("Debug Filter", gs_filt) // the following FOR LOOP is for using column name in filter format, // setfilter and filter functions still don't work on column name yet. - 1993 // //for i = 1 to RowCount(dw_1) // if GetItemString(dw_1, i , 3) <> ""DAT*Rö or & // GetItemString(dw_1, i, 2) = "is null" or & // GetItemString(dw_1, i, 2) = "is not null" then // if GetItemString(dw_1, i, 2) = "like" then // sSelectPattern = "Match('" + GetItemString(dw_1, i, 6) & // + "', '" + GetItemString(dw_1, i, 3) + "'" // elseif GetItemString(dw_1, i, 2) = "not like" then // sSelectPattern = "NOT (Match('" + GetItemString(dw_1, i, 6) & // + "', '" + GetItemString(dw_1, i, 3) + "'))" // elseif GetItemString(dw_1, i, 2) = "is null" then // DAT*Tö sSelectPattern = "IsNull('" + GetItemString(dw_1, i, 6) + "')" // elseif GetItemString(dw_1, i, 2) = "is not null" then // sSelectPattern = "IsNull('" + GetItemString(dw_1, i, 6) + "') = FALSE" // else // if GetItemString(dw_1, i, 5) = "NUMBER" then // sSelectPattern = "'" + GetItemString(dw_1, i, 6) + & // "' " + GetItemString(dw_1, i, 2) + GetItemString(dw_1, i, 3) // else // sSelectPattern = "'" + GetItemString(dw_1, i, 6) + "' " + & // GetItemString(dDAT*Vöw_1, i ,2) + " '" + GetItemString(dw_1, i, 3) & // + "'" // end if // end if // if IsNull(gs_filt) then // gs_filt = sSelectPattern + GetItemString(dw_1, i, 4) + " " // else // if not (Right(gs_filt, 4) = "and " or Right(gs_filt, 3) = "or ") then // Beep(1) // SetRow(dw_1, prevRowNum) // MessageBox(Parent.Title, "Please select a logical operator", & // StopSign!) // return // end if // gs_filt = gs_filt + sSelectPattern + GetItemString(dw_1, i, 4) + " " // DAT*Xö end if // prevRowNum = i // end if //next if NOT IsNull(gs_filt) then gb_filter = TRUE end if Close(Parent) end event type dw_1 from datawindow within w_filter int X=55 int Y=48 int Width=2286 int Height=608 int TabOrder=10 string DataObject="d_filter" BorderStyle BorderStyle=StyleLowered! boolean VScrollBar=true boolean LiveScroll=true end type event clicked;string ls_col_name, ddlb_oper, lb_name pointer oldpointer DataWindowChild dwc long ll_rc ddlb_oper DAT*Zö= "operator" ii_clicked_dw1_row = row long ll_clicked ll_clicked = this.getclickedColumn() //need code here to get the referenced colum name from the value column of the dw //MDY 6/02 ls_col_name = upper(this.getItemString(row, "field")) if ll_clicked = 3 then //ls_col_name = Upper(dwo.name) choose case ls_col_name case "GEOGRAPHIC_COUNTY_RID", "COUNTY" //MDY 6/02 dw_2.DataObject = "d_county_name" dw_2.SetTransObject(SQLCA) ll_rc = dw_2.Retrieve() // pDAT*\öopulateDddw() dw_2.Visible = TRUE case "GEOGRAPHIC_INCORP_RID", "INCORPORATED CITY" //MDY 6/02 dw_2.DataObject = "d_city_names" dw_2.SetTransObject(SQLCA) ll_rc = dw_2.Retrieve() // populateDddw() dw_2.Visible = TRUE case "GEOGRAPHIC_STATE_RID", "STATE" //MDY 6/02 dw_2.DataObject = "d_state_names" dw_2.SetTransObject(SQLCA) ll_rc = dw_2.Retrieve() // populateDddw() dw_2.Visible = TRUE end choose end if if ll_clicked = 2 then //ls_cDAT*^öol_name = Upper(dwo.name) This.ClearValues( ddlb_oper ) choose case ls_col_name case "GEOGRAPHIC_COUNTY_RID","GEOGRAPHIC_INCORP_RID","GEOGRAPHIC_STATE_RID", "STATE", "COUNTY", "INCORPORATED CITY" //MDY 6/02 This.SetRedraw( FALSE ) SetPointer( HourGlass! ) This.SetValue( ddlb_oper, 1, " " ) This.SetValue( ddlb_oper, 2, "=" ) This.SetValue( ddlb_oper, 3, "is null" ) This.SetValue( ddlb_oper, 4, ">" ) This.SetValDAT*`öue( ddlb_oper, 5, "<" ) This.SetValue( ddlb_oper, 6, "<>" ) This.SetValue( ddlb_oper, 7, ">=" ) This.SetValue( ddlb_oper, 8, "<=" ) This.SetValue( ddlb_oper, 9, "is not null" ) SetPointer( oldpointer ) This.SetRedraw( TRUE ) case else This.SetRedraw( FALSE ) SetPointer( HourGlass! ) dw_1.SetValue( ddlb_oper, 1, " " ) dw_1.SetValue( ddlb_oper, 2, "=" ) dw_1.SetValue( ddlb_opDAT*böer, 3, "like" ) dw_1.SetValue( ddlb_oper, 4, "in" ) dw_1.SetValue( ddlb_oper, 5, "is null" ) dw_1.SetValue( ddlb_oper, 6, ">" ) dw_1.SetValue( ddlb_oper, 7, "<" ) dw_1.SetValue( ddlb_oper, 8, "<>" ) dw_1.SetValue( ddlb_oper, 9, ">=" ) dw_1.SetValue( ddlb_oper, 10, "<=" ) dw_1.SetValue( ddlb_oper, 11, "not like" ) dw_1.SetValue( ddlb_oper, 12, "is not null" ) SetPointer( oldpointer ) DAT*dö This.SetRedraw( TRUE ) end choose end if end event on scrollvertical;dw_2.Visible = FALSE end on on rowfocuschanged;long lClickedRow long lSelectedRow lClickedRow = GetRow(This) if lClickedRow > 0 then lSelectedRow = GetSelectedRow(this, 0) // Un-highlighted the previous selected row and highlight the new // selected row if lSelectedRow > 0 and lSelectedRow <> lClickedRow then SelectRow(This, lSelectedRow, FALSE) end if SelectRow(This, lClickedRow,DAT* TRUE) end if end on DAT*höaerrormessaged˙˙<@ €^@˙˙>@€˙˙?@€^@˙˙@@€ ˙˙ =@€ €€€€€€€€2 ^ printwindowprintsetupgetwindowsdirectory+systemerror+open+close+create+destroy ˙˙Ŕ€‰˙˙Ŕj@˙˙k@Ŕ?˙˙3Ŕm@˙˙@Ŕ‘@˙˙F¤@Ŕ‰˙˙MŔ^@AA˙˙U!Ŕ2  appnameib_run_imp_flg( DAT*jö ˙˙€ls˙˙€o   o   '˙˙D˙˙˙˙:0E˙˙D˙˙˙˙dL4ƒx˙˙ D˙˙˙˙—Q˙˙˙˙€˙˙˙˙°`T˙˙€˙˙˙˙śQ˙˙˙˙€˙˙˙˙˝Q˙˙˙˙€˙˙˙˙ĹQ˙˙˙˙DAT*€˙˙˙˙DAT*nöadwas_columnii_num_controlss_dataobjectldw_childldwldw_plainsqlca´˙˙ €v˙˙ P˙˙÷˙˙in˙˙'  ˙˙4 € =˙˙> €an˙˙B €sc˙˙L@€đp .dddw.namedescribejŔ!?getchild˙oŔ(control<c@<c@typeofeŔT<c@˙˙sharedata‹Ŕtopenuserobject@@Ŕˆ<c@dataobject¨settransobjectq^Ŕźretrieven@1ŔԋŔtDAT*pö 4 D L \ d l € ˜   ´ Ě ŕ č d  d  €€w€2 & wf_sharedddw+create+destroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 T xywidthheightvisibletitlebartitlecontrolmenuminboxmaxboxresizableÜ)˙˙1˙˙ *˙˙ DAT*rö=˙˙A˙˙˙˙!Ń˙˙*€’˙˙0¸˙˙<¸\˙˙C¸˙˙J¸] *=A€€  €¸¸¸¸€€€€€1€@  @@€@DAT*’ ˙˙w€˙˙˙˙#/˙˙˙˙€˙˙˙˙+/˙˙˙˙x€˙˙˙˙DAT*vö  @‹€@€Á@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙2˙˙ Ô˙˙ I˙˙@˙˙‹€˙˙% ] o2ÔI@  @‹€@€ @ 2  DAT*xö 2 4 xywidthheightpicturenamefocusrectanglex˙˙2˙˙ t˙˙ I˙˙@˙˙‹€˙˙%ś] o2tI@  @‹€@€ś@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙I˙˙ D˙˙DAT*zö I˙˙@˙˙I€˙˙%ź] oIDI@  @I€@€ź@ 2  2 4 xywidthheightpicturenamefocusrectanglex˙˙;˙˙ |˙˙ I˙˙@˙˙I€˙˙% ] o;|IDAT*|ö@  @I€@€ @ 2  2 ‹ xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenameunderlinefontfamilyfontpitch@˙˙ ˙˙ $˙˙  ˙˙<˙˙˙˙!—€˙˙& €˙˙0 ˙˙?˙˙I˙˙˙DAT*~ö˙˙Sř˙˙˙˙˙\ź˙˙cË€˙˙lľ˙˙vľ€˙˙ľ€] o $ < ř˙˙˙ź@€ľ€ľ€Ë€ľ ˙˙˙—€ €€@€ PŚ3ź˜ľ@˝˜ś8,•61D,$d* w_sDAT*€öcc_speciation_lookup::message(˙˙3@]€˙˙ @S€ ˙˙ "3€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙Š˙˙ ˙˙ ˙˙˙˙Ÿ€˙˙% ] oŠ   @Ÿ€@€DAT*‚ö @ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś5,%1‹:@ź ľ@˝ ś8,•d1r,$ Jd1 w_emission_factor_gw_mdi_main::message<˙˙5@^€˙˙%@V€˙˙'@S€ ˙˙ "4€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanDAT*„öglex˙˙Š˙˙ ´˙˙ ˙˙ ˙˙Ź€˙˙%ľ] oŠ´    @Ź€@€ľ@ J1˙˙˙˙"€˙˙b,7$$$:W@)<8,•H1V,D$.d m_main_menu::messagDAT*†öe(˙˙7@_€˙˙@S€L m_data:€m_materialA€triggerevent Ŕ,˙˙ $ < D "5€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙%˙˙ ŕ˙˙ Ű˙˙ ˙˙š€˙˙%˝] o%ŕŰ  DAT*ˆö @š€@€˝@ J1˙˙˙˙"€˙˙Î:F@źľ@˝88 8Nz%8yz&8ˇz&8űz&…,840…Ś:*ź¸ľ@˝¸ś8,•´1Â,H$Z!v.šdO ls_obj_name_strls_obj_namelstr_lookupll_pos_numw_look_up::messagex˙˙ ˙˙ DAT*Šö˙˙$ `€˙˙0˙˙;:@a€˙˙E@S€P sqlstatementselect code, desc_1, desc_2, desc_3, desc_4, device_code, material_code, process_code, source_code, type, epa_invalid_flag, inventory_invalid_flag, mode_type, tier_code, unit_code, nei_material_id, material_io_code from rap_scc_ams_codes order by codewintitle SCC/AMS Code Lookup˙˙ , H "6€"2  +clicked˙˙DAT*ŒöŔ2 2 ywidthheightpicturenamefocusrectangled˙˙Ŕ˙˙ ˙˙`˙˙Ĺ€˙˙#ž] oŔ`  @Ĺ€@€ž@ J1˙˙˙˙"€˙˙dŚ<,%1‹:@ź ľ@˝ ś8,•J1X,$DAT*Žö0d2 w_speciation_profilew_mdi_main::message<˙˙<@b€˙˙%@V€˙˙(@S€ ˙˙ "7€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙Ľ˙˙ Ŕ˙˙ Ű˙˙˙˙Ń€˙˙%] oĽŔŰ DAT*ö @Ń€@€@ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś>,%1‹:@ź ľ@˝ ś8,•d1r,$Jd, w_cal_protocolw_mdi_main::message<˙˙>@c€˙˙%@V€˙˙"@S€ ˙˙ "8€"2  +clicked˙˙Ŕ2 0DAT*’ö widthheightpicturenamefocusrectangleP˙˙%˙˙@˙˙Ţ€˙˙! ] o%@  @Ţ€@€ @ J1˙˙˙˙"€˙˙~:F@źľ@˝8Ś@,%1‹:@ź ľ@˝ ś8,•d1r,$JDAT*”öd0 w_scc_ams_materialw_mdi_main::message<˙˙@@d€˙˙%@V€˙˙&@S€ ˙˙ "9€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙Ű˙˙ ŕ˙˙ ’˙˙@˙˙ę€˙˙% ] oŰŕ’@  DAT*–ö@ę€@€ @ J1˙˙˙˙"€˙˙2  2 9 xywidthheightenabledlinethicknesslinecolorŒ˙˙ˇ˙˙ 0˙˙ n˙˙ ˙˙˙˙!˙˙/ŔŔŔ] oŔŔŔ<€€ˇ0n 2  2 9DAT*˜ö xywidthheightenabledlinethicknessfillcolorŒ˙˙’˙˙ ˙˙ €˙˙°˙˙˙˙!˙˙/˙˙˙] o<€˙˙˙€’€°2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙˙€˙˙`˙˙ ˙˙#DAT*šö`˙˙( ˙˙6] o<€ €` `˙2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙˙˙Ü˙˙˙˙#ô˙˙( ˙˙6] o<€ Üô2  2 DAT*œö6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙…˙˙`˙˙ť˙˙#`˙˙( ] o<€ …`ť`2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙˛˙˙`˙˙˛˙˙#¤˙˙( ] DAT*žöo<€ ˛`˛¤2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙Ŕ˙˙˙˙N˙˙#˙˙( ] o<€ ŔN2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙DAT* öE˙˙”˙˙E˙˙#ô˙˙( ] o<€ E”Eô2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙Î˙˙d˙˙e˙˙#d˙˙( ] o<€ Îded2  DAT*˘ö 2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙ ˙˙œ˙˙€˙˙#œ˙˙( ] o<€  œ€œ2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙˙˙$˙˙˙˙#ô˙˙( DAT*¤ö] o<€ $ô2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙ň˙˙˙˙r˙˙#˙˙( ] o<€ ňr2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙DAT*Śö˙˙Š˙˙„˙˙˙˙#„˙˙( ] o<€ Š„„2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙˛˙˙Ä˙˙˛˙˙#˙˙( ] o<€ ˛Ä˛DAT*¨ö2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙˙˙p˙˙˙˙#ä˙˙( ] o<€ pä2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙…˙˙$˙˙…˙˙#d˙˙DAT*Şö( ] o<€ …$…d2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙€˙˙„˙˙€˙˙#`˙˙( ] o<€ €„€`2  2 6 enabledbeginxbeginyendxendylinethicknessxDAT*Źö˙˙˙˙;˙˙d˙˙‰˙˙#d˙˙( ] o<€ ;d‰d2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙€˙˙”˙˙E˙˙#”˙˙( ˙˙6] o<€ DAT*Žö€”E”2  2 6 enabledbeginxbeginyendxendylinethicknessx˙˙˙˙É˙˙Ŕ˙˙É˙˙#d˙˙( ] o<€ ÉŔÉd2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙r˙˙DAT*°öô˙˙˙˙#ô˙˙( ˙˙6] o<€ rôô2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙ ˙˙ Đ˙˙ ˛˙˙4˙˙˙˙!÷€˙˙&Á€˙˙0ÁDAT*‘˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cË€˙˙l€˙˙w€] o в4 ř˙˙˙ź@€€€Ë€ ˙˙˙÷€Á€€@€ÁDAT*´ö xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙Ę^@˙˙ Ń˙˙ ÷^@˙˙a ˙˙^@˙˙"Ä€˙˙'ř˙˙˙^@˙˙0ź˙˙7Ë€c@˙˙@€˙˙K€] oĘŃ÷a ř˙˙˙ź@€€€Ë€ @Ä€DAT*śö˙˙˙˙"€˙˙Jźľ@˝8,•01>,$d ::message˙˙@€ ˙˙ "€"2  +clicked˙˙Ŕ2 ] xywidthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitchđ˙˙ł^@˙˙ Ń˙˙ ÷^@˙˙a ˙˙ ^DAT*¸ö@˙˙"Ů€˙˙' ^@˙˙/ř˙˙˙˙˙8źc@˙˙?Ë€˙˙Hľ€d@˙˙Sľ€] ołŃ÷a  ř˙˙˙ź@€ľ€ľ€Ë€ @Ů€ ˙˙˙˙"€˙˙2  2 z xywidthheightvscrollbardisplayonlypointertextcolorbackcolortextsizeDAT*şöweightfacenamefontfamilyfontpitch˙˙3^@˙˙ !˙˙ a^@˙˙ ˙˙^@˙˙$˙˙0Ü€^@˙˙8€˙˙BŔŔŔc@˙˙Lř˙˙˙˙˙Uźd@˙˙\Ë€˙˙e €d@˙˙p €] o3!a Eř˙˙˙ź€ € €Ë€Ü€€ŔŔŔDAT*‰@ @€€ä€1@€@DAT*žö+clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙˙˙ D˙˙ Ű˙˙ŕ˙˙q€˙˙%Á] oDŰŕ  @q€@€Á@ W˙˙˙˙"€˙˙b,$$$:W@)<8,•HDAT*Ŕö1V,D$.d m_main_menu::message(˙˙@(€˙˙@'€L m_data:€m_stream@€triggerevent Ŕ,˙˙ $ < D "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙ŕ˙˙ ”˙˙ Ű˙˙ŕ˙˙~€˙˙% DAT*Âö] oŕ”Űŕ  @~€@€ @ W˙˙˙˙"€˙˙b,$$$:W@)<8,•H1V,D$.d m_main_menu::message(˙˙@(€˙˙@'€L m_data:€m_process?€triggerevent Ŕ,˙˙DAT*Äö $ < D "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙ŕ˙˙ €˙˙ Ű˙˙ŕ˙˙†€˙˙%ž] oŕ€Űŕ  @†€@€ž@ W˙˙˙˙"€˙˙DAT*Ćöb,$$$:W@)<8,•H1V,D$.d m_main_menu::message(˙˙@(€˙˙@'€L m_data:€m_source=€triggerevent Ŕ,˙˙ $ < D "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙ŕ˙˙ D˙˙ DAT*ČöŰ˙˙ŕ˙˙€˙˙% ] oŕDŰŕ  @€@€ @ W˙˙˙˙"€˙˙b,$($:W@)@8,•H1V,H$.d m_main_menu::message(˙˙@(€˙˙@'€P DAT*Ęö m_data:€m_geographic;€triggerevent Ŕ0˙˙ ( @ H "€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙Ű˙˙ ˙˙ Ű˙˙ŕ˙˙—€˙˙%ž] oŰ Űŕ  @—€@DAT*Ěö€ž@ W˙˙˙˙"€˙˙2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙ž˙˙Ĺ˙˙˙˙Ĺ˙˙#T˙˙(˙˙6] o€ĹĹTž2  2 @ enabledbeginxbeginyendxendylinethicknesslDAT*ÎöinecolorŒ˙˙˙˙Ŕ˙˙°˙˙˙˙#°˙˙(˙˙6] o€Ŕ°°2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙˙˙ŕ˙˙˙˙#$˙˙(˙˙6] DAT*Đöo€ŕ$2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙Ŕ˙˙d˙˙Ŕ˙˙#”˙˙(˙˙6] o€ŔdŔ”2  2 @ enabledbeginxbeginyendxendylinethicknesslinDAT*ŇöecolorŒ˙˙˙˙Ĺ˙˙ô˙˙ ˙˙#ô˙˙(˙˙6] o€Ĺô ô2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙Ŕ˙˙˙˙˙˙#˙˙(˙˙6] oDAT*Ôö€Ŕ2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙Ŕ˙˙ŕ˙˙˙˙#ŕ˙˙(˙˙6] o€Ŕŕŕ2  2 @ enabledbeginxbeginyendxendylinethicknesslinecDAT*ÖöolorŒ˙˙˙˙˙˙˙˙˙˙#T˙˙(˙˙6] o€T2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙Ĺ˙˙ ˙˙Ĺ˙˙#p˙˙(˙˙6] oDAT*‘€Ĺ Ĺp2  2 @ enabledbeginxbeginyendxendylinethicknesslinecolorŒ˙˙˙˙Ĺ˙˙L˙˙Ĺ˙˙#œ˙˙(˙˙6] o€ĹLĹœDAT*Úö ň˙˙˙ꀀ€Ä€ Ę€€€@€2  2  xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle@˙˙%˙˙ ˙˙ [˙˙ŕ˙˙Ü˙˙˙˙˙"ź˙˙)DAT*Üö€˙˙5€˙˙?€˙˙JÄ€˙˙S€˙˙]˙˙g˙˙oŮ€˙˙tÁ€˙˙~Á] o% [ŕ Ü˙˙˙ꀀ€Ä€ €Ů€Á€€@€ÁJźľ@˝8,•01DAT*Ţö>,$d ::message˙˙@ € ˙˙ "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextÜ˙˙[˙˙ ˙˙ ˙˙P˙˙˙˙"ř˙˙˙˙˙+ź˙˙2€˙˙<€˙˙G˜€˙˙PŕDAT*ö€] o[P ř˙˙˙ź@€€€˜€ @ŕ€ ˙˙˙˙"€˙˙DAT*âöĘľ@˝Ę8<1d‹8Ö0źĘľ@˝Ę8<1d‹8÷0źĘľ@˝Ę8<1d‹80źĘľ@˝Ę8<1d‹80źĘľ@˝Ę8<źčľ@˝č8}<źéľ@˝é8}<1d‹80źĘľ@˝Ę8<1‹źŮľ@˝Ů8<1Ź ‹890źĘľ@˝Ę8<1‹źŮľ@˝Ů8<1d‹80źĘľ@˝Ę8DAT*äöT$d$6…11<R—Ń’9}R1ź’ľ@˝’88lş#!ź1RĹž1Y¸1<9}2ź’ľ@˝’8…11ź’ľ@˝’88lŞ@1—ź’ľ@˝’8…R1<<1d‹6źĘľ@˝Ę8ź’ľ@˝’8…11źDAT*ćö’ľ@˝’88lŞ1—ź’ľ@˝’8…<1d‹6źĘľ@˝Ę8<źÎľ@˝Î8,•z1ˆ,p$ . ^ ś Ü 2b’Âň"R‚Ŕđ P€°Ňô$ J!z" $Đ%ň&'(&)2*p+†,š-ž.Ź0¸1ź2â35@6R7`8Ž9’:¸;ę=@DC`d` jobxcoordycoordll_startll_endls_msgls_print_stringlb_quitgs_apDAT*öp_title::messageČ˙˙˙˙ ˙˙˙˙˙˙#˙˙* ˙˙1 ˙˙A˙˙I@˙˙V@€x Courier 10CpiFatal Error Message Fax Document To: Radian Corp Location: Austin, TXAttention: Dan Radin Phone: (512) 454-4797 Fax: (512) 345-9684 Subject: Oracle Fatal Error Message From:______________________ Phone:( )____________DAT*ęöOpened by f_get_string function. Prompts user for a string value and returns string to a calling window.forward global type w_get_string from Window end type type sle_str from singlelineedit within w_get_string end type type cb_cancel from commandbutton within w_get_string end type type cb_ok from commandbutton within w_get_string end type end forward global type w_get_string from Window int X=677 int Y=269 int Width=897 int Height=433 boolean TitleBar=true string Title="UntitleDAT*ěöd" long BackColor=12632256 WindowType WindowType=response! sle_str sle_str cb_cancel cb_cancel cb_ok cb_ok end type global w_get_string w_get_string type variables int ii_max_len end variables on open;///////////////////////////////////////////////////////////////////////// // // Event : w_get_string.open // // Purpose: W_GET_STRING prompts the user for a string. The public function // f_get_string "opens" window w_get_string. Function f_get_string // passes the cDAT*îöharacter case, the maximum length the // prompted string should be, and the window title. The window // and single line edit text field will resize themselves // based on the maximum length passed from f_get_string. // // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // ///////////////////////////////////////////////////////////////////////// string ls_char_case winDAT*đödow lw_father integer li_x, li_y, li_max_width str_parms parm // get parms from message object parm = message.powerobjectparm ls_char_case = parm.string_arg[2] if ls_char_case = "U" then sle_str.textcase = upper! elseif ls_char_case = "L" then sle_str.textcase = Lower! elseif ls_char_case = "A" then sle_str.textcase = AnyCase! end if // Get maximum length the string variable should be and set the limit // attribute on the single line edit. ii_max_len = parm.integeDAT*ňör_arg[1] sle_str.limit = ii_max_len // Display the current value sle_str.text = parm.string_arg[3] // Get the window title from the parameters this.title = parm.string_arg[1] li_max_width = ii_max_len // Determine if the window needs to be resized based on the maximum // length passed from function f_get_string if len(this.title) > li_max_width then li_max_width = len(this.title) if li_max_width > 25 then this.width = li_max_width * 40 sle_str.width = this.widtDAT*ôöh - 2*sle_str.x cb_ok.x = sle_str.x + sle_str.width / 2 - cb_ok.width - 25 cb_cancel.x = sle_str.x + sle_str.width / 2 + 25 // cb_cancel.x = sle_str.width + sle_str.x - cb_cancel.width end if lw_father = parentwindow(this) // Center the window on it's parent li_x = lw_father.x + (lw_father.width - this.width)/2 if li_x < 10 then li_x = 10 // make sure it's on the screen li_y = lw_father.y + (lw_father.height - this.height)/2 if li_y < 10 then li_y = 10 // make sure it'sDAT*öö on the screen move(this, li_x, li_y) setfocus(sle_str) selecttext ( sle_str, 1, len(sle_str.text)) end on on w_get_string.create this.sle_str=create sle_str this.cb_cancel=create cb_cancel this.cb_ok=create cb_ok this.Control[]={ this.sle_str,& this.cb_cancel,& this.cb_ok} end on on w_get_string.destroy destroy(this.sle_str) destroy(this.cb_cancel) destroy(this.cb_ok) end on type sle_str from singlelineedit within w_get_string int X=83 int Y=73 int Width=723 inDAT*řöt Height=89 int TabOrder=10 BorderStyle BorderStyle=StyleLowered! string Text=" " int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type cb_cancel from commandbutton within w_get_string int X=549 int Y=189 int Width=247 int Height=93 int TabOrder=20 string Text="Cancel" boolean Cancel=true int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FonDAT*úötPitch=Variable! end type on clicked;///////////////////////////////////////////////////////////////////////// // // Event : w_get_string.cb_cancel // // Purpose: This event will pass a null value back to // function f_get_string. // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // ///////////////////////////////////////////////////////////////////////// string ls_nul DAT*üösetnull (ls_nul) closewithreturn(parent,ls_nul) end on type cb_ok from commandbutton within w_get_string int X=78 int Y=189 int Width=247 int Height=93 int TabOrder=30 string Text="OK" boolean Default=true int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;///////////////////////////////////////////////////////////////////////// // // Event : w_get_string.cb_ok // // Purpose: TDAT*ţöhis event will first check to ensure the user has entered // a string value in the single line edit box, pass the string // back to public function f_get_string. // // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // ///////////////////////////////////////////////////////////////////////// if isnull(sle_str.text) = true or (len(trim(sle_str.text)) = 0) then messagebox(parDAT*gent.title, "Entry is required") return end if closewithreturn (parent,sle_str.text) end on DAT*ö_____ Fax:( )_________________Messagemle_error_messageA,€textd@\ ˙˙˙˙T d p "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙a^@˙˙ Í˙˙ ó^@˙˙a ˙˙^@˙˙"Ä€˙˙'ř˙˙˙^@˙˙0ź˙˙7Ę€c@˙˙@ľ€˙˙KDAT*öľ€] oaÍóa ř˙˙˙ź@€ľ€ľ€Ę€ @Ä€˙˙˙˙"€˙˙8,•1,,$d ::message˙˙@€ ˙˙ "€"2  +clicked˙˙Ŕ2 ] xywidDAT*öthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitchđ˙˙.^@˙˙ Í˙˙ ÷^@˙˙a ˙˙^@˙˙"Ř€˙˙' ^@˙˙/ř˙˙˙˙˙8źc@˙˙?Ę€˙˙Hž€d@˙˙Sž€] o.Í÷a ř˙˙˙ź@€ž€ž€Ę€ @Ř€DAT*ö ˙˙˙˙"€˙˙2  2 r xywidthheighttaborderborderstyledisplayonlytextcolortextsizeweightfacenamefontfamilyfontpitch˙˙Ş^@˙˙ e˙˙ W^@˙˙5 ˙˙ ^@˙˙"€˙˙.^@˙˙:˙˙Dř˙˙˙c@˙˙Mź˙˙TĘ€d@˙˙]€˙˙h€] oŞDAT*$eW5  Eř˙˙˙ꀀ€Ę€ @@ @€€ŕ€1€@DAT* ö8Nz%8z&…66Š)Üś8…—1Ĺžä$Š)ôś81˙˙˙˙<Ľđ8ü08z%źľ@˝89 $)88@$8H)T8\$8d)ˆ8źeľ@˝e8}1‹}ĎÖ1<R‹}$1‹)¤8~Ź$)Ŕ8)Ř8’8ŕŞ"DAT*ö#jě$ü6…$:,W@)8š01@8ŕ0…Ô8ü08z%źľ@˝899!>$p&„'ş(ć+đ,.2/l0~1Œ2¨3Ň:Ö=ňAB"CDDfFjG€JšKžLĘOÔdŃ ptran_objps_select_statementps_cur_codels_dw_syntaxls_create_errls_stylels_tokenls_col_nameli_total_colli_col_cntli_widthll_pll_row_numberll_found_rowli_numbeDAT*ör_of_columnsli_column_index@˙˙ €˙˙ ˙˙& ˙˙2 ˙˙? ˙˙M ˙˙V ˙˙_ ˙˙k˙˙x˙˙ƒ˙˙Œ˙˙‘˙˙Ÿ˙˙Ź˙˙ÁH° dw_1$€reset/Ŕdatawindow(units=2) style(type=grid) column(font.face='MS Sans Serif' font.weight=700 font.height=-8) DAT*ötext(color=8388608 font.face='MS Sans Serif' font.weight=700)syntaxfromsqlŔÎ$€CreatehŔěErrorError creating DataWindow: $€settransobjectl^Ŕ($€1AsetsortXŔK$€datawindow.column.countdescribezjŔ|$€settaborderZŔ˜$€retrieve_ne1Ŕ´uf_create_ddlbi2ŔČsle_findaná%€textidôá%€posteventŔ il_selected_row &is_filt8'  Ü ä ô   8 @ DAT*öT \ ˆ  ¤ Ź Ŕ Ř ě ü   0 @ Č*‡,*4‡D*L‡\*d‡x*€‡˜$ $¨$°$¸$˛€ |,BXnd Ŕ€ st_err_msg!€€dw_2ata$"€$€st_1(ty<#€<€dw_1T$€T€sle_findl%DAT*ö€l€controlˆc@!€$"€<#€T$€l%€ , 4D L\ dx € ˜   ¨ ° ¸ L$$$4$D$X$*8d `( st_err_msg!€dw_2€"€st_1€,#€dw_1(ty<$€sle_findw_1L%€ $ 4 D X €€1€2€3€4€5DAT*ö€6€O12 Ľ +entry_chosenuf_create_ddlbuf_filteruf_return_selecteduf_unfilteruf_create_datawindowf_dw_get_objects_attribf_get_tokenf_get_string+create+destroyđ˙˙Ŕ˙˙Ŕ˙˙%Ŕ˙˙/Ŕ˙˙BŔ˙˙NŔ˙˙cŔ˙˙{Ŕ˙˙{Ŕ˙˙‡ Ŕ˙˙”Ŕ˙˙œŔ2 Ź widthheightborderbackcolorpicturemaskcolDAT*öortabtextcolortabbackcolorst_err_msgdw_2st_1dw_1sle_findil_selected_rowis_filtis_select_from_listis_col_name@˙˙Ň ˙˙Ç˙˙˙˙ŔŔŔ˙˙&Ŕ€˙˙7˙˙D˙˙Q €˙˙\ €˙˙a €˙˙f €˙˙k €˙˙t˙˙„˙˙Œ˙˙ ] oŇ ÇDAT*ö @@€”€1€ŔŔŔ    @€ Ŕ€  € € € € € ˙˙1€O˙˙$$˙˙˙˙2€˙˙˙˙3$˙˙˙˙x3€˙˙˙˙=&˙˙˙˙4€˙˙˙˙P$˙˙˙˙5€˙˙DAT*ö˙˙†L(˙˙6€˙˙˙˙Ń$˙˙˙˙ €˙˙˙˙Ů$˙˙˙˙ €˙˙˙˙2  2  xywidthheightvisibleenabledtextfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙d˙˙ }˙˙ R˙˙G˙˙˙˙!˙˙)Č€˙˙.˙˙=€DAT* ö˙˙GŔŔŔ˙˙Qř˙˙˙˙˙Zź˙˙aŇ€˙˙jŔ€˙˙uŔ€] d}RG ř˙˙˙ź@€Ŕ€Ŕ€Ň€ €ŔŔŔČ€€€@€Ü $8Š)(ś81˙˙˙˙<Ľ”8008B8^z%źľ@˝8,•DAT*"ö€1Ž,€$”)¤88Ź)Č8…Đ$8Řz%…ŕ$)đ8ř$)8$,840…8$P$9)d8l1|840…,•Â1Đ,„$8f ” Îě (Lxލd0 rowdwodatadwcls_sort_list::messagex˙˙DAT*$ö˙˙ €˙˙ ˙˙ €˙˙ ˙˙&@!€Œ˜ dw_2"€colgetchildoŔApplication Errorcol - Not a DataWindowChild Contact your technical support.˙˙is_col_nameˆ)getrowbŔœcolumn_namegetitemstring[Ŕ¸ˆ) Adw_1Ű$€setsortXŔčŰ$€sorth=VcŔsle_finde %€text$Ű$€il_selected_row@&selectrow@ŔX@&is_filtt'˙˙DAT**ö ( € ” ¤ Č Đ ŕ đ ř   , 8 P d l | „ /€ż/2  +itemchanged˙˙Ŕ2 4 xywidthheighttaborderdataobjectborderŒ˙˙˛˙˙ ˙˙ ň˙˙]˙˙˙˙"ŕ€˙˙-ž] o˛ň] DAT*(öBase window for list styleforward global type w_list from Window end type type dw_1 from u_dw_list within w_list end type end forward global type w_list from Window int X=673 int Y=265 int Width=1582 int Height=993 boolean TitleBar=true string Title="Untitled" long BackColor=12632256 boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true dw_1 dw_1 end type global w_list w_list on w_list.create this.dw_1=create dw_1 this.Control[]={ this.dDAT*Ťw_1} end on on w_list.destroy destroy(this.dw_1) end on type dw_1 from u_dw_list within w_list int X=115 int Y=125 int Width=1276 int Height=529 end type DAT*,ö@ ŕ€ž @€ €︔˙˙/€ż˙˙2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙˙˙ ˙˙ ¨˙˙=˙˙˙˙!ë€˙˙&žDAT*.ö€˙˙0ž˙˙?€˙˙IŔŔŔ˙˙Sř˙˙˙˙˙\ź˙˙cŇ€˙˙lľ€˙˙wľ€] o¨= ř˙˙˙ź@€ľ€ľ€Ň€ €ŔŔŔ뀞€€@€žl $($9)<8P$`DAT*0ö9}hp$1Ĺ8x$€$9)ˆ8œ$Ź´$ź$Đ$)č8…ř$$6…$)@8…,•R1`,H$,J ^ v ˘ î8d$ xposyposrowdwo::messaged˙˙˙˙ ˙˙˙˙ €˙˙@!€P° DAT*2ö dw_1$€il_selected_row&selectrown @Ŕ0st_err_msgaD!€visibleX&&$€&@Ŕ0sle_find˙%€text€¤$€&is_col_nameÄ)getitemstring€ŔŘis_filtđ'%€¤is_select_from_list(uf_return_selected4Ŕ,˙˙ ( < P ` h p x € ˆ œ Ź ´ ź Đ č ř   $ @ HDAT*4ö 4,•1(,$d +currentrow::message(˙˙˙˙@!€ ˙˙ L:W@)8,•21@, $d( +xpos+ypos+row+dwo::messaged˙˙˙˙˙˙˙˙ €˙˙@!€( triggerevent Ŕ˙˙  $DAT*6ö€(€<€Ä$Ĺ(Ő<2 1 +clicked+rowfocuschanged+doubleclicked<˙˙Ŕ˙˙Ŕ˙˙"Ŕ2 Q xywidthheighttaborderborderstylehscrollbarvscrollbarhsplitscroll´˙˙˙˙ „˙˙ ™ ˙˙í˙˙˙˙"€˙˙.˙˙9˙˙D] o„™ í DAT*†ö@  @ € €řČ˙˙$€Ä˙˙˙˙<€Ő˙˙Bř˙˙x(€Ĺ˙˙L:,W@)8,•21@,$;d +key::message(˙˙˙˙ @!€$ posteventDAT*:öLogon windowforward global type w_logon from Window end type type sle_dbms from singlelineedit within w_logon end type type st_5 from statictext within w_logon end type type ddlb_database from dropdownlistbox within w_logon end type type ddlb_server from dropdownlistbox within w_logon end type type ddlb_profile from dropdownlistbox within w_logon end type type st_4 from statictext within w_logon end type type st_3 from statictext within w_logon end type type st_2 from statictext wDAT*<öithin w_logon end type type st_1 from statictext within w_logon end type type cb_cancel from commandbutton within w_logon end type type cb_ok from commandbutton within w_logon end type type st_password from statictext within w_logon end type type sle_password from singlelineedit within w_logon end type type sle_logid from singlelineedit within w_logon end type end forward global type w_logon from Window int X=1134 int Y=728 int Width=1399 int Height=940 boolean TitleBar=true DAT*>ö string Title="User Log On" long BackColor=79741120 WindowType WindowType=response! sle_dbms sle_dbms st_5 st_5 ddlb_database ddlb_database ddlb_server ddlb_server ddlb_profile ddlb_profile st_4 st_4 st_3 st_3 st_2 st_2 st_1 st_1 cb_cancel cb_cancel cb_ok cb_ok st_password st_password sle_password sle_password sle_logid sle_logid end type global w_logon w_logon type variables int iPicture; boolean bModified; end variables forward prototypes public subroutine wf_add_toDAT*@ö_profile () public subroutine wf_save_profile () end prototypes public subroutine wf_add_to_profile ();string pString integer fileNum // Add new profile name to the profiles key of profile section pString = ProfileString(gs_iniFile, "profile", "profiles", "") SetProfileString(gs_iniFile, "profile", "profiles", "'" + pString + & "','" + ddlb_profile.Text + "'") // Add new profile section to the init file fileNum = FileOpen(gs_iniFile, LineMode!, Write!, LockReadWrite!, Append!)DAT*Bö FileWrite(fileNum, "") FileWrite(fileNum, "[profile " + ddlb_profile.Text + "]") FileWrite(fileNum, "dbms=" + sle_dbms.Text) FileWrite(fileNum, "servername=" + ddlb_server.Text) FileWrite(fileNum, "database=" + ddlb_database.Text) if sle_dbms.Text = "ODBC" then FileWrite(fileNum, "userid=" + sle_logid.Text) FileWrite(fileNum, "dbpass=" + sle_password.Text) FileWrite(fileNum, "logid=") FileWrite(fileNum, "logpass=") else FileWrite(fileNum, "userid=") FileWrite(fileNum, "dbDAT*Döpass=") FileWrite(fileNum, "logid=" + sle_logid.Text) // FileWrite(fileNum, "logpass=" + sle_password.Text) FileWrite(fileNum, "logpass=") end if FileClose(fileNum) end subroutine public subroutine wf_save_profile ();integer fileNum, bytesRead long fileLen string lineData, sectionName, ls_dbparm SetPointer(HourGlass!) // Save new values from ddlb or sle into the ini file SetProfileString(gs_iniFile, "profile", "current", ddlb_profile.Text) SetProfileString(gs_iniFile, "DAT*Fösqlca", "dbms", sle_dbms.Text) SetProfileString(gs_iniFile, "sqlca", "servername", ddlb_server.Text) SetProfileString(gs_iniFile, "sqlca", "database", ddlb_database.Text) if sle_dbms.Text = "ODBC" then SetProfileString(gs_iniFile, "sqlca", "userid", sle_logid.Text) SetProfileString(gs_iniFile, "sqlca", "dbpass", sle_password.Text) SetProfileString(gs_iniFile, "sqlca", "logid", "") SetProfileString(gs_iniFile, "sqlca", "logpass", "") else SetProfileString(gs_iniFile, "sqlca", "DAT*Höuserid", "") SetProfileString(gs_iniFile, "sqlca", "dbpass", "") SetProfileString(gs_iniFile, "sqlca", "logid", sle_logid.Text) // Do not save password for oracle // SetProfileString(gs_iniFile, "sqlca", "logpass", sle_password.Text) end if // commented out by swj, 7/26/94 //// Get dbParm variable from the profile section in the ini file //ls_dbparm = ProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & // "dbparm", "") // Get dbParm variable from the sqlca ls_dbparm = sDAT*Jöqlca.dbparm // Put ls_dbparm into sqlca section and sas section of the ini file SetProfileString(gs_iniFile, "sqlca", "dbparm", ls_dbparm) SetProfileString(gs_iniFile, "sas", "dbparm", ls_dbparm) // Read data in init file and check if the profile is there fileLen = FileLength(gs_iniFile) fileNum = FileOpen(gs_iniFile) sectionName = "[profile " + ddlb_profile.Text + "]" bytesRead = FileRead(fileNum, lineData) do while (lower(lineData) <> lower(sectionName)) and (bytesRead <> -100) DAT*Lö bytesRead = FileRead(fileNum, lineData) loop FileClose(fileNum) if bytesRead = -100 then // EOF wf_add_to_profile() else // Update profile data in the init file SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "dbms", sle_dbms.Text) SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "servername", ddlb_server.Text) SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "database", ddlb_database.Text) if sle_dbms.Text = "ODAT*NöDBC" then SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "userid", sle_logid.Text) SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "dbpass", sle_password.Text) SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "logid", "") SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "logpass", "") else SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "userid", "") SetProfileString(gs_iniFileDAT*Pö, "profile " + ddlb_profile.Text, & "dbpass", "") SetProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "logid", sle_logid.Text) end if end if end subroutine on close;If Upper(gs_app_title) = 'AG RAPIDS' then Close(w_splash_ag) Else Close(w_splash) End if end on event open;string pString, pName, curProfile long startPos // Set focus on the profile DropDownListbox SetFocus(ddlb_profile) // Get profile name(s) from the init file and put it/them into DAT*Röddlb_profile pString = ProfileString(gs_iniFile, "profile", "profiles", "not found") if pString = "not found" then MessageBox(This.Title, "Error finding " + gs_iniFile + ", profile section~n" + & "or profiles key in the ProfileString function.~n" + & "Contact your technical support.", StopSign!) Halt end if startPos = Pos(pString, "','", 1) do while startPos <> 0 pName = Left(pString, startPos - 1) ddlb_profile.AddItem(pName) pString = Right(pString, Len(pString) - (startDAT*TöPos + 2)) startPos = Pos(pString, "','", 1) loop // Insert the last profile name into ddlb_profile ddlb_profile.AddItem(pString) // Get current profile name from the init file and find and select it // from ddlb_profile curProfile = ProfileString(gs_iniFile, "profile", "current", "") ddlb_profile.SelectItem(curProfile, 0) // Get database connect varialbe from the init file and put them into ddlb or sle ddlb_server.Text = ProfileString(gs_iniFile, "sqlca", "servername", "") ddlb_DAT*Vödatabase.Text = ProfileString(gs_iniFile, "sqlca", "database", "") sle_dbms.Text = ProfileString(gs_iniFile, "sqlca", "dbms", "") // Fill out logid and password based on dbms if sle_dbms.Text = "ODBC" then // for WATCOM sle_logid.Text = ProfileString(gs_iniFile, "sqlca", "userid", "") sle_password.Text = ProfileString(gs_iniFile, "sqlca", "dbpass", "") else // for ORACLE sle_logid.Text = ProfileString(gs_iniFile, "sqlca", "logid", "") sle_password.Text = ProfileString(gs_iniFileDAT*Xö, "sqlca", "logpass", "") end if end event on w_logon.create this.sle_dbms=create sle_dbms this.st_5=create st_5 this.ddlb_database=create ddlb_database this.ddlb_server=create ddlb_server this.ddlb_profile=create ddlb_profile this.st_4=create st_4 this.st_3=create st_3 this.st_2=create st_2 this.st_1=create st_1 this.cb_cancel=create cb_cancel this.cb_ok=create cb_ok this.st_password=create st_password this.sle_password=create sle_password this.sle_logid=create sle_logid thiDAT*Zös.Control[]={this.sle_dbms,& this.st_5,& this.ddlb_database,& this.ddlb_server,& this.ddlb_profile,& this.st_4,& this.st_3,& this.st_2,& this.st_1,& this.cb_cancel,& this.cb_ok,& this.st_password,& this.sle_password,& this.sle_logid} end on on w_logon.destroy destroy(this.sle_dbms) destroy(this.st_5) destroy(this.ddlb_database) destroy(this.ddlb_server) destroy(this.ddlb_profile) destroy(this.st_4) destroy(this.st_3) destroy(this.st_2) destroy(this.st_1) destroy(this.cb_DAT*\öcancel) destroy(this.cb_ok) destroy(this.st_password) destroy(this.sle_password) destroy(this.sle_logid) end on type sle_dbms from singlelineedit within w_logon int X=503 int Y=156 int Width=823 int Height=80 int TabOrder=20 BorderStyle BorderStyle=StyleLowered! TextCase TextCase=Upper! long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_5 from statictext within wDAT*^ö_logon int X=233 int Y=160 int Width=247 int Height=72 boolean Enabled=false string Text="DBMS:" Alignment Alignment=Right! boolean FocusRectangle=false long TextColor=8388608 long BackColor=79741120 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type ddlb_database from dropdownlistbox within w_logon int X=503 int Y=380 int Width=823 int Height=232 int TabOrder=40 BorderStyle BorderStyle=StDAT*`öyleLowered! boolean AutoHScroll=true boolean VScrollBar=true boolean AllowEdit=true long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on modified;bModified = TRUE end on type ddlb_server from dropdownlistbox within w_logon int X=503 int Y=268 int Width=823 int Height=224 int TabOrder=30 BorderStyle BorderStyle=StyleLowered! boolean AutoHScroll=trDAT*böue boolean VScrollBar=true boolean AllowEdit=true long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on modified;bModified = TRUE end on type ddlb_profile from dropdownlistbox within w_logon int X=503 int Y=44 int Width=823 int Height=392 int TabOrder=10 BorderStyle BorderStyle=StyleLowered! boolean AutoHScroll=true boolean VScrollBar=true booleaDAT*dön AllowEdit=true long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type event modified;bModified = TRUE // If this is a existing profile if ddlb_profile.FindItem(ddlb_profile.Text, 0) <> -1 then // Get database connect varialbe from the init file and put them into ddlb or sle sle_dbms.Text = ProfileString(gs_iniFile, & "profile " + ddlb_profile.Text, "dDAT*föbms", "") ddlb_server.Text = ProfileString(gs_iniFile, & "profile " + ddlb_profile.Text, "servername", "") ddlb_database.Text = ProfileString(gs_iniFile, & "profile " + ddlb_profile.Text, "database", "") if sle_dbms.Text = "ODBC" then sle_logid.Text = ProfileString(gs_iniFile, & "profile " + ddlb_profile.Text, "userid", "") sle_password.Text = ProfileString(gs_iniFile, & "profile " + ddlb_profile.Text, "dbpass", "") else sle_logid.Text = ProfileString(gs_iniFilDAT*höe, & "profile " + ddlb_profile.Text, "logid", "") sle_password.Text = ProfileString(gs_iniFile, & "profile " + ddlb_profile.Text, "logpass", "") end if end if end event type st_4 from statictext within w_logon int X=114 int Y=496 int Width=361 int Height=72 boolean Enabled=false string Text="Logon ID:" Alignment Alignment=Right! boolean FocusRectangle=false long TextColor=8388608 long BackColor=79741120 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" DAT*jö FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_3 from statictext within w_logon int X=32 int Y=384 int Width=448 int Height=72 boolean Enabled=false string Text="Database Name:" Alignment Alignment=Right! boolean FocusRectangle=false long TextColor=8388608 long BackColor=79741120 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_2 from statictext within w_lDAT*löogon int X=114 int Y=272 int Width=361 int Height=72 boolean Enabled=false string Text="Server:" Alignment Alignment=Right! boolean FocusRectangle=false long TextColor=8388608 long BackColor=79741120 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_1 from statictext within w_logon int X=114 int Y=48 int Width=361 int Height=72 boolean Enabled=false string Text="Profile Name:" AlignmeDAT*nönt Alignment=Right! boolean FocusRectangle=false long TextColor=8388608 long BackColor=79741120 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type cb_cancel from commandbutton within w_logon int X=745 int Y=724 int Width=247 int Height=88 int TabOrder=80 string Text="Cancel" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=VariabDAT*pöle! end type on clicked;Close(parent) end on type cb_ok from commandbutton within w_logon int X=425 int Y=724 int Width=247 int Height=88 int TabOrder=70 string Text="OK" boolean Default=true int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type event clicked;string ls_dbparm, ls_left, ls_right, ls_sql1, ls_role long ll_pos_1, ll_pos_2 SetPointer(HourGlass!) // Set new values in transactioDAT*rön object sqlca.DBMS = sle_dbms.Text sqlca.servername = ddlb_server.Text // Set the following values based on different DBMS if sle_dbms.Text = "ODBC" then // for WATCOM gs_database='ODBC' sqlca.database = ddlb_database.Text sqlca.userid = sle_logid.Text sqlca.dbpass = sle_password.text // Build dbparm based on the userid and password on the logon window ls_dbparm = ProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "dbparm", "not found") if ls_dbparm = 'not fouDAT*tönd' then MessageBox(Parent.Title, "Error finding " + gs_iniFile + ", profile section~n" + & "or dbparm key in the ProfileString function.~n" + & "Contact your technical support.", StopSign!) Halt end if ls_dbparm = Upper(ls_dbparm) ll_pos_1 = Pos(ls_dbparm, ";UID=") ll_pos_2 = Pos(ls_dbparm, "',", ll_pos_1) ls_left = Left(ls_dbparm, ll_pos_1 - 1) ls_right = Right(ls_dbparm, Len(ls_dbparm) - (ll_pos_2 - 1)) sqlca.dbparm = ls_left + ";UID=" + sle_logid.Text + ";PWD=" DAT*vö+ & sle_password.Text + ls_right else //if upper(left(sle_dbms.Text,2)) = 'OR' then // for ORACLE //*** MDY 4/30/98 Set Global variable to 'ORACLE' in order to faclitate various //different versions of Oracle. Changes must be made throughout rapids code to utilize //this new value, since most places where this is tested use the //"upper(left(sle_dbms.Text,2)) = 'OR'" method //of determining DBMS. This fails since only Oracle 7.0 uses 'OR' as the first two chars gs_daDAT*xötabase = 'ORACLE' sqlca.logid = sle_logid.Text sqlca.logpass = sle_password.text ls_dbparm = ProfileString(gs_iniFile, "profile " + ddlb_profile.Text, & "dbparm", "not found") if Not (ls_dbparm = 'not found' or ls_dbparm = '') then sqlca.dbparm = ls_dbparm end if end if connect using sqlca; if sqlca.sqlcode <> 0 then f_db_error(SQLCA, 'Sorry! Cannot connect to database') // messagebox("Sorry! Cannot connect to database", sqlca.sqlerrtext, StopSign!) else if bModifiedDAT*zö then // Save the logon info into the ini file wf_save_profile() end if // Get the current user id gs_user_id = mid(sle_logid.Text, 1, 4) //*************************************************************** // Added code for Security SetPointer(HourGlass!) gs_master_user = ProfileString(gs_iniFile, 'security', 'master_user', & 'not found') if gs_master_user = 'not found' then // Do this in case that rapids.ini does not have this key gs_master_user = 'RAPIDS' DAT*|ö SetProfileString(gs_iniFile, 'security', 'master_user', gs_master_user) end if // set up Oracle user roles for non rapids accounts if gs_database = 'ORACLE' and upper(sle_logid.text) <> gs_master_user then // set up string to initial security tables ls_sql1="set role rap_security identified by rapidsxyz" execute immediate :ls_sql1 using sqlca; gf_db_message(sqlca, "set role") declare role_cursor cursor for select arg_role from rapids.appl_role_grants_v using sDAT*~öqlca; ls_sql1="set role " open role_cursor; gf_db_message(sqlca, "open") do while true fetch role_cursor into :ls_role; if gf_db_message(sqlca, "fetch") = 100 then exit end if ls_sql1=ls_sql1+ls_role+" identified by rapidsxyz," loop close role_cursor; gf_db_message(sqlca, "close") if ls_sql1 = "set role " then messagebox("Logon Error",upper(sle_logid.Text)+" does not have access",exclamation!) halt close else ls_sql1=replace(ls_sql1,len(ls_sql1),1,"") DAT*€ö execute immediate :ls_sql1 using sqlca ; gf_db_message(sqlca, "set role") gs_role=ls_sql1 end if end if // set up user role if gs_database = 'ORACLE' and upper(sle_logid.text) = gs_master_user then ls_sql1="set role rap_manager identified by rapidsxyz" execute immediate :ls_sql1 using sqlca ; gf_db_message(sqlca, "set role") gs_role=ls_sql1 end if //*************************************************************** //set default date format for Oracle: MDYDAT*‚ö 9/30/98 //CONFORMS TO THE GLNPO DEFAULT ORACLE DATE FORMAT if gs_database = 'ORACLE' then ls_sql1 = "alter session set nls_date_format = 'YYYY/MM/DD'" execute immediate :ls_sql1 using sqlca ; gf_db_message(sqlca, "alter session date format") end if Open(w_mdi_main) //post open(w_test_client) //source selector testing Close(parent) end if end event type st_password from statictext within w_logon int X=151 int Y=612 int Width=325 int Height=72 boolean Enabled=false striDAT*„öng Text="Password:" Alignment Alignment=Right! long TextColor=8388608 long BackColor=79741120 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type sle_password from singlelineedit within w_logon int X=503 int Y=604 int Width=823 int Height=80 int TabOrder=60 BorderStyle BorderStyle=StyleLowered! boolean PassWord=true TextCase TextCase=Lower! long BackColor=16777215 string FaceName="System" FonDAT*ŐtCharSet FontCharSet=Ansi! end type on modified;bModified = TRUE end on type sle_logid from singlelineedit within w_logon int X=503 int Y=492 int Width=823 int Height=80 int TabOrder=50 BorderStyle BorderStyle=StyleLowered! TextCase TextCase=Lower! long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on modified;bModified = TRUE end on DAT*ˆöŔ˙˙  L:,W@)8,•21@,$/d! +key+keyflags::message<˙˙ €˙˙  ˙˙@!€$ posteventŔ˙˙  ş $6…($—1Ĺ(8$8@T$z%8\z&d$›z(8lz&1p$)„8)”981ĹDAT*Šöœœ$›¤$Ź$)Ä8Ě$—źoľ@˝o98›şĘÔ$ě$9)81$$$8,z%…8$H9}˜P$X9}`$)t8|$9)8˜$ $9)¨8°$9)¸8Ŕ$9)Č8$Đ$Ř$9)ŕDAT*Œö81č$đř$8,z%…$9}r$$9) 8($09}8,• 1Ž,@$ < Ŕ Đ>jx¨ĆĘč(Tx˜œČÖ'$(()T,r.†dC ll_found_rowli_num_charsli_startli_select_len::messaged˙˙˙˙˙˙"˙˙DAT*Žö+˙˙9@!€H is_filt'text'dw_10$€Lower(is_col_nameG))>="'"0$€rowcount$4Ŕxfind9kŔŒ'0$€G)getitemstring´Ŕ´'0$€il_selected_rowÜ&selectrow@Ŕôst_err_msg!€' not found!€visible@!€@0$€scrolltorow?Ŕh0$€setredrawŔ!Ŕ„0$€Ü&@Ŕô0$€@Ŕô0$€!ŔDAT*ö„0$€Ü&@Ŕô!€'!€@0$€Ü&@Ŕô!€@Ü&˙˙  ( 8 T d p „ ” œ ¤ Ź Ä Ě Ô ě    $ 8 H P X ` t |  ˜   ¨ ° ¸ Ŕ Č Đ Ř ŕ č đ ř       ( 0DAT*’ö 8 @ ,€;€<€B;,$<2 + +key_pressed+ue_keydown+modified<˙˙Ŕ˙˙Ŕ˙˙!Ŕ2 z xywidthheighttaborderborderstyleautohscrollpointerbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙Ë˙˙ ˙˙ ’˙˙Q˙˙ ˙˙"€˙˙.˙˙:ů€˙˙B˙˙˙˙˙LřDAT*”ö˙˙˙˙˙Uź˙˙\Ň€˙˙e€˙˙p€] oË’Q  Eř˙˙˙ź@€€€Ň€ů€˙˙˙@ @€€@Ÿl`˙˙;€B˙˙ľˆp˙˙<€$˙˙`H˙˙˙˙x,€DAT* ˙˙DAT*˜ö<8)8ŠŠŠŠÎ€,Ď ř€1<R‹}Î€,Ď,4X~ Ş!Ě"ţ#2$f%š&Ě'ţ(,)R*n,r-‚dj ls_headingls_col_namels_data_typels_userls_passwordll_col_idli_countersqlcaheadingcursor´˙˙ ˙˙ ˙˙ ˙˙, ˙˙4 ˙˙@˙˙J˙˙U@€˙˙[x€DAT*šö>$  ˙˙˙˙is_table_name/˙˙dw_18-€insertrow(ŔH8-€fieldsetitemPŔj8-€operatorPŔj8-€select_valuePŔj8-€logicalPŔj8-€data_typePŔj8-€column_namePŔj8-€column_idOŔj  ( 0 @ T \ t |  ˜ ° ¸ Č Đ ä ě    '$)$8DAT*œö1‹}Bó<Ý,$<84)P88Xş\$<8d)p88xŞ"€$<8d)ˆ88Ş"ü8œ $<8¨)´8z'8œz&…ź$<8¨)Ä8¤…8ĚŞ8âŞ"8řŞ"ň$<8J08;ź(ľ@˝(8…8$<84)@DAT*žö8…1źľ@˝88HŞ1źoľ@˝o88HŞ!1źľ@˝88JŞ1źoľ@˝o88JŞ!"1—1Yź’ľ@˝’8…L$<8d)T88\Şn8az%8nz&z&8yz&…‚€$<8d)ˆ88ŞÜ8™z%8nz&z&8Źz&…‚´$<8d)ź88xŞDAT* ö88Äz%8Ěz&…‚Đ$<8d)Ř88Ş”8ŕz%8íz&…‚ô$<8d)ü88Şđ<) 8…‚($<80)<88DŞ€8œz%L$<8d)T8z(8œz&z&…‚\$<80)d88lŞ8œz%t$<8d)|8z(8„z&DAT*˘öz&8Œz&…‚8z%8–z&œ$<8d)¤8z(8Źz&z&8Œz&…,’Ҹ$<8Ŕ)Č8z'8œz&…đ,1źľ@˝88ĐŞ,1źľ@˝88ŐŞ"#Ś1‹źľ@˝8Ü$<)ě8ü$680:)@źŽľ@˝Ž8,z%($<8Ŕ)08z(8œz&…DAT*¤ö}8 " Tř<p¨îň ""Ě'(8,j-Ś1Ř2546p9:Ě=ě@đA(E|F¸JKP‚QŒRÎSŇT*UHVlX ZŚ\đ^üd] ili_prev_row_numls_sel_patternls_col_idls_valuels_col_namell_total_rowgs_filt ˙˙˙˙ ˙˙ ˙˙) ˙˙3 ˙˙< ˙˙H˙˙U@8` dw_1-€rowcount,4Ŕ-€selDAT*Śöect_valuegetitemstringŔA-€operatorŔAis null-€ŔAis not null es-€column_nameŔA-€ŔAGEOGRAPHIC_COUNTY_RIDGEOGRAPHIC_INCORP_RIDGEOGRAPHIC_STATE_RID -€rid_valuegetitemnumber Ŕ"-€ŔA'"-€ŔAlikeMatch(Upper(), Upper(''))˙-€ŔAnot like(NOT (Match(Upper('))))€-€ŔAIsNull()at-€ŔA(NOT(IsNull()))l_c-€ŔAinwf_oracle_in_operator)|Ŕ-DAT*¨ö€data_typeźŔANUMBER-€ŔA-€ŔADATE-€ŔA date('')Upper() 8-€ŔA Upper('o-€logicalŔAand or -€setroweQŔätitleô Please select a logical operatord-€ŔA $ , P \ p € ˆ   ´ ź Ä  0 8 @ L T € ˆ ´ ź Đ Ř ô ü   ( < LDAT*Şö T \ d t | œ ¤ ¸ Č Ü ě ü ( 0 '$)$8‹}1‹}FóŰ,$<84)P88Xş\$<8d)p88xŞ"€$<8d)ˆ88Ş"ü8œ $<8¨)´8z'8œz&…ź$<8¨)Ä8¤…8ĚŞDAT*Źö8âŞ"8řŞ"ň$<8J08;ź(ľ@˝(8…8$<84)@8…1źľ@˝88HŞ1źoľ@˝o88HŞ!1źľ@˝88JŞ1źoľ@˝o88JŞ!"1—1Yź’ľ@˝’8…L$<8d)T88\Şn8az%8nz&z&8yz&…‚DAT*Žö€$<8d)ˆ88ŞÜ8™z%8nz&z&8Źz&…‚´$<8d)ź88xŞ88Äz%8Ěz&…‚Đ$<8d)Ř88Ş”8ŕz%8íz&…‚ô$<8d)ü88Şđ<) 8…‚($<80)<88DŞ€8œz%L$<8d)T8z(8DAT*°öœz&z&…‚\$<80)d88lŞ8œz%t$<8d)|8z(8„z&z&8Œz&…‚8z%8–z&œ$<8d)¤8z(8Źz&z&8Œz&…,’Ҹ$<8Ŕ)Č8z'8œz&…đ,1źľ@˝88ĐŞ,1źľ@˝88ŐŞ"#Ś1‹źľ@˝8Ü$<)DAT*˛öě8ü$680:)@źŽľ@˝Ž8,z%($<8Ŕ)08z(8œz&…}< & Tř<p¨îň"!Ě&'8+j,Ś0Ř1445p89Ě<ě?đ@(D|E¸JKQ‚RŒSÎTŇU*VHWlY [Ś]đ_üd] ll_total_rowili_prev_row_numls_col_idls_valuels_sel_patternls_col_namegs_filt ˙˙˙˙˙˙˙˙DAT*´ö' ˙˙1 ˙˙: ˙˙I ˙˙U@8` dw_1-€rowcount,4Ŕ-€select_valuegetitemstringŔA-€operatorŔAis null-€ŔAis not null er-€column_nameŔA-€ŔAGEOGRAPHIC_COUNTY_RIDGEOGRAPHIC_INCORP_RIDGEOGRAPHIC_STATE_RID -€rid_valuegetitemnumber Ŕ"-€ŔA'"-€ŔAlikeMatch(Upper(), Upper(''))˙-€ŔAnoDAT*śöt like(NOT (Match(Upper('))))sr-€ŔAIsNull() -€ŔA(NOT(IsNull()))ren-€ŔAinwf_watcom_in_operator)}Ŕ-€data_typeźŔAnumeric-€ŔA-€ŔAdate-€ŔA date('')Upper() 8-€ŔA Upper('o-€logicalŔAand or -€setroweQŔätitleô Please select a logical operatord-€ŔA $ , P \ p € ˆ   ´ DAT*¸öź Ä  0 8 @ L T € ˆ ´ ź Đ Ř ô ü   ( < L T \ d t | œ ¤ ¸ Č Ü ě ü ( 0 ´8$8J08;ź(ľ@˝(8z'…8$8@)\8…8dźÄľ@˝Ä88f0…1Ĺj1Yźoľ@˝oDAT*şö8Ł…—Yźľ@˝8…8fşB8gz%…l$8t)€88ˆŞ z%8z&z&…B”$8t)œ88¤Şz%8Šz&z&8łz&…B8śz%z&8˝z&z&8łz&…8dźÄľ@˝Ä8Ž8fş”8gz%…Ě$8t)Ô88ˆŞözDAT*źö%8z&Łz(… Ü$8t)ä88¤Şbz%8Šz&Łz(8łz&… 8śz%z&8˝z&Łz(8łz&…6 LxœŽžě,Bv œ!Ô%&*B+f0j1~5”6Č9ň:*>^?bD dP rownumll_comma_posls_sel_valuels_data_valuels_sel_patternls_col_idx˙˙˙˙˙˙ ˙˙) DAT*žö˙˙7 ˙˙F ě` #dw_1 -€column_idgetitemnumber Ŕ" -€select_valuegetitemstringŔM, or -€data_typeŔMNUMBER =  -€ŔMDATE = date('')Upper() = Upper('tro -€ŔM -€ŔM 0 8 \ l € ” œ Ě Ô Ü ä ´8$8J08;ź(ľ@˝(8z'…8$8@)\8DAT*Ŕö…8dźÄľ@˝Ä88f0…1Ĺj1Yźoľ@˝o8Ł…—Yźľ@˝8…8fşB8gz%…l$8t)€88ˆŞ z%8z&z&…B”$8t)œ88¤Şz%8Šz&z&8łz&…B8śz%z&8˝z&z&8łz&…8dźÄľ@˝Ä8ŽDAT*Âö8fş”8gz%…Ě$8t)Ô88ˆŞöz%8z&Łz(… Ü$8t)ä88¤Şbz%8Šz&Łz(8łz&… 8śz%z&8˝z&Łz(8łz&…6 LxœŽžě,Bv œ!Ô%&*B+f0j1~5”6Č9ň:*>^?bD dQ row_numll_comma_posls_sel_valuels_data_valuDAT*Äöels_sel_patternls_col_idx˙˙˙˙˙˙ ˙˙* ˙˙8 ˙˙G ě` #dw_1 -€column_idgetitemnumber Ŕ" -€select_valuegetitemstringŔM, or -€data_typeŔMnumeric = -€ŔMdate = date('')Upper() = Upper('tro -€ŔM -€ŔM 0 8 \ l € ” œ Ě Ô Ü ä n DAT*Ćö, $6…0$,)H8P$:H@)p8x$)Œ8,8”ŞŞ)¨8ź)Ŕ8Č$)Ü81Ń:ä$ě$ü$1K<Y‹$$)$8,•T1b,,$"Bd € ” Ś Şźâ:d, messagesqlcags_database::messageP˙˙@€˙˙@DAT*Čö€˙˙@˙˙"@€4˜ is_table_name/˙˙dw_1(-€settransobject^Ŕ8(-€setrowfocusindicatorRŔX(-€retrieveume1Ŕ€ORACLEwf_oracle_dwxŔ›wf_watcom_dw6 yŔ°(-€rowcountts4ŔĐ(-€(-€widthô(-€height resizeŔ˙˙  0 H P p x Œ ¨ Ŕ Č Ü ä ě ü   $ ,DAT*Ęö Ś*‡,*4‡H*P‡`*h‡x€$ˆ$$˜$˛€ |,BXd  h dw_2ble*€€cb_cancel_1 +€ €cb_select<,€<€dw_1X-€X€controlpc@*€ +€<,€X-€ , 4H P` hx € ˆ  ˜ >DAT*Ěö$$$8$H$*d P dw_2ble*€cb_cancel_c+€cb_select,,€dw_1@-€ $ 8 H € €&€w€x€y€z€{€|€}€ą&2 ” populatedddwwf_oracle_dwwf_watcom_dwwf_oracle_filterwf_watcom_filterwf_oracle_in_operatorwf_watcom_in_operator+open+create+destroyČ˙˙Ŕ˙˙Ŕr ˙˙"DAT*ÎöŔ˙˙/€Ŕ˙˙@€Ŕ˙˙QŔ˙˙gŔ˙˙}ŔŔ˙˙ƒ€Ŕ˙˙‹ Ŕ2 ˆ xywidthheighttitlebartitlebackcolorcontrolmenuwindowtypedw_2cb_cancelcb_selectdw_1ii_clicked_dw1_rowis_table_name,˙˙)˙˙ ˙˙ r ˙˙Œ˙˙˙˙"S€˙˙(ŔŔŔ˙˙2Ŕ˙˙>Ŕ€˙˙I €DAT*Đö˙˙N €˙˙X €˙˙b €˙˙g˙˙z] o)r Œ€S€  €Ŕ€Ŕ€€Œ€1€ŔŔŔ  @@€@ € € € €˙˙˙˙wDAT*Ňö€˙˙˙˙˙˙˙˙x€˙˙˙˙"˙˙˙˙xy€˙˙˙˙/˙˙˙˙z€˙˙˙˙@˙˙˙˙{€˙˙˙˙X ˙˙|€˙˙˙˙v˙˙}€˙˙˙˙Œ(˙˙˙˙&€ą˙˙’˙˙˙˙€˙˙˙˙š˙˙˙˙ €˙˙˙˙ˆ‹}DAT*Ôö1<ĹT$$$6…8,Ş8:Ş"8GŞ"6\$x$<8€$<8˜)Ź8)ź8Ä$Ě$<8Ôŕ$<8čJü8;)8 $9},•n1|,$$$F~ Ř6Td: xposyposrowdwoli_clicked_rowcase6::messageŒ˙˙DAT*Öö˙˙ ˙˙˙˙ €˙˙˙˙) ˙˙0@€,x dw_2*€dataobjectd_county_named_city_namesd_state_namesdw_1U-€ii_clicked_dw1_rowd.select_value^@*€namegetitemstringŔsetitemPŔ´U-€d.rid_value€*€ridgetitemnumber ŔěOŔ´*€visible˙˙ $ \ x  Ź ź Ä Ě ŕ DAT*Řöü     $ P19)8,•61D,$d +rowcount::message(˙˙˙˙@€$ selectrow@Ŕ˙˙  Ę)81Ĺ–1)(81Ĺľ!|9)<89)D8,•°1ž,L$( DAT*ÚöF b |–d= +currentrowll_clicked_rowll_selected_row::messageP˙˙˙˙˙˙#˙˙3@€T( getrowŔgetselectedrowŔselectrow@Ŕ0@Ŕ0˙˙ ( < D L 4,•1(,$d" +row+dwo+data::messageP˙˙˙˙ €˙˙ ˙˙@€DAT*Üö ˙˙ $€/€9€<€ż/Ä$Ň9Ő<2 < +clicked+retrieveend+rowfocuschanged+itemchangedP˙˙Ŕ˙˙Ŕ˙˙Ŕ˙˙/Ŕ2 f xywidthheighttabordervisibletitlebartitleborderstylehscrollbarvscrollbarlivescrollđ˙˙i˙˙ x˙˙ I˙˙đ˙˙˙˙"˙˙*˙˙3´€DAT*Ţö˙˙9ś€˙˙Eś˙˙Pś˙˙[ś] ixIđ @´€ śś@ śś€ €ľ\,˙˙$€Ä˙˙Čxl˙˙9€Ň˙˙áx|˙˙x<€Ő˙˙ʈ˙˙/€ż˙˙JDAT*ŕöźľ@˝8,•01>,$d ::message˙˙@€ ˙˙ "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙˙˙ °˙˙ %˙˙P˙˙(˙˙"Ě€˙˙'ř˙˙˙˙˙0ź˙˙DAT*âö7Ó€˙˙@Ŕ€˙˙KŔ€] o°%P( ř˙˙˙ź@€Ŕ€Ŕ€Ó€ @Ě€ľ(˙˙˙˙"€˙˙Ö Śźľ@˝ś8$)$8,8,Şb)D8t)`8,’#Œ!9}źľ@˝8,•ź1Ę,hDAT*äö$8L^b8t9€<Œ=˘d0 gs_filtgs_databasegb_filter::messageP˙˙@˙˙@˙˙!@˙˙&@€p( dw_1-€accepttextźŔORACLEwf_oracle_filterzŔ3wf_watcom_filter{ŔL˙˙ $ D ` h "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenameDAT*ćöfontfamilyfontpitchÜ˙˙7˙˙ °˙˙ %˙˙P˙˙˙˙"á€˙˙'ř˙˙˙˙˙0ź˙˙7Ó€˙˙@ż€˙˙Kż€] o7°%P ř˙˙˙ź@€ż€ż€Ó€ @ှ(˙˙˙˙"€˙˙Ŕ8DAT*čö80…$‹} )@8<8H)\8¤… 1Ľ’ 6…8d Ş8z Ş":ˆ$œ8¤0…´$,)Ě8 Ô$)č8đ$9}’8 Ş8 Ş"č0$88@0…P$,)X8 `$)h8p$x9}’8€ ŞDAT*ęö8• Ş"’œ$¤8Ź0…ź$,)Ä8 Ě$)Ô8Ü$ä9} 1ĽŒ)ř8 6…8d Ş8 Ş"8€ Ş"8• Ş"8z Ş"8 Ş"î9) 8:F@źľ@˝81‹8) 81‹8(),81‹84)<81‹8DAT*ěöD)H81‹8P)T81‹8\)`81‹8h)l81‹8t)x81 ‹8€)Œ8źľ@˝89)”8Œ9)œ8:F@źľ@˝8Ź$1‹8)´8ź$1‹8()Ä8Ě$1‹8Ô)Ü8ä$1‹8ě)đ8DAT*îöř$1‹84)8$1‹8D)8$1‹8P) 8($1‹8\)088$1 ‹8h)@8H$1 ‹8t)P8X$1 ‹8`)l8t$1 ‹8€)|8źľ@˝89)„8,•Ś1´,Œ$ *FlDAT*đö|Œ˛Öö6` „!¤#Ć$ä%&2'R)t/’3˘5¸7Č869L:f;Œ<˛=Ř>ţ?$@JApB–CźDÔFęGîHIJNK~LŽMŢNO>PnQžRÎSţT.U^Vv]Œdx xposyposrowdwols_col_nameddlb_operlb_nameoldpointerdwcll_rcll_clickedcase23sqlcacase53::message,˙˙˙˙ ˙˙˙˙ €˙˙ ˙˙& ˙˙0 ˙˙8 €DAT*ňö˙˙C €˙˙G˙˙M˙˙X ˙˙`@€˙˙f ˙˙n@€” operatorii_clicked_dw1_row.getclickedcolumnfilöŔ,fieldgetitemstringŔNGEOGRAPHIC_COUNTY_RIDCOUNTYdw_2*€dataobjectd_county_namebj*€settransobjecto^Ŕź*€retrieve1Ŕ܁*€visibleřGEOGRAPHIC_INCORP_RIDINCORPORATED CITY*€d_city_namesn*€^Ŕź*DAT*ôö€1Ŕ܁*€řGEOGRAPHIC_STATE_RIDSTATE*€d_state_names*€^Ŕź*€1Ŕ܁*€řclearvaluesžŔěsetredraw!Ŕ setvaluebŔ=bŔis nullbŔ>…bŔ<$bŔ<>bŔ>=bŔ<=bŔis not nullbŔ!Ŕ!Ŕdw_1}¤-€bŔ¤-€bŔ¤-€likebŔ¤-€inbŔ¤-€bŔ¤-€bŔ¤-€bŔ¤-€bŔ¤-€bŔ¤-€bŔ¤DAT*öö-€not like:bŔ¤-€bŔ!Ŕ˙˙$ @ \ ˆ œ ´ Ě Ô č đ  0 8 P X ` h p x œ ¤ ź Ä Ě Ô Ü ä ř     , < H T ` l x Œ ” œ Ź ´ ź Ä Ě Ü ä đ ř       ( 0 DAT*řö8 @ H P X l t | „ Œ R$ 9},•81F,($d +scrollpos::message(˙˙˙˙@€0 dw_2ypo*€visible˙˙  ( Ę)81Ĺ–1)(81Ĺľ!|9)<89)D8,DAT*úö•°1ž,L$( F b |–d7 +currentrowlclickedrowlselectedrow::messageP˙˙˙˙˙˙ ˙˙-@€T( getrowŔgetselectedrowŔselectrow@Ŕ0@Ŕ0˙˙ ( < D L $€<€?€Ä$Ő<Ţ?2 2 +clicked+scrollvertical+rowfocuschanged<˙˙Ŕ˙˙Ŕ˙˙DAT*üö!Ŕ2 O xywidthheighttaborderdataobjectborderstylevscrollbarlivescroll´˙˙7˙˙ 0˙˙ î˙˙`˙˙ ˙˙"č€˙˙-Á€˙˙9Á˙˙DÁ] o70î`  @ č€Á@ ÁÁ€DAT*› €ľ\ź˙˙$€Ä˙˙xě˙˙?€Ţ˙˙áxř˙˙x<€Ő˙˙DAT*˛Â€˙˙5Â˙˙A€˙˙KÔĐČ˙˙Uř˙˙˙˙˙^ź˙˙e˜€˙˙nÁ€˙˙zÁ €˙˙…Á €] o%ŽL ř˙˙˙źÁ€Á €Á €˜€ €ÔĐČ@€@€ÂDAT* ö( 0 @ HX ` t | „ Œ   ¨ „*‡,*4‡D*L‡\d$l$t$˛€ |,Bd |P sle_str*€€cb_cancel +€ €cb_ok8<,€<€controlTc@*€ +€<,€ , 4D L\ d l t 0$DAT* ö$$4$d < sle_str*€cb_cancel_c+€cb_ok€,,€ $ 4 €€&€ą&2  +open+create+destroy<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 ` xywidthheighttitlebartitlebackcolorwindowtypesle_strcb_cancelcb_okii_max_lenđ˙˙Ľ˙˙ ˙˙ ˙˙ą˙˙DAT* ö˙˙"[€ľ˙˙(ŔŔŔ˙˙2Ŕ€˙˙= €˙˙E €˙˙O €˙˙U] oĽ ą€[€  €€Ŕ€€Œ€1€ŔŔŔ  @@€@ € €DAT* ö €˙˙˙˙&€ą˙˙ ˙˙˙˙€˙˙˙˙ ˙˙˙˙x€˙˙˙˙2  2 a xywidthheighttaborderborderstyletexttextsizeweightfacenamefontfamilyfontpitchđ˙˙S˙˙ I˙˙ Ó˙˙Y˙˙ ˙˙"€˙˙.´€˙˙3ř˙˙˙˙˙<ź˙˙Cˇ€˙˙DAT* öLż€˙˙Wż€] oSIÓY  Eř˙˙˙ź@€ż€ż€ˇ€ @@´€@@€€@nŠźľ@˝ś86źľ@˝8,•T1b,$:d ls_nul::message(˙˙DAT* ö ˙˙@€ ˙˙ "€"2  +clicked˙˙Ŕ2 \ xywidthheighttabordertextcanceltextsizeweightfacenamefontfamilyfontpitchđ˙˙%˙˙ ˝˙˙ ÷˙˙]˙˙˙˙"Ĺ€˙˙'Á˙˙.ř˙˙˙˙˙7ź˙˙>ˇ€@˙˙GŔ€˙˙RŔ€] o%˝DAT* ö÷] ř˙˙˙ź@€Ŕ€Ŕ€ˇ€ @Ĺ€Á˙˙˙˙"€˙˙ $ $’9Ť($0$Ł—1Ľ"Ś@$68H0źľ@˝8,•’1 ,\$d$l$6źľ@˝8,•đ1ţ,t$JxŚDAT* öÖd ::message˙˙@€|H sle_str*€text*€title8 Entry is required˙˙*€˙˙  ( 0 @ \ d l t "€"2  +clicked˙˙Ŕ2 ] xywidthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitchđŔ˙˙N˙˙ ˝˙˙ ÷ ˙˙DAT* öGeneric look up window for code such as SIC or SCCforward global type w_look_up from Window end type type cb_unfilter from commandbutton within w_look_up end type type cb_filter from commandbutton within w_look_up end type type cb_sort from commandbutton within w_look_up end type type uo_1 from u_selection_list within w_look_up end type type cb_cancel from commandbutton within w_look_up end type type cb_select from commandbutton within w_look_up end type end forward global type wDAT* ö_look_up from Window int X=28 int Y=217 int Width=2867 int Height=1481 boolean TitleBar=true long BackColor=12632256 boolean ControlMenu=true boolean Resizable=true WindowType WindowType=response! cb_unfilter cb_unfilter cb_filter cb_filter cb_sort cb_sort uo_1 uo_1 cb_cancel cb_cancel cb_select cb_select end type global w_look_up w_look_up type variables str_lookup istr_lookupParm; end variables on open;istr_lookupParm = Message.PowerObjectParm This.Title = istr_lookupDAT* öParm.winTitle uo_1.uf_create_datawindow(sqlca, istr_lookupParm.sqlStatement, & istr_lookupParm.current_code) //uo_1.uf_create_ddlb() end on on w_look_up.create this.cb_unfilter=create cb_unfilter this.cb_filter=create cb_filter this.cb_sort=create cb_sort this.uo_1=create uo_1 this.cb_cancel=create cb_cancel this.cb_select=create cb_select this.Control[]={ this.cb_unfilter,& this.cb_filter,& this.cb_sort,& this.uo_1,& this.cb_cancel,& this.cb_select} end on on w_look_up.dDAT* öestroy destroy(this.cb_unfilter) destroy(this.cb_filter) destroy(this.cb_sort) destroy(this.uo_1) destroy(this.cb_cancel) destroy(this.cb_select) end on type cb_unfilter from commandbutton within w_look_up int X=700 int Y=1229 int Width=261 int Height=97 int TabOrder=60 string Text="Unfilter" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;uo_1.uf_unfilter() end on type cb_filDAT* öter from commandbutton within w_look_up int X=375 int Y=1229 int Width=261 int Height=97 int TabOrder=50 string Text="Filter..." int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;uo_1.uf_filter() end on type cb_sort from commandbutton within w_look_up int X=55 int Y=1229 int Width=261 int Height=97 int TabOrder=40 string Text="Sort..." int TextSize=-8 int Weight=700 string FaceDAT* öName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;str_sort lstr_parm // DataWindow to be sorted lstr_parm.dw = uo_1.dw_1 // Title to be used on the w_sort window lstr_parm.title = istr_lookupParm.winTitle OpenWithParm(w_sort, lstr_parm) end on type uo_1 from u_selection_list within w_look_up int X=33 int Y=29 int Height=1201 int TabOrder=10 boolean Border=false end type on uo_1.destroy call u_selection_list::destrDAT* öoy end on type cb_cancel from commandbutton within w_look_up int X=2510 int Y=1229 int Width=261 int Height=97 int TabOrder=30 string Text="Cancel" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;Close(Parent) end on type cb_select from commandbutton within w_look_up int X=2186 int Y=1229 int Width=261 int Height=97 int TabOrder=20 string Text="Select" int TextSize=-8 int WeDAT*Çight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked; gs_code_value = uo_1.uf_return_selected() Close(Parent) end on DAT*š]˙˙˙˙"Ě€˙˙'˝˙˙˙˙/ř˙˙˙€˙˙8ź˙˙?ˇ€˙˙HÁ€%˙˙SÁ€] oN˝÷] ř˙˙˙ź@€Á€Á€ˇ€ @Ě€˝˙˙˙˙"€˙˙DAT*$ ö 1R  1RYź’ľ@˝’8… 1R  1RYź’ľ@˝’8…8MŞ˛8d08i8˜z%źľ@˝8č8d08ˇz%8Óz&źľ@˝8T8ůź(ľ@˝(8z'6źľ@˝8,8ŞTź €˝81 ,P`„¨ŹĐô0l €"Ž#˛'č*ě.(/<7Td– sqldbcodesqlerrtextsqlsyntaxDAT*& öbufferrowls_db_err_txtls_field_namels_table_namell_db_errll_left_posll_mid_posll_right_posgs_database˙˙˙˙ ˙˙ ˙˙'€˙˙.˙˙2 ˙˙@ ˙˙N ˙˙\˙˙f˙˙r˙˙}˙˙Š@ UNIQUE ( index '' for table ')' for table '' would not be uniquerap_location_coordinatSaveOnly one locatioDAT*( ön coordinate group is allowed. No changes made to database.Duplicate record with same found. No changes made to database.Database ErrorCode: ORACLEĘ)81Ĺ–1)(81Ĺľ!|9)<89)D8,•°1ž,L$( F b |–d= +currentrowll_clicked_rowll_selected_row::messageP˙˙˙˙DAT** ö˙˙#˙˙3@€T( getrowŔgetselectedrow˙Ŕselectrow8@Ŕ0@Ŕ0˙˙ ( < D L H9},•.1<, $d" +row+dwo+data::messageP˙˙˙˙ €˙˙ ˙˙@€( ib_obj_modified˙˙  H9},•.1DAT*, ö<, $d" +row+dwo+data::messageP˙˙˙˙ €˙˙ ˙˙@€( ib_obj_modified˙˙  & €-€/ €< €ž€Ÿ€ €Ą€˘€Ł€¤€Ľ€Ś€§ €¨ €ś-ˇ&ż/͞Ő<2 × +dwnprocessenter+mousemove+add_row+delete_row+first_row+prev_row+next_row+last_row+row_pasteduf_check_requireduf_is_modifieDAT*. öd+dberrorf_oracle_connection+rowfocuschanged+itemchanged+editchanged@˙˙Ŕ€éq˙˙aŔ\@˙˙$[@Ŕ8˙˙-ŔU@a˙˙9qŔj@˙˙Dk@Ŕz˙˙NŔm@˙˙XŔ‘@˙˙b¤@ŔÄ˙˙n Ŕ^@˙˙€ Ŕ@˙˙ @Ŕ-˙˙˜ŔS@˙˙Ź Ŕ„@˙˙˝ €ŔĎ˙˙ĘŔ2 h widthheighttaborderborderstylehscrollbarvscrollbarhsplitscrolllivescrollib_oDAT*0 öbj_modified´Ŕ˙˙˙˙h˙˙#˙˙€˙˙*˙˙5˙˙@˙˙M˙˙X] oh @  @ € €˙˙˙˙ž€Í˙˙)0 ˙˙Ÿ˙˙DAT*2 ö•˙˙BP8˙˙x ˙˙O˙˙KPT˙˙Ą˙˙P˙˙WPl˙˙˘˙˙Q˙˙bP„˙˙Ł˙˙R˙˙lPœ˙˙¤˙˙S˙˙vP´˙˙Ľ˙˙T˙˙€Ě˙˙˙˙Ś˙˙˙˙˙˙ŒÎ˙˙˙˙§ €˙˙˙˙žÎ˙˙˙˙¨ €˙˙˙˙× Đ˙˙& €ˇ˙˙ěDAT*Ž(˙˙< €Ő˙˙ P,˙˙/€ż˙˙P`˙˙-€ś˙˙DAT*Ť @  @ € €DAT*8 ö( findrequiredImŔ˙˙ Required Value Missing for on row . Please enter a value.setcolumnGŔesetrow˙QŔxscrolltorow?Ŕˆ  p € ” Ţ6…1<˙˙˙Ľd 8źÄľ@˝Ä8 8źÄľ@˝Ä8 1ĽH 8'źÄľ@˝Ä8 8/źÄľ@˝Ä8 1R  1RYź’ľ@˝’8… 1 R  1DAT*: ö RYź’ľ@˝’8…ä 8=źÄľ@˝Ä8 1R  1RYź’ľ@˝’8… 1R  1RYź’ľ@˝’8…8LŞ*8c08h8—z%źľ@˝8`8c08śz%8Ňz&źľ@˝8Ě8řź(ľ@˝(8z'6źľ@˝8,8 ŞĚź €˝81 ,Pt„¨ĚDHl!¨%ä&DAT*< öř(&)*-`0d4 5´=Ěd– sqldbcodesqlerrtextsqlsyntaxbufferrowls_db_err_txtls_field_namels_table_namell_db_errll_left_posll_mid_posll_right_posgs_database˙˙˙˙ ˙˙ ˙˙'€˙˙.˙˙2 ˙˙@ ˙˙N ˙˙\˙˙f˙˙r˙˙}˙˙Š@ ' would not be uniqueUNIQUE (DAT*> öindex '' for table ')' for table 'rap_location_coordinatSaveOnly one location coordinate group is allowed. No changes made to database.Duplicate record with same found. No changes made to database.Database ErrorCode: ORACLEH9},•.1<, $d" +row+dwo+data::messageP˙˙˙˙ €˙˙ ˙˙@€( ib_obj_modified˙˙DAT*@ ö  H9},•.1<, $d" +row+dwo+data::messageP˙˙˙˙ €˙˙ ˙˙@€( ib_obj_modified˙˙  & €- €/ €ž€Ÿ€ €Ą€˘€Ł€¤€Ľ€Ś€§ €¨ €ś-ˇ&ż/͞2 Ć +dwnprocessenter+mousemove+add_row+delete_row+first_row+prev_row+next_row+lasDAT*B öt_row+row_pasteduf_is_modifieduf_check_required+dberrorf_oracle_connection+itemchanged+editchanged,˙˙Ŕ˙˙Ŕ˙˙$Ŕ˙˙-Ŕ˙˙9€Ŕ˙˙DŔ˙˙NŔ˙˙X€Ŕ˙˙b€Ŕ˙˙n Ŕ˙˙} Ŕ˙˙ Ŕ@˙˙˜€Ŕ˙˙Ź Ŕ˙˙š Ŕ2 5 widthheighttaborderborderib_obj_modifiedd˙˙˙DAT*D ö˙h˙˙˙˙˙˙%] oh @   @€ €˙˙˙˙ž€Í˙˙)0 ˙˙Ÿ˙˙•˙˙BP8˙˙x ˙˙O˙˙KPT˙˙Ą˙˙P˙˙WDAT*ÝPl˙˙˘˙˙Q˙˙bP„˙˙Ł˙˙R˙˙lPœ˙˙¤˙˙S˙˙vP´˙˙Ľ˙˙T˙˙€Ě˙˙˙˙Ś˙˙˙˙˙˙ŒÎ˙˙˙˙§ €˙˙˙˙›Î˙˙˙˙¨ €˙˙˙˙× Đ˙˙& €ˇ˙˙đ@˙˙/ €ż˙˙ý@P˙˙-€ś˙˙DAT*H öle_logidipicturebmodifiedŕ˙˙n˙˙ Ř˙˙ w˙˙Ź˙˙˙˙"€˙˙(ŔŔŔ˙˙2Ŕ€˙˙= €˙˙F €˙˙K €˙˙Y €˙˙e €˙˙r !€˙˙w "€˙˙| #€˙˙ $€˙˙† &€˙˙ '€˙˙– (€˙˙˘ )€d@˙˙Ż *€˙˙š˙˙ÂDAT*J ö] onŘwŹ€€  €€Ŕ€€8€1€ŔŔŔ  @@€@ € € € € € !€ "€ #€ $€ &€ '€ (€ )€ *€˙˙˙˙wDAT*L ö€˙˙˙˙˙˙˙˙x€˙˙˙˙* ˙˙˙˙x€F˙˙1 ˙˙˙˙&€ą˙˙7˙˙˙˙€˙˙˙˙?˙˙˙˙€˙˙˙˙2  2 o xywidthheighttaborderborderstyletextcasebackcolortextsizeweightfacenamefontfamilyfontpitch˙˙÷˙˙ œ˙˙ 7˙˙P˙˙DAT*X ö˙˙"€˙˙.€˙˙7˙˙˙˙˙Ař˙˙˙˙˙Jź˙˙Q`€˙˙Zż€˙˙eż€] o÷œ7P Eř˙˙˙ź@€ż€ż€`€ ˙˙˙@ @@€€@2  2  xywDAT*P öPlaces a clock on a MDI frameforward global type w_mdi_clock from Window end type type st_time from statictext within w_mdi_clock end type end forward global type w_mdi_clock from Window int X=681 int Y=272 int Width=517 int Height=56 boolean Enabled=false long BackColor=12632256 boolean Border=false WindowType WindowType=popup! event wininichange pbm_wininichange st_time st_time end type global w_mdi_clock w_mdi_clock type variables window iw_parent_window end variablesDAT*R ö forward prototypes public subroutine wf_parent_resized () end prototypes public subroutine wf_parent_resized ();//move the window so it is positioned over the lower right hand //portion of the Microhelp bar //re-coded to work properly? MDY 1/99 integer li_winht, li_winwd integer li_thisX, li_thisY //winht = iw_parent_window.y + workspaceheight(iw_parent_window) + ii_border_height + 25 + ii_menu_ht //li_winWd = iw_parent_window.x + workspacewidth(iw_parent_window) + ii_bordDAT*T öer_width - (this.width + 85) li_winHt = iw_parent_window.y + iw_parent_window.height li_winWd = iw_parent_window.x + iw_parent_window.width li_thisX = li_winWd - this.width - 150 li_thisY = li_winHt - this.height - 20 move(this, li_thisX, li_thisY) end subroutine event open; // Initialize and determine environment information iw_parent_window = parentwindow() this.width = st_time.width this.height = st_time.height timer(60) this.triggerevent(timer!) wf_parent_resizeDAT*V öd() end event on timer;st_time.text = string(today(),"m/dd/yy")+" "+string(now(),"h:mm am/pm") end on on w_mdi_clock.create this.st_time=create st_time this.Control[]={this.st_time} end on on w_mdi_clock.destroy destroy(this.st_time) end on type st_time from statictext within w_mdi_clock int Width=507 int Height=56 boolean Enabled=false string Text="12/12/12 09:12 pm" Alignment Alignment=Right! boolean FocusRectangle=false long TextColor=33554432 long BackColor=1263225DAT*Ž6 int TextSize=-8 int Weight=400 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type DAT*Z öidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙é˙˙  ˙˙ ÷˙˙H˙˙˙˙!n€˙˙& €˙˙0 ˙˙?€˙˙IŔŔŔ@˙˙Sř˙˙˙˙˙\ź˙˙c`€€˙˙lÁ€˙˙wÁ€] oé ÷H DAT*\ öř˙˙˙ź@€Á€Á€`€ €ŔŔŔn€ €€@€ H9},'•.1<,'$d ::message˙˙'@/€$ bmodified9˙˙  -€3-2  +modified˙˙Ŕ2 ‘ xywidthheighttaborderborderstyleDAT*^ öautohscrollvscrollbarallowedittextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch@˙˙÷˙˙ |˙˙ 7˙˙č˙˙(˙˙"€˙˙.˙˙:˙˙E˙˙O˙˙Y˙˙˙˙˙cř˙˙˙˙˙lź˙˙s`€˙˙|Ŕ€˙˙‡Ŕ€] o÷|7č( DAT*` öEř˙˙˙ź@€Ŕ€Ŕ€`€ ˙˙˙@ @@t€1€H ˙˙˙˙-€3˙˙H9},'•.1<,'$d ::message˙˙'@/€$ bmodified9˙˙  -€3-2  +DAT*b ömodified˙˙Ŕ2 ‘ xywidthheighttaborderborderstyleautohscrollvscrollbarallowedittextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch@˙˙÷˙˙ ˙˙ 7˙˙ŕ˙˙˙˙"€˙˙.˙˙:˙˙E˙˙O˙˙Y˙˙˙˙˙cř˙˙˙˙˙lź˙˙s`€@˙˙|€˙˙‡DAT*d ö€] o÷ 7ŕ Eř˙˙˙ź@€€€`€ ˙˙˙@ @@œ€1€H ˙˙˙˙-€3˙˙˜ 9},$4$D$61‹)X81˙˙˙˙<ľdl$t,68|DAT*f öˆ$$z%8˜080źëľ@˝ë8…Ź$´,68|ź$Ä$z%8Ě080źëľ@˝ë8…č$đ,68|ř$$z%8080źëľ@˝ë8…$$8$Ş”4$<,68|D$L$z%8T080źëľ@˝ë8…h$p,68|x$€$z%8ˆ080źëDAT*h öľ@˝ë8…d$˜,68| $¨$z%8°080źëľ@˝ë8…¸$Ŕ,68|Č$Đ$z%8Ř080źëľ@˝ë8…,'•~1Œ,'ŕ$bĘ 2 š Ŕ(”üdd gs_inifile::message(˙˙@˙˙'@/€č  bmodified9ddlb_profile. €. €text<finDAT*j öditem9ŔLsle_dbms`*€<profile *. €<dbmsddlb_serverž-€<. €<servernameddlb_database×,€<. €<databaseLE`*€<ODBCsle_logid)7*€<. €<useridsle_password[6)€<. €<dbpassi)7*€<. €<logid [6)€<. €<logpass˙˙ , 4 D X l t ˆ  Ź ´ ź DAT*l öÄ č đ ř    4 < D L h p x €  ˜   ¨ ¸ Ŕ Č Đ ŕ - €3-2  +modified˙˙Ŕ2 ‘ xywidthheighttaborderborderstyleautohscrollvscrollbarallowedittextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch@˙˙÷˙˙ ,˙˙ 7˙˙ˆDAT*n ö˙˙ ˙˙"€˙˙.˙˙:˙˙E˙˙O˙˙Y˙˙˙˙˙cř˙˙˙˙˙lź˙˙s`€@˙˙|ż€˙˙‡ż€] o÷,7ˆ  Eř˙˙˙ź@€ż€ż€`€ ˙˙˙@ @@DAT*~ öÄ€1€H ˙˙˙˙-€3˙˙2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙r˙˙ đ˙˙ i˙˙H˙˙˙˙!ě€˙˙&ź€˙˙0ź˙˙?€˙˙IŔŔŔ˙˙Sř˙˙˙˙˙\ź˙˙cDAT*r öMain MDI frameforward global type w_mdi_main from Window end type type mdi_1 from mdiclient within w_mdi_main end type end forward global type w_mdi_main from Window int X=5 int Y=16 int Width=2889 int Height=1956 boolean TitleBar=true string MenuName="m_main_menu" long BackColor=12632256 boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true WindowState WindowState=maximized! WindowType WindowType=mdihelp! string Icon="RAPIDS.ICO" event moveDAT*t ö pbm_move event show_rapids pbm_custom01 mdi_1 mdi_1 end type global w_mdi_main w_mdi_main type variables string is_act_style end variables on move;if IsValid(w_mdi_clock) then w_mdi_clock.wf_parent_resized() end if end on event show_rapids;SetPointer(HourGlass!) OpenSheet(w_rapids_info, This, 0, Layered!) end event event close;SetProfileString(gs_iniFile, 'activity view', 'style', is_act_style) // Close other possible open modules //*** Added isValid() checks *** 10-0DAT*v ö7-97 MDY if isValid(w_emiss) then Close(w_emiss) if isValid(w_imain) then Close(w_imain) if isValid(w_export) then Close(w_export) if isValid(w_report) then Close(w_report) if isValid(w_growth) then Close(w_growth) // Close this window Close(This) end event on closequery;integer messageBoxReturn messageBoxReturn = MessageBox("Exit " + gs_app_title, & "This will end your " + gs_app_title + " session.", Information!, OKCancel!) if messageBoxReturn = 1 then f_save_toolbar_profilDAT*x öe("w_mdi_main", This) else Message.ReturnValue = 1 end if end on event open;SetPointer(HourGlass!) gs_app_title = ProfileString(gs_iniFile, 'w_mdi_main', 'app_title', 'not found') if gs_app_title = 'not found' then // Do this in case that rapids.ini does not have this key gs_app_title = 'RAPIDS' SetProfileString(gs_iniFile, 'w_mdi_main', 'app_title', gs_app_title) end if This.Title = gs_app_title m_main_menu.mf_app_title() // Dynamically modify menu items and microhelpDAT*z ö f_get_toolbar_profile("w_mdi_main", This) open(w_mdi_clock) is_act_style = ProfileString(gs_iniFile, "activity view", "style", "not found") if is_act_style = "not found" then is_act_style = 'current' SetProfileString(gs_iniFile, 'activity view', 'style', is_act_style) end if //*** MDY 6/18/98 string ls_notify ls_notify = profileString(gs_iniFile, "RECALCULATE", "NOTIFY", "") //create key if it does not exist if trim(ls_notify) = "" then ls_notify = "FALSE" setProfileSDAT*| ötring(gs_iniFile, "RECALCULATE", "NOTIFY", ls_notify) end if if upper(ls_notify) = "TRUE" then post f_recalc_notify() //*** This.PostEvent("show_rapids") end event on resize;if IsValid(w_mdi_clock) then w_mdi_clock.wf_parent_resized() end if end on on w_mdi_main.create if this.MenuName = "m_main_menu" then this.MenuID = create m_main_menu this.mdi_1=create mdi_1 this.Control[]={this.mdi_1} end on on w_mdi_main.destroy if IsValid(MenuID) then destroy(MenuID) destroyDAT*j(this.mdi_1) end on type mdi_1 from mdiclient within w_mdi_main long BackColor=12632256 end type DAT*€ ö`€˙˙lľ€@˙˙wľ€] orđiH ř˙˙˙ź@€ľ€ľ€`€ €ŔŔŔ쀟€€@€ź2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙ ˙˙DAT*‚ ö €˙˙ Ŕ˙˙H˙˙˙˙!ö€˙˙&€˙˙0˙˙?€˙˙IŔŔŔ˙˙Sř˙˙˙˙˙\ź˙˙c`€˙˙l €˙˙w €] o €ŔH ř˙˙˙ź@€ € €`€ €ŔŔŔö€€€@DAT*„ ö€2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙r˙˙ ˙˙ i˙˙H˙˙˙˙!€˙˙& €˙˙0 ˙˙?€˙˙IŔŔŔ˙˙Sř˙˙˙˙˙\ź˙˙c`€˙˙l€˙˙w€DAT*† ö] oriH ř˙˙˙ź@€€€`€ €ŔŔŔ€ €€@€ 2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙r˙˙ 0˙˙ i˙˙HDAT*ˆ ö˙˙˙˙! €˙˙&ľ€˙˙0ľ˙˙?€˙˙IŔŔŔ˙˙Sř˙˙˙˙˙\ź˙˙c`€˙˙l€˙˙w€] or0iH ř˙˙˙ź@€€€`€ €ŔŔŔ €ľ€€@€ľJźľ@˝DAT*Š ö8,'•01>,'$d ::message˙˙'@/€ ˙˙ "&€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙é˙˙ Ô˙˙ ÷˙˙X˙˙P˙˙"€˙˙'ř˙˙˙˙˙0ź˙˙7`€DAT*Œ ö˙˙@ľ€˙˙Kľ€] oéÔ÷XP ř˙˙˙ź@€ľ€ľ€`€ @€R ˙˙˙˙"€˙˙îH:F@źľ@˝8, $,$6…, 4H$P$6…X$`$8hŞ)8h0…, pˆ$$6…DAT*Ž ö, ˜Ź$´$6…, źÔ$Ü$6…,68äü$$z%8 080źëľ@˝ë8…8Şň$$68,,z%8;z&8Nz&8|z&:)@źŽľ@˝Ž8¤…8œźÄľ@˝Ä88˘źĹľ@˝Ĺ81Yźoľ@˝o8…—1YYźľ@˝8…, ¨8œz%DAT* ö°$¸$z&8Ŕz&Č$Đ$z&z&…)8Ř0…, ŕč$đ$6…, ř$$6…,68ä$$z%8 080źëľ@˝ë8…8Ş8 Ş"#, $6…, , ,$1ľ^, 840ź€˝8ş`$€)x8+€$ˆ$11ź’ľ@˝’8…:DAT*’ öF@źľ@˝8,,6808™080źëľ@˝ë8…,,8Şt,8Ľ0…,6808™0,,6źľ@˝8,)8ŘŞŹ$´$¤,,ş!Ž8ź0…, Ă, 8ę0ź€˝88ó0… ΀, Ď , 8ý0ź€˝89ŞŠ ΀, Ď T€, 80ź€˝81d<ĽˆŞz%8z&…2 ΀, DAT*” öĎ, 8"0ź€˝88óŞ@8(04$<$¤8Dz&:)@źŽľ@˝Ž8Ž—18 ź˙ľ@˝˙8…, Ă, 8ę0ź€˝8.6…,)8ŘŞ\$d$¤,,Ş!68l0…, Ă, 8ę0ź€˝8.6…,)8ŘŞˆ8™0…, Ă, 8Ę0ź€˝8Ś0ź˜ľ@˝˜ś8źľ@DAT*– ö˝8,'•Ô1â,'ä$ F r ˜ŞÖ.„˜îň&NxŹ"*+(,T-€/Ö0ţ46789Z:^<n?€DźFÖIK*L<PtSŽTŔUĘ\ě]ţ^_2`:aTb„dˆeŚfŞgşhÜiđj8k<l@mrn|ožtŽučvúwx&~6J€\f„ˆ‡¤ŠşdŚ ls_dbparmls_leftls_rightls_sql1ls_rolell_pos_1ll_pos_2sqlcags_databasegs_inifilegs_user_idgs_master_userrole_cursDAT*˜ öorgs_rolew_mdi_main::message@˙˙ ˙˙ ˙˙ ˙˙# ˙˙+ ˙˙3˙˙<˙˙E @,€˙˙K)@˙˙W@˙˙b+@˙˙m,@˙˙|€>˙˙‰.@˙˙‘0@1€˙˙œ'@/€ěp ˙˙sle_dbms*€text$˙˙ddlb_server<-€$*€$ODBC˙˙ddlb_database|xDAT*š ö,€$˙˙sle_logid0 7*€$˙˙sle_password˙Ä6)€$profile ddlb_profileí. €$dbparmnot foundtitlem Error finding , profile section or dbparm key in the ProfileString function. Contact your technical support.;UID=',ext˙˙ 7*€$;PWD=_rÄ6)€$ORACLEl˙˙ 7*€$˙˙Ä6)€$í. €$ź˙˙˙˙Sorry! Cannot connect to databasebmodifiedV9wf_save_profilexŔh DAT*œ ö7*€$securitymaster_userRAPIDS 7*€$set role rap_security identified by rapidsxyzset roleset role openfetch identified by rapidsxyz,closeLogon Error 7*€$ does not have access 7*€$set role rap_manager identified by rapidsxyzalter session set nls_date_format = 'YYYY/MM/DD'alter session date format˙˙  , 4 H P X ` p ˆ  ˜ Ź ´ ź Ô Ü üDAT*ž ö  $ ¨ ° ¸ Č Đ ŕ č đ ř     $ , ` x € ˆ Ź ´ 4 < \ d ä "'€"2 * +clickedf_db_errorgf_db_message´˙˙Ŕ˙˙*Ŕ˙˙-Ŕ˙˙-Ŕ˙˙-Ŕ˙˙-Ŕ˙˙-Ŕ˙˙-Ŕ˙˙-Ŕ2 ] xyDAT*Đ öwidthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitchđ˙˙Š˙˙ Ô˙˙ ÷˙˙X˙˙F˙˙""€˙˙'ź˙˙/ř˙˙˙˙˙8ź˙˙?`€˙˙HÁ€˙˙SÁ€] oŠÔ÷XF ř˙˙˙ź@€Á€Á€`€ @"€DAT*˘ ö***RAPIDS Main Screen with icons.***forward global type w_rapids_info from Window end type type p_e3 from picture within w_rapids_info end type type st_2 from statictext within w_rapids_info end type type p_ss from picture within w_rapids_info end type type p_se from picture within w_rapids_info end type type st_5 from statictext within w_rapids_info end type type p_upld from picture within w_rapids_info end type type p_db from picture within w_rapids_info end type type p_1 from pDAT*¤ öicture within w_rapids_info end type type p_dh from picture within w_rapids_info end type type p_e2 from picture within w_rapids_info end type type p_sw from picture within w_rapids_info end type type p_se2 from picture within w_rapids_info end type type st_16 from statictext within w_rapids_info end type type st_11 from statictext within w_rapids_info end type type st_10 from statictext within w_rapids_info end type type st_8 from statictext within w_rapids_info end type type stDAT*Ś ö_7 from statictext within w_rapids_info end type type st_1 from statictext within w_rapids_info end type type p_report from picture within w_rapids_info end type type p_query from picture within w_rapids_info end type type p_qc from picture within w_rapids_info end type type p_help from picture within w_rapids_info end type type p_exit from picture within w_rapids_info end type type p_emis from picture within w_rapids_info end type type p_dataimpt from picture within w_rapids_info DAT*¨ ö end type type st_4 from statictext within w_rapids_info end type end forward global type w_rapids_info from Window int X=402 int Y=336 int Width=2848 int Height=1728 boolean TitleBar=true long BackColor=16777215 boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true WindowState WindowState=maximized! string Icon="RAPINFO.ICO" event ue_run_import pbm_custom01 p_e3 p_e3 st_2 st_2 p_ss p_ss p_se p_se st_5 st_5 p_upld p_upld p_db p_db p_1 p_DAT*Ş ö1 p_dh p_dh p_e2 p_e2 p_sw p_sw p_se2 p_se2 st_16 st_16 st_11 st_11 st_10 st_10 st_8 st_8 st_7 st_7 st_1 st_1 p_report p_report p_query p_query p_qc p_qc p_help p_help p_exit p_exit p_emis p_emis p_dataimpt p_dataimpt st_4 st_4 end type global w_rapids_info w_rapids_info type variables boolean ib_run_import end variables on ue_run_import;m_main_menu.m_file.m_import.TriggerEvent(Clicked!) end on on open;This.Title = gs_app_title + ' Enterprise' if gb_run_import DAT*Ź öthen PostEvent('ue_run_import') end if end on on resize;f_put_scroll_bars(This) end on on activate;f_menu_behave('base', '', '') end on on w_rapids_info.create this.p_e3=create p_e3 this.st_2=create st_2 this.p_ss=create p_ss this.p_se=create p_se this.st_5=create st_5 this.p_upld=create p_upld this.p_db=create p_db this.p_1=create p_1 this.p_dh=create p_dh this.p_e2=create p_e2 this.p_sw=create p_sw this.p_se2=create p_se2 this.st_16=create st_16 this.st_11=createDAT*Ž ö st_11 this.st_10=create st_10 this.st_8=create st_8 this.st_7=create st_7 this.st_1=create st_1 this.p_report=create p_report this.p_query=create p_query this.p_qc=create p_qc this.p_help=create p_help this.p_exit=create p_exit this.p_emis=create p_emis this.p_dataimpt=create p_dataimpt this.st_4=create st_4 this.Control[]={this.p_e3,& this.st_2,& this.p_ss,& this.p_se,& this.st_5,& this.p_upld,& this.p_db,& this.p_1,& this.p_dh,& this.p_e2,& this.p_sw,& this.p_se2,& thisDAT*° ö.st_16,& this.st_11,& this.st_10,& this.st_8,& this.st_7,& this.st_1,& this.p_report,& this.p_query,& this.p_qc,& this.p_help,& this.p_exit,& this.p_emis,& this.p_dataimpt,& this.st_4} end on on w_rapids_info.destroy destroy(this.p_e3) destroy(this.st_2) destroy(this.p_ss) destroy(this.p_se) destroy(this.st_5) destroy(this.p_upld) destroy(this.p_db) destroy(this.p_1) destroy(this.p_dh) destroy(this.p_e2) destroy(this.p_sw) destroy(this.p_se2) destroy(this.st_16) destDAT*˛ öroy(this.st_11) destroy(this.st_10) destroy(this.st_8) destroy(this.st_7) destroy(this.st_1) destroy(this.p_report) destroy(this.p_query) destroy(this.p_qc) destroy(this.p_help) destroy(this.p_exit) destroy(this.p_emis) destroy(this.p_dataimpt) destroy(this.st_4) end on type p_e3 from picture within w_rapids_info int X=1513 int Y=672 int Width=338 int Height=64 string PictureName="e-arrow.bmp" boolean FocusRectangle=false end type type st_2 from statictext within w_rapidsDAT*´ ö_info int X=2409 int Y=1504 int Width=288 int Height=64 boolean Enabled=false string Text="Exit" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_ss from picture within w_rapids_info int X=640 int Y=192 int Width=215 int Height=224 string PictureName="sgIcon.bmp" boolean FocusRectanDAT*ś ögle=false end type event clicked;setPointer(hourGlass!) open(w_source_selector) end event type p_se from picture within w_rapids_info int X=873 int Y=384 int Width=215 int Height=192 string PictureName="se-arrow.bmp" boolean FocusRectangle=false end type type st_5 from statictext within w_rapids_info int X=366 int Y=272 int Width=329 int Height=128 boolean Enabled=false string Text="Saved Groups" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33DAT*¸ ö554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_upld from picture within w_rapids_info event clicked pbm_bnclicked int X=1879 int Y=512 int Width=288 int Height=288 string PictureName="export.bmp" boolean FocusRectangle=false end type event clicked;m_main_menu.m_file.m_export.triggerEvent(clicked!) end event type p_db from picture within w_rapids_info iDAT*ş önt X=1129 int Y=560 int Width=325 int Height=304 string PictureName="db.bmp" boolean FocusRectangle=false end type event clicked;SetPointer(HourGlass!) OpenSheet(w_er_diagram, w_mdi_main, 0, Layered!) end event type p_1 from picture within w_rapids_info int X=1257 int Y=928 int Width=69 int Height=180 string PictureName="dh-arrow.bmp" boolean FocusRectangle=false end type type p_dh from picture within w_rapids_info int X=1257 int Y=320 int Width=69 int Height=192 strinDAT*ź ög PictureName="dh-arrow.bmp" boolean FocusRectangle=false end type type p_e2 from picture within w_rapids_info int X=727 int Y=672 int Width=338 int Height=64 string PictureName="e-arrow.bmp" boolean FocusRectangle=false end type type p_sw from picture within w_rapids_info int X=869 int Y=832 int Width=215 int Height=192 string PictureName="sw-arrow.bmp" boolean FocusRectangle=false end type type p_se2 from picture within w_rapids_info int X=1495 int Y=832 int Width=215DAT*ž ö int Height=192 string PictureName="se-arrow.bmp" boolean FocusRectangle=false end type type st_16 from statictext within w_rapids_info int X=69 int Y=1504 int Width=288 int Height=64 boolean Enabled=false string Text="Help" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_11 fromDAT*Ŕ ö statictext within w_rapids_info int X=306 int Y=736 int Width=215 int Height=128 boolean Enabled=false string Text="Data Import" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_10 from statictext within w_rapids_info int X=434 int Y=1136 int Width=233 int Height=144 boolean EnableDAT* öd=false string Text="Query/ Analysis" boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_8 from statictext within w_rapids_info int X=1422 int Y=1248 int Width=256 int Height=128 boolean Enabled=false string Text="QC Checker" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BaDAT*Ä öckColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_7 from statictext within w_rapids_info int X=1970 int Y=1184 int Width=274 int Height=60 boolean Enabled=false string Text="Reports" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=DAT*Ć öSwiss! FontPitch FontPitch=Variable! end type type st_1 from statictext within w_rapids_info int X=1349 int Y=192 int Width=325 int Height=144 boolean Enabled=false string Text="Emissions Calculation" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type p_report from picture within w_rapidDAT*Č ös_info int X=1733 int Y=960 int Width=256 int Height=256 string PictureName="reportin.bmp" boolean FocusRectangle=false end type event clicked;//m_main_menu.m_report.PopMenu(Parent.PointerX(), Parent.PointerY()) //SDJ 11/11/97 When clicked, w_reports is opened. setPointer(hourGlass!) open(w_report) end event type p_query from picture within w_rapids_info int X=599 int Y=976 int Width=325 int Height=224 string PictureName="query.bmp" boolean FocusRectangle=false end type DAT*Ę ö on clicked;m_main_menu.m_query.PopMenu(Parent.PointerX(), Parent.PointerY()) end on type p_qc from picture within w_rapids_info int X=1152 int Y=1152 int Width=256 int Height=224 string PictureName="qc-chekr.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_report.m_qaqc.PopMenu(Parent.PointerX(), Parent.PointerY()) //m_main_menu.m_report.m_qaqc.m_statistical.TriggerEvent(Clicked!) end on type p_help from picture within w_rapids_info int X=69 int Y=1264 inDAT*Ě öt Width=288 int Height=240 string PictureName="help.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_help.m_usingrapids.TriggerEvent(Clicked!) end on type p_exit from picture within w_rapids_info int X=2409 int Y=1264 int Width=288 int Height=240 string PictureName="exit.bmp" boolean FocusRectangle=false end type event clicked; setPointer(hourGlass!) m_main_menu.m_file.m_exit.TriggerEvent(Clicked!) end event type p_emis from picture within w_rapids_infDAT*Î öo int X=1166 int Y=32 int Width=215 int Height=256 string PictureName="emis-est.bmp" boolean FocusRectangle=false end type event clicked;m_main_menu.m_calculate.m_emissionestimator.TriggerEvent(Clicked!) end event type p_dataimpt from picture within w_rapids_info int X=398 int Y=560 int Width=288 int Height=256 string PictureName="fileimp.bmp" boolean FocusRectangle=false end type on clicked;m_main_menu.m_file.m_import.TriggerEvent(Clicked!) end on type st_4 from staticDAT*•text within w_rapids_info int X=2117 int Y=688 int Width=215 int Height=144 boolean Enabled=false boolean BringToTop=true string Text=" Data Export" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=33554432 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type DAT*Ň öźR ˙˙˙˙"€˙˙2  2 r xywidthheightenabledtextalignmenttextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙—˙˙ d˙˙ E˙˙H˙˙˙˙!%€˙˙& €˙˙0€˙˙:ŔŔŔ˙˙Dř˙˙˙˙˙Mź˙˙T`€˙˙]€˙˙h€DAT*Ô ö] o—dEH ř˙˙˙ź@€€€`€ €ŔŔŔ%€ €€@€@H9},'•.1<,'$d ::message˙˙'@/€$ bmodifiede_9˙˙  ,)€,2  +modifiedDAT*Ö ö˙˙Ŕ2 _ xywidthheighttaborderborderstylepasswordtextcasebackcolorfacenamefontcharsetÜ˙˙÷˙˙ \˙˙ 7˙˙P˙˙<˙˙"€˙˙.˙˙7€˙˙@˙˙˙˙˙J/€˙˙Sž€] o÷\7P< Ež€€€/€DAT*Ř ö ˙˙˙@ @@€€@H ˙˙˙˙,€˙˙H9},'•.1<,'$d ::message˙˙'@/€$ bmodified9˙˙  ,*€,2  +modified˙˙Ŕ2 o xywidthheighttaborderborderstDAT*Ú öyletextcasebackcolortextsizeweightfacenamefontfamilyfontpitch˙˙÷˙˙ ě˙˙ 7˙˙P˙˙2˙˙"€˙˙.€˙˙7˙˙˙˙˙Ař˙˙˙˙˙Jź@˙˙Q`€˙˙Z€˙˙e€] o÷ě7P2 Eř˙˙˙ź@€€€`€ DAT*˙˙˙@ @@€€@H ˙˙˙˙,€˙˙DAT*Ţ ö. \ Š ˘śĚäd dwc::messagesqlca<˙˙ €˙˙ @€˙˙@€ä8 codegetchildoŔ u_dw_data_codeApplication Error: Reference Code - Not a DataWindowChild. Contact your technical support.˙˙settransobject¤Ŕ”retrieve|ŔŹ^Ŕ”insertrow(ŔČ˙˙ Œ ¤ ¸ Ŕ Ô Ü %€ž€L%2 ' uf_check_required+constructor( DAT*ŕ ö ˙˙shŔdow˙˙wtŔ2 < widthheighttaborderdataobjectborderis_ref_codex ˙˙’t˙˙hct˙˙en˙˙Ŕ€de˙˙)žag˙˙0] o’h @ Ŕ€ž @€ €˙˙˙˙ž€˙˙DAT*<˙˙ ˙˙˙˙%€L˙˙DAT*ä ö_1-€uf_filter3Ŕ˙˙ $ , "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙w˙˙ Í˙˙ ˙˙a˙˙2˙˙"÷€˙˙'ř˙˙˙˙˙0ź˙˙7é€˙˙@€˙˙K€] owÍaDAT*ć ö2 ř˙˙˙ź@€€€é€ @÷€˙˙˙˙"€˙˙Ź $,$‡<T$h$6…Ś"*ź¸ľ@˝¸ś8,•’1 ,p$(T xd# lstr_parmw_sort::message<˙˙ (€˙˙"@*€˙˙@%€xDAT*č ö8 dw €uo_1-€dw_1$$€title4istr_lookupparmD0$€wintitle\˙˙  , < T h p "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙7˙˙ Í˙˙ ˙˙a˙˙(˙˙"€˙˙'ř˙˙˙˙˙0źDAT*ę ö˙˙7é€˙˙@Á€˙˙KÁ€] o7Ía( ř˙˙˙ź@€Á€Á€é€ @€˙˙˙˙"€˙˙€8d  destroy€O12  +destroy˙˙Ŕ2 # xyheighttaborderborderDAT*ě öd˙˙!˙˙ ˙˙ ą˙˙ ˙˙] o!Ň ą  @@€ €1€ŔŔŔ    @€ Ŕ€  € € € € !€ ˙˙˙˙€˙˙˙˙JźDAT*î öľ@˝8,•01>,$d ::message˙˙@%€ ˙˙ ""€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙Î ˙˙ Í˙˙ ˙˙a˙˙˙˙"4€˙˙'ř˙˙˙˙˙0ź˙˙7éDAT*đ ö€˙˙@Á€˙˙KÁ€] oÎ Ía ř˙˙˙ź@€Á€Á€é€ @4€˙˙˙˙"€˙˙l#$),8…źľ@˝8,•R1`,4$"8d gs_code_value::message(˙˙#@˙˙DAT*ň ö@%€< uo_1-€uf_return_selected4Ŕ˙˙ , 4 "#€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙Š˙˙ Í˙˙ ˙˙a˙˙˙˙";€˙˙'ř˙˙˙˙˙0ź˙˙7é€˙˙@ €˙˙K €] oDAT*ŰŠÍa ř˙˙˙ź@€ € €é€ @;€˙˙˙˙"€˙˙DAT*ö ö˙˙@€ô` il_selected_rowgetcolumnname…ůŔ is_column_name8getrowŔP8is_old_valueAPIh#setitemPŔ€idwc_dw_childŔ €is_child_nameШhighlight_dddwpostevent@Ŕ×˙˙ 0 H X ` x ˆ   ¸ Ŕ ä ě Ş: *@źlľ@˝l8v$1Ĺv)08…H$Şv)X8`$DAT*ř öx$€$˜$)°8)Ŕ8)Đ8…’#vč$ş49}80) 8($’v09}80)88,•1ž,@$4Lf Ć Ţ ę  4FZvd5 +key+keyflagsls_col_namels_data::messaged˙˙€˙˙  ˙˙ ˙˙# DAT*ú ö˙˙+@€H il_selected_rowgetcolumnnameůŔ is_column_name8getrowŔP8idwc_dw_childh €is_child_nameewˆgetitemstringwe[Ŕ setitemPŔ¸gettextŔČis_old_valueŘ#ib_enter_or_tabđ$validate_dataposteventŔŘ#đ$Ŕ˙˙ 0 H X ` x € ˜ ° Ŕ Đ č    ( 0 8 @ xDAT*ü ö$1ĹD0$8$9)L8,•^1l,T$Dd" +wparam+lparam::message<˙˙ ˙˙˙˙@€\( il_selected_rowidwc_dw_childĹ  €selectrow…‡Ŕ@˙˙ 0 8 L T â)8($6D$6ź €˝8#’X$6l$6źľ@˝DAT*ţ ö8)€8Ž8ˆ0)¤8,•Č1Ö,Ź$H|Ž’Žd" +wparam+lparam::message<˙˙ ˙˙˙˙@€´@ gettextŔis_child_nameis_validation_table0"is_msg_nameL is_msg_text`!setfocusŔtretrieve_datatriggerevent Ŕ–˙˙ ( D X l € ¤ Ź XDAT* ö, $6)$8,•>1L,,$$d0 +flags+xpos+yposw_mdi_main::messaged˙˙ ˙˙˙˙˙˙@€˙˙&@€4 tagsetmicrohelpnamZŔ˙˙ $ , "$),8d 4 idwc_dw_child €retrieve|Ŕ  , 8 DAT* ö)8…0$Ş)@8X$6t$6ź €˝8#žˆ$6œ$6źľ@˝81´Ě$)Ü88ä0)8,•1,,$2zŽ ş ž čd+ rowdwodatals_col_name::messaged˙˙˙˙ €˙˙ ˙˙ ˙˙!@DAT* ö€` getcolumnnameůŔis_column_name gettextŔ8is_child_nameHis_validation_table`"is_msg_name| is_msg_text!il_selected_row¤idwc_dw_child ź €getrowbŔÔretrieve_datatriggerevent Ŕň˙˙ 0 @ X t ˆ œ ´ Ě Ü   \)8…8 ŞZ,•F1T,$$@$z6DAT* ö…X)lś81˙˙˙˙<Ľ&8t08…z%8z&źľ@˝8¨9},•1 ,°$¸$)Ě81ŲÔ$1)ě88ôŞ˛ř$,)8)(8@1X6…p)€8)ˆ8…9},•B1P,˜$ZjDAT* ö z Žäř&L€ "˛#Č$ŕ&'(d$ ls_col_name::messagesqlca<˙˙ ˙˙@€˙˙@€ ¨ getcolumnnameůŔs_c˙˙ib_process_focusxt,&idwc_dw_childH €getchildoŔ`DataWindow ErrorColumn - Not a DataWindowChild,&˙˙H €rowcount˙ŔŔH €getitemstringŔ[ŔÜ0˙˙H €settransobject¤Ŕretrieve_dddwĽŔil_selected_row0isDAT* ö_column_nameHis_old_value`#getrowŔxŔÜ,&˙˙ $ @ X l ¨ ° ¸ Ě Ô ě ř  ( @ X p € ˆ  ˜ î)8…0$ŞşH`$*x$6€ź€˝ś8ˆ$1Ĺş80)Ź8,•Ô1â,´$DAT* ö2† ž şd. +row+dwo+datals_col_name::messaged˙˙˙˙ €˙˙ ˙˙ ˙˙$@€źH getcolumnname…ůŔis_column_name il_selected_row8idwc_dw_childP €is_child_nameh88highlight_dddwposteventŔŸ˙˙ 0 H ` x € ˆ Ź ´ 1d roDAT* öwdwodata<˙˙˙˙ €˙˙  - €. €/€0 €ž€Ÿ€ €Ą€˘€Ł€¤€Ľ€OĄP˘˛Ÿś-ż/Á0 ͞×.•Ł2 Ŕ +dwnprocessenter+dwescape+dwnkey+highlight_dddw+validate_data+mousemove+retrieve_data+retrieve_dddwf_dddw_searchf_validate_code+itemchanged+getfocus+editchanged+itemerror@Ě ˙˙Ŕ˙˙Ŕ˙˙#Ŕ˙˙+Ŕ˙˙;DAT* öHeŔ=97 ˙˙JdeŔ st˙˙U"FŔ˙˙dŔ˙˙sŔ˙˙Ŕ˙˙‘Ŕily ˙˙=SŔ! F˙˙ž onŔch=V˙˙¨ enŔpe ˙˙s€Ŕ˙˙ľ ÂŔ2 Đ widthheighttaborderlivescrollil_selected_rowidwc_dw_childis_child_nameis_column_nameis_msg_nameis_msg_textis_validation_tableis_old_valueib_enter_or_tabib_check_requiredib_process_focus,˙˙é˙˙h˙˙DAT* ö˙˙˙˙)˙˙9 €˙˙G˙˙U˙˙d˙˙p˙˙|˙˙@˙˙˙˙­˙˙ż] oéh @  @ @€ € €DAT* ö˙˙˙˙ž€Í˙˙˙˙˙˙Ÿ€˛˙˙0$ ˙˙x €Â˙˙FH0˙˙Ą€O˙˙VHL˙˙˘€P˙˙uˆd˙˙Ł€•˙˙€H˙˙¤˙˙Q˙˙¨˙˙˙˙Ľ€˙˙˙˙ÝĐŹ˙˙/ €ż˙˙ę˙˙DAT*…˙˙. €×˙˙Đŕ˙˙- €ś˙˙Đ˙˙0 €Á˙˙DAT* ö$€d ::message)˙˙@€H st_time*€textm/dd/yy h:mm am/pm˙˙  @ @*‡(0$˛€ |d 8 st_time*€€control c@*€ ( 0 $d  st_time*€ €€&€1€wDAT* ö€x€ą&12 F +wininichangewf_parent_resized+open+timer+create+destroyx˙˙Ŕ˙˙Ŕ˙˙(Ŕ˙˙.Ŕ˙˙5Ŕ˙˙=Ŕ2 V xywidthheightenabledbackcolorborderwindowtypest_timeiw_parent_windowČpe˙˙Šl_˙˙ wi˙˙ ch˙˙8ld˙˙ol˙˙!ŔŔŔs_˙˙+Ŕs_˙˙2Ŕ€s_˙˙= DAT* ö€st˙˙E€] oŠ8   €ŔŔ€€€€1€ŔŔŔ  @@€@ €€˙˙w˙˙}˙˙˙˙˙˙x€˙˙˙˙0˙˙˙˙x&€DAT* öą˙˙6˙˙˙˙1€˙˙=˙˙˙˙€˙˙˙˙E˙˙˙˙€˙˙˙˙2  2 } widthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙ű˙˙8˙˙˙˙¨€˙˙"ż€f ˙˙,żol˙˙;˙˙EŔŔŔ˙˙Oř˙˙DAT*U˙˙˙X˙˙_ş€is˙˙h €s_˙˙s €] oű8 ř˙˙˙@€ € €ş€ ŔŔŔ¨€ż€€@€żDAT*" öp,$Hd. wparamlparamw_rapids_info::messageP˙˙ éq˙˙…@˙˙@€˙˙$@€ ˙˙ 4,68080,$6źľ@˝8,•b,źľ@˝8,•„,źľ@˝8, •Ś, źľ@˝8,"•Č,"źľ@˝8,$•ę,$źľ@˝8źľ@˝8,•1DAT*$ ö(,4$@b„Ś Č ę dH gs_inifilew_emissw_imainw_exportw_reportw_growth::messageŒ˙˙@v˙˙@€_l˙˙@€ ˙˙# @€dt˙˙,"@€97˙˙5$@€ s˙˙>@€< activity viewstyleis_act_stylesre+˙˙, 4 Đ8,%z%8,%z%8"z&:)@:@źľ@˝8}1<Ľ„8,0ź€˝8DAT*& öœ,81,•ś1Ä,@$L`€„ œd8 messageboxreturngs_app_titlemessage::messageP˙˙˙˙%@˙˙&@€˙˙.@€H Exit This will end your session.w_mdi_main˙˙˙˙8 @ ú:F@źľ@˝8%,6808080źëľ@˝ë8…,%8޸%8'0…,68DAT*( ö080,%6źľ@˝84,%6…,()L880ź€˝8Śź˜ľ@˝˜ś8d,68l08z080źëľ@˝ë8…€$8ŞŢˆ80…,68l08z0˜$6źľ@˝8,68 08Ź08ł0źëľ@˝ë8…Ł8łŞ€8´0…,68 08Ź06źľ@˝8DAT** ö¤8şŞŞź€˝$8ż0)Ř8,•ŕ1î,ŕ$Zn€ ¸ Đä h„žŢ6H"€&Ş(ĆdL gs_app_titlegs_inifilem_main_menuw_mdi_clockls_notify::messagex˙˙%@˙˙@˙˙ (@€˙˙,@€˙˙8 ˙˙B@€č@ w_mdi_mainapp_titlenot foundRAPIDStitle. mf_app_titleŔ ö2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙Ž˙˙ ŕ˙˙ ˙˙€˙˙˙˙!M€˙˙&ž€˙˙0ž˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cÍ€˙˙lÁ€˙˙wÁ€] DAT*@ ö oŽŕ€ ř˙˙˙ź@€Á€Á€Í€ ˙˙˙M€ž€€@€ž2  2  xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙˛˙˙  ˙˙ ˙˙<˙˙DAT*B ö˙˙!X€˙˙&˝€˙˙0˝˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cÍ€˙˙l €˙˙w €] o˛ < ř˙˙˙ź@€ € €Í€ ˙˙˙X€˝€€@€˝2  2 DAT*D ö xywidthheightenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch,˙˙E˙˙ Ŕ˙˙ E˙˙˙˙˙˙!`€˙˙& €˙˙0 ˙˙?˙˙I˙˙˙˙˙Sř˙˙˙˙˙\ź˙˙cÍ€˙˙lľ€˙˙wľ€] oEŔEDAT*` ö ř˙˙˙ź@€ľ€ľ€Í€ ˙˙˙`€ €€@€ j:F@źľ@˝8Ś+ź˜ľ@˝˜ś8,•P1^,$6d w_report::message(˙˙+@;€˙˙@5€ ˙˙ ",€"2  +clicked˙˙ŔDAT*H öSets toolbarsforward global type w_set_toolbars from Window end type type cbx_showtext from checkbox within w_set_toolbars end type type rb_floating from radiobutton within w_set_toolbars end type type rb_left from radiobutton within w_set_toolbars end type type rb_right from radiobutton within w_set_toolbars end type type rb_bottom from radiobutton within w_set_toolbars end type type rb_top from radiobutton within w_set_toolbars end type type cb_2 from commandbutton within w_set_toDAT*J öolbars end type type cb_visible from commandbutton within w_set_toolbars end type type gb_1 from groupbox within w_set_toolbars end type end forward global type w_set_toolbars from Window int X=851 int Y=469 int Width=1148 int Height=757 boolean TitleBar=true string Title="Customize Toolbar" long BackColor=12632256 boolean ControlMenu=true boolean Resizable=true WindowType WindowType=response! cbx_showtext cbx_showtext rb_floating rb_floating rb_left rb_left rb_right rb_righDAT*L öt rb_bottom rb_bottom rb_top rb_top cb_2 cb_2 cb_visible cb_visible gb_1 gb_1 end type global w_set_toolbars w_set_toolbars type variables window win_ref end variables on open;win_ref = message.powerobjectparm if win_ref.toolbaralignment = alignatbottom! then rb_bottom.checked = True elseif win_ref.toolbaralignment = alignatleft! then rb_left.checked = true elseif win_ref.toolbaralignment = alignatright! then rb_right.checked = true elseif win_ref.toolbaralignment = alignaDAT*N öttop! then rb_top.checked = true elseif win_ref.toolbaralignment = floating! then rb_floating.checked = true end if if win_ref.toolbarvisible then cb_visible.text = "&Hide" else cb_visible.text = "&Show" end if if rapids.toolbartext then cbx_showtext.checked = TRUE else cbx_showtext.checked = FALSE end if end on on w_set_toolbars.create this.cbx_showtext=create cbx_showtext this.rb_floating=create rb_floating this.rb_left=create rb_left this.rb_right=create rb_riDAT*P öght this.rb_bottom=create rb_bottom this.rb_top=create rb_top this.cb_2=create cb_2 this.cb_visible=create cb_visible this.gb_1=create gb_1 this.Control[]={ this.cbx_showtext,& this.rb_floating,& this.rb_left,& this.rb_right,& this.rb_bottom,& this.rb_top,& this.cb_2,& this.cb_visible,& this.gb_1} end on on w_set_toolbars.destroy destroy(this.cbx_showtext) destroy(this.rb_floating) destroy(this.rb_left) destroy(this.rb_right) destroy(this.rb_bottom) destroy(this.rb_top) deDAT*R östroy(this.cb_2) destroy(this.cb_visible) destroy(this.gb_1) end on type cbx_showtext from checkbox within w_set_toolbars int X=641 int Y=121 int Width=444 int Height=73 string Text="Show Te&xt" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked; if this.checked then rapids.toolbartext = True else DAT*T ö rapids.toolbartext = False end if end on type rb_floating from radiobutton within w_set_toolbars int X=129 int Y=473 int Width=375 int Height=73 string Text="&Floating" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;win_ref.toolbaralignment = floating! win_ref.toolbarx = parent.x + parent.width/3DAT*V ö win_ref.toolbary = parent.y + 2*(parent.height/3) end on type rb_left from radiobutton within w_set_toolbars int X=129 int Y=121 int Width=247 int Height=73 string Text="&Left" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;win_ref.toolbaralignment = alignatleft! end on type rb_right from raDAT*X ödiobutton within w_set_toolbars int X=129 int Y=209 int Width=293 int Height=73 string Text="&Right" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;win_ref.toolbaralignment = alignatright! end on type rb_bottom from radiobutton within w_set_toolbars int X=129 int Y=385 int Width=348 int Height=73DAT*Z ö string Text="&Bottom" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;win_ref.toolbaralignment = alignatbottom! end on type rb_top from radiobutton within w_set_toolbars int X=129 int Y=297 int Width=247 int Height=73 string Text="&Top" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 DAT*\ ö long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;win_ref.toolbaralignment = alignattop! end on type cb_2 from commandbutton within w_set_toolbars int X=750 int Y=465 int Width=261 int Height=93 int TabOrder=30 string Text="&Done" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end typDAT*^ öe on clicked; Close (parent) end on type cb_visible from commandbutton within w_set_toolbars int X=750 int Y=321 int Width=261 int Height=93 int TabOrder=10 string Text="&Hide" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;If this.text = "&Hide" then win_ref.toolbarvisible = False this.text = "&Show" else win_ref.toolbarvisible = True this.text = "&Hide" end if end on DAT*l type gb_1 from groupbox within w_set_toolbars int X=65 int Y=49 int Width=503 int Height=529 int TabOrder=20 string Text="Move" BorderStyle BorderStyle=StyleLowered! long TextColor=8388608 long BackColor=12632256 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type DAT*b ö2 4 xywidthheightpicturenamefocusrectanglex˙˙Ĺ˙˙ Ŕ˙˙ ˙˙˙˙v€˙˙%Ŕ] oĹŔ  @v€@€Ŕ@ %$˙˙˙˙"€˙˙r,$)$8)88)H8,•X1fDAT*d ö,P$>d m_main_menu::message(˙˙@4€˙˙@5€X( m_queryL€pointerxQŔpointeryRŔ,popmenuŔ@˙˙ $ 8 H P "-€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙W˙˙ Đ˙˙ E˙˙ŕ˙˙ƒ€˙˙%DAT*f öÁ] oWĐEŕ  @ƒ€@€Á@ %$˙˙˙˙"€˙˙|,$$$)88)L8)\8,•b1p,d$Hd m_main_menu::message(˙˙@4€˙˙@5€l0 m_reportP€m_qaqcDAT*h öQ€pointerxQŔ,pointeryRŔ@popmenuŔT˙˙ $ 8 L \ d ".€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙€˙˙ €˙˙ ˙˙ŕ˙˙€˙˙% ] o€€ŕ  @€DAT*j ö@€ @ %$˙˙˙˙"€˙˙b,$($:W@)@8,•H1V,H$.d m_main_menu::message(˙˙@4€˙˙@5€P m_helpt[€m_usingrapids\€triggerevent Ŕ0˙˙ ( @ H "/€"2  +clicked˙˙Ŕ2 4 xywidthheigDAT*l öhtpicturenamefocusrectanglex˙˙E˙˙ đ˙˙ ˙˙đ˙˙š€˙˙%] oEđ đ  @š€@€@ %$˙˙˙˙"€˙˙|:F@źľ@˝8,$ $:W@)88,•b1p,@$DAT*n öHd m_main_menu::message(˙˙@4€˙˙@5€H m_file€m_exit!€triggerevent Ŕ(˙˙  8 @ "0€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙i ˙˙ đ˙˙ ˙˙đ˙˙Ł€˙˙% ] oi đDAT*p ö đ  @Ł€@€ @ %$˙˙˙˙"€˙˙b,$0$:W@)H8,•H1V,P$.d m_main_menu::message(˙˙@4€˙˙@5€X m_calculateI€m_emissionestimatorJ€triggerevent Ŕ8˙˙ 0 H PDAT*r ö "1€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙Ž˙˙ ˙˙ ×˙˙˙˙Ź€˙˙%Á] oŽ ×  @Ź€@€Á@ %$˙˙˙˙"€˙˙b,$DAT*t ö$$:W@)<8,•H1V,D$.d m_main_menu::message(˙˙@4€˙˙@5€L m_file€m_import€triggerevent Ŕ,˙˙ $ < D "2€"2  +clicked˙˙Ŕ2 4 xywidthheightpicturenamefocusrectanglex˙˙Ž˙˙ 0˙˙ ˙˙DAT*v ö˙˙š€˙˙%ź] oŽ0   @š€@€ź@ %$˙˙˙˙"€˙˙2  2 Œ xywidthheightenabledbringtotoptextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch@˙˙E˙˙ °˙˙ ×DAT*x ö˙˙˙˙˙˙!˙˙,Ĺ€˙˙1ľ€˙˙;ľ˙˙J˙˙T˙˙˙˙˙^ř˙˙˙˙˙gź˙˙nÍ€˙˙wž€˙˙‚ž€] oE°× ř˙˙˙ź@€ž€ž€Í€ ˙˙˙Ĺ€ľ€€@€ľDAT* DAT*| ö d ::message˙˙@#€( win_ref3€˙˙U@˙˙   "€"2  +clicked˙˙Ŕ2 l xywidthheighttextborderstyletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙˙˙ y˙˙ ÷˙˙I˙˙ë€˙˙Ŕ€˙˙*€˙˙4ŔŔŔ˙˙>řDAT*~ ö˙˙˙˙˙Gź˙˙NÓ€˙˙W €˙˙b €] oy÷I ř˙˙˙ź@€ € €Ó€ €ŔŔŔ@ë€@Ŕ€˙˙˙˙"€˙˙T$:U@‰,•:1H, $ d ::messageDAT*€ ö˙˙@#€( win_ref3€˙˙U@˙˙   "€"2  +clicked˙˙Ŕ2 l xywidthheighttextborderstyletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙˙˙ Ń˙˙ %˙˙I˙˙ń€˙˙ €˙˙*€˙˙4ŔŔŔ˙˙>ř˙˙˙˙˙Gź˙˙NÓ€DAT*‚ ö˙˙W€˙˙b€] oŃ%I ř˙˙˙ź@€€€Ó€ €ŔŔŔ@ń€@ €˙˙˙˙"€˙˙T$:U@‰,•:1H, $ d ::message˙˙@#€( win_refDAT*„ ö3€˙˙U@˙˙   "€"2  +clicked˙˙Ŕ2 l xywidthheighttextborderstyletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙˙˙ ˙˙ \˙˙I˙˙ř€˙˙ €˙˙*€˙˙4ŔŔŔ˙˙>ř˙˙˙˙˙Gź˙˙NÓ€˙˙W€˙˙b€] DAT*† ö o\I ř˙˙˙ź@€€€Ó€ €ŔŔŔ@ř€@ €˙˙˙˙"€˙˙T$:U@‰,•:1H, $ d ::message˙˙@#€( win_ref3€˙˙U@˙˙   DAT*ˆ ö"€"2  +clicked˙˙Ŕ2 l xywidthheighttextborderstyletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙˙˙ )˙˙ ÷˙˙I˙˙€˙˙ €˙˙*€˙˙4ŔŔŔ˙˙>ř˙˙˙˙˙Gź˙˙NÓ€˙˙W€˙˙b€] o)÷IDAT*Š ö ř˙˙˙ź@€€€Ó€ €ŔŔŔ@€@ €˙˙˙˙"€˙˙Jźľ@˝8,•01>,$d ::message˙˙@#€ ˙˙ "€"2  +clicked˙˙Ŕ2 U xywidthhDAT*Œ öeighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙î˙˙ Ń˙˙ ˙˙]˙˙˙˙"€˙˙'ř˙˙˙˙˙0ź˙˙7Ó€˙˙@ €˙˙K €] oîŃ] ř˙˙˙ź@€ € €Ó€ @€˙˙˙˙"DAT*Ž ö€˙˙Ä$8ŞX($09}88@0…H$P9}X80…,•Ş1¸,`$:TXvd ::message˙˙@#€h@ text&Hidewin_ref3€˙˙&Show3€˙˙˙˙ ( 0 8 H P X ` " €"DAT* ö2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙î˙˙ A˙˙ ˙˙]˙˙ ˙˙" €˙˙'ř˙˙˙˙˙0ź˙˙7Ó€˙˙@ľ€˙˙Kľ€] oîA]  ř˙˙˙ź@€ľ€ľ€DAT*’ öÓ€ @ €˙˙˙˙"€˙˙2  2 u xywidthheighttabordertextborderstyletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch˙˙A˙˙ 1˙˙ ÷˙˙˙˙˙˙"€˙˙' €˙˙3€˙˙=ŔŔŔ˙˙Gř˙˙˙˙˙Pź˙˙WDAT*Ó€˙˙`ľ€˙˙kľ€] oA1÷ ř˙˙˙ź@€ľ€ľ€Ó€ €ŔŔŔ@€ €DAT*– ö@@€@ € €Ŕ€€˙˙˙˙w€˙˙˙˙ ˙˙x€˙˙˙˙&˙˙˙˙xy€˙˙˙˙.4(˙˙z€˙˙˙˙<B˙˙˙˙{€˙˙˙˙Ű´˙˙$€•˙˙ůš˙˙˙˙&DAT*˜ ö€ą˙˙˙B˙˙˙˙€˙˙˙˙B˙˙˙˙€˙˙˙˙   V $6)$8,•<1J,,$"d( +xpos+ypos+row+dwo::messaged˙˙˙˙˙˙˙˙ €˙˙@€4 tagsetmicrohelpZŔ˙˙ $ , " $DAT*š ö$1#<R‹,$1<R‹)<8D$PX$1<Y‹}`$lt$1<Y‹}|$)Œ8 ‡,•1,¨$TŠŔÜîd ::message˙˙@€°p r_1+€widthheight$resizeŔ4+€xLL+€yh h+€showtexŔDAT*œ ö„idw_activeg”0€˙˙  , < D P X ` l t | Œ   ¨ P806:)@źŽľ@˝Ž8)$81,>d2 sqldbcodesqlerrtextsqlsyntaxbufferrowd˙˙˙˙ ˙˙ ˙˙'€˙˙., Validation ErrorsetfocusRŔ$ P $)8DAT*ž ö,•61D,$$d ::message˙˙@€, r_1+€hideŔ˙˙  $ & €. €2€ž€Ÿ€ €Ą€˘€Ł€¤€Ľ€Ś€§ €¨ €Š €ˇ&Ă2ČŠ×.2  +add_row+delete_row+next_row+previous_row+first_row+last_row+page_up+page_down+save+query+rolback+mousemove+getfocus+dberror+losefocus,˙˙Ŕ˙˙DAT*¸ öŔ˙˙Ŕ˙˙'Ŕ˙˙5Ŕ˙˙@Ŕ˙˙JŔ˙˙SŔ˙˙^Ŕ˙˙d Ŕ˙˙k Ŕ˙˙t Ŕ˙˙ Ŕ˙˙‰ Ŕ˙˙’Ŕ2 - xywidthheighttaborderlivescrollx˙˙˙˙ Í˙˙ ë˙˙g˙˙˙˙"] oÍëgDAT*˘ öAncestor window for single datawindow windows. (used by security window. needs to be revisited)forward global type w_single_dw from Window end type type dw_1 from datawindow within w_single_dw end type type r_1 from rectangle within w_single_dw end type end forward global type w_single_dw from Window int X=673 int Y=263 int Width=1579 int Height=993 boolean TitleBar=true string Title="Untitled" long BackColor=12632256 boolean ControlMenu=true boolean MinBox=true boolean MaxBoxDAT*¤ ö=true boolean Resizable=true WindowType WindowType=child! dw_1 dw_1 r_1 r_1 end type global w_single_dw w_single_dw type variables boolean ib_modified = false string is_delete_column string is_delete_text transaction it_transaction datawindow idw_active end variables forward prototypes public function boolean wf_check_pending () public subroutine wf_undo (datawindow p_dw) public function boolean wf_save () public function boolean wf_check_code (datawindow p_dw) public subrouDAT*Ś ötine wf_initialize_vars () end prototypes public function boolean wf_check_pending ();//// check for pending updates //integer li_user_response // //// if data in datawindow has been modified then prompt user //// whether or not to save //if ib_modified then // li_user_response = messagebox("Save", "Data has been modified. Save changes?", question!, yesnocancel!) // choose case (li_user_response) // case 1 // // user wants to save changes // if not wf_save() thenDAT*¨ ö // return false // end if // case 2 // // user wants to undo changes // wf_undo(dw_1) // ib_modified = false // case 3 // // user does not want to save or lose changes // return false // end choose //end if return true end function public subroutine wf_undo (datawindow p_dw);//// undo changes made to datawindow passed in as a parameter //long ll_number_of_rows, ll_row_index // //p_dw.accepttext() //ll_number_oDAT*Ş öf_rows = p_dw.rowcount() //ll_row_index = 0 //do while ll_row_index <= ll_number_of_rows // ll_row_index = p_dw.dwgetnextmodified(ll_row_index, primary!) // if ll_row_index > 0 then // if p_dw.dwgetitemstatus(ll_row_index, 0, primary!) = newmodified! then // p_dw.deleterow(ll_row_index) // else // p_dw.reselectrow(ll_row_index) // end if // else // ll_row_index = ll_number_of_rows + 1 // end if //loop end subroutine public function boolean wf_save ();////DAT*Ź ö save changes to parent and child datawindows boolean lb_save_result = true // //// make sure edit control has passed data to datawindow //if dw_1.accepttext() < 0 then return false // //// check to see if datawindow has modifications. //// commit or rollback changes based on update function //if ib_modified then // wf_check_code(dw_1) // if dw_1.update(true) = 1 then // commit using it_transaction; // gf_db_message(it_transaction, "commit") // else // rollback using it_tDAT*Ž öransaction; // gf_db_message(it_transaction, "rollback") // lb_save_result = false // end if //end if // //// indicate to user if data was updated successfully //if lb_save_result then // setmicrohelp(w_main, "Data updated successfully") // // reset the data modification indicator flags // ib_modified = false //end if // return lb_save_result end function public function boolean wf_check_code (datawindow p_dw);// *** This code will be unique to each window *** // cDAT*° öheck to make sure that all records have a type //long ll_row_num, ll_cur_row //string ls_type // //ll_row_num = p_dw.RowCount() //for ll_cur_row = 1 to ll_row_num // ls_type = p_dw.GetItemstring(ll_cur_row, "***field to check***") // if IsNull(ls_type) then // p_dw.SetItem(ll_cur_row, "***field to check***", "***value to set to***") // end if //next return true end function public subroutine wf_initialize_vars ();// This is used to initialize variables that are unique to eaDAT*˛ öch window // is_delete_column = // is_delete_text = messagebox("Important", "Do not forget to set ~n is_delete_column and is_delete_text ~n in function called wf_initialize_vars ~n or delete will not work") end subroutine on mousemove;setmicrohelp(w_mdi_main, "Ready") end on on open;dw_1.setfocus() dw_1.settransobject(sqlca) dw_1.retrieve() end on on w_single_dw.create this.dw_1=create dw_1 this.r_1=create r_1 this.Control[]={ this.dw_1,& this.r_1} end on on w_siDAT*´ öngle_dw.destroy destroy(this.dw_1) destroy(this.r_1) end on type dw_1 from datawindow within w_single_dw event add_row pbm_custom01 event delete_row pbm_custom02 event next_row pbm_custom03 event previous_row pbm_custom04 event first_row pbm_custom05 event last_row pbm_custom06 event page_up pbm_custom07 event page_down pbm_custom08 event save pbm_custom09 event query pbm_custom10 event rolback pbm_custom11 event mousemove pbm_dwnmousemove int X=516 int Y=205 int Width=491 inDAT*ś öt Height=359 int TabOrder=1 boolean LiveScroll=true end type on mousemove;parent.setmicrohelp(this.tag) end on on getfocus;// Place a green focus rectangle on the active datawindow dynamically r_1.Resize(This.Width + 35, This.Height + 30) r_1.X = This.X - 15 r_1.Y = This.Y - 15 r_1.Show() idw_active = this end on event dberror;messagebox("Validation Error", sqlerrtext, exclamation!) this.setfocus() return 1 end event on losefocus;// remove the green focus rectangle froDAT*m around the datawindow r_1.hide() end on type r_1 from rectangle within w_single_dw int X=498 int Y=193 int Width=164 int Height=145 boolean Visible=false boolean Enabled=false int LineThickness=4 long LineColor=12632256 long FillColor=65280 end type DAT*ş ö @  @ @€ €]\D˙˙ž˙˙O˙˙f\`˙˙Ÿ˙˙P˙˙r\x˙˙x ˙˙Q˙˙|\˙˙Ą˙˙R˙˙Š\¨˙˙˘˙˙S˙˙•\Ŕ˙˙Ł˙˙T˙˙Ÿ\Ř˙˙¤˙˙UDAT*ź ö˙˙¨\đ˙˙Ľ˙˙V˙˙ł\˙˙Ś˙˙W˙˙š\ ˙˙§ ˙˙X˙˙Ŕ\8˙˙¨ ˙˙Y˙˙ۀP˙˙Š €Č˙˙š˙˙˙˙. €×˙˙Jřź˙˙& €ˇ˙˙Sš˙˙˙˙2€Ă˙˙2  2 K xywidthheightvisibleenabledlinethicknesslinecolorfillcolorDAT*´˙˙ň˙˙ Á˙˙ ¤˙˙‘˙˙˙˙!˙˙)˙˙7ŔŔŔ˙˙A˙] ŔŔŔ€˙€ňÁ¤‘DAT*Ŕ ö˙˙#˙˙. ˙˙7$@˙˙?!@%€Řđ idw_activer/#€rowcountve4Ŕ/#€filteredcount#€ęŔ8/#€getrowŔX/#€setfilterIŔp/#€filteréŔŒ/#€ęŔ8titleŹ No rows match the selection criteria!@/#€IŔp/#€éŔŒ/#€scrolltorow?Ŕ/#€triggerevent˙ Ŕ,Total: /#€4Ŕ/#€ęŔ8/#€total_index_t.Text='' total_index_t.Color=DAT* öString(RGB(red))modifyzŔ°/#€ Ŕ,˙˙ ( 0 H P ` h | „ ” œ ¤ ´ ä đ ř    $ < L T \ d l ¸ Ŕ Č Đ $8)(80$)@8H$1)`8h$9)|8„$:NW@)œ8¤$8Ź)čDAT*Ä ö8,!•č1ö,!đ$">f Š ŹÎd0 wparamlparamll_selected_row::messageP˙˙ ˙˙˙˙˙˙&!@%€řh idw_activer/#€setfilterIŔ/#€filterdéŔ8/#€getselectedrowŔP/#€selectrow@Ŕp/#€triggerevent ŔŒ/#€total_index_t.Text='' total_index_t.Color=553648127modify€zŔŕ˙˙ ( DAT*Ć ö0 @ H ` h | „ œ ¤ č đ 4,!•1(,!$d" +wparam+lparam::message<˙˙ ˙˙˙˙!@%€ ˙˙ Î$,&)(88$@$)T8l8t0…„$6Œ$6¨$6ź€˝8°$)Ä8Ě$DAT*Č öÜ9}ä$ě9}ô$)8$$)(8)<8D$L$)`8)t8|$)81ĽŹŹ$´$Ŕ$Č$Ř$ŕ$č$<<Y5đIk@Vř$$ $$$$,$<<Y58Ik@V)H8P$)`8Čh$)xDAT*Ę ö8 Hb Ś Â ŕţP†ŹŒ¨Źd sqlca˙˙&@&€€x dw_2,€settransobject^Ŕdw_10-€,€sharedataŠŔHis_style_state\1formis_statey0\1is_enlarge_state”20-€accepttextźŔ¸,€visibleÔ0-€Ô,€setfocusd@Ŕü,€0-€getrow@Ŕ scrolltorow?Ŕ0,€0-€getcolumn‚@řŔTsetcolumn˙DAT*Ě ö˙GŔh,€rowcountts4Ŕ„st_no_record_greyb_˜*€,€xclź,€width<Đ˜*€Đ@,€yso,€heightr˜*€y p_@move_qcŔ@˜*€showit ŔX˜*€hide pŔp ( 8 @ T l „ Œ ¨ ° Ä Ě Ü ä ě ô    ( < D L ` t |  Ź ´ ŔDAT*Î ö Č Ř ŕ č đř     $ , 8H P ` h x )8# 9:F@źľ@˝8,*8$0)D8T$l$|$„$"€Œ$) 8¨$)°8)Č8#â9Đ$)ŕ81<Ľp,&č$đ9}ř$9},*80)$DAT*Đ ö8€,&99 :X Š Ś Â â 0Nlpv€d w_mdi_mainsqlca(˙˙*@(€˙˙&@&€, wf_check_requiredtt‚ŔUpdating data...setmicrohelpZŔ5dw_1L-€ib_obj_modified\dw_2t,€\L-€accepttextźŔ”t,€źŔ”wf_check_rid€„Ŕ¸L-€update€dŔŘL-€\t,€\Data updated successfullyZŔ5DAT*Ň ö D T l | „ Œ   ¨ ° Č Đ ŕ č đ ř  $ $80) 8d winname˙˙ €( unfiltertriggereventŔ Ŕ l:F@źľ@˝880)(8,+f+9}800)88 6 > Jd gb_filter˙˙+@@ ueDAT*Ô ö_open_filter_wintriggerevent Ŕfilter Ŕ( 8 † 8 0…0$68$6T$6ź€˝8d$)x8ˆ$˜9} $¨9}°$)Ä8Ě$Ô$)ä8)ř8$$)8)088$)L81Ľdh$p$|$„$”$œ$DAT*Ö ö¤$<<Y5°Ik@V¸$Ä$Ě$Ü$ä$ě$<<Y5řIk@V)8$) 8€($)88^z˜ ś Ň >dD`dd @P is_style_state1listis_state%01is_enlarge_state@2dw_2\,€accepttextźŔldw_1€-€visible\,€€-€setfocusDAT*Ř öŔ¸€-€\,€getrow@ŔÜscrolltorow?Ŕě€-€\,€getcolumnřŔsetcolumn‚@GŔ$€-€rowcount˙4Ŕ@st_no_record_white@T+€€-€xx€-€widthŒT+€Œh’˝@€-€ys_Ŕ€-€heightÔT+€Ô@moveŔT+€showŔT+€hideŔ0 0 8 T d x ˆ ˜   ¨ ° Ä Ě Ô ä řDAT*Ú ö    0 8 L h p | „ ” œ ¤ °¸ Ä Ě Ü ä ě ř    ( 8  $($8$@$"P$68X8rz%:)@:@źľ@˝8}}1<Ľź)8#¸91<Ľć)¤81<Ľ992DAT*Ü öx „ ˜ Ž ¸Đâúd$ li_messagebox_returncase8(˙˙˙˙Ź8 dw_1yle-€ib_obj_modifieddw_20,€titleteH Data have been modified. Save current changes?wf_save|Ŕˆwf_undo_dw1Ŕ˜ ( 8 @ P  ¤ Ň$)$8,$4$)D88LJ`8’–h$p$)x8)DAT*Ţ öŒ8Ě”$œ$)¤8)¸8\ ’ –d Ŕp dw_1yle-€accepttextfźŔ-€-€getrowŔ<ridgetitemnumber_2 ŔP-€-€Ŕ<deleterowčŔ€-€-€Ŕ<reselectrow.ŔŹ $ , 4 D ` h p x Œ ” œ ¤ ¸ 9d  –DAT*ŕ ö$688?z%:)@:@1‹źľ@˝81<ľ^:F@źľ@˝8,*8M0)p81)„81<ĽJ)”81<Ľ",&:NW@)Ź8,*8´0)Đ8F,&,*8Ř0)ě88ô08˙0źľ@˝8,*8Ř0)8X ^ x–žŕć"(FJrd! pdw_objw_DAT*" ömdi_mainsqlca<˙˙ #€˙˙*@(€˙˙&@&€$@ title You are about to delete this record. Are you sure?Deleting records ...setmicrohelpZŔbdeleterow€čŔxupdatedŔŒtriggerevent ŔœRow deleted successfully.ZŔbRow not deleted.ZŔbDelete RowError on DeleteRow functionZŔb p „ ” Ź Đ ě  9d  DAT*ä öBase window for single table styleforward global type w_single_table from Window end type type st_no_record_grey from statictext within w_single_table end type type st_no_record_white from statictext within w_single_table end type type dw_2 from u_dw_freeform within w_single_table end type type dw_1 from u_dw_list within w_single_table end type type r_1 from rectangle within w_single_table end type end forward global type w_single_table from Window int X=672 int Y=264 int Width=DAT*ć ö1577 int Height=992 boolean TitleBar=true string Title="Untitled" long BackColor=80269524 boolean ControlMenu=true boolean MinBox=true boolean MaxBox=true boolean Resizable=true event edit_actions pbm_custom01 event filter pbm_custom02 event unfilter pbm_custom03 event ue_open_filter_win pbm_custom04 st_no_record_grey st_no_record_grey st_no_record_white st_no_record_white dw_2 dw_2 dw_1 dw_1 r_1 r_1 end type global w_single_table w_single_table type variables datawindow idwDAT*č ö_active; string is_state; string is_style_state; string is_enlarge_state; s_rec_holder istr_record; // structure to hold the values of the record end variables forward prototypes public subroutine wf_freeform_view () public function boolean wf_save () public subroutine wf_select_all (window winName) public subroutine wf_select_one () public subroutine wf_tabular_view () public function boolean wf_check_pending () public subroutine wf_undo_dw1 () public function boolean wf_check_DAT*ę örequired () public subroutine wf_delete (datawindow pdw_obj) public function boolean wf_check_rid () end prototypes event edit_actions;// Depending on which edit menuitem was selected, take tha appropriate // action on the currently active datawindow. choose case string(message.longparm, "address") case "undo" if idw_active.CanUndo() then idw_active.Undo() else MessageBox(This.Title, "Sorry! Nothing to undo!") end if case "copy" idw_active.Copy() case "cut" DAT*ě ö idw_active.Cut() case "paste" idw_active.Paste() case "copy_record" f_copy_record(idw_active, istr_record) case "paste_record" if f_paste_record(idw_active, istr_record) then choose case idw_active.ClassName() case 'dw_1' dw_1.ib_obj_modified = TRUE //trigger the row pasted event for post-processing MDY 1/2002 dw_1.TriggerEvent('row_pasted') case 'dw_2' dw_2.ib_obj_modified = TRUE //trigger the row pasted event for post-processingDAT*î ö MDY 1/2002 dw_2.TriggerEvent('row_pasted') end choose end if case "insert" if idw_active.AcceptText() = 1 then idw_active.TriggerEvent('add_row') end if case "delete" // idw_active.DeleteRow(0) // idw_active.TriggerEvent(Rowfocuschanged!) idw_active.TriggerEvent("validate_delete") case "first" idw_active.TriggerEvent("first_row") case "prior" idw_active.TriggerEvent("prev_row") case "next" idw_active.TriggerEvent("next_row") case "last"DAT*đ ö idw_active.TriggerEvent("last_row") case "tabular" wf_tabular_View() case "freeform" wf_freeform_view() case "select" wf_check_pending() wf_select_one() case "selectall" wf_select_all(This) case "save" wf_save() end choose end event event filter;integer li_total_rec, li_cur_row string ls_total // Get total records and current row number before filtering li_total_rec = idw_active.RowCount() + idw_active.FilteredCount() li_cur_row = idw_activeDAT*ň ö.GetRow() // Filter datawindow based on the criteria entered in w_filter idw_active.SetFilter(gs_filt) idw_active.Filter() if idw_active.FilteredCount() = li_total_rec then MessageBox(This.Title, "No rows match the selection criteria!", Information!) // Reselect all rows idw_active.SetFilter('') idw_active.Filter() idw_active.ScrollToRow(li_cur_row) idw_active.TriggerEvent(Rowfocuschanged!) else // Turn total indicator on ls_total = "Total: " + String(idw_active.RowCDAT*ô öount() + idw_active.FilteredCount()) idw_active.Modify("total_index_t.Text='" + ls_total + & "' total_index_t.Color=String(RGB(red))") idw_active.TriggerEvent(Rowfocuschanged!) end if end event event unfilter;long ll_selected_row idw_active.SetFilter('') idw_active.Filter() // Unhighlighted the clicked row before unfiltering ll_selected_row = idw_active.GetSelectedRow(0) idw_active.SelectRow(ll_selected_row, FALSE) idw_active.TriggerEvent(Rowfocuschanged!) // Turn totDAT*ö öal indicator off by changing the color to transparent idw_active.Modify("total_index_t.Text='' total_index_t.Color=553648127") end event on ue_open_filter_win;// Open the filter window with parameter - table name // This will be implemented in the descendant level end on public subroutine wf_freeform_view ();dw_2.SetTransObject(SQLCA) // Share data between dw_1 and dw_2 dw_1.ShareData(dw_2) is_style_state = 'form' f_menu_behave(is_state, is_style_state, is_enlarge_state) /DAT*ř ö/ Apply the content of the edit fields to the datawindow buffer dw_1.AcceptText() dw_2.Visible = TRUE dw_1.Visible = FALSE dw_2.SetFocus() dw_2.ScrollToRow(dw_1.GetRow()) dw_2.SetColumn(dw_1.GetColumn()) // Display no record message if necessary if dw_2.RowCount() = 0 then st_no_record_grey.Move(dw_2.X + ((dw_2.Width - st_no_record_grey.Width) / 2), & dw_2.Y + ((dw_2.Height - st_no_record_grey.Height) / 2)) st_no_record_grey.Show() else st_no_record_grey.Hide() end if eDAT*ú önd subroutine public function boolean wf_save ();// Make sure all not null fields are entered before saving if Not wf_check_required() then return FALSE SetPointer(HourGlass!) SetMicroHelp(w_mdi_main, "Updating data...") if dw_1.ib_obj_modified or dw_2.ib_obj_modified then dw_1.AcceptText() dw_2.Accepttext() if Not wf_check_rid() then return FALSE if dw_1.Update() = 1 then commit; dw_1.ib_obj_modified = false dw_2.ib_obj_modified = false SetMicroHelp(w_mdi_DAT*ü ömain, "Data updated successfully") else rollback; return FALSE end if end if return TRUE end function public subroutine wf_select_all (window winName);winName.TriggerEvent("unfilter") end subroutine public subroutine wf_select_one ();SetPointer(HourGlass!) // Trigger user-defined event to open the filter window with parameter // - table name This.TriggerEvent('ue_open_filter_win') // If filter flag is set to true, then trigger the filter event to perform // filteDAT*ţ ör if gb_filter then gb_filter = FALSE This.TriggerEvent("filter") end if end subroutine public subroutine wf_tabular_view ();is_style_state = 'list' f_menu_behave(is_state, is_style_state, is_enlarge_state) // Apply the contents of the edit fields to the datawindow buffer dw_2.AcceptText() dw_1.Visible = TRUE dw_2.Visible = FALSE dw_1.SetFocus() dw_1.ScrollToRow(dw_2.GetRow()) dw_1.SetColumn(dw_2.GetColumn()) // Display no record message if necessary if dw_1.RowCount() DAT* ö= 0 then st_no_record_white.Move(dw_1.X + ((dw_1.Width - st_no_record_white.Width) / 2), & dw_1.Y + ((dw_1.Height - st_no_record_white.Height) / 2)) st_no_record_white.Show() else st_no_record_white.Hide() end if end subroutine public function boolean wf_check_pending ();integer li_messagebox_return // If the data have been modified and not saved, ask user for saving data //if dw_1.ModifiedCount() > 0 then if dw_1.ib_obj_modified or dw_2.ib_obj_modified then li_messageboDAT* öx_return = MessageBox(This.Title, "Data have been modified.~n" + & "Save current changes?", Question!, YesNoCancel!) choose case (li_messagebox_return) case 1 if Not wf_save() then return FALSE end if case 2 wf_undo_dw1() case 3 return FALSE end choose end if return TRUE end function public subroutine wf_undo_dw1 ();// This function checks if the current row is modified or new. // If new, delete the current row; otherwise, undo the changes by // uDAT* ösing ReselectRow function dw_1.AcceptText() if IsNull(dw_1.GetItemNumber(dw_1.GetRow(), "rid")) then dw_1.DeleteRow(dw_1.GetRow()) else dw_1.ReselectRow(dw_1.GetRow()) end if end subroutine public function boolean wf_check_required ();// Can not perform check required here, so let it pass now return TRUE end function public subroutine wf_delete (datawindow pdw_obj);// This function will confirm the delete, delete the current row. // Deletion in the single table style isDAT* ö assuming that there is no // child record for the current record. If MessageBox(This.Title, "You are about to delete this record.~r~n" + & "Are you sure?", Exclamation!, YesNo!, 2) <> 1 then return end if SetPointer(HourGlass!) w_mdi_main.SetMicroHelp("Deleting records ...") // Update the data if pdw_obj.DeleteRow(0) = 1 then if pdw_obj.Update() = 1 then commit; pdw_obj.TriggerEvent(Rowfocuschanged!) w_mdi_main.SetMicroHelp("Row deleted successfully.") else rollbaDAT* öck; w_mdi_main.SetMicroHelp("Row not deleted.") end if else MessageBox("Delete Row", "Error on DeleteRow function") w_mdi_main.SetMicroHelp("Row not deleted.") end if end subroutine public function boolean wf_check_rid ();// Can not perform wf_check_rid function here, so let it pass now. return TRUE end function on open;gi_open_sheet_num = gi_open_sheet_num + 1 // Do these at the decesendant level //dw_1.SetTransObject(SQLCA) //dw_2.SetTransObject(SQLCA) //dw_1.SetFocusDAT* ö() end on on closequery;integer li_messagebox_return // If the data have been modified and not saved, ask user for saving data if dw_1.ib_obj_modified or dw_2.ib_obj_modified then li_messagebox_return = MessageBox(This.Title, "Data have been modified.~n" + & "Save current changes?", Question!, YesNoCancel!) choose case (li_messagebox_return) case 1 if NOT wf_save() then Message.ReturnValue = 1 return end if case 3 Message.ReturnValue = 1 return end chDAT* öoose end if end on on close;gi_open_sheet_num = gi_open_sheet_num - 1 // If no active sheet, change menu back to mdi main menu if gi_open_sheet_num = 0 then f_menu_behave('base', '', '') end if end on on resize;f_put_scroll_bars(This) end on on activate;f_menu_behave(is_state, is_style_state, is_enlarge_state) end on on w_single_table.create this.st_no_record_grey=create st_no_record_grey this.st_no_record_white=create st_no_record_white this.dw_2=create dw_2 this.dw_1DAT* ö=create dw_1 this.r_1=create r_1 this.Control[]={this.st_no_record_grey,& this.st_no_record_white,& this.dw_2,& this.dw_1,& this.r_1} end on on w_single_table.destroy destroy(this.st_no_record_grey) destroy(this.st_no_record_white) destroy(this.dw_2) destroy(this.dw_1) destroy(this.r_1) end on type st_no_record_grey from statictext within w_single_table int X=119 int Y=368 int Width=1431 int Height=72 boolean Visible=false boolean Enabled=false string Text="No records preDAT* ösent. Use insert to create a new record" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=8388608 long BackColor=80269524 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontCharSet FontCharSet=Ansi! FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type st_no_record_white from statictext within w_single_table int X=119 int Y=284 int Width=1431 int Height=72 boolean Visible=false boolean Enabled=false string Text="No recDAT* öords present. Use insert to create a new record" Alignment Alignment=Center! boolean FocusRectangle=false long TextColor=8388608 long BackColor=16777215 int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type type dw_2 from u_dw_freeform within w_single_table event validate_delete pbm_custom21 int X=210 int Y=184 int Width=1161 int Height=608 int TabOrder=20 boolean Visible=false end type on validatDAT* öe_delete;call u_dw_freeform::validate_delete;wf_delete(This) end on on updateend;call u_dw_freeform::updateend;// Display no record message if This.RowCount() = 0 then st_no_record_white.Move(This.X + ((This.Width - st_no_record_white.Width) / 2), & This.Y + ((This.Height - st_no_record_white.Height) / 2)) st_no_record_white.Show() else st_no_record_white.Hide() end if end on on add_row;call u_dw_freeform::add_row;long ll_cur_row st_no_record_grey.Hide() ll_cur_row = ThDAT* öis.InsertRow(This.GetRow()) This.SetRow(ll_cur_row) This.ScrollToRow(ll_cur_row) ib_obj_modified = TRUE end on on getfocus;call u_dw_freeform::getfocus;//// Place a green focus reangle on the active datawindow dynamically //r_1.Resize(This.Width + 45, This.Height + 35) //r_1.Move(This.X - 15, This.Y - 15) r_1.Show() idw_active = This end on on mousemove;call u_dw_freeform::mousemove;SetMicroHelp(w_mdi_main, This.Tag) end on on retrieveend;call u_dw_freeform::retrieveend;// DisDAT* öplay no record message if This.RowCount() = 0 then // This.InsertRow(0) st_no_record_grey.Move(This.X + ((This.Width - st_no_record_grey.Width) / 2), & This.Y + ((This.Height - st_no_record_grey.Height) / 2)) st_no_record_grey.Show() else st_no_record_grey.Hide() end if end on on last_row;call u_dw_freeform::last_row;This.ScrollToRow(This.RowCount()) end on on next_row;call u_dw_freeform::next_row;This.ScrollNextRow() end on on prev_row;call u_dw_freeform::prev_row;ThDAT* öis.ScrollPriorRow() end on on first_row;call u_dw_freeform::first_row;This.ScrollToRow(1) end on on losefocus;call u_dw_freeform::losefocus;r_1.Hide() end on type dw_1 from u_dw_list within w_single_table event validate_delete pbm_custom21 int X=87 int Y=96 int Width=1234 int Height=652 int TabOrder=10 end type on validate_delete;call u_dw_list::validate_delete;wf_delete(This) end on on updateend;call u_dw_list::updateend;// Display no record message if This.RowCount() =DAT* ö 0 then st_no_record_white.Move(This.X + ((This.Width - st_no_record_white.Width) / 2), & This.Y + ((This.Height - st_no_record_white.Height) / 2)) st_no_record_white.Show() else st_no_record_white.Hide() end if end on on add_row;call u_dw_list::add_row;long ll_cur_row st_no_record_white.Hide() ll_cur_row = This.InsertRow(This.GetRow()) This.SetRow(ll_cur_row) This.ScrollToRow(ll_cur_row) ib_obj_modified = TRUE end on on mousemove;call u_dw_list::mousemove;SetMicroHDAT* öelp(w_mdi_main, This.Tag) end on on retrieveend;call u_dw_list::retrieveend;// Display no record message if This.RowCount() = 0 then // This.InsertRow(0) st_no_record_white.Move(This.X + ((This.Width - st_no_record_white.Width) / 2), & This.Y + ((This.Height - st_no_record_white.Height) / 2)) st_no_record_white.Show() else st_no_record_white.Hide() end if end on on losefocus;call u_dw_list::losefocus;r_1.Hide() end on on getfocus;call u_dw_list::getfocus;// Place a grDAT* öeen focus reangle on the active datawindow dynamically r_1.Resize(This.Width + 45, This.Height + 35) r_1.X = This.X - 15 r_1.Y = This.Y - 15 r_1.Show() idw_active = dw_1 end on on delete_row;call u_dw_list::delete_row;// commented out by swj, 8/8/94 //ib_obj_modified = TRUE end on on prev_row;call u_dw_list::prev_row;This.ScrollPriorRow() end on on first_row;call u_dw_list::first_row;This.ScrollToRow(1) end on on last_row;call u_dw_list::last_row;This.ScrollToRow(This.RowCoDAT*Ňunt()) end on on next_row;call u_dw_list::next_row;This.ScrollNextRow() end on event clicked;// //this.setRow(row) //this.setColumn(string(dwo.name)) //dw_quick_view.post of_popup(string(dwo.name), this.getText(), xpos+this.x, ypos+this.y) end event type r_1 from rectangle within w_single_table int X=55 int Y=56 int Width=165 int Height=144 boolean Enabled=false int LineThickness=4 long LineColor=12632256 long FillColor=32768 end type DAT*$ ö P,,,1<R‹},!•61D,!$d$ gi_open_sheet_num::message(˙˙,@˙˙!@%€ ˙˙ † $($8$@$"RP$68X8rz%:)@:@źľ@˝8}}1<Ľř)8#ô,!˜1,!•ŕ1î,! $R1<ĽR,!DAT*& ö¨1,!•>1L,!°$,!•l1z,!¸$2x„ ˜ Ž Ć ô $Rd6 li_messagebox_returncase7message::messageP˙˙˙˙˙˙$!@%€˙˙,!@%€ŔX dw_1-€ib_obj_modifieddw_20,€titleH Data have been modified. Save current changes?wf_save|Ŕˆ˙˙˙˙˙˙˙˙DAT*( ö˙˙ ( 8 @ P  ˜   ¨ ° ¸ –,,,1<Y‹},,1<Ľb808 08 0ź€˝8,!•|1Š,!$0bd$ gi_open_sheet_num::message(˙˙,@˙˙!@%€ base˙˙ Jź€˝8,!•01>,!$d1DAT** ö +sizetype+newwidth+newheight::messageP˙˙ ˙˙˙˙˙˙'!@%€ ˙˙ x$6,$6H$6ź€˝8,!•^1l,!P$Dd ::message˙˙!@%€X is_state0is_style_state1is_enlarge_state42˙˙ , H P Č*$DAT*, ö‡@*H‡X*`‡p*x‡„*Œ‡œ¤$Ź$´$ź$Ä$˛€ |,BXnd ̀ st_no_record_grey*€€st_no_record_white,+€,€dw_2P,€P€dw_1h-€h€r_1€.!€€!€control”c@*€,+€P,€h-€€.!€ $@ HX `p xDAT*. ö„ Œœ ¤ Ź ´ ź Ä L$8$H$X$d$*8d l( st_no_record_grey*€st_no_record_whited$+€dw_2€@,€dw_1P-€r_1`.!€ 8 H X d €€€€€&€.€w€x€y€z€{€|€}€~€€€ € €‚ €ƒ €„ €FGOwPxQyDAT*0 öRzą&ó.2 @ +edit_actions+filter+unfilter+ue_open_filter_winwf_freeform_viewwf_savewf_select_allwf_select_onewf_tabular_viewwf_check_pendingwf_undo_dw1wf_check_requiredwf_deletewf_check_ridf_copy_recordf_paste_recordf_menu_behave+open+closequery+close+resizef_put_scroll_bars+activate+create+destroy0˙˙Ŕ˙˙Ŕ˙˙Ŕ˙˙(Ŕ˙˙<Ŕ˙˙MŔ˙˙UŔ˙˙cDAT*2 öŔ˙˙qŔ˙˙ Ŕ˙˙’ Ŕ˙˙ž Ŕ˙˙° Ŕ˙˙ş Ŕ˙˙Ç"Ŕ˙˙Ő#Ŕ˙˙ä'Ŕ˙˙ä'Ŕ˙˙ňŔ˙˙řtrŔhis.˙˙Ŕ* €˙˙ä'Ŕ<˙˙ c)Ŕstro˙˙-Ŕ!€˙˙%Ŕ˙˙ä'.pŔs)`p˙˙/*Ŕ˙˙7Ŕ2 É xywidthheighttitlebartitlebackcolorcontrolmenuminboxmaxboxresizaDAT*4 öblest_no_record_greyst_no_record_whitedw_2dw_1r_1idw_activeis_stateis_style_stateis_enlarge_stateistr_record¤˙˙ ˙˙ ˙˙ )˙˙ŕ˙˙˙˙"€˙˙(ÔĐČ˙˙2Č˙˙>Č˙˙EČ˙˙LČ˙˙V €˙˙h €˙˙{ €˙˙€ €˙˙… !€˙˙‰#€˙˙”˙˙DAT*6 ö˙˙Ź˙˙˝$€] o )ŕ€€  €ČČČČ€€€€Ř€1€ÔĐČ  @@€@ € € € € !€#€$€ ˙˙w€O˙˙DAT*8 ö$ $˙˙x€P˙˙, <˙˙xy€Q˙˙6 T˙˙z€R˙˙Jl˙˙˙˙{€˙˙˙˙[n˙˙˙˙|€˙˙˙˙k|p˙˙}€˙˙˙˙yl˙˙˙˙~€˙˙˙˙‡l˙˙˙˙€˙˙˙˙—n˙˙˙˙€ €˙˙˙˙¨l˙˙˙˙ €˙˙˙˙´n˙˙˙˙‚DAT*: ö €˙˙˙˙Ĉ˙˙ƒ €˙˙˙˙Řn˙˙˙˙„ €˙˙˙˙Ô˙˙˙˙&€ą˙˙ Ô˙˙˙˙€G˙˙Ô˙˙˙˙€F˙˙>üŘ˙˙.€ó˙˙FÔ˙˙˙˙€˙˙Pl˙˙˙˙€˙˙˙˙Xl˙˙˙˙€˙˙˙˙2  2 • DAT*< ö xywidthheightvisibleenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontcharsetfontfamilyfontpitchT˙˙w˙˙ p˙˙ —˙˙H˙˙˙˙!˙˙)€˙˙.€˙˙8˙˙G€˙˙QÔĐČ˙˙[ř˙˙˙@˙˙dź˙˙k7€˙˙t€˙˙€€˙˙‹€] DAT*> öwp—H ř˙˙˙ꀀ€7€ €ÔĐČ€€€@€2  2 ‰ xywidthheightvisibleenabledtextalignmentfocusrectangletextcolorbackcolortextsizeweightfacenamefontfamilyfontpitch@˙˙w˙˙ ˙˙ —˙˙HDAT*@ ö˙˙˙˙!˙˙)€˙˙. €˙˙8 ˙˙G€˙˙Q˙˙˙˙˙[ř˙˙˙@˙˙dź˙˙k7€˙˙tž€˙˙ž€] w—H ř˙˙˙ź@€ž€ž€7€ €˙˙˙€ €€@€  DAT*B ö  H)8,!•.1<,!$d" +wparam+lparam::message<˙˙ ˙˙˙˙!@%€$ wf_deleteƒŔ˙˙  hA€8)81Ľ8$D$T$\$d$<<Y5pIk@V|$Œ$”$œ$Ŕ˙˙ ( l˘€81) 8,!•R1`,!($8d6 +wparam+lparamancestorreturnvalue::messageP˙˙ ˙˙˙˙˙˙,!@%€0 first_rowscrolltorow?DAT*V öŔ˙˙ ( h2€8$)(8,!•N1\,!0$4d& ancestorreturnvalue::message(˙˙˙˙!@%€8 losefocusr_1.!€hideŔ ˙˙ ( 0 .€2 €9€A€Ÿ€ €˘ €Ł€¤€Ľ€Š€O Q˘RŁS¤TĽcŠś-ˇ&ż/Ă2͞Ň9×.ÜA•Ÿ2 ƒ +validate_delete+updateDAT*X öend+add_row+getfocus+mousemove+retrieveend+last_row+next_row+prev_row+first_row+losefocusÜ˙˙Ŕ˙˙Ŕ˙˙$Ŕ˙˙-Ŕ˙˙7Ŕ˙˙B€Ŕ˙˙OČŔ˙˙YČŔ˙˙cČŔ˙˙m ČŔ˙˙x ČŔ2 * xywidthheighttabordervisiblex˙˙Ň˙˙ ¸˙˙ ‰˙˙`˙˙˙˙"DAT*Z ö] Ҹ‰` @   @€ €ĺ ¤˙˙Š€c˙˙‰(˙˙A€Ü˙˙” 0˙˙x €O˙˙Ô˙˙˙˙.€×˙˙şüH˙˙Ÿ€•˙˙Ďxl˙˙9€ŇDAT*\ ö˙˙Ü |˙˙Ľ€T˙˙ć ”˙˙¤€S˙˙đ Ź˙˙Ł€R˙˙ú Ä˙˙˘ €Q˙˙Ô˙˙˙˙2 €Ă˙˙     H)8,!•.1<,!$d" +wparam+lparam::message<˙˙ ˙˙˙˙!@DAT*^ ö%€$ wf_deleteƒŔ˙˙  hA€8)81Ľ8$D$T$\$d$<<Y5pIk@V|$Œ$”$œ$<<Y5¨Ik@V)¸8Ŕ$)Đ84Ř$)č8,!•N1\,!đ$$@ř 4dN +rowsinserted+rowsupdaDAT*` öted+rowsdeletedancestorreturnvalue::messaged˙˙˙˙˙˙#˙˙0˙˙D!@%€ř updateendrowcount4Ŕst_no_record_white$+€x@widthL$+€L@yxheight€„$+€„˙˙@moveŔ°$+€showŔČ$+€hideŔŕ˙˙ 8 D T \ d p| Œ ” œ ¨¸DAT*b ö Ŕ Đ Ř č đ Ř €8$$)48)D8)X8)h8)|8”9},!•ž1Ě,!œ$ <dz ¤dA +wparam+lparamancestorreturnvaluell_cur_row::messaged˙˙ ˙˙˙˙˙˙,˙˙7!@%€¤@ add_rowDAT*d öst_no_record_white+€hidewhiŔ,getrowŔ<insertrow(ŔLsetrowQŔ`scrolltorow?Ŕpib_obj_modified„˙˙$ 4 D X h | ” œ |Ÿ€8,*$6)08,!•b1p,!8$HdD +flags+xpos+yposancestorreturnvaluew_mdi_main::messagex˙˙ ˙˙˙˙˙˙DAT*f ö˙˙/*@(€˙˙:!@%€@ mousemovetagsetmicrohelp)ZŔ ˙˙ 0 8 `9€8) 81Ľ<$H$X$`$h$<<Y5pIk@V|$Œ$”$œ$<<Y5¨Ik@V)¸8Ŕ$)Đ8,Ř$)č8,!•F1T,!đ$DAT*h ö8đ  ,d0 +rowcountancestorreturnvalue::message<˙˙˙˙˙˙&!@%€ř retrieveendrowcount4Ŕst_no_record_white(+€xDwidthP(+€P@yxheight„(+€„@moveŔ°(+€showŔČ(+€hide€Ŕŕ˙˙ < H X ` h p| Œ ” œ ¨DAT*j ö¸ Ŕ Đ Ř č đ h2€8$)(8,!•N1\,!0$4d& ancestorreturnvalue::message(˙˙˙˙!@%€8 losefocusr_1wc.!€hideŔ ˙˙ ( 0 D.€8$($1-<R‹8$1#<R‹)H8P$\d$DAT*l ö1<Y‹}l$x€$1<Y‹}ˆ$)˜8Źź$‡,!•*18,!Ä$l˘Řôd& ancestorreturnvalue::message(˙˙˙˙!@%€Ěx getfocusr_1.!€width height0resizeŔ@.!€xXX.!€yt t.!€showŔidw_active /#€dw_1Ŕ´DAT*n ö-€˙˙ ( 8 H P \ d l x € ˆ ˜ Ź ź Ä TĄ€8,!•:1H,!$ d6 +wparam+lparamancestorreturnvalue::messageP˙˙ ˙˙˙˙˙˙,!@%€ delete_row˙˙ fŁ€8) 8,!•L1DAT*p öZ,!($2d6 +wparam+lparamancestorreturnvalue::messageP˙˙ ˙˙˙˙˙˙,!@%€0 prev_rowscrollpriorrow>Ŕ˙˙ ( l˘€81) 8,!•R1`,!($8d6 +wparam+lparamancestorreturnvalue::messageP˙˙ ˙˙˙˙DAT*r ö˙˙,!@%€0 first_rowscrolltorow?Ŕ˙˙ ( vĽ€8)8)08,!•\1j,!8$Bd6 +wparam+lparamancestorreturnvalue::messageP˙˙ ˙˙˙˙˙˙,!@%€@ last_rowrowcount4Ŕscrolltorow?Ŕ$˙˙ 0 8 fDAT*t ö¤€8) 8,!•L1Z,!($2d6 +wparam+lparamancestorreturnvalue::messageP˙˙ ˙˙˙˙˙˙,!@%€0 next_rowscrollnextrow<Ŕ˙˙ ( 4,!•1(,!$d$ xposyposrowdwo::messaged˙˙˙˙ ˙˙˙˙DAT*v ö €˙˙!@%€ ˙˙ $ €.€2€9€A€Ÿ€ €Ą€˘ €Ł€¤ €Ľ €Š€O PĄQ˘RŁS¤TĽcŠś-ˇ&ż/Ă2Ä$͞Ň9Ő<×.ÜA•Ÿ2 ˜ +validate_delete+updateend+add_row+mousemove+retrieveend+losefocus+getfocus+delete_row+prev_row+first_row+last_row+next_row+clicked˙˙Ŕ˙˙Ŕ˙˙$Ŕ˙˙-Ŕ˙˙8Ŕ˙˙EŔDAT*x ö˙˙PŔ˙˙ZŔ˙˙fŔ˙˙p Ŕ˙˙{ Ŕ˙˙… Ŕ˙˙ Ŕ2 " xywidthheighttaborderd˙˙W˙˙ `˙˙ Ň˙˙Œ˙˙ ] oW`ŇŒ  @  @ € DAT*z ö€ĺ ź˙˙Š€c˙˙‰(Ü˙˙A€Ü˙˙” ˙˙x €O˙˙şü˙˙Ÿ€•˙˙Ďx<˙˙9€Ň˙˙Ô˙˙˙˙2€Ă˙˙Ô˙˙˙˙.€×˙˙ H˙˙Ą€P˙˙đ `˙˙Ł€R˙˙ú x˙˙˘ €Q˙˙ÜDAT*| ö ˙˙Ľ €T˙˙ć ¨˙˙¤ €S˙˙.đŔ˙˙$ €Ä˙˙2  2 C xywidthheightenabledlinethicknesslinecolorfillcolor ˙˙7˙˙ 8˙˙ Ľ˙˙˙˙˙˙!˙˙/ŔŔŔ˙˙9€] oŔŔŔ"€€€78ĽDAT* DAT*€ öbeasejŔ˜!evaluate('wordcap("")',1)Őś-€jŔ˜dw_1ÚzÜ,€col setvaluebŔňÜ,€insertrowŰ(Ŕ Ü,€bŔňÜ,€direction.visible = '0 if(len(col)>0,1,0)'modifyzŔd˙˙˙-€datawindow.table.sortjŔ˜, Ü,€setitemPŔŹÜ,€directionPŔŹÜ,€heightŕÜ,€datawindow.detail.heightjŔ˜cb_ok$+€y,Ü,€ŕcb_cancelH*€,+€,ŕ+€,+€DAT*‚ öŕ˙˙  $ 8 H P ` h ˆ ¤ Ě Ô ä ü     ( 0 l x ˜ ¤ ´ ź Đ Ř č đ  $ 0 8 @ T \ d l t | „ Œ ” œ „*‡,*4‡D*L‡\d$l$t$˛€ |DAT*„ ö,Bd |P cb_cancelw_*€€cb_ok €$+€$€dw_1itl<,€<€controlTc@*€$+€<,€ , 4D L\ d l t 0$$$4$d < cb_cancelw_*€cb_ok+€dw_1€,,€ $ 4 €€&€ą&2 C +openf_dw_get_objecDAT*† öts_attribf_get_token+create+destroy ˙˙Ŕ˙˙Ŕ˙˙&Ŕ˙˙&Ŕ˙˙&Ŕ˙˙&Ŕ˙˙2Ŕ˙˙:Ŕ2 h xywidthheighttitlebarbackcolorcontrolmenuwindowtypecb_cancelcb_okdw_1idw_dwis_titlebl˙˙šnd˙˙ Äun˙˙ äe ˙˙Ýif˙˙ n˙˙"ŔŔŔre˙˙,Ŕ u˙˙8Ŕ€ ˙˙C €DAT*ˆ öRo˙˙M €.A˙˙S €Is˙˙X€um˙˙_] ošÄäÝ€   €Ŕ€Ŕ€€|€1€ŔŔŔ  @@€@ € € €€˙˙˙˙&€ą˙˙DAT*Š ö ˙˙˙˙€˙˙˙˙ ˙˙˙˙x€˙˙˙˙Jźľ@˝8,•01>,$d ::message˙˙@€ ˙˙ "€"2  +clicked˙˙Ŕ2 \ xywidthheighttabordertextcanceltextsizeweightfacenamefontfamilyfontpitchđ˙˙+˙˙ ˙˙ DAT*Œ ö˙˙]˙˙˙˙"¤€˙˙'ž˙˙.ř˙˙˙˙˙7ź˙˙>Ť€˙˙G €˙˙R €] o+] ř˙˙˙ź@€ € €Ť€ @¤€ž˙˙˙˙"€˙˙ž$)$8‹}1‹}FDAT*Ž öóŰ(,$<84)H8…Ł—1Ĺ$8Pz%T$<8\)h8z(…—1Ĺ8pz%z&…$6…<—1ĹT|$)Œ81<ľĘ $68¨z%źľ@˝8,•ś1Ä,Ä$Ě$)Ü81<ľTä$68ěz%źľ@˝8,•@1DAT* öN,$źľ@˝8,•„1’,$&T„œŢ ň  $(<jœĘô&Tjd& icntsort_listtmp::messaged˙˙˙˙ ˙˙ ˙˙ ˙˙@€x dw_1,€rowcount4Ŕ,€colgetitemstringŔ8 ,€DirectionŔ8, idw_dws-€setsortXŔ„is_titleis_DAT*’ ö”.Unable to set the sort. _re˙˙s-€sort@cŔԔ.Unable to perform sort. 8˙˙˙˙ $ , H T h | Œ   Ä Ě Ü ä   "€"2  +clicked˙˙Ŕ2 ] xywidthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitchđŔ˙˙A ˙˙ ˙˙  ˙˙]˙˙DAT*” ö˙˙"š€˙˙'ź˙˙˙˙/ř˙˙˙€˙˙8ź˙˙?Ť€˙˙Hľ€˙˙Sľ€] oA] ř˙˙˙ź@€ľ€ľ€Ť€ @š€ź˙˙˙˙"€˙˙2  2 ? xywidthheighttaborderdataobjectborderlivescroll ˙˙DAT*y ˙˙ ˙˙ š˙˙ä˙˙ ˙˙"ź€˙˙-Á˙˙4Á] o šä  @ ź€Á Á@€ €DAT*˜ ö668`0)d88l0…668B0)x8uŠź €˝ś8<1ÝšR1668`0)€88ˆ0…668B0)œ8uŠź€˝ś8<1ÝpR1668`0)¤88Ź0…DAT*š ö668B0)´8uŠź€˝ś8<1ÝFR1668`0)ź88Ä0…668B0)Đ8uŠź€˝ś8<1ÝR1668`0)Ř88ŕ0…668B0)đ8uź€˝DAT*œ ö81ÝęR1668`0)ř880…668B0)8uŠź€˝ś8<1ÝFR1668`0)88 0…668B0)(80$1Ľ!Ŕ ¸€8$1Ľ*1R11DAT*ž ö668`0)@8H$1ľP$1dľ!Œ8X0ź€˝81˙˙˙˙"&4\~Čî ţ"#J$\%”'Ä(Ô)ć* +2,j.š/Ş0ź1ö23@5p6€7’8Ě9Ţ:<F=V>h?˘@´AěCD$E6FpG‚HşJęKúL PFQXSU°V´ZŔ[Ú\î`*a\b~gŒdX nparentridtransbdeletencountnindls_displayls_sectionld_percentnprogressDAT*  ö´˙˙˙˙ c€˙˙˙˙!˙˙(˙˙- ˙˙8 ˙˙C ˙˙Nf¸ ˙˙st_display?K€text,$Group MembersSTARTwf_setdisplay2€ŔHEND€ŔHContacts€ŔH€ŔHLocation Coodinates€ŔH€ŔHDevices€ŔH€ŔHActivities€ŔH€ŔHApplications €ŔH€ŔHLegal Entities€ŔH€ŔHSources€ŔH˙˙DAT*˘ ö˙˙€ŔH˙˙˙˙f_del_Sources  , X d x € œ ¤ ´ ź Đ Ř đ ř   ( 0 8 @ H P J4€?Č$9),84ŕD4$18<)H8}1<ľĚź(ľ@˝(8ź(ľ@˝(8źľ@˝8P$8Xt$?cO†ź(ľ@˝(8DAT*¤ öz')„98Œ$9)”86Fx Ě!$d pctresp(˙˙ ˙˙ œH dw_progress_2pl*€setredraw,!Ŕ *€pctsetitemOŔ@*€bar.width = ii_bar_width_2eImodifyzŔ|*€!Ŕ  , 4 H P t „ Œ ”  #¤…8Şr$,84z%z&DAT*Ś ö88z&… 8<Ş P$IIkMM)h88pź(ľ@˝(8z'8sz&z&) 8 4n† Ź Ć dP ncountnindas_displayas_sectionab_updateas_toggleld_percentcase4 ˙˙˙˙˙˙ ˙˙ ˙˙*˙˙4 ˙˙>> ˙˙I ¨( STARTst_diDAT*¨ ösplay?K€text$ - ...ENDil_sourcecount@Twf_progress_2ŔX record(s) removed from wf_writelogmessage}ŔŒ , P h    * ‡<*D‡\*d‡€*ˆ‡ *¨‡ź*ćä*ě‡* ‡*$‡4*<‡P*X‡l*t‡„*Œ‡¤*ʇDAT*Ş öĚ*Ô‡đ*ř‡ *‡$*,‡<*D‡T*\‡p*x‡Œ*”‡¨*°‡Ě*Ô‡č*đ‡*‡*$‡@*H‡\*d‡x*€‡˜$ $¨$°$¸$Ŕ$Č$Đ$Ř$ŕ$č$đDAT*Ź ö$ř$$$$$ $($0$8$@$H$P$X$`$h$p$x$€$˛€ |,BXn„ š ° Ć Ü ň4J`vŒ˘¸Îäú&<Rh~ ”d ˆŘ dw_progress_2*€€uo_emissionperiod(+€(€cbx_material%L,"€L"DAT*Ž ö€cbx_creationdatel-&€l&€cbx_datacode.'€'€dw_datacode°/)€°)€cbx_emissionperioddateĚ0*€Ě*€cb_disable_msgô1,€ô,€dw_log2.€.€st_endu,30€,0€st_startialD43€D3€cr_startpol`55€`5€cr_end|68€|8€uo_pollutant”7:€”:€rb_deletestreamsonly˜´8C€´C€rb_deletesourcesÜ9D€ÜD€cb_select€:E€E€st_file;F€F€st_dir€4<G€4G€sle_dirL=I€LDAT*° öI€sle_named>J€dJ€st_display€?K€€K€cb_closeœ@L€œL€cb_runbulkdelete¸AM€¸M€dw_progressÜBN€ÜN€uo_ssřCP€řP€gb_selectŹD^€^€cbx_referencecode,E_€,_€gb_intervalPF`€P`€dw_ref_codelGb€lb€controlˆc@*€(+€L,"€l-&€.'€°/)€Ě0*€ô1,€2.€,30€D43€`55€|68€”7:€´8C€Ü9D€:E€;F€4<G€L=I€d>J€€?K€œ@L€¸ADAT*˛ öM€ÜBN€řCP€D^€,E_€PF`€lGb€  < D\ d€ ˆ  ¨ź Ää ě   $4 <P Xl t„ Œ¤ ŹĚ Ôđ ř  $ ,< DT \p xŒ ”¨ °Ě Ôč đ  $@ H\DAT*´ ö dx € ˜   ¨ ° ¸ Ŕ Č Đ Ř ŕ č đ ř       ( 0 8 @ H P X ` h p x € Ş$4$L$h$€$”$´$Ě$Ü$ě$$$$$<$\$x$DAT*ś öŒ$œ$Ź$ź$Đ$ä$ř$$($8$L$h$|$$*8FT b p ~ Œ š¨śÄŇŕîü &4BP^lzˆ–d ˜đ dw_progress_2*€uo_emissionperiodnp +€cbx_material€<,"€cbx_creationdateT-&€cbx_datacodep.'€dw_dataDAT*¸ öcodeˆ/)€cbx_emissionperioddateœ0*€cb_disable_msgź1,€dw_logÔ2.€st_endä30€st_start ô43€cr_startrdi55€cr_ende68€uo_pollutant_de,7:€rb_deletestreamsonlyateD8C€rb_deletesourcesd9D€cb_select€:E€st_file”;F€st_dir¤<G€sle_dir´=I€sle_nameÄ>J€st_displayŘ?K€cb_close ě@L€cb_runbulkdeleteAM€dw_progressBN€uo_ss0CP€gb_select@D^€cbx_referencecodeTE_€gb_intervalpF`€dDAT*ş öw_ref_code„Gb€ 4 L h € ” ´ Ě Ü ě   $ < \ x Œ œ Ź ź Đ ä ř  ( 8 L h |  J9)8,:•01>,:$$d ::message˙˙:@g€, wf_enableobjectszŔ˙˙ $  € €& €w€x€yDAT*ź ö€z€{€|€}€~€€€ €ą&2 l wf_progresswf_runbulkdeletewf_runbulkdeletesourceswf_enableobjectswf_runbulkdeletesourceactivitieswf_getsourcesqlwf_writelogmessagewf_del_sourceswf_progress_2wf_setdisplay2f_arraystringf_del_activitiesf_del_group_memberf_del_contactsf_del_location_coordinate_groupsf_del_devicesf_del_appf_del_leg_ent_relf_db_error+create+destroy+openĚ˙˙Ŕ˙˙Ŕ˙˙%Ŕ˙˙=DAT*ž öŔ˙˙NŔ˙˙o Ŕ˙˙ Ŕ˙˙’ Ŕ˙˙Ą Ŕ˙˙Ż Ŕ˙˙ž/ČŔ˙˙Ě0Ŕ˙˙Ý1Ŕ˙˙đ2Ŕ˙˙˙3Ŕ˙˙ 4Ŕ˙˙Ě0Ŕ˙˙.5Ŕ˙˙86Ŕ˙˙J7BŔ)˙˙U Ŕ˙˙] ĽŔź ˙˙f śŔ2 œ xywidthheighttitlebartitlecontrolmenuminboxmaxboxvscrollbarbackcolordw_progress_2DAT*Ŕ öuo_emissionperiodcbx_materialcbx_creationdatecbx_datacodedw_datacodecbx_emissionperioddatecb_disable_msgdw_logst_endst_startcr_startcr_enduo_pollutantrb_deletestreamsonlyrb_deletesourcescb_selectst_filest_dirsle_dirsle_namest_displaycb_closecb_runbulkdeletedw_progressuo_ssgb_selectcbx_referencecodegb_intervaldw_ref_codeis_runis_cancelii_bar_widthii_bar_width_2is_directoryis_filenameis_emittantsii_log_lengthib_disable_msgsib_delsourceib_delsourceDAT* öactid_bulkheightid_activityheightid_differenceil_sourcecount`˙˙˙˙ ˙˙ E ˙˙ ˙˙˙˙"Ż€˙˙( ˙˙4 ˙˙; ˙˙B ˙˙MÔĐČ˙˙W €˙˙e €˙˙w "€˙˙„ &€˙˙• '€˙˙˘ )€˙˙Ž *€˙˙Ĺ ,€˙˙Ô .€m˙˙Ű 0€d@˙˙DAT*Ô öâ 3€˙˙ë 5€se˙˙ô 8€˙˙ű :€˙˙ C€ă!˙˙ D€˙˙. E€˙˙8 F€˙˙@ G€˙˙G I€˙˙O J€wi˙˙X K€tw˙˙c L€sy˙˙l M€h_˙˙} N€it˙˙‰ P€˙˙ ^€Ŕ˙˙™ _€˙˙˙˙Ť `€€˙˙ˇ b€˙˙Ăä€˙˙Ęč€!˙˙Ô˙˙á˙˙đ˙˙ýDAT*Ć öSelect sort order for a datawindowforward global type w_sort from Window end type type cb_cancel from commandbutton within w_sort end type type cb_ok from commandbutton within w_sort end type type dw_1 from datawindow within w_sort end type end forward global type w_sort from Window int X=441 int Y=452 int Width=2020 int Height=1245 boolean TitleBar=true long BackColor=12632256 boolean ControlMenu=true WindowType WindowType=response! cb_cancel cb_cancel cb_ok cb_ok dw_1 dw_1DAT*Č ö end type global w_sort w_sort type variables datawindow idw_dw string is_title end variables event open;string cols[],label,tmp,resp,col,vis,col_name integer num_cols,i,cnt str_sort parm parm = message.powerobjectparm idw_dw = parm.dw is_title = parm.title this.title = 'Sort - '+parm.title num_cols = f_dw_get_objects_attrib(idw_dw,cols,'column','*','visible') cnt = 1 for i = 1 to num_cols col_name = f_get_token(cols[i],'~n') // get the column name vis = f_get_token(DAT*Ę öcols[i],'~n') // is it visible if vis = '1' then // if not visible then do not allow sorting on it label = idw_dw.describe(col_name+"_t.text") if label = '!' then // label not found to use the column name tmp = "evaluate('wordcap(~""+col_name+"~")',1)" // make it pretty label = idw_dw.describe(tmp) end if dw_1.setvalue('col',cnt,label+'~t'+col_name) cnt++ dw_1.insertrow(0) end if next dw_1.setvalue('col',cnt,'~t') // add a blank line so they can cancel // only sDAT*Ě öhow the direction RB's if there is something in the row resp = dw_1.modify("direction.visible = '0~t if(len(col)>0,1,0)'") if len(resp) > 0 then messagebox("",resp) // SHow the current sort, if there is one label = idw_dw.describe('datawindow.table.sort') if right(label,1) = '!' then label = left(label,len(label) - 1) cnt = 0 do while len(label) > 1 tmp = trim(f_get_token(label,',')) col = f_get_token(tmp,' ') cnt++ dw_1.setitem(cnt,'col',col) dw_1.setitem(cnt,'direction',tmp) DAT*Î öloop // size the window to the number of rows dw_1.height = 110 + num_cols*integer(dw_1.describe('datawindow.detail.height')) cb_ok.y = dw_1.height + 20 cb_cancel.y = cb_ok.y this.height = cb_ok.y + cb_ok.height + 130 end event on w_sort.create this.cb_cancel=create cb_cancel this.cb_ok=create cb_ok this.dw_1=create dw_1 this.Control[]={ this.cb_cancel,& this.cb_ok,& this.dw_1} end on on w_sort.destroy destroy(this.cb_cancel) destroy(this.cb_ok) destroy(this.dw_1) end on DAT*Đ ö type cb_cancel from commandbutton within w_sort int X=1067 int Y=1028 int Width=257 int Height=93 int TabOrder=20 string Text="Cancel" boolean Cancel=true int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;close(parent) end on type cb_ok from commandbutton within w_sort int X=577 int Y=1028 int Width=257 int Height=93 int TabOrder=30 string Text="OK" boolean Default=true int TexDAT*Ň ötSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;int i,cnt string sort_list,tmp cnt = dw_1.rowcount() for i = 1 to cnt tmp = dw_1.getitemstring(i,'col') if len(trim(tmp)) > 0 then tmp = tmp + ' ' + dw_1.getitemstring(i,'Direction') if len(sort_list) > 0 then sort_list = sort_list + ', '+tmp else sort_list = tmp end if end if next if len(sort_list) > 0 then if idw_dw.setsDAT*Âort(sort_list) <> 1 then messagebox(is_title,"Unable to set the sort. "+sort_list) return end if if idw_dw.sort() <> 1 then messagebox(is_title,"Unable to perform sort. "+sort_list) return end if end if close(parent) end on type dw_1 from datawindow within w_sort int X=11 int Y=4 int Width=1977 int Height=996 int TabOrder=10 string DataObject="d_sort" boolean Border=false boolean LiveScroll=true end type DAT*Ö öď€˙˙ /˙˙$Hor˙˙2˙˙B˙˙O_d˙˙_˙˙m˙˙Ťä˙˙] oE  €Ż€  €    €€€€ř€1€ÔĐČ  @@€@DAT*Ř ö € € "€ &€ '€ )€ *€ ,€ .€ 0€ 3€ 5€ 8€ :€ C€ D€ E€ F€ G€ I€ J€ K€ L€ M€ N€ P€ ^€ _€ `€ b€ď€ €3H ˙˙w€˙˙˙˙˙˙˙˙x€˙˙˙˙)˙˙˙˙xy€˙˙DAT*Ú ö˙˙L(˙˙z€˙˙˙˙]˙˙˙˙{€˙˙˙˙~+˙˙˙˙|€˙˙˙˙™<0˙˙}€˙˙˙˙Ĺd@˙˙~€˙˙˙˙Ôx˙˙€˙˙˙˙̄˙˙€ €˙˙˙˙0Ô˙˙˙˙ €˙˙˙˙'Ô˙˙˙˙ €˙˙˙˙8Ö˙˙˙˙& €ą˙˙r DAT*Ü ö1)88)<8…TŠ8\0ź€˝ś8źeľ@˝e8}Š8\0ź€˝ś8…6…8^z%8uz&z&…$) 8…—1Ĺ>66źľ@˝8,:•X1f,:¨$6|¨ ¸ ŕ  >d* tmpcommandbar_xbar_y::messaged˙˙ ˙˙ DAT*Ţ ö ˙˙ ˙˙ ˙˙ :@g€°0 insertrow(Ŕpct.width pct.x pct.ydescribejŔ2ii_bar_width_2DI bar.width = 0 bar.x = bar.y = dw_progress_2*€modifyzŔ˜˙˙ < T    ¨ %€L%2 ! +constructorf_get_token<type˙˙ssŔrom ˙˙; wŔn w_˙˙;deŔ2 ? xywidthheighttaborderdataobjectborderlivescroll ˙˙DAT*ŕ ö˙˙ ŕ˙˙ Ŕ˙˙`˙˙F˙˙"T€˙˙-˙˙4] oŕŔ`F @ T€ @€ €>Ö˙˙˙˙%€L˙˙€8d  DAT*â ödestroy€2  +destroy˙˙Ŕ2  xytaborderborderP˙˙ ˙˙ ˙˙ ‚˙˙] o  ň‚ @@€l€1€ÔĐČ    @€ Ŕ€  € € € € € DAT*ä ö€ € €'Ô˙˙˙˙€˙˙˙˙4,:•1(,:$d ::message˙˙:@g€ ˙˙ ""€"2  +clicked˙˙Ŕ2 l xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolortext˙˙ ˙˙ @˙˙ 7˙˙L˙˙ř˙˙DAT*ć ö˙˙˙"ź@˙˙)#€˙˙5$€˙˙?%€˙˙J”€˙˙S€€˙˙]ÔĐČ˙˙g˘€] o @7L ř˙˙˙ź#€$€%€”€ €ÔĐČ@˘€@@€KÖ˙˙˙˙"€˙˙4,:•1(,:DAT*č ö$d ::message˙˙:@g€ ˙˙ "&€"2  +clicked˙˙Ŕ2 l xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolortext˙˙›˙˙ ź˙˙ 7˙˙L˙˙ř˙˙˙˙˙"ź˙˙)#€˙˙5$€˙˙?%€˙˙J”€DAT*ę ö˙˙S€˙˙]ÔĐČ˙˙gŤ€] o›ź7L ř˙˙˙ź#€$€%€”€ €ÔĐČ@Ť€@@€KÖ˙˙˙˙"€˙˙4,:•1(,:$d ::message˙˙:@g€ ˙˙DAT*ě ö "'€"2  +clickedtype˙˙odŔ2 g xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolorđ˙˙W˙˙ l˙˙ I˙˙L˙˙ř˙˙˙˙˙"ź˙˙)#€˙˙5$€˙˙?%€˙˙J”€˙˙S˙˙]] oWlIL DAT*î öř˙˙˙ź#€$€%€”€ @ @@€KÖ˙˙˙˙"€˙˙L%2  2  xywidthtaborderP˙˙˙˙ `˙˙ ˙˙] o`h @ š€DAT*đ öž @€ €4,:•1(,:$d ::message˙˙:@g€ ˙˙ "*€"2  +clicked˙˙Ŕ2 l xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolortext˙˙R˙˙ ź˙˙ 7DAT*ň ö˙˙L˙˙ř˙˙˙˙˙"ź˙˙)#€˙˙5$€˙˙?%€˙˙J”€˙˙S€˙˙]ÔĐČ˙˙gż€] oRź7L ř˙˙˙ź#€$€%€”€ €ÔĐČ@ż€@@€KÖ˙˙˙˙"€˙˙DAT*ô öV $#œ0$@8H0…d$t$8|9n”8gh€8œ9)´8ź9}"Ä$Ě8Ô0…ě$ô$8|9nü8gh€8œ9)8 9},:•<1J,:$6„˜œŔ "d ::message˙˙:@g€€ ib_disable_msgsNcb_disable_msg DAT*ö ö1,€text8&Enable Screen Msgsdw_log\2.€objectl…@line__get_attributeŔvisible__set_attributeŔ¤N 1,€8&Disable Screen Msgs\2.€l…@ŔŔ¤N˙˙ 0 @ d t ” ´ ź Ä Ě ě ô ü     ",€"2  +clicked˙˙Ŕ2 a xywidthheighttabordertextsizeweightfontcharsetfonDAT*ř ötpitchfontfamilyfacenametextđ˙˙%˙˙ 0 ˙˙ r˙˙X˙˙n˙˙"ř˙˙˙˙˙+ź˙˙2#€˙˙>$€˙˙H%€˙˙SÚ€˙˙\ŕ€] o%0 rXn ř˙˙˙ź#€$€%€Ú€ @ŕ€KÖ˙˙˙˙"€DAT*ú ö˙˙25-€81d, pagenumbercopyancestorreturnvalue<˙˙˙˙˙˙ printpage5.€Ë52  +printpagetype˙˙omŔ2 I xywidthheighttaborderdataobjectminboxhscrollbarresizable´˙˙%˙˙ P˙˙ Ľ ˙˙Ŕ˙˙<˙˙"ő€DAT*ü ö˙˙-ľ˙˙4ľ˙˙?ľ] o%PĽ Ŕ< @žć€ő€ľ ľ ľ@ý€@€ €dđŘ˙˙5€Ë˙˙2  2  xywidthheighttextsizeweightfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle,DAT*Ô ö˙˙@˙˙ Ě˙˙ Š˙˙H˙˙ř˙˙˙˙˙"ź˙˙)$€˙˙3%€˙˙>”€˙˙G€˙˙QÔĐČ˙˙[Č˙˙c€˙˙h 1€˙˙r ] o@ĚŠH ř˙˙˙ź@#€$€%€”€ €ÔĐČČ€ 1€DAT* öBulk Delete Sources: Used to select sources and other criteria to remove records.forward global type w_sourcebulkdelete from window end type type dw_progress_2 from datawindow within w_sourcebulkdelete end type type uo_emissionperiod from u_emis_period_no_end_date within w_sourcebulkdelete end type type cbx_material from checkbox within w_sourcebulkdelete end type type cbx_creationdate from checkbox within w_sourcebulkdelete end type type cbx_datacode from checkbox within w_sourcebulkdeDAT* ölete end type type dw_datacode from u_dw_data_code within w_sourcebulkdelete end type type cbx_emissionperioddate from checkbox within w_sourcebulkdelete end type type cb_disable_msg from commandbutton within w_sourcebulkdelete end type type dw_log from uo_loadlog within w_sourcebulkdelete end type type st_end from statictext within w_sourcebulkdelete end type type st_start from statictext within w_sourcebulkdelete end type type cr_start from editmask within w_sourcebulkdelete end tDAT* öype type cr_end from editmask within w_sourcebulkdelete end type type uo_pollutant from u_pollutant within w_sourcebulkdelete end type type rb_deletestreamsonly from radiobutton within w_sourcebulkdelete end type type rb_deletesources from radiobutton within w_sourcebulkdelete end type type cb_select from commandbutton within w_sourcebulkdelete end type type st_file from statictext within w_sourcebulkdelete end type type st_dir from statictext within w_sourcebulkdelete end type typeDAT* ö sle_dir from singlelineedit within w_sourcebulkdelete end type type sle_name from singlelineedit within w_sourcebulkdelete end type type st_display from statictext within w_sourcebulkdelete end type type cb_close from commandbutton within w_sourcebulkdelete end type type cb_runbulkdelete from commandbutton within w_sourcebulkdelete end type type dw_progress from datawindow within w_sourcebulkdelete end type type uo_ss from u_class_ss_client within w_sourcebulkdelete end type type gbDAT* ö_select from groupbox within w_sourcebulkdelete end type type cbx_referencecode from checkbox within w_sourcebulkdelete end type type gb_interval from groupbox within w_sourcebulkdelete end type type dw_ref_code from u_dw_ref_code within w_sourcebulkdelete end type end forward global type w_sourcebulkdelete from window integer x = 5 integer y = 4 integer width = 3141 integer height = 2568 boolean titlebar = true string title = "Bulk Delete" boolean controlmenu = true boolean minDAT* öbox = true boolean maxbox = true boolean vscrollbar = true long backcolor = 80269524 dw_progress_2 dw_progress_2 uo_emissionperiod uo_emissionperiod cbx_material cbx_material cbx_creationdate cbx_creationdate cbx_datacode cbx_datacode dw_datacode dw_datacode cbx_emissionperioddate cbx_emissionperioddate cb_disable_msg cb_disable_msg dw_log dw_log st_end st_end st_start st_start cr_start cr_start cr_end cr_end uo_pollutant uo_pollutant rb_deletestreamsonly rb_deletestreamsonly rbDAT* ö_deletesources rb_deletesources cb_select cb_select st_file st_file st_dir st_dir sle_dir sle_dir sle_name sle_name st_display st_display cb_close cb_close cb_runbulkdelete cb_runbulkdelete dw_progress dw_progress uo_ss uo_ss gb_select gb_select cbx_referencecode cbx_referencecode gb_interval gb_interval dw_ref_code dw_ref_code end type global w_sourcebulkdelete w_sourcebulkdelete type variables constant string is_run = "Run" constant string is_cancel = "Cancel" integer ii_DAT* öbar_width, ii_bar_width_2 string is_directory // directory name string is_FileName = 'BULKDEL' // export file name string is_emittants[] integer ii_log_length = 72 boolean ib_disable_msgs = false boolean ib_delsource = false, ib_delsourceact = false double id_bulkheight, id_activityheight, id_difference long il_sourcecount end variables forward prototypes public subroutine wf_progress (real pct) public function integer wf_runbulkdelete () public function integer wf_ruDAT* önbulkdeletesources () public subroutine wf_enableobjects (boolean ab_enabled) public function integer wf_runbulkdeletesourceactivities () public function string wf_getsourcesql () public function integer wf_writelogmessage (string as_message) public function long wf_del_sources (long nparentrid, transaction trans, boolean bdelete) public subroutine wf_progress_2 (real pct) public subroutine wf_setdisplay2 (long ncount, long nind, string as_display, string as_section, boolean ab_update, striDAT* öng as_toggle) end prototypes public subroutine wf_progress (real pct);////////////////////////////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_progress // Author : Michael Colombo // Date : 9/9/2003 // // Arg : // Return : (None) // // Desc : Used run progress bar // Usage : Pass in the percentage ie row/rowcount // Ref : // /////////////////////////////////////////////////////////////DAT* ö///////////////////////////////// // Modifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// //
  • ////////////////////////////////////////////////////////////////////////////////////////////// integer resp if pct > 1 then return // if more than 100% then do not display dw_progress.setredraw(false) // Only change the percent bar when pct > 0 if pct >= 0 then resp = dw_proDAT* ögress.setitem(1,"pct",pct) // change the number displayed if resp <> 1 then messagebox(string(resp),string(pct)) // and the size of the bar dw_progress.modify("bar.width = "+string(int(pct * ii_bar_width))) dw_progress.setredraw(true) end if end subroutine public function integer wf_runbulkdelete ();////////////////////////////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_runbulkdelete // Author : MicDAT* öhael Colombo // Date : 9/9/2003 // // Arg : // Return : integer // // Desc : Engine that determines whether to delete sources or delete stream activities from sources // Usage : Called by clicking run // Ref : // ////////////////////////////////////////////////////////////////////////////////////////////// // Modifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// DAT* ö //
  • ////////////////////////////////////////////////////////////////////////////////////////////// //Check to make sure that there is something selected in source selector IF not uo_ss.of_hasData() then MessageBox("Source Selector", "Please select information from Source Selector.", exclamation!) return -1 end if //check to make sure that a log file and directory is selected if sle_dir.Text = "" or isnull(sle_dir.Text) then MessageBox("Log File Directory and File", "Please SelDAT* öect Log File Directory and File.", exclamation!) return -1 end if //reset log file dw_log.Reset() //run delete sources or delete stream activities based upon which radio button is selected if rb_deletesources.checked then wf_runbulkdeletesources() else wf_runbulkdeletesourceactivities() end if //deselect last row dw_log.SelectRow(dw_log.rowcount(), FALSE) //save log file dw_log.SaveAs(is_directory + sle_name.text + ".TXT", Text!, TRUE) return 1 end function publDAT* öic function integer wf_runbulkdeletesources ();u_ds_base lds_resultSet integer li_ret = 1 long ll_rc, ll_row, ll_sourcecount, ll_sourceIDfailed = 0 double ld_sourcerid string ls_sourceidsfailed, ls_sourceid, ls_display = "Source ID: " real ld_percent string ls_message lds_resultSet = create u_ds_base if not isValid(lds_resultSet) then messageBox("Error","wf_runbulkdelete; lds_resultSet object creation failure.", exclamation!) return -1 end if // copy orignal ss to datastore so wDAT* öe can change ss level as needed // lds_resultSet.DataObject='d_ss_group_result_set' lds_resultSet.DataObject = "d_ds_sourcebulkdelete" lds_resultSet.SetTransObject(SQLCA) //modify source datastore sql to work with current source selection ll_rc = uo_ss.iclass_group.of_modObjectSQL(lds_resultSet) if ll_rc < 0 then signalError(-1,"of_modObjectSQL() failed.") return -1 end if //messagebox("Debug", lds_resultSet.getSQLSelect(), none!) //set pointer to hourglass setPointer(hourglass!)DAT*" ö //retrieve source information ll_rc = lds_resultSet.retrieve( & uo_ss.iclass_group.il_nationArray, & uo_ss.iclass_group.il_stateArray, & uo_ss.iclass_group.il_countyArray, & uo_ss.iclass_group.il_sourceArray) //if retrieval failed then signal error if ll_rc < 0 then signalError(ll_rc, sqlca.sqlerrtext) return -1 end if //if ll_rc > 0 then // cb_runbulkdelete.text = is_cancel // cb_close.enabled = false // cb_runbulkdelete.cancel = false //end if //reset progress baDAT*$ ör wf_progress(0) wf_progress_2(0) //reset source id counts to fail ls_sourceidsfailed = "" //remove the first row of log dw_log.deleterow(1) //enter header message into log wf_writelogmessage(fill("=",ii_log_length)) ls_message = "RAPIDS Bulk Delete" wf_writelogmessage("==" + ls_message) wf_writelogmessage(fill("=",ii_log_length)) wf_writelogmessage("Started: " + String(datetime(today(),now()),"m-d-yy h:mm am/pm;'none'")) wf_writelogmessage("Bulk Delete Type: Delete selected sourDAT*& öce(s) and all child records") wf_writelogmessage("Sources Selected: " + string(ll_rc)) //loop through each source and delete it out for ll_row = 1 to ll_rc //yield() // if cb_runbulkdelete.cancel then // if MessageBox("Confirm Cancel", & // "Do you want to cancel Source Bulk Delete?", question!, yesno!, 2) = 1 then // exit // else // cb_runbulkdelete.cancel = false // end if // end if //get rid and id ld_sourcerid = lds_resultSet.object.source_rid[ll_row] ls_DAT*( ösourceid = lds_resultSet.object.source_id[ll_row] //display id being removed st_display.text = ls_display + ls_sourceid setredraw(true) //set pointer to hourglass setPointer(hourglass!) ls_message = "Deleting Data for Source ID: " + ls_sourceid wf_writelogmessage("") wf_writelogmessage("Removing records for Source ID: " + ls_sourceID) //remove all records associated to source id //il_sourcecount = wf_del_sources(ld_sourcerid, sqlca,false) il_sourcecount = 8 lDAT** öl_sourcecount = wf_del_sources(ld_sourcerid, sqlca,true) //create and enter message for log based on whether or not the records were successfully deleted if ll_sourcecount = -1 then ll_sourceIDfailed++ ls_sourceidsfailed += ls_sourceid + ", " wf_writelogmessage(" Failed deleting all records for Source ID: " + ls_sourceID) rollback; else wf_writelogmessage("A total of " + string(ll_sourcecount) + " record(s) removed") commit; end if //set the percentage for enterDAT*, ö into progress bar ld_percent = ll_row/ll_rc wf_progress(ld_percent) next //reset source selector uo_ss.iclass_group.of_reset() uo_ss.of_setcounts() //enter footer message into log wf_writelogmessage(" ") if ls_sourceidsfailed <> "" then ls_sourceidsfailed = "Bulk Delete failed for Source(s): " + ls_sourceidsfailed ls_sourceidsfailed = left(ls_sourceidsfailed, len(ls_sourceidsfailed)-2) wf_writelogmessage(ls_sourceidsfailed) wf_writelogmessage(" ") // messagebox("WarnDAT*. öing! Unable to delete all sources", ls_sourceidsfailed) end if wf_writelogmessage(string(ll_rc - ll_sourceIDfailed) + " out of " + string(ll_rc) + " sources were deleted") wf_writelogmessage(" ") wf_writelogmessage("BULK DELETE COMPLETED: " + String(datetime(today(),now()),"m-d-yy h:mm am/pm;'none'")) //destroy datastore destroy (lds_resultset) //cb_close.enabled = true //cb_runbulkdelete.text = is_run //st_display.text = "Ready" //reset pointer setPointer(arrow!) return 1 eDAT*0 önd function public subroutine wf_enableobjects (boolean ab_enabled); ////////////////////////////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_enableobjects // Author : Michael Colombo // Date : 9/9/2003 // // Arg : boolean ab_enabled - true if delete streams selected and false if delete sources are selected // Return : (None) // // Desc : This function resizes the window and makes certain objecDAT*2 öts visible/invisible // Usage : Used in click events for radio buttons rb_deletesources, rb_deletestreamsonly // ////////////////////////////////////////////////////////////////////////////////////////////// // Modifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// //
  • ////////////////////////////////////////////////////////////////////////////////////////////// //long li_differenDAT*4 öce = 1064 double li_difference = 1064 double ld_ratio = 1.72117962 double li_height, ld_intermediate li_height = this.height if id_activityheight = 0 then id_activityheight = this.height if id_difference = 0 then if ab_enabled then //ld_intermediate id_difference = (li_height * ld_ratio) - li_height else id_difference = long(((li_height/ld_ratio) - li_height) * -1) end if end if if id_bulkheight = 0 then id_bulkheight = this.height - id_difference li_difference = DAT*6 öid_difference //used to move objects up or down from the screen if not ab_enabled then li_difference = li_difference * -1 //move objects up if delete sources is selected and move objects down if delete stream only is selected //this.height = this.height + li_difference if not ab_enabled then //resize(this.x, id_bulkheight) this.height = id_bulkheight else //resize(this.x, id_activityheight) this.height = id_activityheight end if st_display.y = st_display.y + li_difference dDAT*8 öw_log.y = dw_log.y + li_difference dw_progress.y = dw_progress.y + li_difference cb_disable_msg.y = cb_disable_msg.y + li_difference cb_runbulkdelete.y = cb_runbulkdelete.y + li_difference cb_close.y = cb_close.y + li_difference dw_progress_2.y = dw_progress_2.y + li_difference //these objects should only be invisible when delete sources is selected cbx_creationdate.visible = ab_enabled cbx_datacode.visible = ab_enabled cbx_emissionperioddate.visible = ab_enabled cbx_material.visible =DAT*: ö ab_enabled dw_datacode.visible = ab_enabled dw_ref_code.visible = ab_enabled cbx_referencecode.visible = ab_enabled gb_interval.visible = ab_enabled cr_end.visible = ab_enabled cr_start.visible = ab_enabled uo_pollutant.visible = ab_enabled uo_emissionperiod.visible = ab_enabled st_start.visible = ab_enabled st_end.visible = ab_enabled dw_progress.visible = not ab_enabled end subroutine public function integer wf_runbulkdeletesourceactivities ();//////////////////////DAT*< ö//////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_runbulkdeletesourceactivities // Author : Michael Colombo // Date : 9/9/2003 // // Arg : // Return : integer // // Desc : Deletes source stream activities selected with the appropriate criteria that was checked // Usage : // Ref : // ////////////////////////////////////////////////////////////////////////////////////////////// // MDAT*> öodifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// integer li_num_emittants string ls_temp_emittants[] date ld_emstart, ld_emend, ld_start, ld_end string ls_datacode = "", ls_referencecode = "" long ll_sourceRid,ll_sourceIDfailed = 0 u_ds_base lds_resultSet integer li_ret = 1 long ll_rc, ll_row double ld_activityrid string ls_sourceidsfailed, ls_sourceid, ls_display = "SourceDAT*@ ö ID: " real ld_percent string ls_sql, ls_where, ls_error string ls_message //set pointer to hourglass SetPointer(Hourglass!) //set up datastore to be used lds_resultSet = create u_ds_base if not isValid(lds_resultSet) then messageBox("Error","wf_runbulkdelete; lds_resultSet object creation failure.", exclamation!) return -1 end if // copy orignal ss to datastore so we can change ss level as needed // lds_resultSet.DataObject='d_ss_group_result_set' lds_resultSet.DataObject DAT*B ö= "d_ds_sourcebulkdelete_activities" lds_resultSet.SetTransObject(SQLCA) //modify source datastore sql to work with current source selection ll_rc = uo_ss.iclass_group.of_modObjectSQL(lds_resultSet) if ll_rc < 0 then signalError(-1,"of_modObjectSQL() failed.") return -1 end if //get sql statement ls_sql = lds_resultSet.Describe("DataWindow.Table.select") //get where clause to be added to sql statement ls_where = wf_getsourcesql() //combine sql and where and reinstantiate it baDAT*D öck into the datastore if ls_where <> '' then ls_sql = ls_sql + " and " + ls_where ls_sql = "DataWindow.Table.select='" + ls_sql + "'" ls_error = lds_resultSet.Modify(ls_sql) IF ls_error <> '' THEN MessageBox("Datastore",ls_error + "~rSelect unchanged. Contact Technical Support.") return -1 END IF END IF //remove first row of log dw_log.deleterow(1) //write header portion into log wf_writelogmessage(fill("=",ii_log_length)) ls_message = "RAPIDS Bulk Delete" wf_writeloDAT*F ögmessage("==" + ls_message) wf_writelogmessage(fill("=",ii_log_length)) wf_writelogmessage("Started: " + String(datetime(today(),now()),"m-d-yy h:mm am/pm;'none'")) wf_writelogmessage("Bulk Delete Type: Delete only stream activities for selected sources(s)") wf_writelogmessage("Sources Selected: " + string(upperbound(uo_ss.iclass_group.il_sourceArray))) //for testing purposes //ls_sql = lds_resultSet.Describe("DataWindow.Table.select") //messagebox("Debug", lds_resultSet.getSQLSelect(),DAT*H ö none!) //if checked add emission period information into log if cbx_emissionperioddate.checked then ld_emstart = date(uo_emissionperiod.em_start.text) ld_emend = date(uo_emissionperiod.em_end.text) wf_writelogmessage("Emission Period Date Range Selected: " + uo_emissionperiod.em_start.text + " to " + uo_emissionperiod.em_end.text ) end if //if checked add creation date period information into log if cbx_creationdate.checked then ld_start = date(cr_start.text) ld_end = date(cr_DAT*J öend.text) wf_writelogmessage("Create Date Range Selected: " + cr_start.text + " to " + cr_end.text ) end if //if checked add data code information into log if cbx_datacode.checked then if dw_datacode.uf_check_required() then ls_datacode = dw_datacode.is_ref_code wf_writelogmessage("Data Code Selected: " + ls_datacode) else return -1 end if end if //if checked add reference code information into log if cbx_referencecode.checked then //if dw_ref_code.uf_get_referenceDAT*L ö_codes() then if dw_ref_code.uf_check_required() then ls_referencecode = dw_ref_code.is_ref_code wf_writelogmessage("Reference Code Selected: " + ls_referencecode) else return -1 end if end if // Build the list of emittants as a temporary array, then overwrite the instance array if cbx_material.checked then //get emittants uo_pollutant.uf_get_emittants(ls_temp_emittants, li_num_emittants) //if none selected then reject if li_num_emittants <= 0 and cbx_material.chDAT*N öecked = TRUE then messageBox("Required Parameter Missing", "Please select emittants.", exclamation!) return -1 //check for to many emittants elseif li_num_emittants > 250 then messageBox("To many emittants", "There can be no more then 250 emittants selected.", exclamation!) return -1 else wf_writelogmessage("Material Code(s) Selected: " + f_arraystring(ls_temp_emittants) ) end if end if //retrieve data based on new list setPointer(hourglass!) ll_rc = lds_resultSet.retDAT*P örieve( & uo_ss.iclass_group.il_nationArray, & uo_ss.iclass_group.il_stateArray, & uo_ss.iclass_group.il_countyArray, & uo_ss.iclass_group.il_sourceArray, & ld_emstart, ld_emend, ld_start, ld_end, & ls_datacode, ls_referencecode, ls_temp_emittants) //if error then signal error message if ll_rc < 0 then signalError(ll_rc, sqlca.sqlerrtext) return -1 else // cb_runbulkdelete.text = is_cancel // cb_close.enabled = false // cb_runbulkdelete.cancel = false end if //set proDAT*R ögress bar wf_progress_2(0) ls_sourceidsfailed = "" ls_sourceid = "" //loop through activities and delete for ll_row = 1 to ll_rc // yield() // if cb_runbulkdelete.cancel then // if MessageBox("Confirm Cancel", & // "Do you want to cancel Source Bulk Delete?", question!, yesno!, 2) = 1 then // exit // else // cb_close.enabled = false // cb_runbulkdelete.cancel = false // end if // end if //get rid ld_activityrid = lds_resultSet.object.activities_rid[ll_row] DAT*T ö //add unique source ids to log if ls_sourceid <> lds_resultSet.object.source_id[ll_row] then wf_writelogmessage(" ") ls_sourceid = lds_resultSet.object.source_id[ll_row] st_display.text = ls_display + ls_sourceid ls_message = "Deleting Data for Source ID: " + ls_sourceid wf_writelogmessage(ls_message) end if setredraw(true) setPointer(hourglass!) //delete activities and write message whether or not the activity succeeded to be removed if f_del_activities(DAT*V öld_activityrid, sqlca,true) = -1 then ll_sourceIDfailed++ ls_sourceidsfailed += string(ld_activityrid) + ", " ls_message = "Unable to delete Stream Activity with rid: " + string(ld_activityrid) + "." else ls_message = "Stream Activity with rid: " + string(ld_activityrid) + " was removed." end if //end if //enter message into log wf_writelogmessage(ls_message) //set percentage into progress bar ld_percent = ll_row/ll_rc wf_progress_2(ld_percent) next //resDAT*X öet source selector uo_ss.iclass_group.of_reset() uo_ss.of_setcounts() wf_writelogmessage(" ") //enter footer information into log if ls_sourceidsfailed <> "" then ls_sourceidsfailed = "Bulk Delete failed for Activity(ies): " + ls_sourceidsfailed ls_sourceidsfailed = left(ls_sourceidsfailed, len(ls_sourceidsfailed)-2) wf_writelogmessage("Unable to delete the following stream activities: " + ls_sourceidsfailed + ".") // messagebox("Warning! Unable to delete all source activities", lDAT*Z ös_sourceidsfailed) end if wf_writelogmessage(string(ll_rc - ll_sourceIDfailed) + " out of " + string(ll_rc) + " records were deleted") wf_writelogmessage(" ") wf_writelogmessage("BULK DELETE COMPLETED: " + String(datetime(today(),now()),"m-d-yy h:mm am/pm;'none'")) //destroy datastore destroy (lds_resultset) //cb_runbulkdelete.cancel = false //cb_close.enabled = true //cb_runbulkdelete.text = is_run //reset status bar and pointer st_display.text = "Ready" setPointer(arrow!) DAT*\ öreturn 1 return 1 end function public function string wf_getsourcesql ();////////////////////////////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_getsourcesql // Author : Michael Colombo // Date : 9/9/2003 // // Arg : // Return : string // // Desc : Builds Dynamic SQL statement // Usage : Used with selection for delete source activity streams // Ref DAT*^ ö: // ////////////////////////////////////////////////////////////////////////////////////////////// // Modifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// // ////////////////////////////////////////////////////////////////////////////////////////////// string ls_sql = "" //initial where sql string string ls_term //temporary holding place for sql portion //columns string ls_starDAT*` öt_column = "start_date" string ls_end_column = "end_date" string ls_creationdate_column = "creation_date_time" string ls_datacode_column = "data_code" string ls_referencecode_column = "reference_code" string ls_material_column = "material_code" //arguments string ls_start_arg = "adt_startdate" string ls_end_arg = "adt_enddate" string ls_creationstart_arg = "adt_creationstart" string ls_creationend_arg = "adt_creationend" string ls_datacode_arg = "as_datacode" string ls_referencecode_DAT*b öarg = "as_referencecode" string ls_material_arg = "as_materials" //build emission period into where clause if emission period check box is checked if cbx_emissionperioddate.checked then ls_term = "(( " + ls_start_column + " >= :" + ls_start_arg + " )" + & " and ( " + ls_end_column + " <= :" + ls_end_arg //if checked then add null clause for end date if uo_emissionperiod.cbx_withnoenddate.checked then ls_term = ls_term + " or " + ls_end_column + " IS NULL" end if ls_termDAT*d ö += " ))" //if statement is empty then fill with statement else concatenation with an and if ls_sql = "" then ls_sql = ls_term else ls_sql = ls_sql + " and " + ls_term end if end if //build creation date into where clause if creation date check box is checked if cbx_creationdate.checked then ls_term = "(( " + ls_creationdate_column + " >= :" + ls_creationstart_arg + " )" if len(ls_creationend_arg) > 1 and not isnull(ls_creationend_arg) then ls_term += " and ( " +DAT*f ö ls_creationdate_column + " <= :" + ls_creationend_arg + " )" end if ls_term += ")" //if statement is empty then fill with statement else concatenation with an and if ls_sql = "" then ls_sql = ls_term else ls_sql = ls_sql + " and " + ls_term end if end if //build datacode into where clause if data code check box is checked if cbx_datacode.checked then ls_term = "( " + ls_datacode_column + " = :" + ls_datacode_arg + " )" //if statement is empty then fill with sDAT*h ötatement else concatenation with an and if ls_sql = "" then ls_sql = ls_term else ls_sql = ls_sql + " and " + ls_term end if end if //build reference code into where clause if reference code check box is checked if cbx_referencecode.checked then ls_term = "( " + ls_referencecode_column + " = :" + ls_referencecode_arg + " )" //if statement is empty then fill with statement else concatenation with an and if ls_sql = "" then ls_sql = ls_term else ls_sql = ls_sqDAT*j öl + " and " + ls_term end if end if //build material code into where clause if material codes check box is checked if cbx_material.checked then ls_term = "( " + ls_material_column + " IN ( :" + ls_material_arg + " ))" //if statement is empty then fill with statement else concatenation with an and if ls_sql = "" then ls_sql = ls_term else ls_sql = ls_sql + " and " + ls_term end if end if return ls_sql end function public function integer wf_writelogmessageDAT*l ö (string as_message);////////////////////////////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_writelogmessage // Author : Michael Colombo // Date : 9/9/2003 // // Arg : string as_message - enter message you want to add // Return : integer // // Desc : writes messages to log file // Usage : // Ref : // //////////////////////////////////////////////////////////////////////////////////////////DAT*n ö//// // Modifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// //
  • ////////////////////////////////////////////////////////////////////////////////////////////// long ll_row //turn redraw off dw_log.setRedraw(false) //insert row ll_row = dw_log.insertRow(0) if ll_row < 0 then //if failure then enter error message dw_log.setRedraw(true) signalError(-1, "Failed insertingDAT*p ö row into log file.") return -1 end if //add message dw_log.object.line[ll_row] = as_message //scroll the visible datawindow dw_log.scrollToRow(ll_row) //turn redraw on dw_log.setRedraw(true) return 1 end function public function long wf_del_sources (long nparentrid, transaction trans, boolean bdelete);// Function to perform cascading delete. Three arguments are // required: // nParentRid - The unique RID of the record to delete // Trans - The transaction object to use, uDAT*r ösually sqlca // bDelete - Set to true for delete, FALSE gives only the count // of records that would be deleted. // The function returns the number of records deleted, or -1 if // an error occurs. Check the value of sqlcode to determine the // error when the function returns -1. //////////////////////////////////////////////////////////////////// long nCount = 0 // Number of records processed long nInd = 0 // Return indicator for functions string ls_display, ls_section rDAT*t öeal ld_percent long nprogress if nParentRid < 0 then nParentRid = -nParentRid // Do we have a valid rid? Select Rid into :nInd From Rap_Sources Where Rid = :nParentRid USING Trans; // Process the children if Trans.sqlcode = 0 AND nInd > 0 then ls_display = st_display.text ls_section = 'Group Members' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') nInd = f_del_group_member(nParentRid, Trans, bDelete) if nInd >= 0 then nCount DAT*v ö= nCount + nInd wf_setdisplay2(1, nInd, ls_display,ls_section, bdelete, 'END') ls_section = 'Contacts' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') nInd = f_del_Contacts(-nParentRid, Trans, bDelete) end if if nInd >= 0 then nCount = nCount + nInd wf_setdisplay2(2, nInd, ls_display,ls_section, bdelete, 'END') ls_section = 'Location Coodinates' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'STARDAT*x öT') nInd = f_del_location_coordinate_groups(-nParentRid, Trans, bDelete) end if if nInd >= 0 then nCount = nCount + nInd wf_setdisplay2(3, nInd, ls_display,ls_section, bdelete, 'END') ls_section = 'Devices' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') nInd = f_del_devices(-nParentRid, Trans, bDelete) end if if nInd >= 0 then nCount = nCount + nInd wf_setdisplay2(4, nInd, ls_displayDAT*z ö,ls_section, bdelete, 'END') ls_section = 'Activities' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') nInd = f_del_Activities(-nParentRid, Trans, bDelete) end if if nInd >= 0 then nCount = nCount + nInd wf_setdisplay2(5, nInd, ls_display,ls_section, bdelete, 'END') ls_section = 'Applications' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') nInd = f_del_app(-nParentRid, Trans, bDelete) DAT*| ö end if if nInd >= 0 then nCount = nCount + nInd wf_setdisplay2(6, nInd, ls_display,ls_section, bdelete, 'END') ls_section = 'Legal Entities' wf_setdisplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') nInd = f_del_leg_ent_rel(-nParentRid, Trans, bDelete) end if if nInd >= 0 then nCount = nCount + nInd wf_setdisplay2(7, nInd, ls_display,ls_section, bdelete, 'END') end if end if ls_section = 'Sources' wf_setdisDAT*~ öplay2(nCount, nInd, ls_display,ls_section, bdelete, 'START') if Trans.sqlcode = 0 AND bDelete then Delete from Rap_Sources Where Rid = :nParentRid USING Trans; end if // Update the counter if Trans.sqlcode = 0 then nCount = nCount + 1 wf_setdisplay2(8, 1, ls_display,ls_section, bdelete, 'END') end if // Notify the user if something bad happened if Trans.sqlcode <> 0 AND Trans.sqlcode <> 100 then f_db_error(Trans, "f_del_Sources") nCount = -1DAT*€ ö end if return nCount end function public subroutine wf_progress_2 (real pct);////////////////////////////////////////////////////////////////////////////////////////////// // Object : w_sourcebulkdelete // Method : wf_progress // Author : Michael Colombo // Date : 9/9/2003 // // Arg : // Return : (None) // // Desc : Used run progress bar // Usage : Pass in the percentage ie row/rowcount // Ref : // /////////////////////////////////////////////DAT*‚ ö///////////////////////////////////////////////// // Modifications: // Date Author Comments ////////////////////////////////////////////////////////////////////////////////////////////// //
  • ////////////////////////////////////////////////////////////////////////////////////////////// integer resp if pct > 1 then return // if more than 100% then do not display dw_progress_2.setredraw(false) // Only change the percent bar when pct > 0 if pct >= 0 thDAT*„ öen resp = dw_progress_2.setitem(1,"pct",pct) // change the number displayed if resp <> 1 then messagebox(string(resp),string(pct)) // and the size of the bar dw_progress_2.modify("bar.width = "+string(int(pct * ii_bar_width_2))) dw_progress_2.setredraw(true) end if end subroutine public subroutine wf_setdisplay2 (long ncount, long nind, string as_display, string as_section, boolean ab_update, string as_toggle);decimal ld_percent if not ab_update then return choose case upper(as_tDAT*† öoggle) case 'START' st_display.text = as_display + ' - ' + as_section + '...' case 'END' ld_percent = ncount/il_sourcecount wf_progress_2(ld_percent) wf_writelogmessage(" " + string(nind) + " record(s) removed from " + as_section ) end choose return end subroutine on w_sourcebulkdelete.create this.dw_progress_2=create dw_progress_2 this.uo_emissionperiod=create uo_emissionperiod this.cbx_material=create cbx_material this.cbx_creationdate=create cbx_creationdaDAT*ˆ öte this.cbx_datacode=create cbx_datacode this.dw_datacode=create dw_datacode this.cbx_emissionperioddate=create cbx_emissionperioddate this.cb_disable_msg=create cb_disable_msg this.dw_log=create dw_log this.st_end=create st_end this.st_start=create st_start this.cr_start=create cr_start this.cr_end=create cr_end this.uo_pollutant=create uo_pollutant this.rb_deletestreamsonly=create rb_deletestreamsonly this.rb_deletesources=create rb_deletesources this.cb_select=create cb_select thiDAT*Š ös.st_file=create st_file this.st_dir=create st_dir this.sle_dir=create sle_dir this.sle_name=create sle_name this.st_display=create st_display this.cb_close=create cb_close this.cb_runbulkdelete=create cb_runbulkdelete this.dw_progress=create dw_progress this.uo_ss=create uo_ss this.gb_select=create gb_select this.cbx_referencecode=create cbx_referencecode this.gb_interval=create gb_interval this.dw_ref_code=create dw_ref_code this.Control[]={this.dw_progress_2,& this.uo_emissionperiDAT*Œ öod,& this.cbx_material,& this.cbx_creationdate,& this.cbx_datacode,& this.dw_datacode,& this.cbx_emissionperioddate,& this.cb_disable_msg,& this.dw_log,& this.st_end,& this.st_start,& this.cr_start,& this.cr_end,& this.uo_pollutant,& this.rb_deletestreamsonly,& this.rb_deletesources,& this.cb_select,& this.st_file,& this.st_dir,& this.sle_dir,& this.sle_name,& this.st_display,& this.cb_close,& this.cb_runbulkdelete,& this.dw_progress,& this.uo_ss,& this.gb_select,& this.cDAT*Ž öbx_referencecode,& this.gb_interval,& this.dw_ref_code} end on on w_sourcebulkdelete.destroy destroy(this.dw_progress_2) destroy(this.uo_emissionperiod) destroy(this.cbx_material) destroy(this.cbx_creationdate) destroy(this.cbx_datacode) destroy(this.dw_datacode) destroy(this.cbx_emissionperioddate) destroy(this.cb_disable_msg) destroy(this.dw_log) destroy(this.st_end) destroy(this.st_start) destroy(this.cr_start) destroy(this.cr_end) destroy(this.uo_pollutant) destroy(this.rbDAT* ö_deletestreamsonly) destroy(this.rb_deletesources) destroy(this.cb_select) destroy(this.st_file) destroy(this.st_dir) destroy(this.sle_dir) destroy(this.sle_name) destroy(this.st_display) destroy(this.cb_close) destroy(this.cb_runbulkdelete) destroy(this.dw_progress) destroy(this.uo_ss) destroy(this.gb_select) destroy(this.cbx_referencecode) destroy(this.gb_interval) destroy(this.dw_ref_code) end on event open;wf_enableobjects(false) end event type dw_progress_2 from datawinDAT*’ ödow within w_sourcebulkdelete integer x = 2062 integer y = 1504 integer width = 960 integer height = 96 integer taborder = 70 string dataobject = "d_progress_buttonface" boolean border = false boolean livescroll = true end type event constructor;string tmp, command, bar_x, bar_y This.insertrow(0) tmp = This.describe("pct.width pct.x pct.y") // how wide is the display area ? ii_bar_width_2 = integer(f_get_token(tmp,'~n')) bar_x = f_get_token(tmp,'~n') bar_y = tmp // set the sizeDAT*” ö and position of the progress bar command = "bar.width = 0 bar.x = "+bar_x+" bar.y = "+bar_y tmp = dw_progress_2.modify(command) if len(tmp) > 0 then messagebox(command,tmp) end event type uo_emissionperiod from u_emis_period_no_end_date within w_sourcebulkdelete event destroy ( ) integer x = 160 integer y = 524 integer taborder = 130 boolean border = false end type on uo_emissionperiod.destroy call u_emis_period_no_end_date::destroy end on type cbx_material from checkbox witDAT*– öhin w_sourcebulkdelete integer x = 1440 integer y = 832 integer width = 823 integer height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 string text = "Material" end type event clicked;//uo_pollutant.enabled = checked end event type cbx_creationdate from checkbox within w_sourcebulkdelete integer DAT*˜ öx = 1435 integer y = 444 integer width = 823 integer height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 string text = "Creation Date Range" end type event clicked;//em_start.displayonly = checked //em_end.displayonly = checked end event type cbx_datacode from checkbox within w_sourcebulkdelete iDAT*š önteger x = 87 integer y = 1132 integer width = 73 integer height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 67108864 end type event clicked;//dw_datacode.enabled = checked end event type dw_datacode from u_dw_data_code within w_sourcebulkdelete integer x = 279 integer y = 1120 integer width = 1029 intDAT*œ öeger taborder = 30 end type type cbx_emissionperioddate from checkbox within w_sourcebulkdelete integer x = 82 integer y = 444 integer width = 823 integer height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 string text = "Emission Period Date Range" end type event clicked;//uo_emissionperiod.enablDAT*ž öed = checked end event type cb_disable_msg from commandbutton within w_sourcebulkdelete integer x = 37 integer y = 2352 integer width = 626 integer height = 88 integer taborder = 110 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "Arial" string text = "&Disable Screen Msgs" end type event clicked;if not ib_disable_msgs then cb_disable_msg.text = '&Enable Screen MsgDAT*  ös'; dw_log.object.line.visible = false ib_disable_msgs = true; else cb_disable_msg.text = '&Disable Screen Msgs'; dw_log.object.line.visible = true ib_disable_msgs = false; end if end event type dw_log from uo_loadlog within w_sourcebulkdelete integer x = 37 integer y = 1616 integer width = 2981 integer height = 704 integer taborder = 60 string dataobject = "d_ds_log_file" boolean minbox = false boolean hscrollbar = true boolean resizable = false end type event pDAT*˘ örintpage;call super::printpage;return 0 end event type st_end from statictext within w_sourcebulkdelete integer x = 1600 integer y = 716 integer width = 169 integer height = 72 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 boolean enabled = false string text = "End:" alignment alignment = right! boolean focusrectangle = false end type DAT*¤ ö type st_start from statictext within w_sourcebulkdelete integer x = 1586 integer y = 604 integer width = 183 integer height = 72 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 boolean enabled = false string text = "Start:" alignment alignment = right! boolean focusrectangle = false end type type cr_start from editmask within w_sourcebDAT*Ś öulkdelete integer x = 1778 integer y = 596 integer width = 503 integer height = 84 integer taborder = 120 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 borderstyle borderstyle = stylelowered! maskdatatype maskdatatype = datemask! string mask = "mmm dd, yyyy" boolean spin = true double increment = 1 string minmax = "JAN 1, 1900~~DEC 31, 2100" end type event coDAT*¨ önstructor;date ld_start_date ld_start_date = Date( "Jan 1, " + String( Year( Today() ) - 1 ) ) // Get default start date of emission period from rapids.ini. // If not found, set date to the first date of the previous year This.Text = ProfileString(gs_iniFile, "calculation period", & "start_date", String(ld_start_date, "mmm dd, yyyy")) end event event modified;// Check to make sure start date is valid IF NOT IsDate(This.Text) THEN MessageBox( "Emission Estimator", "Start Date iDAT*Ş ös Invalid", & Exclamation!, OK! ) cr_start.SetFocus() END IF end event type cr_end from editmask within w_sourcebulkdelete integer x = 1778 integer y = 712 integer width = 503 integer height = 84 integer taborder = 70 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 borderstyle borderstyle = stylelowered! maskdatatype maskdatatype = datemask! sDAT*Ź ötring mask = "mmm dd, yyyy" boolean spin = true double increment = 1 string minmax = "jan 1, 1900~~dec 31, 2100" end type event constructor;date ld_end_date ld_end_date = Date( "Dec 31, " + String( Year( Today() ) - 1 ) ) // Get default end date of emission period from rapids.ini. // If not found, set date to the last date of the previous year This.Text = ProfileString(gs_iniFile, "calculation period", & "end_date", String(ld_end_date, "mmm dd, yyyy")) end event on modified;//DAT*Ž ö Check to make sure end date is valid IF NOT IsDate(This.Text) THEN MessageBox( "Emission Period", "End Date is Invalid") This.SetFocus() END IF end on type uo_pollutant from u_pollutant within w_sourcebulkdelete integer x = 1577 integer y = 892 integer width = 1390 integer taborder = 90 boolean border = false end type on uo_pollutant.destroy call u_pollutant::destroy end on type rb_deletestreamsonly from radiobutton within w_sourcebulkdelete integer x = 1458 integer DAT*° öy = 360 integer width = 1399 integer height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 67108864 string text = "Delete only stream activities for selected source(s)" end type event clicked;if not ib_delsourceact then wf_enableobjects(checked) ib_delsource = not checked ib_delsourceact = checked //elseDAT*˛ ö // ib_delsource = checked // ib_delsourceact = not checked end if end event type rb_deletesources from radiobutton within w_sourcebulkdelete integer x = 1458 integer y = 268 integer width = 1294 integer height = 76 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 67108864 string text = "Delete selected source(s) DAT*´ öand all child records" boolean checked = true end type event clicked;if not ib_delsource then wf_enableobjects(not checked) ib_delsource = checked ib_delsourceact = not checked //else // ib_delsource = not checked // ib_delsourceact = checked end if end event type cb_select from commandbutton within w_sourcebulkdelete integer x = 2437 integer y = 160 integer width = 370 integer height = 84 integer taborder = 50 integer textsize = -8 integer weight = 700 fontpitch DAT*ś öfontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" string text = "Select..." end type event clicked;int li_Start, li_Index string ls_Dir string ls_FullFile, ls_file_ext, ls_file_filter ls_fullfile = is_filename // Based on export type selected, variable is set and types of files // to export are set to variables ls_file_ext = '' ls_file_filter = "All Files (*.*),*.*" if GetFileSaveName("Select Log Directory And File", ls_FullFile, & is_FDAT*¸ öileName, ls_file_ext, ls_file_filter) = 1 then // if is_file_system = "RAPIDS - NEI Export" then // if fileExists(ls_FullFile) then // cb_show_nei_log.enabled = true // else // cb_show_nei_log.enabled = false // end if // end if // Parse out the directory name li_Index = 0 DO li_Start = li_Index li_Index = Pos(ls_FullFile, is_FileName, li_Start+1) LOOP WHILE li_Index > 0 ls_Dir = LEFT(ls_FullFile, li_Start - 1) sle_dir.Text = trim(ls_Dir) is_directory =DAT*ş ö trim(ls_Dir) setProfileString(gs_iniFile, "bulk_delete", "dir", is_directory) // Get rid of the file extension li_Start = Pos(is_FileName, ".") if li_Start > 1 then is_FileName = LEFT(is_FileName, li_Start - 1) end if sle_Name.Text = is_FileName // Update the export list with the new file names // lb_ExportList.TriggerEvent("SetList") end if end event type st_file from statictext within w_sourcebulkdelete integer x = 1472 integer y = 172 integer width = 293 integDAT*ź öer height = 68 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 boolean enabled = false string text = "File Name:" alignment alignment = right! boolean focusrectangle = false end type type st_dir from statictext within w_sourcebulkdelete integer x = 1472 integer y = 76 integer width = 265 integer height = 68 integer textsize = -8 integerDAT*ž ö weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 boolean enabled = false string text = "Directory:" alignment alignment = right! boolean focusrectangle = false end type type sle_dir from singlelineedit within w_sourcebulkdelete integer x = 1774 integer y = 68 integer width = 1033 integer height = 76 integer taborder = 140 integer textsize = -8 integer weight = 700 fDAT*Ŕ öontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 16777215 boolean enabled = false boolean displayonly = true borderstyle borderstyle = stylelowered! end type event constructor; // Get export directory from ini file This.Text = trim(ProfileString(gs_iniFile, "bulk_delete", "dir", "")) is_directory = This.Text if is_directory <> "" then if not fileExists(is_directory) then this.text = "" DAT* ö is_directory = "" end if end if end event type sle_name from singlelineedit within w_sourcebulkdelete integer x = 1774 integer y = 160 integer width = 448 integer height = 76 integer taborder = 40 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 boolean enabled = false boolean autohscroll = false boolean displayonly = true borderstyle borderstyle = stylelowDAT*Ä öered! end type on constructor;this.Text = is_FileName end on type st_display from statictext within w_sourcebulkdelete integer x = 69 integer y = 1516 integer width = 1038 integer height = 60 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "Arial" long textcolor = 33554432 long backcolor = 67108864 boolean enabled = false string text = "Ready" boolean focusrectangle = DAT*Ć öfalse end type type cb_close from commandbutton within w_sourcebulkdelete integer x = 2661 integer y = 2352 integer width = 366 integer height = 88 integer taborder = 180 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "Arial" string text = "Close" end type event clicked;close(parent) end event type cb_runbulkdelete from commandbutton within w_sourcebulkdelete integeDAT*Č ör x = 2272 integer y = 2352 integer width = 370 integer height = 88 integer taborder = 170 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "Arial" string text = "Run" end type event clicked;string ls_text ls_text = this.text wf_runbulkdelete() end event type dw_progress from datawindow within w_sourcebulkdelete integer x = 1093 integer y = 1504 integer width = 9DAT*Ę ö60 integer height = 96 integer taborder = 20 string dataobject = "d_progress_buttonface" boolean border = false boolean livescroll = true end type event constructor;string tmp, command, bar_x, bar_y This.insertrow(0) tmp = This.describe("pct.width pct.x pct.y") // how wide is the display area ? ii_bar_width = integer(f_get_token(tmp,'~n')) bar_x = f_get_token(tmp,'~n') bar_y = tmp // set the size and position of the progress bar command = "bar.width = 0 bar.x = "+bar_x+" bar.y = DAT*Ě ö"+bar_y tmp = dw_progress.modify(command) if len(tmp) > 0 then messagebox(command,tmp) end event type uo_ss from u_class_ss_client within w_sourcebulkdelete integer x = 59 integer y = 20 integer height = 392 integer taborder = 10 boolean border = true long backcolor = 80269524 borderstyle borderstyle = stylelowered! end type on uo_ss.destroy call u_class_ss_client::destroy end on event constructor;call super::constructor;iclass_group.of_setdatalevel(iclass_group.ii_sourcelDAT*Î öevel) end event type gb_select from groupbox within w_sourcebulkdelete integer x = 1463 integer y = 4 integer width = 1390 integer height = 256 integer taborder = 160 integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 string text = "Select Log File Directory and File" end type type cbx_referencecode from chDAT*Đ öeckbox within w_sourcebulkdelete integer x = 91 integer y = 1236 integer width = 78 integer height = 76 boolean bringtotop = true integer textsize = -8 integer weight = 700 fontcharset fontcharset = ansi! fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 33554432 long backcolor = 67108864 end type event clicked;//dw_ref_code.enabled = checked end event type gb_interval from groupbox within w_sourcebulkdelete inteDAT*Ň öger x = 1550 integer y = 524 integer width = 805 integer height = 292 integer taborder = 150 integer textsize = -8 integer weight = 700 fontpitch fontpitch = variable! fontfamily fontfamily = swiss! string facename = "MS Sans Serif" long textcolor = 8388608 long backcolor = 80269524 string text = "Calculation Period" end type type dw_ref_code from u_dw_ref_code within w_sourcebulkdelete integer x = 82 integer y = 1228 integer width = 1221 integer height = 112 integer taborder DAT*ę= 100 string dataobject = "d_reference_codes" end type event constructor;DataWindowChild dwc // Retrieve data for reference code dddw //Get the handle of the child datawindow if This.GetChild("code", dwc) = -1 then MessageBox('u_dw_ref_code', "Application Error:~nReference Code - " + & "Not a DataWindowChild.~nContact your technical support.") return end if dwc.SetTransObject(SQLCA) dwc.Retrieve() This.SetTransObject(SQLCA) This.InsertRow(0) end event DAT*Ö ö2€@€ 2  2  xywidthheighttextsizeweightfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle,˙˙2˙˙ \˙˙ ˇ˙˙H˙˙ř˙˙˙˙˙"ź˙˙)$€˙˙3%€˙˙>”€˙˙G€˙˙QÔĐČ˙˙[Č˙˙c€˙˙h˝1€DAT*Ř ö˙˙r˝] o2\ˇH ř˙˙˙ź@#€$€%€”€ €ÔĐČČ€˝1€2€@€˝ú8ź3ľ@˝3$źCľ@˝C81<Yź(ľ@˝(8z'źľ@˝8†,=68 083038>0ź)ľ@˝)8źëľ@˝ë8…,:•ŕ1DAT*Ú öî,:L$d Ćd+ ld_start_dategs_inifile::message<˙˙ ˙˙=@˙˙!:@g€T Jan 1, textcalculation periodstart_datemmm dd, yyyy˙˙ L š$‘#f808+0:)@:@źľ@˝8L$)`8,:•€1Ž,:h$Jfd ::message˙˙:DAT*Ü ö@g€p textEmission EstimatorStart Date is Invalidcr_startA55€setfocusŔT˙˙ L ` h $5€,5€L$,2  +constructor+modified(˙˙Ŕ˙˙Ŕ2 Ž xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextcolorborderstylemaskdatatypemaskspinincrementminmaxT˙˙ň˙˙ T˙˙ ÷˙˙TDAT*Ţ ö˙˙x˙˙"ř˙˙˙˙˙+ź˙˙2$€˙˙<%€˙˙G”€˙˙P˙˙Z€˙˙f7€˙˙s€˙˙xľ˙˙}h€˙˙‡€] oňT÷Tx Eř˙˙˙ź#€$€%€”€ @@ @DAT*ŕ ö1€6€8€1€@7€€ľ `€€>Ö˙˙˙˙$€L˙˙oÖ˙˙˙˙,€˙˙ú8ź3ľ@˝3$źCľ@˝C81<Yź(ľ@˝(8z'źľ@˝8†,=68 083038<0ź)ľ@˝)8źëľ@˝ë8…,:•ŕ1î,:L$DAT*â öd Ćd) ld_end_dategs_inifile::message<˙˙ ˙˙=@˙˙:@g€T Dec 31, textcalculation periodend_datemmm dd, yyyy˙˙ L „$‘#P808(0źľ@˝8)H8,:•j1x,:P$>Pd ::message˙˙:@g€X textEmission PeriodEnd DDAT*ä öate is InvalidsetfocusŔ<˙˙ H P $8€,8€L$,2  +constructor+modified(˙˙Ŕ˙˙Ŕ2 Ž xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextcolorborderstylemaskdatatypemaskspinincrementminmaxT˙˙ň˙˙ Č˙˙ ÷˙˙T˙˙F˙˙"ř˙˙˙˙˙+ź˙˙2$€˙˙<DAT*ć ö%€˙˙G”€@˙˙P˙˙Z€˙˙f7€˙˙s€˙˙xľ˙˙}Ŕ€@˙˙‡p€] oňČ÷TF Eř˙˙˙ź#€$€%€”€ @@ @1€6€Œ€1€@7€€DAT*č öľ ¸€p€>Ö˙˙˙˙$€L˙˙oÖ˙˙˙˙,€˙˙9€8d  destroy:€2  +destroy˙˙Ŕ2 " xywidthtaborderborderd˙˙)˙˙ |˙˙ n˙˙Z˙˙] o)|n`ZDAT*ę ö @@€Č€1€ÔĐČ    @€ Ŕ€  ;€ <€ =€ >€ ?€ @€ A€đ€3ô€3'Ô˙˙˙˙€˙˙˙˙ž$#j($)D8\d$#}lt$},:•„1’,:|$DAT*ě ö0N jd ::message˙˙:@g€„@ ib_delsourceactPchecked wf_enableobjectszŔ0ib_delsourceLO P ˙˙ ( D \ d l t | "C€"2  +clicked˙˙Ŕ2 l xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolortext˙˙˛˙˙ hDAT*î ö˙˙ w˙˙L˙˙ř˙˙˙˙˙"ź@˙˙)#€˙˙5$€˙˙?%€˙˙J”€˙˙S€˙˙]˙˙g@€] o˛hwL ř˙˙˙ź#€$€%€”€ @@€@@€KÖ˙˙˙˙"€DAT*đ ö˙˙ $#l($#)D8LT$}lt$#},:•†1”,:|$2N ld ::message˙˙:@g€„@ ib_delsourcectOchecked wf_enableobjectszŔ0O ib_delsourceact\P ˙˙ ( D L T l t | "D€"2  +clicked˙DAT*ň ö˙Ŕ2 t xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolortextchecked˙˙˛˙˙ ˙˙ ˙˙L˙˙ř˙˙˙˙˙"ź˙˙)#€˙˙5$€˙˙?%€˙˙J”€˙˙S˙˙]˙˙gu€˙˙lś] o˛ L DAT*ô öř˙˙˙ź#€$€%€”€ @u€ś@@€KÖ˙˙˙˙"€˙˙ˆ$6…80…80…810ŠP66źUľ@˝Uśś81<ĽT1‹}}X$1<RźĹľ@˝Ĺ8‹}1<Ţ1<YźoľDAT*ö ö@˝o8…h$xŁ…Ł…,=68˜08¤0¨$6źľ@˝8°$8¸źÄľ@˝Ä8‹}1<Ĺ*źÄ$1<Yźoľ@˝o8…Ř$ŕč$6…,:•n1|,:đ$  * <˘Žě. P!h$¨%Ř&ě(*.Td] li_startli_indexls_dirls_fullfilels_file_extDAT*ř öls_file_filtergs_inifile::message ˙˙˙˙˙˙ ˙˙! ˙˙- ˙˙9 ˙˙H=@˙˙S:@g€řp is_filenameKAll Files (*.*),*.*Select Log Directory And FileKKsle_dir`=I€textpis_directory€Jbulk_deletedir€JK.KKsle_nameĚ>J€pK˙˙ P X h x  DAT*ú ö¨ ° ź Ä Ř ŕ č đ "E€"2  +clickedtype˙˙ fŔ2 U xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextÜ˙˙… ˙˙  ˙˙ r˙˙T˙˙2˙˙"ř˙˙˙˙˙+ź˙˙2$€˙˙<%€˙˙G”€˙˙PĽ€] o…  rTDAT*ü ö2 ř˙˙˙ź@#€$€%€”€ @Ľ€KÖ˙˙˙˙"€˙˙2  2  xywidthheighttextsizeweightfontpitchfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle,˙˙Ŕ˙˙ Ź˙˙ %˙˙D˙˙ř˙˙˙˙˙"ź˙˙)$€˙DAT*ţ ö˙3%€˙˙>”€˙˙G€˙˙QÔĐČ˙˙[Č˙˙cŻ€˙˙hÁ1€˙˙rÁ] oŔŹ%D ř˙˙˙ź@#€$€%€”€ €ÔĐČČŻ€Á1€2€@€Á2  2  xywidthheighttextsizeweightfontpitchDAT* öfontfamilyfacenametextcolorbackcolorenabledtextalignmentfocusrectangle,˙˙Ŕ˙˙ L˙˙ ˙˙D˙˙ř˙˙˙˙˙"ź˙˙)$€˙˙3%€˙˙>”€˙˙G€˙˙QÔĐČ˙˙[Č˙˙cş€˙˙hÁ1€˙˙rÁ] oŔL D ř˙˙˙ź@#€$€DAT* ö%€”€ €ÔĐČČş€Á1€2€@€Á,=6808$08(0źëľ@˝ë8Ł…8@$6…H$8(şäP$6ź3ľ@˝38#äX8(0…`8(0…,:•ţ1 ,:h$Llˆ° Ę äd gs_inifile::message(DAT* ö˙˙=@˙˙:@g€p@ text$bulk_deletediris_directory)J)J)J)J˙˙ 8 @ H P X ` h $I€L$2  +constructor˙˙Ŕ2 „ xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextcolorbackcolorenableddisplayonlyborderstyle,˙˙î˙˙ D˙˙ ˙˙DAT* öL˙˙Œ˙˙"ř˙˙˙˙˙+ź˙˙2$€˙˙<%€˙˙G”€˙˙P˙˙Z˙˙˙˙˙d˙˙˙l˙˙˙x˙€] oîD LŒ Eř˙˙˙ź@#€$€%€”€ ˙˙˙˙ @@6€˙˙€@DAT* ö>Ö˙˙˙˙$€L˙˙T$$6…,:•:1H,:,$ d ::message˙˙:@g€4 text,is_filenameK˙˙ $ , $J€L$2  +constructor˙˙Ŕ2 † xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextcolorenabledautohscrolldisplayonDAT* ölyborderstyle,˙˙î˙˙  ˙˙ Ŕ˙˙L˙˙(˙˙"ř˙˙˙˙˙+ź˙˙2$€˙˙<%€˙˙G”€@˙˙P˙˙Z˙˙b€˙˙n˙˙z€] oî ŔL( Eř˙˙˙ź@#€$€%€”€ @DAT* ö @6€€@>Ö˙˙˙˙$€L˙˙2  2 ƒ xywidthheighttextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolorenabledtextfocusrectangle,˙˙E˙˙ ě˙˙ ˙˙<˙˙ř˙˙˙˙˙"ź˙˙)#€˙˙5$€˙˙?%€˙˙DAT* öJÚ€@˙˙S˙˙]˙˙g€˙˙oĹ€˙˙t ] oEě< ř˙˙˙ź#€$€%€Ú€ Ĺ€1€2€@€ Jźľ@˝8,:•01>,:$d ::messageDAT* ö˙˙:@g€ ˙˙ "L€"2  +clickedtype˙˙frŔ2 a xywidthheighttabordertextsizeweightfontcharsetfontpitchfontfamilyfacenametextđ˙˙e ˙˙ 0 ˙˙ n˙˙X˙˙´˙˙"ř˙˙˙˙˙+ź˙˙2#€˙˙>$€˙˙H%€˙˙SÚ€˙˙\Ë€] oe 0 DAT* önX´ ř˙˙˙ź#€$€%€Ú€ @Ë€KÖ˙˙˙˙"€˙˙^$6…),8,:•D1R,:4$*d ls_text::message(˙˙ ˙˙:@g€< textwf_runbulkdeletexŔ˙˙ , 4 "M€DAT* ö"2  +clickedtype˙˙kdŔ2 a xywidthheighttabordertextsizeweightfontcharsetfontpitchfontfamilyfacenametextđ˙˙ŕ˙˙ 0 ˙˙ r˙˙X˙˙Ş˙˙"ř˙˙˙˙˙+ź˙˙2#€˙˙>$€˙˙H%€˙˙SÚ€˙˙\ä€] oŕ0 rXŞ ř˙˙˙DAT* öź#€$€%€Ú€ @ä€KÖ˙˙˙˙"€˙˙r 1)88)<8…TŠ8\0ź€˝ś8źeľ@˝e8}Š8\0ź€˝ś8…6…8^z%8uz&z&…Œ$)œ8…—1Ĺ>66źľ@˝8,:•X1fDAT* ö,:¤$6|¨ ¸ ŕ  >d* tmpcommandbar_xbar_y::messaged˙˙ ˙˙ ˙˙ ˙˙ ˙˙ :@g€Ź0 insertrow(Ŕpct.width pct.x pct.ydescribejŔ2ii_bar_widthDH bar.width = 0 bar.x = bar.y = dw_progressBN€modifyzŔ”˙˙ < T Œ œ ¤ %N€L%2 ! +constructorf_get_tokDAT* öen<type˙˙ssŔm da˙˙;itŔw_so˙˙;leŔ2 ? xywidthheighttaborderdataobjectborderlivescroll ˙˙E˙˙ ŕ˙˙ Ŕ˙˙`˙˙˙˙"T€˙˙-ź˙˙4ź] oEŕŔ` @ T€ź źDAT* ö@€ €>Ö˙˙˙˙%€L˙˙O€8d  destroyl"O€8$$/)D8,:•R1`,:L$8d& ancestorreturnvalue::message(˙˙˙˙:@g€T constructoriclass_group,$€,$€of_setdatalevel'Ŕ4˙˙$ , D LDAT* ö P€"P€L"¨#2  +destroy+constructor(˙˙Ŕ˙˙Ŕ2 9 xyheighttaborderborderbackcolorborderstyleŒ˙˙;˙˙ ˙˙ ˆ˙˙ ˙˙˙˙#ÔĐČ˙˙-Č€] o;.ˆ  @@€Ô€1€ÔĐČ    DAT* öČ€˙˙˙    Q€ R€ S€ T€ U€ V€ W€ X€ Y€ Z€ [€\€'Ô˙˙˙˙€˙˙˙˙>Ö˙˙˙˙"€L˙˙2  2 u xywidthheighttabordertextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolortext˙˙ˇ˙˙ DAT*" ö˙˙ n˙˙˙˙ ˙˙"ř˙˙˙˙˙+ź˙˙2#€˙˙>$€˙˙H%€˙˙S”€˙˙\€˙˙fÔĐČ˙˙pü€] oˇn  ř˙˙˙ź#€$€%€”€ €ÔĐČ@ü€@€4,:•1(,:DAT*$ ö$d ::message˙˙:@g€ ˙˙ "_€"2  +clicked˙˙Ŕ2 r xywidthheightbringtotoptextsizeweightfontcharsetfontpitchfontfamilyfacenametextcolorbackcolor˙˙[˙˙ Ô˙˙ N˙˙L˙˙˙˙$ř˙˙˙˙˙-ź˙˙4#€˙˙@$€˙˙J%€DAT*& ö˙˙U”€˙˙^˙˙h] o[ÔNL ř˙˙˙ź#€$€%€”€ @ @@€KÖ˙˙˙˙"€˙˙2  2 i xywidthheighttabordertextsizeweightfontpitchfontfamilyfacenametextcolorbackcolortextDAT*( ö˙˙˙˙ ˙˙ %˙˙$˙˙–˙˙"ř˙˙˙˙˙+ź˙˙2$€˙˙<%€˙˙G”€˙˙P€˙˙ZÔĐČ˙˙d€] o %$– ř˙˙˙ź@#€$€%€”€ €ÔĐČ@€@€8Š)śDAT** ö81˙˙˙˙<ĽŠ8 08.8Sz%źľ@˝8,:•v1„,:Œ$,-)¤8)¸8,-)Ŕ81)Ô8,:•ţ1 ,:Ü$. \ Š ˘śĚäd dwc::messagesqlca<˙˙ €˙˙ :@g€˙˙-@c€ä8 codegetchildoŔ u_dw_ref_codeApplication Error: Reference Code - Not a DataWindowChiDAT*, öld. Contact your technical support.tv˙˙settransobjectn¤Ŕ”retrieveobj|ŔŹ^Ŕ”insertrowR(ŔČ˙˙ Œ ¤ ¸ Ŕ Ô Ü %b€L%2  +constructor˙˙Ŕ2 - xywidthheighttaborderdataobjectx˙˙R˙˙ Ě˙˙ Ĺ˙˙p˙˙d˙˙"2€] oRĚĹpd DAT*Đ@ 2€  @€ €>Ö˙˙˙˙%€L˙˙DAT*0 ö˙˙;˙˙ 0˙˙ ň ˙˙d˙˙˙˙#€˙˙. €] o;0ň d€   €€€€$€1€  @@€@ €˙˙˙˙&DAT*2 ö€ą˙˙˙˙˙˙1€˙˙ ˙˙˙˙x€˙˙˙˙ ˙˙˙˙€˙˙˙˙2  2 = ywidthheighttaborderdataobjectborderlivescrollŒ ˙˙t˙˙ ˇ s˙˙ ie˙˙lf˙˙ L€lm˙˙+Áhi˙˙2Á] oˇ   DAT*‡@ L€Á Á@€ €DAT*6 ö˙Ŕ2  ] o @€€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)X8d ` parentwindow p@getactivesheet7Ŕ edit_actiDAT*8 öonspastetriggereventŔK 0 X b80…,840…h9}x9}4Hd € text&Pastemicrohelp Paste the text from clipboardtoolbaritemvisibleR enabledp , h x !€!€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] DAT*: öo @¨€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- "€2  +create˙˙Ŕ2  ] o @DAT*< öĐ€1€ € @   €€˙˙˙˙€˙˙˙˙J$)0888018E0)`8d h parentwindow p@getactivesheet7Ŕ edit_actionscopy_recordtriggereventŔQ 0 ` Ę80…0880…x8€DAT*> ö0…œ8€0…´8ź0…Ü9}ř1‹}9}4Nh‚– °d @ textCopy &Recordmicrohelp% Copy the current record to the structuretoolbaritemdownnamea copyrec.bmptoolbaritemnameŒ toolbaritemtext¤Copy Recordtoolbaritemvisible€Č toolbaritemspaceäenabled 0 x œ ´DAT*@ ö Ü ř  #€#€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ř€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)`8DAT*B öd h parentwindow p@getactivesheet7Ŕ edit_actionspaste_recordtriggereventeŔR 0 ` °80…0880…p8x0…˜8x0…°8¸0…Ř9}č9}4Nh‚–d đ8 textP&aste Recordmicrohelp& Paste the record from the structuDAT*D öretoolbaritemdownname\ pasterec.bmptoolbaritemnameemn… toolbaritemtext Paste RecordtoolbaritemvisibleĹ enabledŕ 0 p ˜ ° Ř č $€$€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ €1€ € @   €€&DAT*F ö˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- %€2  +create˙˙Ŕ2  ] o @H€1€ € @   €€˙˙˙˙€˙˙DAT*H ö˙˙J$)0888018E0)\8d d parentwindow p@getactivesheet7Ŕ edit_actionsinserttriggereventŔL 0 \ °80…,840…\8d0…|8d0…”8œ0…¸9}Č9}4Nh‚–d Đ8DAT*J ö text&Insertmicrohelp Insert a new recordtoolbaritemdownnameH Insert!toolbaritemnamel toolbaritemtext„InserttoolbaritemvisibleŁ enabledŔ , \ | ” ¸ Č &€&€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @p€1€ € @   DAT*L ö€€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙°80…,840…d8l0…„8l0…œ8¤0…Ŕ9}Đ9}4Nh‚–d Ř8 textD&eletemicrohelp Delete the current recordtoolbaritemdownnameDAT*N öN Clear!toolbaritemnames toolbaritemtextŒDeletetoolbaritemvisibleŤ enabledČ , d „ œ Ŕ Đ J$)0888018E0)\8d d parentwindow p@getactivesheet7Ŕ edit_actionsdeletetriggereventdowŔL 0 \ '€'€2  +create+clicked(˙˙Ŕ˙˙DAT*P öŔ2  ] o @˜€1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙z80…(*0‡@*H‡X*`‡p*x‡ˆ*‡¤*ʇŔ*ȇDAT*R öŘ*ŕ‡ô*ü‡*‡,*4‡H*P‡`*h‡|*„‡˜* ‡°*¸‡Ô*܇ěô$ü$$ $$$$$,$4$<$D$L$T$\$d$l$t$˛€ |0F\rˆ ž ´ Ę ŕ ö DAT*T ö"8Ndzd |¨ text&Viewm_first)€)€m_prior8*€8*€m_nextP+€P+€m_lasth,€h,€m_-6€-€€-€m_filter˜.€˜.€m_showall´/€´/€m_-9MaĐ0€Đ0€m_freeformč1€č1€m_tabular2€2€m_current  3€ 3€m_history=<!4€<4€m_-7‚@X"5€X5€m_expand€`@p#6€p6€m_originaleŒ$7€Œ7€m_-8¨%8€¨8€DAT*V öm_rapidsenterpriseeŔ&9€Ŕ9€item) fä”@)€8*€P+€h,€€-€˜.€´/€Đ0€č1€2€  3€<!4€X"5€p#6€Œ$7€¨%8€Ŕ&9€ ( 0@ HX `p xˆ ¤ ŹŔ ČŘ ŕô ü , 4H P` h| „˜  ° ¸Ô Üě ô ü  DAT*X ö    $ , 4 < D L T \ d l t ô$ $0$@$P$d$x$ˆ$œ$°$Ä$Ř$č$ü$$ $<$*8FT b p ~ Œ š¨śÄŇŕd Dˆ m_first)€m_prior*€DAT*Z öm_next€(+€m_last8,€m_-6€H-€m_filterX.€m_showalll/€m_-9€0€m_freeform1€m_tabular¤2€m_current¸ 3€m_history€Ě!4€m_-7ŕ"5€m_expandđ#6€m_original$7€m_-8%8€m_rapidsenterprise(&9€  0 @ P d x ˆ œ ° Ä Ř č ü    < (€(€2  +create+destroy(˙˙Ŕ˙˙DAT*\ öŔ2  m_firstm_priorm_nextm_lastm_-6m_filterm_showallm_-9m_freeformm_tabularm_currentm_historym_-7m_expandm_originalm_-8m_rapidsenterpriseT˙˙ )€˙˙ *€˙˙ +€˙˙ ,€˙˙& -€˙˙+ .€˙˙4 /€˙˙> 0€˙˙C 1€€˙˙N 2€˙˙X 3€€˙˙b 4€˙˙l 5€€˙˙q 6€˙˙z 7€˙˙… DAT*^ ö8€˙˙Š 9€] o @Ŕ€1€ € @   €€ )€ *€ +€ ,€ -€ .€ /€ 0€ 1€ 2€ 3€ 4€ 5€ 6€ 7€ 8€ 9€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)XDAT*` ö8d ` parentwindow)€ p@getactivesheet€7Ŕ edit_actionsfirsttriggereventŔK 0 X Ę80…,840…`8h0…„8h0…œ8¤0…Ŕ9}Ü1‹}ě9}4Nh‚– °d ô@ text&Firstmicrohelp Go tDAT*b öo the first recordtoolbaritemdownnameK VCRFirst!toolbaritemname°r toolbaritemtextŒFirsttoolbaritemvisible$Ş toolbaritemspaceŔČenabledä , ` „ œ Ŕ Ü ě )€)€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @č€1€ € @   DAT*d ö€€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)X8d ` parentwindow p@getactivesheet7Ŕ edit_actionspriortriggereventŔK 0 X °80…,840…d8l0…ˆ8l0… DAT*f ö8¨0…Ä9}Ô9}4Nh‚–d Ü8 text&Priormicrohelp Go to the previous recordtoolbaritemdownnameN VCRPrior!toolbaritemnamev toolbaritemtextPriortoolbaritemvisibleěŽ enabledĚ , d ˆ   Ä Ô *€*€2  +clicked+create(˙˙Ŕ˙˙Ŕ2 DAT*h ö ] o @€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)X8d ` parentwindow p@getactivesheet7Ŕ edit_actionsnexttriggereventeDAT*j öŔJ 0 X °80…(800…\8d0…€8d0…˜8 0…¸9}Č9}4Nh‚–d Đ8 text&Nextmicrohelp Go to the next recordtoolbaritemdownnameF VCRNext!toolbaritemnamem toolbaritemtextˆNexttoolbaritemvisibleĽ enabledŔ ( \DAT*l ö € ˜ ¸ Č +€+€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @8€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)XDAT*n ö8d ` parentwindow p@getactivesheet7Ŕ edit_actionslasttriggereventmŔJ 0 X °80…(800…\8d0…€8d0…˜8 0…¸9}Č9}4Nh‚–d Đ8 text&Lastmicrohelp Go to the last recordtoolbaritemdownnameDAT*p öF VCRLast!toolbaritemnamem toolbaritemtextˆLasttoolbaritemvisibleĽ enabledŔ ( \ € ˜ ¸ Č ,€,€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @`€1€ € @   €€&˙˙˙˙€˙˙DAT*r ö˙˙˙˙˙˙€˙˙˙˙ 80…d  text- -€2  +create˙˙Ŕ2  ] o @ˆ€1€ € @   €€˙˙˙˙€˙˙˙˙JDAT*t ö$)0888018E0)\8d d parentwindow p@getactivesheet7Ŕ edit_actionsselecttriggereventŔL 0 \ °80…0880…\8d0…|8d0…”8œ0…¸9}Č9}4Nh‚–d Đ8 textF&ilter.DAT*v ö..microhelp# Filter recordstoolbaritemdownnameG Search!toolbaritemnamel toolbaritemtext„FiltertoolbaritemvisibleeŁ enabledŔ 0 \ | ” ¸ Č .€.€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @°€1€ € @   DAT*x ö€€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)\8d d parentwindow p@getactivesheet7Ŕ edit_actionsselectalltriggereventŔO 0 \ °80…,840…\8d0…€8d0…˜8 0…DAT*z öź9}Ě9}4Nh‚–d Ô8 text&Show Allmicrohelp" Show all recordstoolbaritemdownnameE Selectall!toolbaritemnameo toolbaritemtextˆShow AlltoolbaritemvisibleŠ enabledÄ , \ € ˜ ź Ě /€/€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] DAT*| ö o @Ř€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- 0€2  +create˙˙Ŕ2  ] o @DAT*~ ö€1€ € @   €€˙˙˙˙€˙˙˙˙J$)0888018E0)\8d d parentwindow p@getactivesheet7Ŕ edit_actionsfreeformtriggereventŔN 0 \ °80…,840…XDAT*€ ö8`0…x8`0…8˜0…´9}Ä9}4Nh‚–d Ě8 textFr&eeFormmicrohelp" Freeform styletoolbaritemdownnameC form!toolbaritemnamef toolbaritemtext€FreeformtoolbaritemvisibleĄ enabledź , X x  ´ Ä 1€1€2  +clicked+create(˙˙DAT*‚ öŔ˙˙Ŕ2  ] o @(€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙J$)0888018E0)\8d d parentwindow p@getactivesheet7Ŕ eDAT*„ ödit_actionstabulartriggereventŔM 0 \ °80…,840…X8`0…x8`0…8˜0…´9}Ä9}4Nh‚–d Ě8 textTa&bularmicrohelp! Tabular styletoolbaritemdownnameB Cursor!toolbaritemnameh toolbaritemtext€Tabulartoolbaritemvisible  enablDAT*† öedź , X x  ´ Ä 2€2€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @P€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙:$)0888DAT*ˆ ö0)T8d \ parentwindow p@getactivesheet7Ŕ current_viewtriggereventam ŔE 0 T °80…,840…h8p0…8p0…¨8°0…Ě9}Ü9}4Nh‚–d ä8 textS&napshotmicrohelp" Snapshot view of activity daDAT*Š ötatoolbaritemdownnameS snapshot.bmptoolbaritemname9} toolbaritemtext˜Snapshottoolbaritemvisibleš enabledÔ , h  ¨ Ě Ü 3€3€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @x€1€ € @   €€&DAT*Œ ö˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙:$)08880)T8d \ parentwindow p@getactivesheet7Ŕ history_viewtriggerevent ŔE 0 T °80…,840…h8p0…Œ8p0…¤8Ź0…Č9}Ř9}DAT*Ž ö4Nh‚–d ŕ8 text&Historymicrohelp! History view of activity datatoolbaritemdownnameR history.bmptoolbaritemname| toolbaritemtext”Historytoolbaritemvisible´ enabledĐ , h Œ ¤ Č Ř 4€4€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @DAT* ö €1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- 5€2  +create˙˙Ŕ2  ] o @Č€1€ €DAT*’ ö @   €€˙˙˙˙€˙˙˙˙:$)08880)T8d \ parentwindow p@getactivesheet7Ŕ expand_viewtriggerevent ŔD 0 T b80…88@0…x9}ˆ9}4HdDAT*” ö  textEnlarge &Related Infomicrohelp. Enlarge the related information areatoolbaritemvisiblee enabled€ 8 x ˆ 6€6€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @đ€1€ € @   €€&˙˙˙˙DAT*– ö€˙˙˙˙˙˙˙˙€˙˙˙˙:$)08880)T8d \ parentwindow p@getactivesheeti7Ŕ original_viewtriggerevent ŔF 0 T °80…88@0…|8„0… 8„0…¸8Ŕ0…ä9}ô9}4DAT*˜ öNh‚–d ü8 textEnlarge &General Infomicrohelp. Enlarge the general information areatoolbaritemdownnamee binocs.bmptoolbaritemnamet toolbaritemtext¨Enlarge GeneraltoolbaritemvisibleĐ enabledě 8 |   ¸ ä ô 7€7€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o DAT*š ö@€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- 8€2  +create˙˙Ŕ2  ] o @DAT*œ ö@€1€ € @   €€˙˙˙˙€˙˙˙˙N80…88@0…x9}4d € textRAPIDS Enterprise...microhelp- Open the RAPIDS Enterprise Windowtoolbaritemvisibleb  8 x X:F@źľ@˝8Ś$1DAT*ž ö‹:@ź ľ@˝ ś8d w_rapids_info˙˙@d€  parentwindow p@ 9€9€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  ] o @h€1€ € @   €€˙˙˙˙€˙˙˙˙&DAT*  ö˙˙˙˙€˙˙˙˙80…,*4‡D*L‡`*h‡|*„‡˜* ‡´*ź‡Đ*؇ř*‡*‡,*4‡D*L‡`*h‡x*€‡œ*¤‡´ź$Ä$Ě$Ô$Ü$ä$ě$ô$DAT*˘ öü$$ $$$$$˛€ |0F\rˆ ž ´ Ę ŕ ö "8Nd ,` text&Datam_geographic;€;€m_legal<<€<<€m_sourceT=€T=€m_devicep>€p>€m_processŒ?€Œ?€m_stream¨@€¨@€m_material€ÄA€ÄA€m_emissionestimationŕB€ŕB€m_-10anC€C€m_otherdata D€ D€mDAT*¤ ö_-11pi< E€<E€m_referenceT!F€TF€m_-bds˙p"G€pG€m_sourcebulkdeleteˆ#H€ˆH€itemŹ”@;€<<€T=€p>€Œ?€¨@€ÄA€ŕB€C€ D€< E€T!F€p"G€ˆ#H€ , 4D L` h| „˜  ´ źĐ Řř  , 4D L` hx €œ ¤´ ź Ä Ě DAT*Ś öÔ Ü ä ě ô ü      $ Ę$($<$P$d$x$Œ$Ź$ź$Đ$ŕ$ô$$ $*8FT b p ~ Œ š¨śd (p m_geographic;€m_legal <€m_source€0=€m_deviceD>€m_processX?€m_streamDAT*¨ öl@€m_material€A€m_emissionestimation”B€m_-10*´C€m_otherdataÄD€m_-11Ř E€m_referenceč!F€m_-bdsü"G€m_sourcebulkdelete #H€ ( < P d x Œ Ź ź Đ ŕ ô    :€:€2  +create+destroy(˙˙Ŕ˙˙Ŕ2   m_geographicm_legalm_sourcem_devicem_processm_streamm_materialm_emissionestimationm_-10DAT*Ş öm_otherdatam_-11m_referencem_-bdsm_sourcebulkdelete˙˙ ;€˙˙ <€˙˙ =€˙˙& >€˙˙/ ?€˙˙9 @€˙˙B A€˙˙M B€˙˙b C€˙˙h D€˙˙t E€˙˙z F€˙˙† G€˙˙ H€] o @€1€ € @   DAT*Ź ö€€ ;€ <€ =€ >€ ?€ @€ A€ B€ C€ D€ E€ F€ G€ H€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ś80…48<0…h8p0…ˆ8p0… 8¨0…Č9}ä1‹}4Nh‚–d ě8 textgraDAT*Ž ö&Geographic...microhelp_so' Open Geographic windowtoolbaritemdownnameS geo.bmptoolbaritemnamex toolbaritemtextGeographictoolbaritemvisibleł toolbaritemspaceĐ 4 h ˆ   Č ä X:F@źľ@˝8Ś$1‹:@ź ľ@˝ ś8d w_geo˙˙@e€  parentwindow p@ ;€;€2  DAT*° ö+create+clicked(˙˙Ŕ˙˙Ŕ2  ] o @¸€1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙X:F@źľ@˝8Ś$1‹:@ź ľ@˝ ś8d w_legalDAT*˛ ö˙˙@f€  parentwindow p@ œ80…,840…\8d0…€8d0…˜8 0…ź9}4Nh‚d Ä0 textLegal...microhelp! Open Legal windowtoolbaritemdownnameF legal.bmptoolbaritemnamen toolbaritemtextˆLegaltoolbaritemvisibleŚ  , \ DAT*´ ö€ ˜ ź <€<€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ŕ€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙X:F@źľ@˝8Ś!$1‹:@ź ľ@˝ DAT*ś öś8d w_source˙˙!@g€  parentwindow p@ œ80…0880…`8h0…„8h0…œ8¤0…Ŕ9}4Nh‚d Č0 text&Source...microhelp# Open Source windowtoolbaritemdownnameK source.bmptoolbaritemnames toolbaritemtextŒDAT*¸ öSourcetoolbaritemvisibleŤ  0 ` „ œ Ŕ =€=€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙X:F@źDAT*ş öľ@˝8Ś#$1‹:@ź ľ@˝ ś8d w_device˙˙#@h€  parentwindow p@ œ80…0880…`8h0…„8h0…œ8¤0…Ŕ9}4Nh‚d Č0 text&Device...microhelp# Open Device windowtoolbaritemdownnameDAT*ź öK device.bmptoolbaritemnames toolbaritemtextŒDevicetoolbaritemvisibleŤ  0 ` „ œ Ŕ >€>€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @0€1€ € @   €€&˙˙˙˙€˙˙˙˙DAT*ž ö˙˙˙˙€˙˙˙˙X:F@źľ@˝8Ś%$1‹:@ź ľ@˝ ś8d w_process˙˙%@i€  parentwindow p@ œ80…0880…`8h0…„8h0…œ8¤0…Ŕ9}4Nh‚d Č0 text&ProceDAT*Ŕ öss...microhelp$ Open Process windowtoolbaritemdownnameL process.bmptoolbaritemnamet toolbaritemtextŒProcesstoolbaritemvisibleŹ  0 ` „ œ Ŕ ?€?€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @X€1€ € @   DAT* ö€€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙X:F@źľ@˝8Ś'$1‹:@ź ľ@˝ ś8d w_stream˙˙'@j€  parentwindow p@ œ80…0880…`8h0…„8h0…œ8¤0…Ŕ9}4NhDAT*Ä ö‚d Č0 textS&tream...microhelp# Open Stream windowtoolbaritemdownnameK stream.bmptoolbaritemnames toolbaritemtextŒStreamtoolbaritemvisibleŤ  0 ` „ œ Ŕ @€@€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @€€1€ € @ DAT*Ć ö  €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙œ80…0880…d8l0…Œ8l0…¤8Ź0…Č9}4Nh‚d Đ0 text&Material...microhelp% Open Material windowtoolbaritemdownnameM DAT*Č ömaterial.bmptoolbaritemnamey toolbaritemtext”Materialtoolbaritemvisibleľ  0 d Œ ¤ Č X:F@źľ@˝8Ś)$1‹:@ź ľ@˝ ś8d w_material˙˙)@k€  parentwindow p@ A€A€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  ] oDAT*Ę ö @¨€1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙X:F@źľ@˝8Ś+$1‹:@ź ľ@˝ ś8d w_emission_est˙˙+@l€  parentwindow p@ œ80…<DAT*Ě ö8D0…x8€0…œ8€0…´8ź0…ŕ9}4Nh‚d č0 text&Emission Estimation...microhelp0 Open Emission Estimation windowtoolbaritemdownnamed calc.bmptoolbaritemname‰ toolbaritemtext¤Emis. EstimationtoolbaritemvisibleÍ  < x œ ´ ŕ B€B€2  +clicked+DAT*Î öcreate(˙˙Ŕ˙˙Ŕ2  ] o @Đ€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- C€2  +create˙DAT*Đ ö˙Ŕ2  ] o @ř€1€ € @   €€˙˙˙˙€˙˙˙˙X:F@źľ@˝8Ś-$1‹:@ź ľ@˝ ś8d w_data˙˙-@m€  parentwindow p@ :80DAT*Ň ö…48<0…d c text&Other Data...microhelp' Open Other Data Table selection window 4 D€D€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ €1€ € @   €€&˙˙˙˙DAT*Ô ö€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- E€2  +create˙˙Ŕ2  ] o @H€1€ € @   €€˙˙˙˙€˙˙˙˙DAT*Ö öX:F@źľ@˝8Ś/$1‹:@ź ľ@˝ ś8d w_reference˙˙/@n€  parentwindow p@ œ80…0880…t8|0…”8|0…Ź8´0…Ô9}4Nh‚d Ü0 text&Reference...microhelp& Open Reference TDAT*Ř öable selection windowtoolbaritemdownname^ ref.bmptoolbaritemname„ toolbaritemtextœReferencetoolbaritemvisiblež  0 t ” Ź Ô F€F€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @p€1€ € @   €€&˙˙˙DAT*Ú ö˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- G€2  +create˙˙Ŕ2  ] o @˜€1€ € @   €€˙˙˙˙€˙˙˙˙DAT*Ü ö:80…0880…d W text&Bulk Deletemicrohelp% Open Source Bulk Delete window 0 <:F@źľ@˝8Ś1ź˜ľ@˝˜ś8d w_sourcebulkdelete˙˙1@o€ H€H€2  +create+clicked(˙˙Ŕ˙˙Ŕ2  ] DAT*Ţ öo @Ŕ€1€ € @   €€˙˙˙˙€˙˙˙˙&˙˙˙˙€˙˙˙˙|80…8*@‡T*\‡lt$|$˛€ |0Fd „@ text&Calculatem_emissionestimatorDAT*ŕ ö#J€#J€m_growthHK€HK€itemd”@#J€HK€ 8 @T \l t | "$0$d 8 m_emissionestimatorJ€m_growthest$K€ 0 I€I€2  +create+destroy(˙˙Ŕ˙˙Ŕ2 % m_emissionestimatorm_growth(˙˙ J€˙˙ K€] oDAT*â ö @č€1€ € @   €€ J€ K€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ä:F@źľ@˝8$)08‡•ş‡,%ąš@8H0…TQ3–ş,!ąŢ\8d0…l,4şDAT*ä ö,ąşt,Œ$6…œ,Ź$ź$8”0,Ä$)Ô8˛9nô98^…ü$ $,6䀌8*ź¸ľ@˝¸ś8 <FR`|–¨ÄÚ삐 ž!Ź'şdk lw_ptrstr_parmll_ridcase15w_processgd_process_ridw_sourcegl_source_ridw_geosqlcaw_emissÜ˙˙ €˙˙ p€˙DAT*ć ö˙˙˙ €˙˙'%@i€˙˙13~˙˙@!@g€˙˙I4@˙˙W@e€˙˙]6@q€˙˙c8@r€ˆ parentwindow p@getactivesheet7Ŕ level8ProcessridP8SourceP8is_level_type|Rname”dw_1¤. €object´…@¤. €getrowŔĚ__get_attribute_itemŔÜP”8 0 @ T \ lDAT*č ö t Œ œ Ź ź Ä Ô ô ü    :80…88@0…d Z texttwi&Emission Estimatormicrohelp, Open Emission Calculation 8 J€J€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @€1€ €DAT*ę ö @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙"Ś:ź˜ľ@˝˜ś8d w_growth˙˙:@s€ :80…,840…d O text&Growthmicrohelp Calculate Emissions Growth DAT*ě ö, K€K€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @8€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ž80…@*H‡d*l‡*˜DAT*î ö‡¨°$¸$Ŕ$˛€ |0F\d ČX text&Query/Analysism_queryreportingtool(M€(M€m_gistoolarcviewPN€PN€m_statisticalanalysissastO€tO€item ”@(M€PN€tO€ @ Hd l ˜¨ ° ¸ Ŕ 0 $<$`$d hDAT*đ ö m_queryreportingtooly/AM€m_gistoolarcviewool(N€m_statisticalanalysissasiewDO€ < ` L€L€2  +create+destroy(˙˙Ŕ˙˙Ŕ2 G m_queryreportingtoolm_gistoolarcviewm_statisticalanalysissas<˙˙ M€˙˙ N€˙˙. O€] o @`€1€ € @   DAT*ň ö€€ M€ N€ O€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙Ú:F@źľ@˝8,;6808080źëľ@˝ë8…8Ş8!Ş",;68"08.080źëľ@˝ë8…8Ş8!Ş"<8408I,;z%8Xz&8oz&8œz&:)@źŽľ@˝Ž8DAT*ô ö8źz%ź3ľ@˝38#8408Ç0źľ@˝88źz%…6źľ@˝81˙˙˙˙<Ľţ8ö080:)@źŽľ@˝Ž8Ô6ź3ľ@˝38#^8408z%81z&źľ@˝86…6źľ@˝81˙˙˙˙<ĽÔ8408Az%8\z&:)@źŽľ@˝Ž8 Z € Ŕ ć6<bАŚĐ!ţ$%"'X*^,n-˜d4DAT*ö ö ls_queryls_pvdirls_run_commandgs_inifileP˙˙ ˙˙ ˙˙ ˙˙);@^ queryrunquerynot foundpowerviewerpvdirQuery/Reporting ToolError finding , powerviewer section or pvdir key in the ProfileString function. Contact your technical support.\pv030.exeSorry! PowerViewer is required to run queries.PowerViewerError invoking PowerViewer.Sorry! Query tool was not found.Error invoking query tool .:DAT*ř ö80…88@0…d \ text&Query/Reporting Toolmicrohelp. Open a query/reporting tool 8 M€M€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ˆ€1€ € @   €€&DAT*ú ö˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙˘ :F@źľ@˝8,;6808 080źëľ@˝ë8…8Ş8Ş"Ú808',;z%86z&8Ez&8sz&:)@źŽľ@˝Ž8œ6ź3ľ@˝38#6808“z%8¤z&źľ@˝86źľ@˝81˙˙˙˙<Ľœ808´z%8Íz&:)@DAT*ü öźŽľ@˝Ž8 Z €ĐÖÚú06`d ls_gisgs_inifile(˙˙ ˙˙;@Ď gisrungisnot foundGIS ToolError finding , gis section or RunGis key in the ProfileString function. Contact your technical support.Sorry! GIS tool was not found.Error invoking GIS tool .:80…88@0…d M text&GIS ToDAT*ţ öol (ArcView)microhelp, Open ArcView 8 N€N€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @°€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙¸ :F@źľ@˝8,;6DAT*ö808 080źëľ@˝ë8…8Ş8Ş"Ú8083,;z%8Bz&8Qz&8z&:)@źŽľ@˝Ž8˛8Ÿz%…6ź3ľ@˝38#L808¨z%8°z&źľ@˝86źľ@˝81˙˙˙˙<Ľ˛808Ŕz%8Ôz&:)@źŽľ@˝Ž8 Z €ĐÖÚđFLvd ls_sasgs_inifile(˙˙DAT*ö ˙˙;@Ö sassasexenot foundStatistical AnalysisError finding , sas section or sasexe key in the ProfileString function. Contact your technical support.\sas.exeSorry! was not found.Error invoking SAS .:80…@8H0…d Q text&Statistical Analysis (SAS)microhelp4 Open SAS @ O€O€2  +clicked+crDAT*öeate(˙˙Ŕ˙˙Ŕ2  ] o @Ř€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙|80…(*0‡D*L‡\d$l$˛€ |0FdDAT*öApplication splash windowforward global type w_splash from Window end type type dw_splash from datawindow within w_splash end type end forward global type w_splash from Window int X=59 int Y=48 int Width=2802 int Height=2148 long BackColor=0 WindowType WindowType=popup! dw_splash dw_splash end type global w_splash w_splash event open; dw_splash.object.version_number[1] = "Version " + gs_versionNumber Timer(2, This) end event on timer;Timer(0) Open(w_logon) end on oDAT*[n w_splash.create this.dw_splash=create dw_splash this.Control[]={this.dw_splash} end on on w_splash.destroy destroy(this.dw_splash) end on type dw_splash from datawindow within w_splash int Y=16 int Width=2743 int Height=2080 int TabOrder=1 string DataObject="d_splash" boolean Border=false boolean LiveScroll=true end type DAT* ö t@ text&Reportm_qaqc Q€ Q€m_runreport8T€8T€itemT”@ Q€8T€ ( 0D L\ d l "$$$d , m_qaqcQ€m_runreportT€ $ P€P€2  +create+destroy(˙˙Ŕ˙˙Ŕ2  m_qaqcm_runreport(˙˙DAT* ö Q€˙˙ T€] o @€1€ € @   €€ Q€ T€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙–80…,840…P*X‡p*x‡ˆ$˜$˛€ |4J`dDAT*ö  H text&QA/QCmicrohelp QA/QC reportm_statisticalAR€AR€m_consistency`S€`S€item€”@AR€`S€ , P Xp xˆ  ˜ "$0$d 8 m_statisticalR€m_consistency S€ 0 Q€Q€2  +create+destroy(˙˙Ŕ˙˙DAT*öŔ2 $ m_statisticalm_consistency(˙˙ R€˙˙ S€] o @(€1€ € @   €€ R€ S€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙P:F@źľ@˝8Ś=,1‹:@ź ľ@˝ ś8d DAT*ö w_rpt_qcw_mdi_main(˙˙=@t€˙˙@c€ 80…d % text&Statistical R€R€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @P€1€ € @   €€&DAT*ö˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙@:F@źľ@˝8Ś?,ź™ľ@˝™ś8d' w_ccheck_parametersw_mdi_main(˙˙?@u€˙˙@c€ 80…d % text&Consistency S€S€2  +clicked+create(˙˙Ŕ˙˙ŔDAT*ö2  ] o @x€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙"ŚAź˜ľ@˝˜ś8d w_report˙˙A@v€ :80…0880…dDAT*ö V text&Run Reportmicrohelp$ Open analytical report window 0 T€T€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ €1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙DAT*ö˙˙ö80…09}@*H‡X*`‡t*|‡Œ*”‡¨*°‡ŔČ$Đ$Ř$ŕ$č$˛€ |.DZp† œd đ text&Windowshifttoright m_tile8V€8V€m_layerPW€PW€m_cascadehX€hX€m_-12„Y€„Y€m_toolbarDAT*öAg Rapids Application splash windowforward global type w_splash_ag from Window end type type p_1 from picture within w_splash_ag end type end forward global type w_splash_ag from Window int X=1 int Y=49 int Width=2102 int Height=1700 long BackColor=12632256 WindowType WindowType=popup! p_1 p_1 end type global w_splash_ag w_splash_ag on open;Timer(2, This) end on on timer;Timer(0) Open(w_logon) end on on w_splash_ag.create this.p_1=create p_1 this.Control[]={ this.p_1DAT*ź} end on on w_splash_ag.destroy destroy(this.p_1) end on type p_1 from picture within w_splash_ag int Width=2276 int Height=1537 string PictureName="agrapids.bmp" end type DAT* öœZ€œZ€item¸”@8V€PW€hX€„Y€œZ€ 0 @ HX `t |Œ ”¨ °Ŕ Č Đ Ř ŕ č L$ $4$D$X$*8d `( m_tileV€m_layerW€m_cascade(X€m_-12<Y€m_toolbarrLZ€  4 D X U€U€2DAT*"ö  +create+destroy(˙˙Ŕ˙˙Ŕ2 1 m_tilem_layerm_cascadem_-12m_toolbard˙˙ V€˙˙ W€˙˙ X€˙˙! Y€˙˙' Z€] o @Č€1€ € @   €€ V€ W€ X€ Y€ Z€˙˙˙˙€˙˙DAT*$ö˙˙˙˙˙˙€˙˙˙˙ ,:@)8d w_mdi_main˙˙@c€  arrangesheets3Ŕ N80…(800…X9}4d ` text&Tilemicrohelp Arrange all as tiledtoolbaritemvisibleE  ( X V€V€2  +clicked+crDAT*&öeate(˙˙Ŕ˙˙Ŕ2  ] o @đ€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ ,:@)8d w_mdi_main˙˙@c€  arrangesheets3Ŕ NDAT*(ö80…,840…`9}4d h text&Layermicrohelp Arrange all as layeredtoolbaritemvisibleK  , ` W€W€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @€1€ € @   DAT*Fö€€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ ,:@)8d w_mdi_main˙˙@c€  arrangesheets3Ŕ N80…,840…`9}4d h text&Cascademicrohelp! Arrange all as cascadedtoolDAT*,ö@@€@ €˙˙˙˙&€ą˙˙˙˙˙˙1€˙˙ ˙˙˙˙x€˙˙˙˙ ˙˙˙˙€˙˙˙˙2  2 ! widthheightpicturename<˙˙ä^@˙˙˙˙D€] oDAT*…ä  @D€@€@@ DAT*0öDisplays system error information; called in the systemerror event of the applicationforward global type w_system_error from Window end type type dw_error from datawindow within w_system_error end type type cb_print from commandbutton within w_system_error end type type cb_exit from commandbutton within w_system_error end type type cb_continue from commandbutton within w_system_error end type end forward global type w_system_error from Window int X=320 int Y=420 int Width=2153 inDAT*2öt Height=1108 boolean TitleBar=true string Title="System Error" long BackColor=79741120 WindowType WindowType=response! dw_error dw_error cb_print cb_print cb_exit cb_exit cb_continue cb_continue end type global w_system_error w_system_error on w_system_error.create this.dw_error=create dw_error this.cb_print=create cb_print this.cb_exit=create cb_exit this.cb_continue=create cb_continue this.Control[]={this.dw_error,& this.cb_print,& this.cb_exit,& this.cb_continue} end on DAT*4ö on w_system_error.destroy destroy(this.dw_error) destroy(this.cb_print) destroy(this.cb_exit) destroy(this.cb_continue) end on on open;///////////////////////////////////////////////////////////////////////// // // Event : w_system_error.open // // Purpose: // Displays system errors and allows the user to either continue // running the application, exit the application, or print the // error message. Called from the systemerror event in the // application object. DAT*6ö // // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // /////////////////////////////////////////////////////////////////////////// dw_error.insertrow (1) dw_error.setitem (1,"errornum",string(error.number)) dw_error.setitem (1,"message" ,error.text) dw_error.setitem (1,"where" ,error.windowmenu) dw_error.setitem (1,"object" ,error.object) dw_error.setitem (1,"event" ,error.oDAT*8öbjectevent) dw_error.setitem (1,"line" ,string(error.line)) end on type dw_error from datawindow within w_system_error int X=18 int Y=16 int Width=2085 int Height=832 int TabOrder=10 string DataObject="d_system_error" BorderStyle BorderStyle=StyleLowered! end type type cb_print from commandbutton within w_system_error int X=18 int Y=880 int Width=549 int Height=96 int TabOrder=40 string Text="&Print" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFaDAT*:ömily FontFamily=Swiss! FontPitch FontPitch=Variable! end type event clicked;///////////////////////////////////////////////////////////////////////// // // Event : w_system_error.cb_print.clicked! // // Purpose: // Event cb_print.clicked - Print the current error message // and write the error message to the supplied file name. // // Log: // // DATE NAME REVISION // ------ ------------------------------------------------------------- // Powersoft Corporation INITIAL DAT*<öVERSION // /////////////////////////////////////////////////////////////////////////// string ls_line, ls_temp long ll_prt integer li_i, li_len, li_start ll_prt = printopen("System Error") // Print each string variable setPointer(hourglass!) print (ll_prt, "System error message - "+string(today())+" - "+string(now(), "HH:MM:SS")) print (ll_prt, " ") ls_line = "Error Number : " + getitemstring(dw_error,1,1) print (ll_prt, ls_line) ls_line = "Error Message : "DAT*>ö + getitemstring(dw_error,1,2) //add line breaks into ls_line li_len = len(ls_line) if li_len > 64 then li_len += 63 for li_i = 64 to li_len step 64 li_start = li_i - 63 ls_temp += mid(ls_line, li_start, 64) + "~r~n" next end if ls_line = ls_temp print (ll_prt, ls_line) ls_line = "Window/Menu : " + getitemstring(dw_error,1,3) print (ll_prt, ls_line) ls_line = "Object : " + getitemstring(dw_error,1,4) print (ll_prt, ls_line) ls_line = "Event : DAT*@ö" + getitemstring(dw_error,1,5) print (ll_prt, ls_line) ls_line = "Line Number : " + getitemstring(dw_error,1,6) print (ll_prt, ls_line) printclose(ll_prt) return end event type cb_exit from commandbutton within w_system_error int X=1554 int Y=880 int Width=549 int Height=96 int TabOrder=20 string Text="Exit The Program" boolean Default=true int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! enDAT*Böd type on clicked;///////////////////////////////////////////////////////////////////////// // // Event : w_system_error.cb_exit // // Purpose: // Ends the application session // // Log: // // DATE NAME REVISION //------ ------------------------------------------------------------- // Powersoft Corporation INITIAL VERSION // /////////////////////////////////////////////////////////////////////////// halt close end on type cb_continue from commandbutton within w_syDAT*Döstem_error int X=786 int Y=880 int Width=549 int Height=96 int TabOrder=30 string Text="&Continue" int TextSize=-8 int Weight=700 string FaceName="MS Sans Serif" FontFamily FontFamily=Swiss! FontPitch FontPitch=Variable! end type on clicked;///////////////////////////////////////////////////////////////////////// // // Event : w_system_error.cb_continue // // Purpose: // Closes w_system_error // // Log: // // DATE NAME REVISION //------ -------------------------DAT*ź------------------------------------ // Powersoft Corporation INITIAL VERSION // /////////////////////////////////////////////////////////////////////////// close(parent) end on DAT*HöbaritemvisibleL  , ` X€X€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @@€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d DAT*Jö  text- Y€2  +create˙˙Ŕ2  ] o @h€1€ € @   €€˙˙˙˙€˙˙˙˙.ŚC$ź¸ľ@˝¸ś8d w_set_toolbars˙˙C@w€  parentDAT*Löwindow p@ :80…0880…d J textTool&bar...microhelp$ Customize toolbar 0 Z€Z€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @€1€ € @   DAT*Nö€€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙˛80…,9}D*L‡\*d‡p*x‡ˆ$˜$ $˛€ |.DZpd ¨` text&Helpshifttorightm_usingrapids4\€4\€m_-13T]€T]€m_1l^€l^€item€”@4DAT*Pö\€T]€l^€ , D L\ dp xˆ  ˜   0$($4$d < m_usingrapids\€m_-13ig ]€m_10^€ ( 4 [€[€2  +create+destroy(˙˙Ŕ˙˙Ŕ2 m_usingrapidsm_-13m_1<˙˙ \€˙˙ ]€˙˙ ^€DAT*Rö] o @¸€1€ € @   €€ \€ ]€ ^€˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙6:F@źľ@˝8,;6808080źëľ@˝ë8…8ŞĆ8!,Dz%8(,;z%87z&8Lz&8xz&:)@źŽľ@˝Ž8DAT*Tö1źľ@˝88—ş8—z%…8™z%:'@źľ@˝8Zn ÂĆňd, ls_dir_namegs_inifilegs_app_title<˙˙ ˙˙;@˙˙D@¤ directorywdirnot foundUsing Error finding , directory section or wdir key in the ProfileString function. Contact you technical support.\newrap.hlpN80…48<0…DAT*Vöd9}4d l text&RAPIDS Help...microhelp8( RAPIDS Online HelptoolbaritemvisibleO  4 d \€\€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @ŕ€1€ € @   €€&DAT*Xö˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙ 80…d  text- ]€2  +create˙˙Ŕ2  ] o @€1€ € @   €€˙˙˙˙€˙˙DAT*Zö˙˙"ŚFź˜ľ@˝˜ś8d w_about˙˙F@x€ :80…48<0…d J text&About...toolbaritemtext"m_aboutrapids 4 ^€^€2  +clicked+create(˙˙Ŕ˙˙Ŕ2  ] o @DAT*Ň0€1€ € @   €€&˙˙˙˙€˙˙˙˙˙˙˙˙€˙˙˙˙DAT*^öŚp@ś)b?=ąţAp@p@4p@€éq”@”@q \@\@+[@[@a7c@c@qDU@U@aU`@`@a_j@j@qmk@k@yl@l@m@m@1™€@€@Š‘@‘@ś¤@¤@ø@¸@Ň^@^@a@@@@€Qv@v@Qnt€Yp@€iYme€xa w_splash_agwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewiteDAT*`ömtreeviewitemconnectioninfopowerobject4€ $Çľpictureborderstyle4€ ôÎľagrapids.bmpmessagew_logonŕ2 w_splash_ag˙˙ €& +open+timer+create+destroy LQ x _initsrcwindoww_splash_agmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowcDAT*böhildlistviewitemtreeviewitemconnectioninfopowerobjectpicturep_1borderstylemessagew_logonĚpe˙˙mm˙˙@_c˙˙in˙˙$@3 ˙˙)@t ˙˙4@Or˙˙@@t=˙˙M@tS˙˙^@t=˙˙h@me˙˙v @˙˙‚ @˙˙– @€!˙˙˘ @@˙˙˛ n@@—˙˙ż@€!˙˙Ě!@‚@˙˙Ű@@9˙˙ç@€!˙˙ď!DAT*dö`@˙˙ó€@Ř˙˙˙@€ń˙˙a@đ …€€€€Ŕ˙˙wW +*€€˙˙0!X1I+ź2ľ@˝28,•>1L,$$d ::message˙˙@€ ˙˙ r1I+ź1ľ@˝18Śź˜ľ@˝˜ś8,•X1f,DAT*fö$">d w_logon::message(˙˙@€˙˙@€ ˙˙ @ *‡$,$˛€ |d 4 p_1*€€controlc@*€ $ ,  $d  p_1*€ €€&€1€ą&12 & +open+timer+createDAT*hö+destroyP˙˙Ŕ€‰q˙˙qŔc@˙˙@ŔM˙˙Ŕ2 2 xywidthheightbackcolorwindowtypep_1Œ˙˙˙˙ 1˙˙ 6˙˙¤˙˙ŔŔŔ˙˙#Ŕ€@˙˙. €] o16¤€   €€Ŕ€€€1€ŔŔŔ  DAT*jö@@€@ €˙˙˙˙&€ą˙˙˙˙˙˙1€˙˙ ˙˙˙˙x€˙˙˙˙ ˙˙˙˙€˙˙˙˙2  2 ! widthheightpicturename<˙˙ä˙˙˙˙D€] oDAT*…ä  @D€@€@@ DAT*nöŚp@ˇ)b?=ąţAp@p@5p@€éq”@”@q#\@\@Q.[@[@:c@c@qGU@U@aX`@`@abj@j@qpk@k@|l@l@m@m@!œ€@€@Ź‘@‘@š¤@¤@Ƹ@¸@Ő^@^@ n@n@@@#…@…@,„@„@:@@F@@P@@€Ďd@d@Út@t@Ú€ŕv@v@ŕ€čF@F@đ w_system_errorwindowmenuwindowtypewindowstatewindowobjecttoolbaralignmentstructurDAT*pöemailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobject5€ dÁľdatawindowborderstyledwobjectcommandbuttonfontcharsetfontpitchfontfamilySystem Error5€ tIśd_system_error&PrintMS Sans SerifExit The Program&Continuedragobjecterrormessagepointeräh2 w_system_error˙˙ €( +createDAT*rö+destroy+open+clicked QL x€ _initsrcwindoww_system_errormenuwindowtypewindowstatewindowobjecttoolbaralignmentstructuremailrecipientenvironmentmailfiledescriptionmailmessagedatawindowchildlistviewitemtreeviewitemconnectioninfopowerobjectdatawindowdw_errorborderstyledwobjectcommandbuttoncb_printfontcharsetfontpitchfontfamilycb_exitcb_continuedragobjecterrormessagepointer”@‹ ˙˙śan˙˙@D‹ ˙˙śDAT*töt ˙˙'@H‹ ˙˙,ś@ H˙˙7@L‹ ˙˙Cś@="˙˙P@P‹ ˙˙aĆ@00˙˙k@T‹ ˙˙y Ć@˙˙… @˙˙™ @˙˙Ľ @˙˙ľ @˙˙Â@%€€˙˙Ď˙˙@˙˙Ţ€@˙˙ę@˙˙ő.˙˙ţ @˙˙ -@˙˙@˙˙˙˙!rors˙˙* r@˙˙6@€@ă!˙˙@@˙˙KDAT*vö˙˙Sě!˙˙_@˙˙j<@˙˙p@q@˙˙xq€@đ …€€€€€€€Ŕ˙˙wW .*€€˙˙žy%€€˙˙-€€˙˙-€€˙˙-Ś*‡0*8‡H*P‡d*l‡|DAT*xö„$Œ$”$œ$˛€ |,BXd ¤h dw_error*€€cb_print$+€$€cb_exit@,€@€cb_continueX-€X€controltc@*€$+€@,€X-€ 0 8H Pd l| „ Œ ” œ >$($8$L$*d T DAT*zö dw_error*€cb_printb_p+€cb_exit0,€cb_continue@-€ ( 8 L Î$1)(80$188,D$ź(ľ@˝(8)T8\$18d,l$6)t8|$18„,Œ$6)”8œ$18¤,Ź$6)´8ź$18Ä,Ě$6)Ô8Ü$18ä,ě$ź(ľDAT*|ö@˝(8)ô8,•´1Â,ü$"j¤ŢRšd error::message(˙˙@€˙˙@€¨ dw_error*€insertrow(Ŕ*€errornum˙˙setitemPŔL*€message˙˙PŔL*€where˙˙PŔL*€object˙˙PŔL*€event˙˙PŔL*€line ˙˙PŔL˙˙ ( 0 D T \DAT*~ö l t | Œ ” œ Ź ´ ź Ě Ô Ü ě ô ü €€&€ą&2  +create+destroy+open<˙˙Ŕ˙˙Ŕ˙˙Ŕ2 c xywidthheighttitlebartitlebackcolorwindowtypedw_errorcb_printcb_exitcb_continueđ ˙˙@˙˙ ¤€˙˙ i˙˙T˙˙˙˙"[€˙˙(DAT*€öŔŔŔ"€˙˙2Ŕ€_1˙˙= €ce˙˙F €!˙˙O €d˙˙W €] o@¤iT€[€  €€Ŕ€€h€1€ŔŔŔ  @@€@ € € € €˙˙˙˙DAT*‚ö€˙˙˙˙˙˙˙˙€˙˙˙˙ ˙˙˙˙x&€ą˙˙2  2 9 xywidthheighttaborderdataobjectborderstyleŒ˙˙˙˙ ˙˙ %˙˙@˙˙ ˙˙"€˙˙-Ć€] o%@  @ €DAT*„ö@ Ć€ €680źŕľ@˝ŕ8:F@źľ@˝88ź3ľ@˝3$ź(ľ@˝(8z'8-z&ź—ľ@˝—$810ź)ľ@˝)8z(źČľ@˝Č88:0źČľ@˝Č88<X$11‹)p8z'…6źČľ@˝Č88xŒ$11‹)”8z'…—‹}1@<ĹDAT*†öJ1?<R‹}1@‹}Ţ/@ŰJ1?<Y‹}<1@ź’ľ@˝’88œz&z'…Đ6…6źČľ@˝Č88Ÿ°$11‹)¸8z'…6źČľ@˝Č88ŔÔ$11‹)Ü8z'…6źČľ@˝Č88äř$11‹)8z'…6źČľ@˝Č8DAT*ˆö8$11‹)$8z'…6źČľ@˝Č8źÎľ@˝Î8,•1*,,$$>źŢ!:#v$Š%ž&ş'ě()F+J,Z.z/ś1Ö2425n7Ž8Ę:ę;d> ls_linels_templl_prtli_ili_lenli_start::messageŒ˙˙ ˙˙ ˙˙˙˙˙˙$˙˙+˙˙4@€4h DAT*Šö System ErrorSystem error message - - HH:MM:SS Error Number : dw_error8M*€getitemstringŔ`Error Message : ct=M*€Ŕ` Window/Menu : M*€Ŕ`Object : (€M*€Ŕ`Event : M*€Ŕ`Line Number : …M*€Ŕ`˙˙X p Œ ” ° ¸ Ô Ü ř   $ , "€"2  +clicked˙˙Ŕ2 U xywidthhDAT*ŒöeighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙˙˙ p˙˙ %˙˙`˙˙(˙˙"Ÿ€˙˙'ř˙˙˙˙˙0ź˙˙7Ś€˙˙@Ć€˙˙KĆ€] op%`( ř˙˙˙ź@€Ć€Ć€Ś€ @Ÿ€ ˙˙˙˙"DAT*Žö€˙˙8,•1,,$d ::message˙˙@€ ˙˙ "€"2  +clicked˙˙Ŕ2 ] xywidthheighttabordertextdefaulttextsizeweightfacenamefontfamilyfontpitchđ˙˙˙˙ p˙˙ %˙˙`˙˙˙˙"´€˙˙'ĆDAT*ö˙˙/ř˙˙˙˙˙8ź˙˙?Ś€˙˙Hľ€˙˙Sľ€] op%` ř˙˙˙ź@€ľ€ľ€Ś€ @´€Ć ˙˙˙˙"€˙˙Jźľ@˝8,•01>,$d ::message˙˙@€ DAT*’ö˙˙ "€"2  +clicked˙˙Ŕ2 U xywidthheighttabordertexttextsizeweightfacenamefontfamilyfontpitchÜ˙˙˙˙ p˙˙ %˙˙`˙˙˙˙"Ĺ€˙˙'ř˙˙˙˙˙0ź˙˙7Ś€˙˙@ś€˙˙Kś€] op%` ř˙˙˙źDAT*Š@€ś€ś€Ś€ @Ĺ€ ˙˙˙˙"€˙˙