var l0313_FileName="DBL0313/L0313";
var l0313_i,l0313_iMax=50,l0313_jMax=13,l0313_Fc,l0313_F004Flag;
var l0313_Ax,l0313_Flag,l0313_Key,l0313_F004Name,l0313_F004VName,l0313_F004Key;
function L0313_Open(root,f004){return(L0000_Open(Head_PathXml(root)+L0313_FileName(f004)))}
function L0313_Close(){}
function L0313_FileName(f004){return(l0313_FileName+"_"+head_Fsai+f004+".xml")}
function L0313_Read(key)
{
	l0313_i=0;L0313_InitF004();L0313_InitAx(1,l0313_jMax);l0313_Flag=false;l0313_Key=key;l0313_Fc="DateR";
	L0000_Read("L0313","F004");
}
function L0313_ReadAx()
{
	l0313_i=0;L0313_InitF004();L0313_InitAx(l0313_iMax,l0313_jMax);l0313_Flag=false;l0313_Fc="DateA";
	L0000_Read("L0313","F004");
}
function l0313_Date(i){return(l0313_Ax[i][0])}
function l0313_Day(i){return(l0313_Ax[i][1])}
function l0313_F190(i){return(l0313_Ax[i][2])}
function l0313_F028(i){return(l0313_Ax[i][3])}
function l0313_F015(i){return(l0313_Ax[i][4])}
function l0313_F015Desc(i){return(l0313_Ax[i][5])}
function l0313_Time(i){if(l0313_Ax[i][6]==null){return("0")}return(l0313_Ax[i][6])}
function l0313_F360(i){return(l0313_Ax[i][7])}
function l0313_F046(i){return(l0313_Ax[i][8])}
function l0313_Fsai(i){return(l0313_Ax[i][9])}
function l0313_Fest(i){return(l0313_Ax[i][10])}
function l0313_Near(i){return(l0313_Ax[i][11])}
function l0313_Leng(i){return(l0313_Ax[i][12])}
function l0313_NumRec(){return(l0313_i+1)}
function L0313_L0000()
{
	switch(l0313_Fc)
	{
		case "DateR":L0313_L0000Date();break;
		case "DateA":L0313_L0000DateAll();break;
		default     :break;
	}
}
function L0313_L0000Date(){}
function L0313_L0000DateAll()
{
	if(L0000_Tag(1,"N","F004")){l0313_F004Flag=true;return}
	if(l0313_F004Flag){L0313_GetF004();L0313_Tag()}
}
function L0313_GetF004()
{
	if(L0000_Tag(2,"D","F004_F004")){l0313_F004Key=l0000_ResV[0];return}
	if(L0000_Tag(2,"D","F004_NAME")){l0313_F004Name=l0000_ResD[0];return}
	if(L0000_Tag(2,"D","F004_VNAME")){l0313_F004VName=l0000_ResD[0];return}
}
function L0313_Tag()
{
	if(L0000_Tag(2,"N","F190")){l0313_i++;return}
	if(L0000_Tag(3,"D","F190_DATUM")){l0313_Ax[l0313_i][0]=l0000_ResD[0];l0313_Ax[l0313_i][1]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_F190")){l0313_Ax[l0313_i][2]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_F028")){l0313_Ax[l0313_i][3]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_F015")){l0313_Ax[l0313_i][4]=l0000_ResV[0];l0313_Ax[l0313_i][5]=l0000_ResD[0];return}
	if(L0000_Tag(3,"D","F190_UHR")){l0313_Ax[l0313_i][6]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_F360")){l0313_Ax[l0313_i][7]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_F046")){l0313_Ax[l0313_i][8]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_SAIS")){l0313_Ax[l0313_i][9]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_FEST")){l0313_Ax[l0313_i][10]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_NEAR")){l0313_Ax[l0313_i][11]=l0000_ResV[0];return}
	if(L0000_Tag(3,"D","F190_LENG")){l0313_Ax[l0313_i][12]=l0000_ResV[0];return}
}
function L0313_Date(){if(Date_Ddd(l0000_ResD[0])==Date_Ddd(l0313_Key)){return(true)}return(false)}
function L0313_InitAx(iMax, jMax)
{
	l0313_Ax=new Array(iMax);
	for(var i=0;i<iMax;i++){l0313_Ax[i]=new Array(jMax);}
	for(var i=0;i<iMax;i++){for(var j=0;j<jMax;j++){l0313_Ax[i][j]=null}}
}
function L0313_InitF004(){l0313_F004Name="";l0313_F004VName="";l0313_F004Key=0;l0313_F004Flag=false}