DGS2400 Phase I

I will open this to all coders.. the private coders didn't respond I would like to create a new VB.NET project/desktop program called DSG2400. The program will be a custom program for writing a book. This is the first phase of that project. If it takes longer I can give you the difference in an RAC bonus. (1) See attachment for screen layout (2) I use Xceed GUI controls and will want to use them in this project. A free demo can be used for development. Pablo, my main programmer will explain how to do this (3) This will use an Access database you can create called Z_DSG. Download example program using my SQL object: [login to view URL] Technical information below ## Deliverables Technical Specs: -The program should open up full-screen at startup. - Start bar shortcut should be Programs/DS/DSG2400 -The program should point to and open the Z_DSG database directly invisibly, there is no need to browse for the database(the SQL demo does that, but just for example) -The Database and Field naming conventions should be like: Tables: XXXnnn Example: BOK001.. Fields: Book_ID -Forms should be Fnnn Examples: F000, F010, F100 -You should put all program error messages that display for the user into a new table "MSG001" and then I can edit them and fix wording problems I'd like to have the GUI done using the Exceed controls(see Pablo for info on how to do this).. including a toolbar with icons, instead the text command buttons. -The naming conventions and code style in each subroutine, function or event should be indexed(i.e., S1000, S1100, etc.) and style as follows: L_ Local variable/object instance M_ Module level variable/object instance C_ GLobal variable/object instance Public Sub S1000_Splash_Startup(ByVal Lapplication_name As String, ByRef L_F990 As [login to view URL]) REM ================================================================ REM == 1 0 0 0 S p l a s h S t a r t u p REM ================================================================ S1000_10: Dim L_GAC001 As [login to view URL] L_GAC001 = Mcode.Support.S91000_Cache("GAC001") Call Mcode.PER.S95001_Save("Connect", "N") Mf990 = New F990 Mf990.Parent_Renamed = Mcode [login to view URL] = True [login to view URL]() Call Mcode.PER.S95001_Save(Mcode.PER.S95002_Load("Application_Name") & "." & [login to view URL] & "_Handle", CStr([login to view URL])) Call Mcode.Support.S91200_Form_Handle() L_F990 = Mf990 Call Mcode.PER.S95001_Save("Connect", "Y") Call Mcode.Support.S94200_Splash_Settings(L_F990, 1) S1000_Exit: End Sub ## Platform Windows