function{connector}(string ...DB Name or other depending on the function) ;
 	

  		
<-local pc>   
    text : Lcurrentdb :="#DRIVERSYS+\MANDRAGOREPLANETE\MS4BI\01-GETTING-STARTED-UNICODE\ms4bilangConso.db" ; 
    or
   <-local server>
   text : Lcurrentdb :="#WWWMS4BISERVER+\ms4bilangConso.db" ; 
   DBconnect {Ms4DB} (Lcurrentdb); 
  FormPlus : DrawGrid, title :"MS4 DB : ms4LangConsolidation China/Japan : Relation -> ?? = b.city  " 
  use   View  ("[ms4LangConsolidation]")  ;


	

  
 DBconnect{Ado:"xls"}( LFile1Excel);
     display "insert Table Japanese : CONSOLIDATION 1  ";
       Ms4_SQL{Ado:"xls"}(" SELECT  * into " + " %s " + "  from  [中国最大の都市のリスト$] ", Table1SheetJapanese) return x ;
 	 

  
 DBconnect{xls}( LFile1Excel);
     display "insert Table Japanese : CONSOLIDATION 1  ";
       Ms4_SQL{ xls}(" SELECT  * into " + " %s " + "  from  [中国最大の都市のリスト$] ", Table1SheetJapanese) return x ;
 	 

  
BEGIN ** Declare SAPLOGON
 	** Server/host ID system
		SetHost{SAPLOGON}("yourServer");
		SetSystemNumber{SAPLOGON}("02");
	** Mandant
		SetClient{SAPLOGON}("800");
	
		SetUID{SAPLOGON}("username"); 
		SetPWD{SAPLOGON}("password"); 
	** language
		setLang{SAPLOGON}("EN");
			DBconnect{SAPLOGON} return MsgConnect ;
      		  if(MsgConnect > 0)
      		  then display "EXIT PGM" ; 
      		        Exit;
              End_if;
 END ;

BEGIN  **
  	display "IMPORTANT Create   MS4 CUBE  for   Input DATA :  CHART : PIE, BAR, DASHBOARD, REPORTING ..",LEnvDemoSAPT001DB ;
  			 Ms4_Query  {SAPLOGON}  IMPORT  : New Ms4Db  
             BEGIN  
        		 	  DBconnect {Ms4DB} (LEnvDemoSAPT001DB)   , 
		    		  Create:table("SapT000T001Conso") 
             END 
			  (" SELECT * from t000,t001 where   t001.mandt = t000.mandt ") return (msgsql)  ;

  
BEGIN  Declare  DSN
 	SetDsnName{DsnOdbc}("DSNyourName");
	** Name DB
	DBconnect{DsnOdbc}("DEV");
	
	SetUID{DsnOdbc}("YourDBName"); 
	SetPWD{DsnOdbc}("yourPasswordDBName");  
END;

BEGIN  ** SQL
 
	** SQL
	 Ms4_Query: Win{DsnOdbc}(" SELECT * from t001 where rownum < 50 ") return (msgsql)  ; ** LIMIT not exist SQL oracle

Visualise Example : DB Connect Ado + MS4DB

ADO prerequisites

- You must have OFFICE 97 (32 bits)
- or you must install AccessDatabaseEngine-EN-2007-32bit.exe
as specified when installing MS4BI
- or run AccessDatabaseEngine-EN-2007-32bit.exe voir : driver\MandragorePlanete\DataEngineInstall
IMPORTANT: if you have a later OFFICE version than 97, installation of dataAccessDatabaseEngine-EN-2007-32bit
will have no negative impact on your current OFFICE configuration

DSN ORACLE prerequisite

- You must have a user logon and password that is recognised by your CENTRAL database to install the DSN via ODBC
- You must install Oracle Client on your computer ( see win32_11gR2_client on the Oracle website, it's the Oracle version of our tests )

Remarks

DRIVER :
MS4
ODBC
ADO :string : the ADO connectors must be present in the directory :

driver:\MandragorePlanete\MS4BI\zDriversADO

See also

Examples of ADO connections to: Access, BDF, Excel, TXT, CSV

driver:\MandragorePlanete\MS4BI\zConnectors-ADO

See also

Examples of ODBC connections to: Access, BDF, Excel, TXT, CSV, DBASe, FOXPRO

driver:\MandragorePlanete\MS4BI\zConnectors-ODBC

See also

Examples of SAPLOGON and DSN connections:

driver::\MandragorePlanete\MS4BI\03-DEMO-DESKTOP-BI-SAP

See also

ALL Examples Imports/connections :

driver::\MandragorePlanete\MS4BI\zConnectorsx-Import\Examples

See also

IMPORT NEW DB, DBEXIST, DBCREATE, DBCONNECT, DBDELETE,DBCLOSE,DBBACKUP, TABLEEXIST,VIEWEXIST, MS4_SQL, EXPORT_TABLE, EXPORT_SCHEMA, Sql_DestroyEnv

---

Interested in joining us? contact@mgplanete.com
The Mg Planete team

---

Copyright 2022 by Mandragore Planete

the official sites :
mgplanete.com
getms4bi.com
demos.ms4bi.com
help.ms4bi.com
ms4script.com

---

Download

official site :
getms4bi.com

---

Our purpose : Keep it simple !

written with ms4script

• help 01.010.2022.8

MS4BI in 5 minutes