// C code generated by PanelToForm.exe from cgiDemo.uir, (c) 2000 Guillaume Dargaud
#include <ansi_c.h>
#include "cgic.h"
#include "cgiDemo.h"// Link this file with CGIC.C, cgiDemo.UIR and the C file containing the callback functions

void InterpretPanel1(void) {
	double D;
	int i,I,Invalid;
	char *Str, DefaultStr[255], CtrlConst[100];
	char *Switch[2]={"0", "1"};
	int hpnltest=LoadPanel(0, "cgiDemo.uir", PNLTEST);
	char Str5[256];	// Move this line to the top of the function
	char* Possible13[]={"0","1","2","3","4"};	// Move this line to the top of the function
	int Choices[5];	// Move this line to the top of the function
	
	// 2 Numeric PNLTEST_DIMENSIONS "Dimensions", hot  
	cgiFormDouble("PNLTEST_DIMENSIONS", &D, 123456);
	SetCtrlVal(hpnltest, PNLTEST_DIMENSIONS, D);
	CB_Dimensions(hpnltest, PNLTEST_DIMENSIONS, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Dimensions set to %g.</P>", D);

	// 3 Numeric PNLTEST_TEMPERATURE "Temperature (°C)", hot  
	cgiFormDoubleBounded("PNLTEST_TEMPERATURE", &D, -100, 100, 22);
	SetCtrlVal(hpnltest, PNLTEST_TEMPERATURE, D);
	CB_Temperature(hpnltest, PNLTEST_TEMPERATURE, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Temperature (°C) set to %g.</P>", D);

	// 4 Numeric PNLTEST_CONNECTIONS "Connections", hot  
	cgiFormIntegerBounded("PNLTEST_CONNECTIONS", &I, 1, 10, 4);
	SetCtrlVal(hpnltest, PNLTEST_CONNECTIONS, I);
	CB_Connections(hpnltest, PNLTEST_CONNECTIONS, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Connections set to %d.</P>", I);

	// 5 String PNLTEST_NAME "Name", hot  
	cgiFormStringNoNewlines("PNLTEST_NAME", Str5, 255);
	SetCtrlVal(hpnltest, PNLTEST_NAME, Str5);
	CB_Name(hpnltest, PNLTEST_NAME, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Name set to \"%s\".</P>", Str5);

	// 6 Textbox PNLTEST_ADDRESS "Address", hot  
	cgiFormStringSpaceNeeded("PNLTEST_ADDRESS", &I);
	Str=(char*)malloc(I);
	cgiFormString("PNLTEST_ADDRESS", Str, I);
	ResetTextBox(hpnltest, PNLTEST_ADDRESS, Str);
	CB_Address(hpnltest, PNLTEST_ADDRESS, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>PNLTEST_ADDRESS set to \"<PRE>%s</PRE>\".</P>", Str);
	free(Str); Str=NULL;

	// 7 Checkbox PNLTEST_ACTIVE "Active", hot  
	I=(cgiFormCheckboxSingle("PNLTEST_ACTIVE") == cgiFormSuccess);
	SetCtrlVal(hpnltest, PNLTEST_ACTIVE, I);
	CB_Active(hpnltest, PNLTEST_ACTIVE, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Active set to %d.</P>", I);

	// 8 Checkbox PNLTEST_LED "Led", indicator  
	// I=(cgiFormCheckboxSingle("PNLTEST_LED") == cgiFormSuccess);
	// SetCtrlVal(hpnltest, PNLTEST_LED, I);
	// CB_Led(hpnltest, PNLTEST_LED, EVENT_COMMIT, NULL, 0, 0);
	// fprintf(cgiOut, "\n<P>Led set to %d.</P>", I);

	// 9 Switch PNLTEST_STATUS "Status", hot  
	cgiFormRadio("PNLTEST_STATUS", Switch, 2, &I, 1);
	SetCtrlIndex(hpnltest, PNLTEST_STATUS, I);
	CB_Status(hpnltest, PNLTEST_STATUS, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Status set to %d.</P>", I);

	// 10 Switch PNLTEST_STATE "State", hot  
	cgiFormRadio("PNLTEST_STATE", Switch, 2, &I, 1);
	SetCtrlIndex(hpnltest, PNLTEST_STATE, I);
	CB_State(hpnltest, PNLTEST_STATE, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>State set to %d.</P>", I);

	// 12 Ring PNLTEST_MENU "Menu", hot  
	cgiFormInteger("PNLTEST_MENU", &I, 1436483587);	// use index, not value, easier but less secure
	SetCtrlIndex(hpnltest, PNLTEST_MENU, I);
	CB_Menu(hpnltest, PNLTEST_MENU, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Menu set to %d.</P>", I);

	// 13 List PNLTEST_SHOPPING "Shoping List", hot  
	cgiFormCheckboxMultiple("PNLTEST_SHOPPING", Possible13, 5, Choices, &Invalid);	// use index, not value
	I=0;
	for (i=0; i<5; i++) { CheckListItem(hpnltest, PNLTEST_SHOPPING, i, Choices[i]); if (Choices[i]) I++; }
	CB_Shopping(hpnltest, PNLTEST_SHOPPING, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Shopping List has %d values selected.</P>", I);

	// 11 Button PNLTEST_VERIFY "Verify", hot  
	cgiFormStringNoNewlines("PNLTEST_VERIFY", CtrlConst, 100);
	CB_Verify(hpnltest, PNLTEST_VERIFY, EVENT_COMMIT, NULL, 0, 0);
	fprintf(cgiOut, "\n<P>Submit button pressed: [<B>Verify</B>].</P>");
}

int cgiMain (void) {
#ifdef _CVI_DEBUG_
	cgiReadEnvironment("capcgi.dat");
#endif
	cgiHeaderContentType("text/html");
	fprintf(cgiOut, "<HTML>\n<HEAD>"
		"\n<TITLE>PanelToForm and cgic test</TITLE>\n</HEAD>"
		"\n<BODY>\n<H1>PanelToForm and cgic test</H1>"
		"\n<H2>Generated by PanelToForm.exe, (c) 2000 Guillaume Dargaud</H2>");
	InterpretPanel1();
	fprintf(cgiOut, "\n</BODY>\n</HTML>\n");
	return 0;
}