ftexampl5.js

非常好的JAVASCRIPT树型

function node(desc, href, suid){
this.desc = desc
this.href = href
this.suid = suid
this.children = new Array
this.nChildren = 0
this.addCN = addCN
return
}
function addCN(childNode)
{
this.children[this.nChildren] = childNode
this.nChildren++
return childNode
}
function addToTree(addFolder)
{
clickedNode = assN["id"+addFolder.suid]
if (clickedNode != null){
	for (i=0; i < clickedNode.nChildren; i++)
		{
		if (clickedNode.children[i].nChildren > 0)
			insFld(addFolder, gFld(clickedNode.children[i].desc,clickedNode.children[i].href,clickedNode.children[i].suid))
		else
			insDoc(addFolder, gLnk(clickedNode.children[i].desc,clickedNode.children[i].href,clickedNode.children[i].suid))
		}
	}	
return false;
}

assN = new Object()
iconFolder = "../../images/" 
ftFolder = "../../"

commonLink= "ftbase.htm"
fT = gFld("<B>Activity Types</B>","")
aux1 = insFld(fT, gFld("Demobilize rig job","",37))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Ballast rig","",134))
insDoc(aux1, gLnk("Break and lay down tubular","",123))
insDoc(aux1, gLnk("Clean rig circulating system","",34))
insDoc(aux1, gLnk("Handle anchor","",194))
insDoc(aux1, gLnk("Inspect area","",271))
insDoc(aux1, gLnk("Inspect equipment","",93))
insDoc(aux1, gLnk("Jack down rig","",144))
insDoc(aux1, gLnk("Jack up rig","",145))
insDoc(aux1, gLnk("Maintain equipment","",18))
insDoc(aux1, gLnk("Move equipment","",270))
insDoc(aux1, gLnk("Move material","",200))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Pull anchor","",120))
insDoc(aux1, gLnk("Repair equipment","",103))
insDoc(aux1, gLnk("Rig down land rig","",148))
insDoc(aux1, gLnk("Safety meeting","",108))
insDoc(aux1, gLnk("Skid drilling tower","",149))
insDoc(aux1, gLnk("Tow rig","",150))
insDoc(aux1, gLnk("Transfer equipment or material","",64))
insDoc(aux1, gLnk("Transit rig","",46))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Drill wellbore job","",259))
insDoc(aux1, gLnk("Avoidable wait","",215))
aux2 = insFld(aux1, gFld("Drill section job","",67))
aux2 = insFld(aux1, gFld("Drillstem test job","",237))
aux2 = insFld(aux1, gFld("Install template job","",328))
insDoc(aux1, gLnk("Planned wait","",216))
aux2 = insFld(aux1, gFld("Remove template job","",327))
aux2 = insFld(aux1, gFld("Secure well job","",268))
aux2 = insFld(aux1, gFld("Secure wellbore section job","",12))
aux2 = insFld(aux1, gFld("Sidetrack job","",181))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Install rig equipment job","",321))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Install rig equipment","",260))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Install subsea equipment job","",325))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Install subsea equipment","",315))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Install wellhead equipment job","",323))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Install wellhead equipment","",22))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Mobilize rig job","",79))
insDoc(aux1, gLnk("Adjust anchor tension","",255))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Ballast rig","",134))
insDoc(aux1, gLnk("Clean rig circulating system","",34))
insDoc(aux1, gLnk("Extend leg","",223))
insDoc(aux1, gLnk("Handle anchor","",194))
insDoc(aux1, gLnk("Inspect area","",271))
insDoc(aux1, gLnk("Inspect equipment","",93))
insDoc(aux1, gLnk("Jack down rig","",144))
insDoc(aux1, gLnk("Jack up rig","",145))
insDoc(aux1, gLnk("Maintain equipment","",18))
insDoc(aux1, gLnk("Mix fluid","",115))
insDoc(aux1, gLnk("Modify equipment","",198))
insDoc(aux1, gLnk("Move equipment","",270))
insDoc(aux1, gLnk("Move material","",200))
insDoc(aux1, gLnk("Pick up and make up tubular","",49))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Position rig","",193))
insDoc(aux1, gLnk("Pull anchor","",120))
insDoc(aux1, gLnk("Repair equipment","",103))
insDoc(aux1, gLnk("Rig up land rig","",147))
insDoc(aux1, gLnk("Rig up surface equipment","",52))
insDoc(aux1, gLnk("Run anchor","",54))
insDoc(aux1, gLnk("Safety meeting","",108))
insDoc(aux1, gLnk("Skid drilling tower","",149))
insDoc(aux1, gLnk("Test equipment","",50))
insDoc(aux1, gLnk("Tow rig","",150))
insDoc(aux1, gLnk("Transfer equipment or material","",64))
insDoc(aux1, gLnk("Transit rig","",46))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Plug and abandon job","",72))
insDoc(aux1, gLnk("Avoidable wait","",215))
aux2 = insFld(aux1, gFld("Cement plug job","",30))
insDoc(aux1, gLnk("Disassemble equipment","",269))
aux2 = insFld(aux1, gFld("Fishing job","",68))
aux2 = insFld(aux1, gFld("Injection job","",78))
aux2 = insFld(aux1, gFld("Install downhole equipment job","",283))
aux2 = insFld(aux1, gFld("Perforate job","",284))
insDoc(aux1, gLnk("Planned wait","",216))
aux2 = insFld(aux1, gFld("Remove downhole equipment job","",282))
aux2 = insFld(aux1, gFld("Secure well job","",268))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux2 = insFld(aux1, gFld("Well control equipment job","",11))
aux1 = insFld(fT, gFld("Remove rig equipment job","",322))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Remove rig equipment","",262))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Remove subsea equipment job","",326))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Remove subsea equipment","",317))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Remove wellhead equipment job","",324))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Remove wellhead equipment","",116))
insDoc(aux1, gLnk("Unavoidable wait","",14))
insDoc(fT, gLnk("Retract leg","",224))
insDoc(fT, gLnk("Site preparation","",333))
insDoc(fT, gLnk("Site reclamation","",334))
insDoc(fT, gLnk("Spotting and preparing of equipment","",319))
aux1 = insFld(fT, gFld("Technical sidetrack job","",171))
insDoc(aux1, gLnk("Avoidable wait","",215))
aux2 = insFld(aux1, gFld("Drill section job","",67))
insDoc(aux1, gLnk("Planned wait","",216))
aux2 = insFld(aux1, gFld("Secure wellbore section job","",12))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Temporary abandonment job","",329))
insDoc(aux1, gLnk("Avoidable wait","",215))
aux2 = insFld(aux1, gFld("Drilling job","",265))
aux2 = insFld(aux1, gFld("Fishing job","",68))
aux2 = insFld(aux1, gFld("Install downhole equipment job","",283))
aux2 = insFld(aux1, gFld("Logging job","",65))
aux2 = insFld(aux1, gFld("Milling job","",69))
insDoc(aux1, gLnk("Planned wait","",216))
aux2 = insFld(aux1, gFld("Remote operated vehicle job","",176))
aux2 = insFld(aux1, gFld("Remove downhole equipment job","",282))
aux2 = insFld(aux1, gFld("Secure well job","",268))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux2 = insFld(aux1, gFld("Well control equipment job","",11))
aux2 = insFld(aux1, gFld("Well control job","",59))
aux1 = insFld(fT, gFld("Tie back facility slot job","",332))
insDoc(aux1, gLnk("Avoidable wait","",215))
aux2 = insFld(aux1, gFld("Cement plug job","",30))
aux2 = insFld(aux1, gFld("Diving job","",177))
aux2 = insFld(aux1, gFld("Fishing job","",68))
aux2 = insFld(aux1, gFld("Injection job","",78))
insDoc(aux1, gLnk("Inspect area","",271))
aux2 = insFld(aux1, gFld("Install downhole equipment job","",283))
aux2 = insFld(aux1, gFld("Logging job","",65))
aux2 = insFld(aux1, gFld("Milling job","",69))
insDoc(aux1, gLnk("Move equipment","",270))
aux2 = insFld(aux1, gFld("Perforate job","",284))
insDoc(aux1, gLnk("Planned wait","",216))
aux2 = insFld(aux1, gFld("Remove downhole equipment job","",282))
insDoc(aux1, gLnk("Rig up surface equipment","",52))
aux2 = insFld(aux1, gFld("Tubular installation job","",217))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux2 = insFld(aux1, gFld("Well control equipment job","",11))
aux2 = insFld(aux1, gFld("Well control job","",59))
aux1 = insFld(fT, gFld("Tubular removal job","",320))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Scaffolding","",318))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux1 = insFld(fT, gFld("Well completion job","",71))
insDoc(aux1, gLnk("Avoidable wait","",215))
insDoc(aux1, gLnk("Break and lay down tubular","",123))
aux2 = insFld(aux1, gFld("Cement plug job","",30))
aux2 = insFld(aux1, gFld("Drillstem test job","",237))
insDoc(aux1, gLnk("Equalise pressure","",92))
insDoc(aux1, gLnk("Fill tank or pits","",89))
aux2 = insFld(aux1, gFld("Fishing job","",68))
aux2 = insFld(aux1, gFld("Fracturing job","",131))
insDoc(aux1, gLnk("H2S check","",101))
insDoc(aux1, gLnk("Inspect equipment","",93))
insDoc(aux1, gLnk("Install corrosion cap","",45))
aux2 = insFld(aux1, gFld("Install downhole equipment job","",283))
aux2 = insFld(aux1, gFld("Logging job","",65))
insDoc(aux1, gLnk("Mix fluid","",115))
aux2 = insFld(aux1, gFld("Perforate job","",284))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Pull riser","",121))
insDoc(aux1, gLnk("Pull wearbushing","",118))
insDoc(aux1, gLnk("Remove blow out preventer","",105))
insDoc(aux1, gLnk("Remove corrosion cap","",124))
aux2 = insFld(aux1, gFld("Remove downhole equipment job","",282))
insDoc(aux1, gLnk("Remove wellhead equipment","",116))
insDoc(aux1, gLnk("Repair equipment","",103))
insDoc(aux1, gLnk("Run riser","",20))
insDoc(aux1, gLnk("Run wearbushing","",53))
insDoc(aux1, gLnk("Safety meeting","",108))
aux2 = insFld(aux1, gFld("Sand control job","",133))
aux2 = insFld(aux1, gFld("Secure well job","",268))
insDoc(aux1, gLnk("Set chemical plug","",55))
aux2 = insFld(aux1, gFld("Squeeze cement job","",28))
insDoc(aux1, gLnk("Test equipment","",50))
insDoc(aux1, gLnk("Transfer equipment or material","",64))
aux2 = insFld(aux1, gFld("Tubular installation job","",217))
insDoc(aux1, gLnk("Unavoidable wait","",14))
aux2 = insFld(aux1, gFld("Well control equipment job","",11))
aux2 = insFld(aux1, gFld("Well performance test job","",242))
aux2 = insFld(aux1, gFld("Work on Xmas tree job","",330))
aux1 = insFld(fT, gFld("Work over job","",70))
insDoc(aux1, gLnk("Avoidable wait","",215))
aux2 = insFld(aux1, gFld("Build up test job","",130))
aux2 = insFld(aux1, gFld("Cement plug job","",30))
aux2 = insFld(aux1, gFld("Chemical treatment job","",132))
aux2 = insFld(aux1, gFld("Draw down test job","",100))
aux2 = insFld(aux1, gFld("Drillstem test job","",237))
aux2 = insFld(aux1, gFld("Extended leak off test job","",229))
aux2 = insFld(aux1, gFld("Fall off test job","",246))
insDoc(aux1, gLnk("Fill tank or pits","",89))
aux2 = insFld(aux1, gFld("Fishing job","",68))
aux2 = insFld(aux1, gFld("Flow test downhole choke job","",275))
aux2 = insFld(aux1, gFld("Fracturing job","",131))
insDoc(aux1, gLnk("H2S check","",101))
aux2 = insFld(aux1, gFld("Injection build up test job","",247))
aux2 = insFld(aux1, gFld("Injection job","",78))
insDoc(aux1, gLnk("Inspect area","",271))
insDoc(aux1, gLnk("Inspect equipment","",93))
aux2 = insFld(aux1, gFld("Install downhole equipment job","",283))
aux2 = insFld(aux1, gFld("Logging job","",65))
aux2 = insFld(aux1, gFld("Milling job","",69))
insDoc(aux1, gLnk("Mix fluid","",115))
aux2 = insFld(aux1, gFld("Multi well pulse test job","",251))
aux2 = insFld(aux1, gFld("Multi well transient pressure test job","",250))
aux2 = insFld(aux1, gFld("Perforate job","",284))
insDoc(aux1, gLnk("Pick up and make up tubular","",49))
insDoc(aux1, gLnk("Planned wait","",216))
insDoc(aux1, gLnk("Pressure bleed off","",86))
insDoc(aux1, gLnk("Pull out of hole","4)",4))
insDoc(aux1, gLnk("Pull riser","",121))
insDoc(aux1, gLnk("Pull seal assembly","",122))
insDoc(aux1, gLnk("Pull tubular","",51))
insDoc(aux1, gLnk("Pull wearbushing","",118))
insDoc(aux1, gLnk("Remove blow out preventer","",105))
aux2 = insFld(aux1, gFld("Remove downhole equipment job","",282))
insDoc(aux1, gLnk("Remove wellhead equipment","",116))
insDoc(aux1, gLnk("Repair equipment","",103))
insDoc(aux1, gLnk("Rig down surface equipment","",117))
insDoc(aux1, gLnk("Rig up surface equipment","",52))
insDoc(aux1, gLnk("Run in hole","2)",2))
insDoc(aux1, gLnk("Run riser","",20))
insDoc(aux1, gLnk("Run wearbushing","",53))
insDoc(aux1, gLnk("Safety meeting","",108))
aux2 = insFld(aux1, gFld("Sand control job","",133))
aux2 = insFld(aux1, gFld("Secure well job","",268))
aux2 = insFld(aux1, gFld("Secure wellbore section job","",12))
insDoc(aux1, gLnk("Set chemical plug","",55))
aux2 = insFld(aux1, gFld("Squeeze cement job","",28))
aux2 = insFld(aux1, gFld("Step rate test job","",243))
insDoc(aux1, gLnk("Test equipment","",50))
insDoc(aux1, gLnk("Transfer equipment or material","",64))
aux2 = insFld(aux1, gFld("Tubular installation job","",217))
insDoc(aux1, gLnk("Unavoidable wait","",14))
insDoc(aux1, gLnk("Wash wellbore","",273))
aux2 = insFld(aux1, gFld("Well control equipment job","",11))
aux2 = insFld(aux1, gFld("Well control job","",59))
aux2 = insFld(aux1, gFld("Well interference test job","",249))
aux2 = insFld(aux1, gFld("Well performance test job","",242))
aux2 = insFld(aux1, gFld("Wellbore inflow test job","",97))
aux2 = insFld(aux1, gFld("Work on Xmas tree job","",330))

assN["id"+190] = new node("Activity type","190)",190)
assN["id"+255] = new node("Adjust anchor tension","255)",255)
assN["id"+196] = new node("Assemble equipment","196)",196)
assN["id"+180] = new node("Assembly job","180)",180)
assN["id"+210] = new node("Assembly run job","210)",210)
assN["id"+215] = new node("Avoidable wait","215)",215)
assN["id"+107] = new node("Back off pipe","107)",107)
assN["id"+16] = new node("Backream","16)",16)
assN["id"+277] = new node("Bail","277)",277)
assN["id"+134] = new node("Ballast rig","134)",134)
assN["id"+123] = new node("Break and lay down tubular","123)",123)
assN["id"+279] = new node("Broach","279)",279)
assN["id"+278] = new node("Brush","278)",278)
assN["id"+130] = new node("Build up test job","130)",130)
assN["id"+27] = new node("Catch fish","27)",27)
assN["id"+301] = new node("Cement plug assembly run job","301)",301)
assN["id"+30] = new node("Cement plug job","30)",30)