open-insight/LSL2/OIEVENT/CREATE/RDS_SURF_ENT..json
2024-03-25 15:12:53 -07:00

11 lines
2.1 KiB
JSON

{
"header": {
"version": 1,
"type": "record"
},
"body": {
"record1": {
"<1>": "$insert prod_spec_equ\r\n\r\nDECLARE SUBROUTINE Set_Property\r\nDECLARE FUNCTION Center_Window, Set_Property\r\n\r\nif index( CreateParam, 'CENTER', 1 ) then\r\n void = center_window( @window )\r\nend else\r\n Void = set_property( @window, 'VISIBLE', 1 )\r\nend\r\n\r\nPSNID = FIELD(CreateParam,CHAR(245),1)\r\nSurfaceInfo = FIELD(CreateParam,CHAR(245),2)\r\nTitleText \t= FIELD(CreateParam,CHAR(245),3)\r\nBrightLight\t= FIELD(CreateParam,CHAR(245),4)\r\nMicroscope\t= FIELD(CreateParam,CHAR(245),5)\r\n\r\nIF TitleText NE '' THEN\r\n\tSet_Property(@WINDOW,'TEXT','Post Epi - ':TitleText)\r\nEND ELSE\r\n\tSet_Property(@WINDOW,'TEXT','Post Epi - Surface Inspection')\r\nEND\r\n\r\n\r\n* LOAD THE PRE EPI SURFACE SPECIFICATION\r\n\r\nVoid = set_property( @window, '@Loading', 1 )\r\nPSN = xlate( 'PROD_SPEC', PSNID, '', 'X' )\r\n.post_lpd_s->text = PSN<prod_spec_post_lpd$>\r\n.post_pits_s->text = PSN<prod_spec_post_pits$>\r\n.post_mounds_s->text = PSN<prod_spec_post_mounds$>\r\n.post_bl_defects_s->text = PSN<prod_spec_post_bl_defects$>\r\n.post_spots_s->text = PSN<prod_spec_post_spots$>\r\n.post_fov_s->text = PSN<prod_spec_post_fov$>\r\n.post_spikes_s->text = PSN<prod_spec_post_spikes$>\r\n.post_stack_faults_s->text = PSN<prod_spec_post_stack_faults$>\r\n.post_scratches_s->text = PSN<prod_spec_post_scratches$>\r\n.post_scratch_len_s->text = PSN<prod_spec_post_scratch_len$>\r\n\r\n* THEN LOAD THE CURRENT DATA PASSED FROM THE RDS FIRST WAFER STEP WINDOW\r\nControls = 'POST_LPD_OUT_R/POST_PITS_R/POST_MOUNDS_R/POST_BL_DEFECTS_R/POST_STACK_FAULTS_R/POST_SPIKES_R/'\r\nControls:= 'POST_SPOTS_R/POST_FOV_R/POST_SCRATCHES_R/POST_SCRATCH_LEN_R'\r\n\r\nswap '/' with @rm:@window:'.' in Controls\r\nControls = @window:'.':Controls\r\nconvert @fm to @rm in SurfaceInfo\r\nvoid = set_property( Controls, 'TEXT', SurfaceInfo )\r\nVoid = set_property( @window, '@Controls', Controls )\r\nreturn 1"
}
}
}