I suppose you've already done some debugging, tracing and such?, does the value magically change when stepping through the program?. Another thing I could think of is code in the calling form's deactivate or lostfocus event that somehow changes the value.

>cFrmDetailListing absolutely does not call back to THISFORM and change THISFORM.lIsOkToSave
>
>What am I missing here.
>
>
>

>* Evaluates to .F.
>WAIT WINDOW '1: ' + IIF(THISFORM.lIsOkToSave, 'T', 'F')
>
>oForm = NEWOBJECT('cfrmDetailListing',    ;
>                  'MCSForms_DetailInput', ;
>                  NULL,                   ;
>                  cProvider)
>
>*Still .F.
>WAIT WINDOW '1: ' + IIF(.lIsOkToSave, 'T', 'F')
>
>IF VARTYPE(oForm) = 'O'
>      WITH oForm
>         .SHOW(1)
>         * All of sudden true and remains .t. when it should not be.
>         * should be .f.
>         WAIT WINDOW '2: ' + IIF(THISFORM.lIsOkToSave, 'T', 'F')
>
>         IF .lSelected
>            cRetVal = .cCode
>            THISFORM.cPCAdd = '4'
>         ENDIF
>
>         WAIT WINDOW '3: ' + IIF(THISFORM.lIsOkToSave, 'T', 'F')
>
>      ENDWITH
>ENDIF
>