Update a case from another application
Posted: September 3rd, 2018, 4:46 pm
Hi I have been trying to add data to a case in my control sheet app, from the questionnaire app. I have been trying this code:
The getcaselabel statement returns a blank and it seems like no case is loaded. Is there a reason why no case is loaded? I'm pretty sure that I have the case ID correct.
Code: Select all
PROC DATE
postproc
string idno = maketext("%V%V%V%V%3d%V",RNDNO,EDNO,PARNO,STRATUM,bldgno,HHNO); //stores ID of listing
loadcase(LISTING_DICT,idno);
errmsg("Loadingcase:%V%V%V%V%3d%V,loaded case:%s",RNDNO,EDNO,PARNO,STRATUM,bldgno,HHNO,getcaselabel(LISTING_DICT));
if LSTSTDATE = notappl then //if date is blank then insert this date
LSTSTDATE = $;
endif;
writecase(LISTING_DICT);