#include  "#SYSPATHMS4BI+\zInclude\includeChart.h" 
 Array    GeoMapRef  Occurs 40 { char StringEx1:20;CHAR stringVal :128; integer IntValEx1;} ;
 long : x:=40830;
 text : Province1:="Beijing";
** ************************************************************
** DISPLAY CHART  GeoMapRef
** ***********************************************************	

** ************************************************************
** DISPLAY CHART  GeoMap
** ***********************************************************	
 Begin_Block_Rwd  :  margin_page  
  Setting :
 	Backgroundcolor : "GAINSBORO" ;
  
 begin_sw
 \n\l\n
 <``   #     MS4BI LOADARRAY : GEOMAP --(Google chart)--        #  ``>
 end_sw		; 
	 BEGIN
	Perform InsertArray(void); 
	position  : relative, 450,650 :  
 	FormGoogle : DRAWGEOMAP 
    loadArray GeoMapRef   { field :"stringVal"  } ,
        begin_sw
       {
        colorAxis: {colors: ['yellow', 'red']},
        displayMode: 'regions',
        region: 'CN',
        resolution: 'provinces'
      }
		end_sw		; 
	   
	   	position  : relative,auto,auto : 
	    <url : "https://developers.google.com/chart/interactive/docs/gallery/geomap"   
         button :    $Bts_btn_social_block_google_plus, icon :$fa_google_plus , ">link>Help Geo Map (google chart)">;

		END;
End_Block_Rwd ;			
 	
	
	exit ;
proc InsertArray(void)
begin_proc	
	** For example !
 	Str_Format(GeoMapRef[0].stringval,"([  ");  
	Str_Format(GeoMapRef[1].stringval,"['Province','Disposable Income by Household'],");
	Str_Format(GeoMapRef[2].stringval,"[{f:'%s ', v:'CN-11 '},%l],",Province1,x );         ** example %s string %i integer %l long %f float
	Str_Format(GeoMapRef[3].stringval,"[{f:'Chongqing ', v:'CN-50 '},16569],");
	Str_Format(GeoMapRef[4].stringval,"[{f:'Fujian ', v:'CN-35 '},21218],");
	Str_Format(GeoMapRef[5].stringval,"[{f:'Gansu ', v:'CN-62 '},10954],");
	Str_Format(GeoMapRef[6].stringval,"[{f:'Guangdong ', v:'CN-44 '},23421],");
	Str_Format(GeoMapRef[7].stringval,"[{f:'Guangxi ', v:'CN-45 '},14082],");
	Str_Format(GeoMapRef[8].stringval,"[{f:'Guizhou ', v:'CN-52 '},11083],");
	Str_Format(GeoMapRef[9].stringval,"[{f:'Hainan ', v:'CN-46 '},15733],");
	Str_Format(GeoMapRef[10].stringval,"[{f:'Hebei ', v:'CN-13 '},15189],");
	Str_Format(GeoMapRef[11].stringval,"[{f:'Heilongjiang ', v:'CN-23 '},15903],");
	Str_Format(GeoMapRef[12].stringval,"[{f:'Henan ', v:'CN-41 '},14204],");
	Str_Format(GeoMapRef[13].stringval,"[{f:'Hubei ', v:'CN-42 '},16473],");
	Str_Format(GeoMapRef[14].stringval,"[{f:'Hunan ', v:'CN-43 '},16005],");
	Str_Format(GeoMapRef[15].stringval,"[{f:'Jiangsu ', v:'CN-32 '},24776],");
	Str_Format(GeoMapRef[16].stringval,"[{f:'Jiangxi ', v:'CN-36 '},15100],");
	Str_Format(GeoMapRef[17].stringval,"[{f:'Jilin ', v:'CN-22 '},15998],");
	Str_Format(GeoMapRef[18].stringval,"[{f:'Liaoning ', v:'CN-21 '},20818],");
	Str_Format(GeoMapRef[19].stringval,"[{f:'Mongolia Interior ', v:'CN-15 '},18693],");
	Str_Format(GeoMapRef[20].stringval,"[{f:'Ningxia ', v:'CN-64 '},14566],");
	Str_Format(GeoMapRef[21].stringval,"[{f:'Qinghai ', v:'CN-63 '},12947],");
	Str_Format(GeoMapRef[22].stringval,"[{f:'Shaanxi ', v:'CN-61 '},14372],");
	Str_Format(GeoMapRef[23].stringval,"[{f:'Shandong ', v:'CN-37 '},19008],");
	Str_Format(GeoMapRef[24].stringval,"[{f:'Shanghai ', v:'CN-31 '},42174],");
	Str_Format(GeoMapRef[25].stringval,"[{f:'Shanxi ', v:'CN-14 '},15119],");
	Str_Format(GeoMapRef[26].stringval,"[{f:'Sichuan ', v:'CN-51 '},14231],");
	Str_Format(GeoMapRef[27].stringval,"[{f:'Tianjin ', v:'CN-12 '},26359],");
	Str_Format(GeoMapRef[28].stringval,"[{f:'Xinjiang ', v:'CN-65 '},13670],");
	Str_Format(GeoMapRef[29].stringval,"[{f:'Tibet ', v:'CN-54 '},9740],");
	Str_Format(GeoMapRef[30].stringval,"[{f:'Yunnan ', v:'CN-53 '},12578],");
	Str_Format(GeoMapRef[31].stringval,"[{f:'Zhejiang ', v:'CN-33 '},29775],  ");    
	Str_Format(GeoMapRef[32].stringval,"]),");
end_proc