RDS Test spec recipe and pattern list pull from TOOL_CLASS
This commit is contained in:
committed by
Tucker Chase (CSC FI SPS MESLEO)
parent
c183da951a
commit
4b7417c1a8
@ -11,6 +11,7 @@ $insert recipe_layer_info_equ
|
||||
$insert msg_equates
|
||||
$insert logical
|
||||
$insert shipping_info_equ
|
||||
$insert TOOL_CLASS_EQUATES
|
||||
|
||||
equ CrLf$ to char(13):char(10)
|
||||
|
||||
@ -19,10 +20,10 @@ declare function memberof, scroll_enable
|
||||
ReturnVar = 0
|
||||
declare function set_property, fieldcount, get_property, msg, editcell, send_event, dialog_box
|
||||
declare subroutine create_note
|
||||
Branches = 'LOAD_SURFACE_DEF,SET_MEASURE,LOAD_TOOL_RECIPE,SURFSCAN_CLICK,VALIDATE_DOPANT,VALIDATE_MINMAX,SET_SCANNED_IMAGE,VALIDATE_RECIPE,AKRION_RECIPE_CHECK,TW_TYPE_CHECK'
|
||||
Branches = 'LOAD_SURFACE_DEF,SET_MEASURE,LOAD_TOOL_RECIPE,LOAD_TOOL_PATTERN,SURFSCAN_CLICK,VALIDATE_DOPANT,VALIDATE_MINMAX,SET_SCANNED_IMAGE,VALIDATE_RECIPE,AKRION_RECIPE_CHECK,TW_TYPE_CHECK'
|
||||
convert ',' to @fm in Branches
|
||||
locate Branch in Branches using @fm setting Bpos then
|
||||
on Bpos gosub load_surface_def, set_measure, load_tool_recipe, surfscan_click, validate_dopant, validate_minmax, set_scanned_image, validate_recipe, akrion_recipe_check, tw_type_check
|
||||
on Bpos gosub load_surface_def, set_measure, load_tool_recipe, load_tool_pattern, surfscan_click, validate_dopant, validate_minmax, set_scanned_image, validate_recipe, akrion_recipe_check, tw_type_check
|
||||
end else
|
||||
Void = msg( '', 'Invalid Branch ':Bpos:' passed to prod_spec_comm' )
|
||||
end
|
||||
@ -111,13 +112,24 @@ return
|
||||
LOAD_TOOL_RECIPE:
|
||||
Tool = get_property( @window:'.TOOL', 'TEXT' )
|
||||
convert @lower_case to @upper_case in Tool
|
||||
RecipeList = xlate( 'LISTBOX_CONFIG', Tool:'_RECIPES', '', 'X' )
|
||||
RecipeList = xlate( 'TOOL_CLASS', Tool, TOOL_CLASS_RECIPES$, 'X' )
|
||||
convert @vm to @fm in RecipeList
|
||||
if RecipeList <> '' then
|
||||
Void = set_property( @window:'.RECIPE', 'LIST', RecipeList )
|
||||
end
|
||||
return
|
||||
*============================================================================*
|
||||
*============================================================================*
|
||||
LOAD_TOOL_PATTERN:
|
||||
Tool = get_property( @window:'.TOOL', 'TEXT' )
|
||||
convert @lower_case to @upper_case in Tool
|
||||
PatternList = Xlate('TOOL_CLASS', Tool, TOOL_CLASS_PATTERN$, 'X')
|
||||
CONVERT @VM To @FM IN PatternList
|
||||
If PatternList Ne '' Then
|
||||
Void = Set_Property(@Window:'.PATTERN', 'LIST', PatternList)
|
||||
End
|
||||
return
|
||||
*============================================================================*
|
||||
SURFSCAN_CLICK:
|
||||
CtrlToUse = get_property( @window, '@SurfScanCtl' )
|
||||
if get_property( @window:'.':CtrlToUse, 'CHECK' ) then
|
||||
|
Reference in New Issue
Block a user