diff --git a/ba/aga_logo.gif b/ba/aga_logo.gif new file mode 100755 index 000000000..54496b22e Binary files /dev/null and b/ba/aga_logo.gif differ diff --git a/ba/cgdll.cpp b/ba/cgdll.cpp deleted file mode 100755 index 3d2be2937..000000000 --- a/ba/cgdll.cpp +++ /dev/null @@ -1,152 +0,0 @@ -#include -#include -#include -#include -#include "cgdll.h" - -class TInstall_dll : public TSkeleton_application -{ -private: -bool _copy_dll, _makeini, _del_dll; - - bool CopiaDll(const char * dllname); - bool CreaExeIni(const char * exename); - -protected: - virtual void main_loop() ; - virtual bool create(); - bool CopiaDlls(); - bool InstallaExeIni(); - bool RemoveDlls(); -public: - virtual ~TInstall_dll () {} - virtual const char * extra_modules() const - {return "BA";} - virtual bool check_autorization() const - {return FALSE;} -}; - -bool TInstall_dll ::CopiaDll(const char * dllname) -{ - bool ok; - TFilename from("C:\\windows\\system"),to("."); - from.add(dllname); - to.add(dllname); - if (fexist(from)) - ok = fcopy(from, to); - else - warning_box("Copia impossibile : %s non è presente in %s", dllname, from.path()); - - return ok; -} - -// crea il .ini in \WINDOWS per i files exe copiati nella directory di EASYCAMPO -bool TInstall_dll ::CreaExeIni(const char * exename) -{ - TFilename ininame("C:\\WINDOWS"); - ininame.add(exename); - TFilename dllname; - - ininame.ext("ini"); - TConfig ini(ininame); - - dllname.currdir(); - dllname.add("xbs200.dll"); - ini.set_paragraph("Installable ISAMs"); - ini.set("FoxPro 2.0" ,dllname ); - ini.set("FoxPro 2.5" ,dllname ); - ini.set("dBASE III" ,dllname ); - ini.set("dBASE IV" ,dllname ); - - ini.set("Deleted","On","dBase ISAM"); - - ini.set("ParadoxNetStyle","3.x","Paradox ISAM" ); - return TRUE; -} - -// -bool TInstall_dll ::CopiaDlls() -{ - bool ok=TRUE; - ok &= CopiaDll("MSAES110.DLL" ); - ok &= CopiaDll("MSAJT112.DLL"); - ok &= CopiaDll("MSAJT200.DLL"); - ok &= CopiaDll("VBDB300.DLL"); - ok &= CopiaDll("VBRUN300.DLL"); - ok &= CopiaDll("XBS200.DLL"); - - return ok; -} -// cancella le dll dal WINDOws -bool TInstall_dll ::RemoveDlls() -{ - bool ok=TRUE; - ok &= (remove("c:\\windows\\system\\MSAES110.DLL" ) == 0); - ok &= (remove("c:\\windows\\system\\MSAJT112.DLL")== 0); - ok &= (remove("c:\\windows\\system\\MSAJT200.DLL")== 0); - ok &= (remove("c:\\windows\\system\\VBDB300.DLL")== 0); - ok &= (remove("c:\\windows\\system\\VBRUN300.DLL")== 0); - ok &= (remove("c:\\windows\\system\\XBS200.DLL")== 0); - - return ok; -} - - -bool TInstall_dll ::InstallaExeIni() -{ - bool ok; - - ok = fexist("MSAES110.DLL" ); - ok &= fexist("MSAJT112.DLL"); - ok &= fexist("MSAJT200.DLL"); - ok &= fexist("VBDB300.DLL"); - ok &= fexist("VBRUN300.DLL"); - ok &= fexist("XBS200.DLL"); - if (!ok) - error_box("Le DLL non sono presenti nel direttorio corrente"); - else - { - // copia dll (ex file PRASSI.PR inst.exe - ok &= CreaExeIni("CB0000.EXE"); - ok &= CreaExeIni("TRRICE.EXE"); - ok &= CreaExeIni("VCOPIA.EXE"); - } - return ok; -} - -bool TInstall_dll ::create() -{ - _copy_dll=TRUE, - _makeini=TRUE, - _del_dll=TRUE; - int c = argc(); - while (c>1) { - c--; - if (strcmp(argv(c),"-d")==0) - _del_dll=FALSE; - else if (strcmp(argv(c),"-c")==0) - _copy_dll=FALSE; - else if (strcmp(argv(c),"-i")==0) - _makeini=FALSE; - else if (strcmp(argv(c),"-h")==0) - warning_box("Parametri di lancio: \n -i non crea i .ini per i programmi di CG \n -c non copia le DLL nella directory corrente \n -d non cancella le DLL su windows\\system "); - } - return TSkeleton_application::create(); - -} -void TInstall_dll ::main_loop() -{ - if (_copy_dll) - CopiaDlls(); - if (_makeini) - InstallaExeIni(); - if (_del_dll) - RemoveDlls(); -} - -int main(int argc,char** argv) -{ - TInstall_dll app; - app.run(argc, argv, "Installazione DLL per contabilita' generale"); - return TRUE; -} diff --git a/ba/cgdll.h b/ba/cgdll.h deleted file mode 100755 index fdee7e1a1..000000000 --- a/ba/cgdll.h +++ /dev/null @@ -1,3 +0,0 @@ -#define F_DELDLL 101 -#define F_MAKEINI 102 -#define F_COPYDLL 103 diff --git a/ba/cgdll.uml b/ba/cgdll.uml deleted file mode 100755 index 5bc70dd1c..000000000 --- a/ba/cgdll.uml +++ /dev/null @@ -1,45 +0,0 @@ -#include "cgdll.h" -TOOLBAR "" 0 20 0 2 -BUTTON DLG_OK 10 2 -BEGIN - PROMPT -12 -1 "" - MESSAGE EXIT,K_ENTER -END - -BUTTON DLG_CANCEL 10 2 -BEGIN - PROMPT -22 -1 "" - MESSAGE EXIT,K_QUIT -END -ENDPAGE - -PAGE "DLL Contabilita' Generale" -1 -1 78 8 -// GROUP 1 = PRE-INSTALLATION -// GROUP 2 = POST-INSTALLATION - - -GROUPBOX DLG_NULL 70 9 -BEGIN - PROMPT 2 2 "@bGestione DLL di VisualBasic" - GROUP 1 -END - -BOOL F_COPYDLL -BEGIN - PROMPT 3 4 "Copia le DLL da C:\WINDOWS\SYSTEM nella directory corrente" - GROUP 1 -END - -BOOL F_MAKEINI -BEGIN - PROMPT 3 6 "Imposta i file di CG per l'uso delle DLL nella directory corrente" - GROUP 1 -END - -BOOL F_DELDLL -BEGIN - PROMPT 3 8 "Cancella le DLL su C:\WINDOWS\SYSTEM" - GROUP 1 -END -ENDPAGE -ENDMASK diff --git a/ba/faxdll.h b/ba/faxdll.h deleted file mode 100755 index edc966b9c..000000000 --- a/ba/faxdll.h +++ /dev/null @@ -1,324 +0,0 @@ -////////////////////////////////////////////////////////////////////////////// -// -// faxdll.h -// -// Copyright(c) 1994,1995 Data Techniques, Inc. -// -////////////////////////////////////////////////////////////////////////////// -//$Header: /test/repos/ba/faxdll.h,v 1.1 1996-07-31 07:08:42 guy Exp $ -//$History: FAXDLL.H $ -// -// ***************** Version 37 ***************** -// User: Johnd Date: 3/05/96 Time: 10:00a -// Updated in $/FaxMan/Server -// Added FAXMODEMDONE Msg -// -// ***************** Version 36 ***************** -// User: Johnd Date: 7/07/95 Time: 11:51a -// Updated in $/FaxMan/Server -// Fixed Bug #358, added FAXERR_PORTINIT to Fax Error enum -// -// ***************** Version 35 ***************** -// User: Johnd Date: 5/25/95 Time: 2:28p -// Updated in $/FaxMan/DLL -// Added FAR to second parameter of FaxLogFind prototype. -// -// ***************** Version 34 ***************** -// User: Johnd Date: 4/18/95 Time: 6:15p -// Updated in $/FaxMan/Ole Control -// Chgd some params from LPSTR to LPCSTRs. -// -// ***************** Version 30 ***************** -// User: Johnd Date: 3/29/95 Time: 4:53p -// Updated in $/FaxMan/Server -// Added new FAXERR enums for Class 1. -// -// ***************** Version 29 ***************** -// User: Timk Date: 3/10/95 Time: 3:22p -// Updated in $/faxman/server -// Added _ to SERVERCONFIG -// -// ***************** Version 28 ***************** -// User: Timk Date: 3/10/95 Time: 3:06p -// Updated in $/faxman/server -// Added nMaxLen parameter to FaxGetConfig function. -// -// ***************** Version 27 ***************** -// User: Timk Date: 3/09/95 Time: 6:56p -// Updated in $/faxman/server -// Added stuff for Setting/Getting server configuration. -// - -#ifndef PORTABLE -typedef short SHORT; -typedef unsigned short USHORT; -#endif - -#define SEND_FAX_STRUCT_REV 1 -#define EXPORT_WINAPI WINAPI _export -#define MAXLEN 128 -#define MAXITERATORS 100 //max # of simultaneous iteratations -#define FAXIDLEN 22 //len of FAXID fields (+2 for /0 and padding) -#define MAXPATH 128 -#define APPNAMESIZE 30 - -#define WM_FAXMSG WM_USER+1000 - -// These identifiers should be responded to by the client apps. -#define FAXSENDMSG 0 -#define FAXPRINTMSG 1 -#define FAXGETFILENAME 2 -#define FAXLOGADD 3 -#define FAXLOGREMOVE 4 -#define FAXCONFIGMSG 5 -#define FAXMODEMMSG 6 -#define FAXSERVERCONFIGMSG 7 -#define FAXMODEMDONE 8 - -typedef enum { - LOGERR_NOITERATORS = MAXITERATORS+1, - LOGERR_OK, - LOGERR_CONTINUEIT, //continue iteration - LOGERR_ENDIT, //end of iteration - nothing else in list - LOGERR_NOENTRIES, //no entries to iterate through -} LOGERR; - -typedef enum { - FAX_0 = 0, - FAX_1, - FAX_2, - FAX_20 -} FAXCLASS; - -typedef enum { - FAXST_ERROR = 0, - FAXST_OK, - FAXST_INIT, - FAXST_WAITFORSEND, - FAXST_SEND_INIT, //initializing a send operation - FAXST_SEND_DIALING, //we're dialing... - FAXST_SEND_WAIT_FCON, //waiting for connect message - FAXST_SEND_FCON, //Connected! - FAXST_SEND_WAIT_FCSI, //waiting for FCSI - FAXST_SEND_FCSI, //Receiver's ID string - FAXST_SEND_WAIT_FDIS, //waiting for remote +FDIS - FAXST_SEND_FDIS, //Remote T.30 parameters - FAXST_SEND_WAIT_CONNECT, //wait for connect - FAXST_SEND_FDCS, //negotiated T.30 parms - FAXST_SENDING, //actually sending data - no longer in command mode - FAXST_PAGE_END, //end of page - FAXST_PORTSHUT, //comm port deleted - FAXST_ABORT, //abort the current FAX operation and reset faxmodem - FAXST_COMPLETE, //we're done, and can dismantle our faxing apparatus - // Receiving fax states - FAXST_INITRX, //initialize faxmodem for receive - FAXST_WAITFORRX, //waiting for RING - FAXST_ANSWERING, //answering the phone - FAXST_RX_NEGOTIATE, //negotiating RX parms - FAXST_RXDATA, //receiving fax data - FAXST_RX_PAGE_END, //end of rx page -} FAXSTATE; - -// FAXERROR is a list of error codes possible in FAXST_ERROR state -typedef enum { - FAXERR_OK, - FAXERR_ACK, // Command wasn't acknowledged w/OK - FAXERR_BADFAXMODEM, // Faxmodem doesn't support FaxModem-level ops - FAXERR_INIT, // error initializing faxmodem - FAXERR_FDIS, // bad FDIS settings - FAXERR_FLID, // some kind of error setting local ID - FAXERR_DIAL, // error dialing - FAXERR_FCON_ERR, // error trying to connect to remote fax - FAXERR_FCSI, // bad FCSI string - FAXERR_NEG_FDIS, // error receiving Negotiated +FDIS - FAXERR_BADSTATE, // tried to do something at wrong time - FAXERR_BUSY, // line is busy - FAXERR_NODIALTONE, // no dialtone found when dialing - FAXERR_NOCONNECT, // didn't get expected CONNECT msg - FAXERR_CANCEL, // user cancel - FAXERR_FPTS, // bad or no FPTS when expected - FAXERR_FHNG, // bad FHNG exit code or no FHNG when expected - FAXERR_FDCS, // +FDCS: not found when expected - FAXERR_ERROR, // general unspecific error w/faxmodem - FAXERR_FILE, // invalid fax file or files specified - FAXERR_VERSION, // incompatible DLL/Server versions - - FAXERR_TIMEOUT, // Timeout during fax send/recv - FAXERR_NO_MPS_RESP, // Sent MPS 3 times w/o response - FAXERR_NO_EOP_RESP, // Sent EOP 3 times w/o response - FAXERR_NOTRAIN, // Unable to train with remote system - FAXERR_PORTINIT, // Error Opening/Initializing Port - -} FAXERROR; - -typedef struct tagSendFaxStruct { - // FaxMan uses these first 3 items for security - // Don't change them unless you know what to do with 'em - char sentinel[4]; //should be 'FMAN' - WORD wStructRev; //revision # of structure - WORD wStructSize; //size of structure, including variable strings - LPSTR szDestName; //who the fax is to - LPSTR szDestFax; //destination fax phone number - LPSTR szSubject; //what the fax is about - LPSTR szFromLine; //who the fax is from - LPSTR szBanner; //defines the banner line for this fax - LPSTR szCover; //file containing cover page - LPSTR szComments; //String containing fax comments - LPSTR szFromCompany; //company of the person sending the fax - LPSTR szToCompany; //company of the fax recipient - LPSTR szFromFax; //fax number of the sending fax - LPSTR szFromPhone; //phone number to contact fax sender at - LPSTR szUserDefined; //client-specific string - char szLocalID[FAXIDLEN]; //Fax ID of sending station ***LocalID*** - SHORT nTimeout; //Timeout val - SHORT nRetries; //# of retries - SHORT nRetryDelay; //seconds before a retry - SHORT nYear; //year to send (1970-2038) - SHORT nMonth; //month to send (1-12) - SHORT nDay; //Day to send - SHORT nHour; //hour to send (0-23) - SHORT nMin; //minute to send (0-59) - SHORT nSecond; //second to send (0-59) - SHORT nSendRes; //requested resolution to send fax - 0=low, 1=high - LPSTR szFileList; //list of files to fax - // items below here are filled in by FaxMan - clients shouldn't change them. - WORD hWndNotify; //notification window - char szAppName[APPNAMESIZE]; //name of app that sent the fax - char szRemoteID[FAXIDLEN]; //String ID of the fax we're connected to - DWORD dwSpeed; //Connect speed - SHORT nFaxRes; //Fax resolution (0 = LOW, 1 = HIGH) - SHORT nTotPages; //# of pages in this fax (total) - SHORT nTotCurPage; //current page (total) - SHORT nCurPages; //# of pages in current file (faxfile) - SHORT nCurPage; //currently sending page in current file - SHORT nPagesSent; //actual # of pages sent (may be different from nTotPages) - SHORT nPercent; //percent complete on current page - DWORD dwID; //FaxMan Generated "handle" to this fax - SHORT nHangCode; //+FHNG result (it's int 'cause it's initialized to -1) - SHORT nPort; //comm port - SHORT nRetryCnt; //actual # of retries attempted by server - SHORT nSendYear; // time of actual transmission - SHORT nSendMonth; // - SHORT nSendDay; // - SHORT nSendHour; // - SHORT nSendMin; // - SHORT nSendSecond; // - DWORD dwDuration; //duration of send event - FAXCLASS faxclass; //type of faxmodem we're dealin' with - WORD wLog; //current log this fax is in - FAXSTATE fs; //current fax state (dialing, waiting, connected, etc...) - FAXERROR fe; //current fax error state (if applicable) - - char szStrs[1]; //strings -} SEND_FAX, FAR *PSEND_FAX; - -typedef struct tagAppInfo { - DWORD sentinel; - char AppName[APPNAMESIZE]; - WORD wndNotify; //notification window - WORD wIterator; //iterator value - WORD wDevIterator; //device iterator - WORD fSubscribe; //subscribe flags -} APPINFO, FAR *PAPPINFO; - -typedef enum { - PRN_OK, //printing completed OK - PRN_ABORT, //aborted by user - PRN_DISKFULL, //full disk error - PRN_ERROR, //undefined error -} PRN_STATUS; - -typedef struct tagPrintStat { - WORD nPages; //# of pages printed - char FileName[MAXPATH]; //Name of file created by driver - PRN_STATUS pStat; //status of print job -} PRINTSTAT, FAR *PPRINTSTAT; - -#define PORT_SEND 0x01 -#define PORT_RX 0x02 -#define PORT_SENDING 0x04 -#define PORT_RECEIVING 0x08 -#define PORT_CLS1 0x10 -#define PORT_CLS2 0x20 -#define PORT_CLS20 0x40 -#define PORT_BLOCKED 0x80 //some kind of error on this port... -#define PORT_BUSY (PORT_RECEIVING | PORT_SENDING) - -#define MAXCOMMSTRLEN 128 -typedef struct tagDevice { - int nPort; //comm port this device is on - WORD wFlags; //tells a little about the port... - char szInit[MAXCOMMSTRLEN]; //init string for this device - char szReset[MAXCOMMSTRLEN]; //reset string for this device -} FAXDEVICE, FAR *PFAXDEVICE; - - -// Subscription identifier flags -// -#define SUBSCRIBE_LOG_PENDING 0x01 // lParam == PSEND_FAX -#define SUBSCRIBE_LOG_SENDING 0x02 // -#define SUBSCRIBE_LOG_COMPLETE 0x04 -#define SUBSCRIBE_LOG_FAILED 0x08 -#define SUBSCRIBE_LOG_RECEIVE 0x10 -#define SUBSCRIBE_LOG_ALL 0x1f -//faxmodem initialization/configuration messages -#define SUBSCRIBE_FAX_CONFIG 0x20 // lParam == PFAXDEVICE -//faxmodem state changes -#define SUBSCRIBE_FAXMODEM 0x40 // lParam == PFAXDEVICE -#define SUBSCRIBE_SERVER_CONFIG 0x80 // lParam = PSERVERCONFIG - -typedef enum { - FAXINIT_INIT, - FAXINIT_TXCLASS, - FAXINIT_RXCLASS, - FAXINIT_DONE, - FAXINIT_ERROPEN, //unable to open the comm port - FAXINIT_ERRNOPORTS, //no ports were found! - FAXINIT_ERRTIMEOUT, //timeout waiting for response from modem -} FAXINIT_STEP; - -typedef struct tagFAX_INIT { - FAXINIT_STEP fStep; //init step we're currently on - WORD nPort; //faxmodem port we're initializing - FAXCLASS fClass; //faxmodem class -} FAX_INIT, FAR *PFAX_INIT; - -typedef struct tagSERVER_CONFIG { - LPSTR lpKey; - LPSTR lpValue; -} SERVER_CONFIG, FAR *PSERVER_CONFIG; - -#ifdef __cplusplus -extern "C" { -#endif - -// FaxLog interface - these function are called by client apps -PAPPINFO EXPORT_WINAPI FaxRegisterApp(LPCSTR lpAppName, WORD AppNotifyWnd); -BOOL EXPORT_WINAPI FaxUnregisterApp(PAPPINFO); -BOOL EXPORT_WINAPI FaxCloseServer(PAPPINFO); - -void EXPORT_WINAPI FaxInitSendStruct(PAPPINFO, PSEND_FAX); -DWORD EXPORT_WINAPI FaxSchedule(PAPPINFO, PSEND_FAX); //returns dwID -BOOL EXPORT_WINAPI FaxCancel(PAPPINFO, DWORD); - -int EXPORT_WINAPI FaxEnumDevices(PAPPINFO); -int EXPORT_WINAPI FaxAddDevice(PAPPINFO, int); -int EXPORT_WINAPI FaxRemoveDevice(PAPPINFO, int); -int EXPORT_WINAPI FaxConfigureDevice(PAPPINFO, PFAXDEVICE); - -WORD EXPORT_WINAPI FaxLogFind(PAPPINFO, PSEND_FAX FAR *, DWORD); //find an item in the log -WORD EXPORT_WINAPI FaxLogInit(PAPPINFO, WORD); //initialize log iteration -WORD EXPORT_WINAPI FaxLogNext(PAPPINFO, PSEND_FAX); //find next item in log -WORD EXPORT_WINAPI FaxLogDelete(PAPPINFO, DWORD, WORD); //delete fax w/dwID - -WORD EXPORT_WINAPI FaxSetConfig(PAPPINFO, LPCSTR, LPCSTR); -WORD EXPORT_WINAPI FaxGetConfig(PAPPINFO, LPCSTR, LPSTR, WORD nLen); - -int EXPORT_WINAPI FaxSubscribe(PAPPINFO, WORD); //subscribe to specified fax events - -PSEND_FAX EXPORT_WINAPI FaxCopy(PSEND_FAX); -WORD EXPORT_WINAPI FaxCreate(PAPPINFO, LPCSTR, LPCSTR, DWORD); - -#ifdef __cplusplus -} -#endif diff --git a/ba/sirio_logo.gif b/ba/sirio_logo.gif new file mode 100755 index 000000000..5775a008f Binary files /dev/null and b/ba/sirio_logo.gif differ