Dear Gregory;
I am currently using two different versions of CSPro. I developed and deployed the application using Version 7.7, but in the field, the tablets are running Version 8.0 while the desktop still uses Version 7.7.
When I set the option to 'Always allow (Without access token)' in version 8.0 and run the application, it works. However, since I am using Version 7.7 to create and deploy the application, how can I configure the 'Always allow (Without access token)' setting in this context?
Here is my code, where i am getting the message:
Preproc
If StrFlag="Start" then
else
setproperty($, "Protected",false);
{*******************************************************}
{*** SELECT ENUMERATION AREA ***}
{*** USE SAMPLE_DICT AND SAMPLE.CSDB FILE ***}
// set access(SAMPLE_DICT, OrderType.Indexed, Order.Ascending);
setfile (SAMPLE_DICT,"..\106_Ext_Data\Sample.csdb");
//string blocklable = getlabel(PSUBN_VS1, PSUBN);
if selcase("Select Enumeration Area in " + getlabel(PSUBN_VS1, PSUBN), SAMPLE_DICT,"" )
// include (SSS, T_Block_N, T_NAME, D_NAME,S_CODE ,L_NAME)
include (T_Block_N, T_NAME, D_NAME,S_CODE)
where T_Block_N = PSUBN and S_CODE=tonumber(loadsetting("SupervisorID"))=0 then //L_Name = Locality; D_Name=District; T_Name =Tehsil Name; S_Code=Supervisor Code
set errmsg (operator);
errmsg ("No Enumeration Area selected.\n\n\nApplication is going to Exit.");
set errmsg (default);
stop(1);
else
//You will find Key as a Processing Code or Enumeration Area
set errmsg (Operator);
errmsg ("The Selected Enumeration Area Code is \n\n [...%04s...].", key (SAMPLE_DICT) [1:4]);
savesetting("saveHHPSU",key(SAMPLE_DICT)[1:4]);
set errmsg (default);
$=PSU_ID;
endif;
endif;
If loadsetting("Designation")="1" then //Login as Supervisor
Sel_Result= accept("Health and Population Survey (HPS) - Supervisor Menu",
"PSU AREA ", {01}
" + Assign PSU Area to the Enumerator ", {02}
" + Send PSU Area to the Enumerator ", {03}
" ", {04}
" ", {05}
"HOUSEHOLD INTERVIEW ", {06}
" + Assign Household to the Enumerator ", {07}
" + Send Assigned Household to the Enumerator", {08}
" ", {09}
"RECEIVE DATA FROM THE ENUMERATOR ", {10}
" + Receive HH Data ", {11}
" + Receive Female Interview Data ", {12}
" ", {13}
"DATA SYNCHRONIZATION WITH THE SERVER ", {14}
" + Send Household Data on the Server ", {15}
" + Send Female Interview Data on the Server", {16}
" + View Household Interview Report ", {17}
" ", {18}
" ", {19}
"Application Close "); {20}
elseIf loadsetting("Designation")="2" and loadsetting("LoginGender")="1" then //Login as Male Enumerator
Sel_Result= accept("Health and Population Survey (HPS) - Male Enumerator",
"PSU AREA ", {01}
" + Receive Assigned Enumeration Area ", {02}
" ", {03}
" ", {04}
"RECEIVE ASSIGNED HOUSEHOLDS ", {05}
" + Receive Assigned Households ", {06}
" ", {07}
"HOUSEHOLD INTERVEIW ", {08}
" + Conduct Household Interview ", {09}
" + Assign Household Info to Female enumerator", {10}
" ", {11}
"DATA SYNCHRONIZATION WITH THE SUPERVISOR ", {12}
" + Send Assigned HH Info to Female enumerator",{13}
" + Send HH Data to the Supervisor ", {14}
" + Send Picture on the Server ", {15}
" + View Household Interview Report ", {16}
" ", {17}
"Application Close "); {18}
elseIf loadsetting("Designation")="2" and loadsetting("LoginGender")="2" then //Login as Female Enumerator
Sel_Result= accept("Health and Population Survey (HPS) - Female Enumerator",
"PSU AREA ", {01}
" + Receive Assigned Enumeration Area ", {02}
" + ", {03}
" ", {04}
"RECEIVE ASSIGNED HOUSEHOLDS ", {05}
" + Receive Assigned Households from the Supervisor ", {06}
" ", {07}
"HOUSEHOLD INTERVEIW ", {08}
" + Conduct Household Interview ", {09}
" + Conduct Female Interview ", {10}
" + Assign Household Info to the Female enumerator", {11}
" ", {12}
"DATA SYNCHRONIZATION ", {13}
" + Receive Assigned HH Info for Female Interview", {14}
" + Send Assigned HH Info to Female enumerator",{15}
" + Send HH Data to the Supervisor ", {16}
" + Send Female Data to the Supervisor ", {17}
" + View Household Interview Report ", {18}
" ", {19}
" ", {20}
"Application Close "); {21}
else
endif;
if loadsetting("Designation")="1" then
StrFlag ="Start";
if Sel_Result =2 then
//errmsg ("The changes identified during training are being made. The application will be available soon.");
// move to PSUBN;
AssignPSUArea();
elseif Sel_Result =3 then
SendReceiveArea();
elseif Sel_Result =7 then
advance to Select_hh_id;
elseif Sel_Result =8 then
SendReceiveAsignHH();
elseif Sel_Result =11 then
SendReceiveHHData();
elseif Sel_Result =12 then
SendReceiveFemaleData();
elseif Sel_Result =15 then
SendHHDataonServer();
elseif Sel_Result =16 then
SendFemaleDataonServer();
elseif Sel_Result =17 then
// ViewHHInterviewStatus();
ViewHHReportHTML();
move to PSUBN;
elseif Sel_Result = 20 then
StopApplication();
elseif Sel_Result = 0 then
WarningIndex=errmsg("Do you want to Exit from the Application?")
select("Yes, want to Exit from the Application", continue,
"Continue from the Menu", continue)
default(1);
if WarningIndex=1 then
StopApplication();
else
Move to PSU_SUP_ID;
endif;
elseif Sel_Result in 1,4:6,9:10, 13:14, 18:19 then
errmsg ("Supervisor: You have not selected any option.");
move to PSUBN;
else
endif;
endif;
if loadsetting("Designation")="2" and loadsetting("LoginGender")="1" then //Male enumerator
StrFlag ="Start";
if Sel_Result =2 then
SendReceiveArea();
elseif Sel_Result =6 then
SendReceiveAsignHH();
elseif Sel_Result =9 then
SelectHHforInterview();
ConductInt();
elseif Sel_Result =10 then
AssignHHforFemaleInterview();
move to PSUBN;
// AssingHHtoFemale();
elseif Sel_Result =13 then
SendReceiveAssingHHtoFemale();
move to PSUBN;
elseif Sel_Result =14 then
SendReceiveHHData();
elseif Sel_Result =15 then
// ViewHHInterviewStatus();
SendPictureonServer();
elseif Sel_Result =16 then
// ViewHHInterviewStatus();
ViewHHReportHTML();
move to PSUBN;
elseif Sel_Result = 0 then
WarningIndex=errmsg("Do you want to Exit from the Application?")
select("Yes, want to Exit from the Application", continue,
"Continue from the Menu", continue)
default(1);
if WarningIndex=1 then
StopApplication();
else
Move to PSU_SUP_ID;
endif;
elseif Sel_Result = 18 then
StopApplication();
elseif Sel_Result in 1,3:5,7:8,11:12, 17 then
errmsg ("Enumerator: You have not selected any option.");
move to PSUBN;
else
endif;
else
endif;
if loadsetting("Designation")="2" and loadsetting("LoginGender")="2" then//Female enumerator
StrFlag ="Start";
if Sel_Result =2 then
SendReceiveArea();
elseif Sel_Result =6 then
SendReceiveAsignHH();
elseif Sel_Result =9 then
SelectHHforInterview();
ConductInt();
elseif Sel_Result =10 then
SelectHHforfemaleInterview();
advance to SELECT_ELIGIBLE_WOMEN;
elseif Sel_Result =11 then
AssignHHforFemaleInterview();
move to PSUBN;
elseif Sel_Result =15 then
SendReceiveAssingHHtoFemale();
move to PSUBN;
elseif Sel_Result =14 then
SendReceiveAssingHHtoFemale();
elseif Sel_Result =16 then
SendReceiveHHData();
elseif Sel_Result =17 then
SendReceiveFemaleData();
elseif Sel_Result =18 then
ViewHHReportHTML();
move to PSUBN;
elseif Sel_Result = 0 then
WarningIndex=errmsg("Do you want to Exit from the Application?")
select("Yes, want to Exit from the Application", continue,
"Continue from the Menu", continue)
default(1);
if WarningIndex=1 then
StopApplication();
else
Move to PSU_SUP_ID;
endif;
elseif Sel_Result = 21 then
StopApplication();
elseif Sel_Result in 1,3:5,7:8,12:13, 19:20 then
errmsg ("Enumerator: You have not selected any option.");
move to PSUBN;
else
endif;
else
endif;
Postproc
setproperty($, "Protected",true);
