11 lines
		
	
	
		
			1.0 KiB
		
	
	
	
		
			JSON
		
	
	
	
	
	
			
		
		
	
	
			11 lines
		
	
	
		
			1.0 KiB
		
	
	
	
		
			JSON
		
	
	
	
	
	
| {
 | |
|     "header": {
 | |
|         "version": 1,
 | |
|         "type": "record"
 | |
|     },
 | |
|     "body": {
 | |
|         "record1": {
 | |
|             "<1>": "$insert recipe_equ\r\ndeclare subroutine set_list_box_data\r\n\r\nInjectors = field( CreateParam, char(245), 2 )\r\nCreateParam = field( CreateParam, char(245), 1 )\r\nRecipeNo = CreateParam<1>\r\nControls = 'RECIPE_NO/EPI_DOPANT/EPI_TIME/EPI_TEMP/EPI_H2_FLOW/EPI_SOURCE/'\r\nControls:= 'EPI_INJECT/EPI_DILUENT/EPI_GASES/EPI_GAS_RATE/EPI_GASUNITS/'\r\nControls:= 'BAKE_TIME/BAKE_TEMP/BAKE_H2/BAKE_SUSC_ROT/ETCH_TIME/ETCH_TEMP/'\r\nControls:= 'ETCH_H2/ETCH_HCL/F_OFFSET/S_OFFSET/R_OFFSET'\r\nswap '/' with @rm:@window:'.' in Controls\r\nControls = @window:'.':Controls\r\nconvert @fm to @rm in CreateParam\r\nvoid = set_property( Controls, 'TEXT', CreateParam )\r\n.recipe_name->text = xlate( 'RECIPE', RecipeNo, recipe_recipe_name$, 'X' )\r\n.injectors->text = Injectors\r\nVoid = set_property( @window, '@Controls', Controls )\r\nset_list_box_data(CtrlEntId)\r\nRETURN 0"
 | |
|         }
 | |
|     }
 | |
| } |