LOCAL lcCli_pk REPLACE CLI_StatusFK WITH giClientStatusInitialScreen, ; cClientStatus WITH gcCLientStatusInitialScreen IN v_Client THISFORM.SSiclientstatusb4edit = 0 lcCli_pk = v_Client.Cli_PK && gets set in AddAction =REQUERY( "v_ClientProblemList") =REQUERY( "v_clientappointmentlist") =REQUERY( "v_clientencounterlist" ) ** 10/01/2003 try to get required ScreenDate set up and refresh client problems IF TYPE( "THISFORM.pgfPageRefresh1.Page3.CTRscreening" ) <> "O" .Page3.Builder_ctrClientScreeningControls_cg.UIENABLE(.T., .T.) && do not Activate ENDIFThere is no "WITH" statement, yet the line: