Message
 
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01156159
Message ID:
01156177
Views:
27
>I think this should handle it. I hope we do always have NULL in FK and not empty:
>
>if (IsNull(cursor_trans_stage.cDischarge_status_code_fk) ;
>				and isnull(cursor_trans_stage.cAdmit_type_code_fk) ;
>				and isnull(cursor_trans_stage.cAdmit_Source_code_fk)) or ;
>			   (nvl(cursor_trans_stage.cDischarge_status_code_fk,"A") == ;
>			    nvl(Load_Trans.cDischarge_status_code_fk,"A") and ;
>			    nvl(cursor_trans_stage.cAdmit_type_code_fk,"A") == ;
>			    nvl(Load_Trans.cAdmit_type_code_fk,"A") and ;
>			    nvl(cursor_trans_stage.cAdmit_Source_code_fk,"A") == ;
>			    nvl(Load_Trans.cAdmit_Source_code_fk,"A"))
>				** Do nothing - all empty or exactly the same
>			else
>				replace cDischarge_status_code_fk ;
>				with nvl(Load_Trans.cDischarge_status_code_fk, ;
>				cursor_trans_stage.cDischarge_status_code_fk), ;
>				cAdmit_type_code_fk ;
>				with nvl(Load_Trans.cAdmit_type_code_fk, ;
>				cursor_trans_stage.cAdmit_type_code_fk), ;
>				cAdmit_Source_code_fk ;
>				with nvl(Load_Trans.cAdmit_Source_code_fk, ;
>				cursor_trans_stage.cAdmit_Source_code_fk) in Load_Trans	
>		    endif	
>
No, this would not work, if we have something in cursor and something in Trans, for example, cursor.Field1 = "B" and Trans.field1 = "C". I want to preserve C and don't touch the record if cursor other fields are empty.
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View