JSFiddle - React, Tailwind, and code Playground

JavaScript

function PlotGeography(plotData)
		{	
			var j, title;
		
			for (j=0; j<2; j++){
				if (plotObj[1][j]!=null) {
					plotObj[1][j].destroy();	
				}
		
				$("#lower_chart"+j).empty()
				.html('<img src="../styles/loading.gif">');
			}
		
			$.ajax({
				url: "ft_ajax.asp"
				,type: "POST"
				,data: {
					time: plotData.ym,
				}
				,timeout: 10000
				,success: function(ajaxData) {
					
					for (j=0; j<2; j++){
						optCommon.canvasOverlay.show=true;
						optCommon.canvasOverlay.objects[0].dashedHorizontalLine.y=plotObj[0][j].data[0][plotData.iYM][1];
						title=plotData.title[j]+' / '+plotData.location+' / '+ plotData.ym;
						plotObj[1][j]=$.jqplot('lower_chart_'+j, [ajaxData.data[j]], GetPlotOptions(j,title, ajaxData.categories)); 			 
					}
				}
				,error: function(x, t, m) {
					for (j=0; j<2; j++) {
						$('#lower_chart_'+j).html("<h3>An error has occured. ("+t+" / "+m+")</h3>");
					}
				}
			});	
		}	

Dim jsonNurse, jsonDoctor, cat, ym
	
	ym = Request.Form("time") 
	
	
	Dim sqlStr, data, recCount, nbrColumns
	 
	strSQL=Session("AjaxSQL")
	strSQL=Format(strSQL, Array(ym))

	recCount = ReadTable(data, strSQL, connStrDashb) - 1
			
	cat="["
		for i = 0 to recCount
			if i<>0 then cat=cat&"," end if 
			cat=cat&""""&data(0,i)&""""
		next
	cat = cat & "]"

	jsonNurse = ""
	jsonDoctor = ""

	for i = 0 to recCount
		if i<>0 then 
			jsonNurse = jsonNurse&","
			jsonDoctor = jsonDoctor&","
		end if
		
		jsonNurse = jsonNurse&"["&i+1
		jsonDoctor = jsonDoctor&"["&i+1
		
			jsonNurse = jsonNurse&","& data(1,i)&",""n:"&data(1,i)&""""
			jsonDoctor = jsonDoctor&","& data(2,i)&",""d:"&data(2,i)&""""

		
		jsonNurse = jsonNurse&","""&data(0,i)&"""]"
		jsonDoctor = jsonDoctor&","""&data(0,i)&"""]"
	next
	
	Response.ContentType = "application/json"
	Response.Write "{""data"":[["&jsonNurse&"],["&jsonDoctor&"]],""categories"":"&cat&"}"