home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 3 / Developers_Source_Vol_03_1996.iso / parad / jul94 / srfig15b.gif < prev    next >
Graphics Interchange Format  |  1995-09-26  |  36.0 KB  |  517x363  |  8-bit (256 colors)
   ocr: SOLIVIEW-spDependsbutonspushbuton method pushButton(uar eventinto Event) var Sqistring string anstbl string enduar if isAssigned(Tableselected) and Tableselected <> : then anstbl = EPRIU:Sdepends" if strdbtype = "SYBASE" then Sq1String = "sp_ depends "+ : Tablelist.1alue + : executesqLTable(Sq1string,strdbnane, - lmisPasswerd,anstbl) else tbl.attach("a"strestrabnanesa"etableselected) tbl.enunRefintstruct(anstbl) endif if tv.open(anstDl,WinstyleDerault,100,100,5500,4000) then Setlablevirenttrimutes0) tw.settitle(-Depends for Table: : TablpSelected) tu.wait() tu.close() endif endif endMethod Edi ...