home *** CD-ROM | disk | FTP | other *** search
/ Amiga Times / AmigaTimes.iso / sonstiges / tools / amiCheck / Source / amiCheck.c < prev    next >
Encoding:
C/C++ Source or Header  |  1998-10-06  |  93.8 KB  |  3,747 lines
  1. /************** AMICHECK main driver ****************/
  2.  
  3. /* Include everything */
  4. #define INTUI_V36_NAMES_ONLY
  5. #include <dos.h>  /* let us use the WBarg stuff */
  6. #include <stdio.h>
  7. #include <proto/dos.h>
  8. #include <proto/exec.h>
  9. #include <intuition/gadgetclass.h>
  10. #include <clib/intuition_protos.h>
  11. #include <clib/graphics_protos.h>
  12. #include <devices/inputevent.h>
  13. #include <clib/keymap_protos.h>
  14. #include <string.h>
  15. #include <clib/asl_protos.h>
  16. #include <libraries/asl.h>
  17. #include <fcntl.h>
  18. #include <clib/icon_protos.h>
  19. #include <intuition/pointerclass.h>
  20. #include <intuition/classusr.h>
  21. #include <clib/utility_protos.h>
  22.  
  23. #include <dos/dostags.h>
  24.  
  25. #include "amiCheck.h"
  26. #include "mainPanel.h"
  27. #include "regGadget.h"
  28. #include "libraries.h"
  29. #include "enterPanel.h"
  30. #include "seltempPanel.h"
  31. #include "dataBase.h"
  32. #include "edittempPanel.h"
  33. #include "filterPanel.h"
  34. #include "sortPanel.h"
  35. #include "acctPanel.h"
  36. #include "reconcilePanel.h"
  37. #include "searchPanel.h"
  38. #include "categoryPanel.h"
  39. #include "statsPanel.h"
  40. #include "newtempPanel.h"
  41. #include "reportPanel.h"
  42. #include "scriptPanel.h"
  43. #include "analysisPanel.h"
  44. #include "formPanel.h"
  45. #include "netPanel.h"
  46. #include "qdatePanel.h"
  47. #include "qmemoPanel.h"
  48. #include "memoPanel.h"
  49. #include "namePanel.h"
  50. #include "amntPanel.h"
  51. #include "qnamePanel.h"
  52. #include "qamntPanel.h"
  53. #include "impexp.h"
  54. #include "printPanel.h"
  55. #include "groupPanel.h"
  56. #include "arexx.h"
  57. #include "keyPanel.h"
  58. #include "budgetPanel.h"
  59.  
  60. AMIGAGUIDECONTEXT agc = NULL;
  61. struct NewAmigaGuide newAG = {NULL};
  62.  
  63. static const char *VersionString = "\0$VER:" ACVERSION " " __AMIGADATE__;
  64.  
  65. STRPTR AC_AppID       = "amiCheck";
  66.  
  67. STRPTR AC_Version     = ACVERSION,
  68.        AC_LongDesc    = "Checkbook Software",
  69.        AC_Author      = "Douglas M. Dyer",
  70.     AC_Date          = __AMIGADATE__;
  71.  
  72. STRPTR AC_WindowTitle = "amiCheck";
  73.  
  74. #if 0
  75. #ifdef AC020
  76. STRPTR AC_Title        = "amiCheck '020 " ACVERSION " " __AMIGADATE__;
  77. #else
  78. #ifdef EVALUATION
  79. STRPTR AC_Title        = "amiCheck " ACVERSION " [limit 30 entries/account] " __AMIGADATE__;
  80. #else
  81. STRPTR AC_Title        = "amiCheck " ACVERSION " " __AMIGADATE__;
  82. #endif
  83. #endif
  84. #endif
  85.  
  86. STRPTR AC_Title        = "amiCheck " ACVERSION " " __AMIGADATE__;
  87. STRPTR AC_Demo         = "The unregistered version is\nlimited to 30 entries.\n\nPlease see the documents for \nregistration information. Thanks!";
  88.     
  89. #define DEFAULT_FILEPATTERN    "#?.AC"
  90. #define DEFAULT_IMPORTPATTERN    "#?.txt"
  91. #define DEFAULT_SCRIPTPATTERN    "#?.ACscript"
  92. #define DEFAULT_NETPATTERN    "#?.ACnet"
  93.  
  94. /* Library bases */
  95. struct Library *GUIFrontBase;
  96.  
  97. /* Imported from the main panel module */
  98.  
  99. extern STRPTR AC_Version,
  100.               AC_LongDesc,
  101.               AC_Author,
  102.               AC_Date;
  103.  
  104. extern STRPTR AC_WindowTitle;
  105. extern STRPTR AC_AppID;
  106.  
  107. extern AC_InitialOrientation;
  108.  
  109. /* globals */
  110. char currStr[AMNTSIZE+1];
  111. char stateStr[AMNTSIZE+1];
  112. char filtStr[AMNTSIZE+1];
  113. char filePattern[FILEPATTERN_SIZE];
  114. char importPattern[FILEPATTERN_SIZE];
  115. char scriptPattern[FILEPATTERN_SIZE];
  116. char netPattern[FILEPATTERN_SIZE];
  117.  
  118. /* global help links */
  119. __far char *guideLinks[] = {
  120.     "LINK MAIN_PANEL",
  121.     "LINK SELTEMP_PANEL",
  122.     "LINK NEWTEMP_PANEL",
  123.     "LINK EDITTEMP_PANEL",
  124.     "LINK FILTER_PANEL",
  125.     "LINK SORT_PANEL",
  126.     "LINK ANALYSIS_PANEL",
  127.     "LINK FORMS_PANEL",
  128.     "LINK ENTRY_PANEL",
  129.     "LINK RECONCILE_PANEL",
  130.     "LINK ACCOUNT_PANEL",
  131.     "LINK SEARCH_PANEL",
  132.     "LINK CAT_PANEL",
  133.     "LINK STATS_PANEL",
  134.     "LINK REPORT_PANEL",
  135.     "LINK SCRIPT_PANEL",
  136.     "LINK QUICKMEMO_PANEL",
  137.     "LINK QUICKDATE_PANEL",
  138.     "LINK QUICKNAME_PANEL",
  139.     "LINK QUICKAMNT_PANEL",
  140.     "LINK MEMO_PANEL",
  141.     "LINK AMNT_PANEL",
  142.     "LINK NAME_PANEL",
  143.     "LINK NET_PANEL",
  144.     "LINK PRINT_PANEL",
  145.     "LINK GROUP_PANEL",
  146.     "LINK AREXX_PANEL",
  147.     "LINK KEY_PANEL",
  148.    };
  149.  
  150. usrkey dummykey = {0,NULL,""};
  151. UBYTE dclicktype = 0;
  152. BOOL amigaguide = FALSE;
  153. BOOL bootfile = FALSE;
  154. BOOL layoutwarn = TRUE;
  155. BOOL batchmode = FALSE;
  156. GUIFrontApp *guiapp;
  157. GUIFront *gui;
  158. ExtErrorData exterr;
  159. struct InputEvent ie;
  160. struct Menu *menuStrip = NULL;
  161. extern BOOL skipped;
  162. char currFile[FILESIZE] = "";
  163. char currNode[FILESIZE];
  164. char *iconPath = "PROGDIR:AC_Icons/";
  165. char *guidePath = "PROGDIR:documents/amiCheck.guide";
  166. char arexxTemp[FILESIZE];
  167. BOOL autosort = FALSE;
  168. BOOL alldisabled=FALSE;
  169. BOOL seldone = FALSE;
  170. BOOL simpleRefresh = FALSE;
  171. ULONG amiAslHeight = 200L;
  172.  
  173. char amiWindowTitle[100];
  174. char *quitstr = "Are you sure you want to quit amiCheck?\nAll changes to the current account will be lost.";
  175. char *newstr =  "Are you sure you want to start a new account?\nAll changes to the current account will be lost.";
  176. char *openstr = "Are you sure you want to open an account?\nAll changes to the current account will be lost.";
  177. BOOL FALLBACK = FALSE;
  178.  
  179. struct NewMenu amiMenu[] =
  180. {
  181.  {NM_TITLE, "File",         0,0,0,0,},
  182.  {NM_ITEM, "New...",        "N",0,0,0,},
  183.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  184.  {NM_ITEM, "Open...",         "O", 0,0,0,},
  185.  {NM_ITEM, "Save",            "S", 0,0,0,},
  186.  {NM_ITEM, "Save and Exit",    "X", 0,0,0,},
  187.  {NM_ITEM, "Save As...",     "A",0,0,0,},
  188.  {NM_ITEM, NM_BARLABEL,        0,0,0,0,},
  189.  {NM_ITEM, "Import",        0,0,0,0,},
  190.  {NM_SUB,  "Ascii Format...",    0,0,0,0,},
  191.  {NM_ITEM, "Export",        0,0,0,0,},
  192.  {NM_SUB,  "Ascii Format...",    0,0,0,0,},
  193.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  194.  {NM_ITEM, "Reconcile...",    ";",0,0,0,},    
  195.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  196.  {NM_ITEM, "Print Checks...",     "P",0,0,0,},
  197.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  198.  {NM_ITEM, "About",         0,0,0,0,},
  199.  {NM_SUB,  "Third Parties...",    0,0,0,0,},
  200.  {NM_SUB,  "amiCheck...",    0,0,0,0,},
  201.  {NM_ITEM,  "Register...",    0,0,0,0,},
  202.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  203.  {NM_ITEM, "Quit",         "Q",0,0,0,},
  204.  
  205.  
  206.  {NM_TITLE, "Search",        0,0,0,0,},
  207.  {NM_ITEM, "Search...",        "[",0,0,0,},
  208.  {NM_ITEM, "Search Again",    "]",0,0,0,},
  209.  {NM_ITEM, NM_BARLABEL,        0,0,0,0,},
  210.  {NM_ITEM, "Jump to Selected",    "J",NM_ITEMDISABLED,0,0,},
  211.  
  212.  {NM_TITLE, "Edit",         0,0,0,0,},
  213.  {NM_ITEM, "Quick Transaction", 0,0,0,0,},
  214.  {NM_SUB, "Check...",         "C",0,0,0,},
  215.  {NM_SUB, "Withdrawal...",     "W",0,0,0,},
  216.  {NM_SUB, "Deposit...",     "D",0,0,0,},
  217.  {NM_SUB, "Script...",         "P",0,0,0,},
  218.  {NM_SUB, "Use Template...",    "U",0,0,0,},
  219.  {NM_ITEM, "Duplicate Entry...","E",0,0,0,},
  220.  {NM_ITEM, "Batch Mode",     "B", CHECKIT | MENUTOGGLE,0,0,},
  221.  {NM_ITEM, NM_BARLABEL,        0,0,0,0,},
  222.  {NM_ITEM, "Clear",        "/",NM_ITEMDISABLED,0,0,},
  223.  {NM_ITEM, "Unclear",        "\\",NM_ITEMDISABLED,0,0,},
  224.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  225.  {NM_ITEM, "Apply Order...",    0,0,0,0,},
  226.  {NM_ITEM, "Move Entry",    0,NM_ITEMDISABLED,0,0,},
  227.  {NM_ITEM, "Unfilter Item",    "L",NM_ITEMDISABLED,0,0,},
  228.  {NM_ITEM, "Range Actions",    0,NM_ITEMDISABLED,0,0,},
  229.  {NM_SUB, "Clear All...",    0,0,0,0,},
  230.  {NM_SUB, "Unclear All...",    0,0,0,0,},
  231.  {NM_SUB, NM_BARLABEL,         0,0,0,0,},
  232.  {NM_SUB, "Mark All Deducible...",    0,0,0,0,},
  233.  {NM_SUB, "Mark All Non-Deductible...",    0,0,0,0,},
  234.  {NM_SUB, "Mark All Printed...",0,0,0,0,},
  235.  {NM_SUB, "Mark All Unprinted...",    0,0,0,0,},
  236.  {NM_SUB, NM_BARLABEL,         0,0,0,0,},
  237.  {NM_SUB, "Void All...",    0,0,0,0,},
  238.  {NM_SUB, "Unvoid All...",    0,0,0,0,},
  239.  {NM_SUB, NM_BARLABEL,         0,0,0,0,},
  240.  {NM_SUB, "Remove All...",    0,0,0,0,},
  241.  
  242.  {NM_ITEM, NM_BARLABEL,        0,0,0,0,},
  243.  {NM_ITEM, "Account Info...",    "I",0,0,0,},
  244.  {NM_ITEM, "Quick Data",     0,0,0,0,},
  245.  {NM_SUB, "Memo Editor...",     0,0,0,0,},
  246.  {NM_SUB, "Payee Editor...",     0,0,0,0,},
  247.  {NM_SUB, "Amounts Editor...",     0,0,0,0,},
  248.  
  249.  
  250.  {NM_TITLE, "Utility",        0,0,0,0,},
  251.  {NM_ITEM, "Report Generator...",    "R",0,0,0,},
  252.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  253.  {NM_ITEM, "Script Editor...",    0,0,0,0,},
  254.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  255.  {NM_ITEM, "Net Worth...",    "T",0,0,0,},
  256.  
  257.  {NM_TITLE, "ARexx",        0,NM_ITEMDISABLED,0,0,},
  258.  {NM_ITEM, "Assign Macros...",    "M",0,0,0,},
  259.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  260.  {NM_ITEM, arexxMacros[0].macroname,     "1",0,0,0,},
  261.  {NM_ITEM, arexxMacros[1].macroname,     "2",0,0,0,},
  262.  {NM_ITEM, arexxMacros[2].macroname,    "3",0,0,0,},
  263.  {NM_ITEM, arexxMacros[3].macroname,     "4",0,0,0,},
  264.  {NM_ITEM, arexxMacros[4].macroname,     "5",0,0,0,},
  265.  {NM_ITEM, arexxMacros[5].macroname,     "6",0,0,0,},
  266.  {NM_ITEM, arexxMacros[6].macroname,     "7",0,0,0,},
  267.  {NM_ITEM, arexxMacros[7].macroname,     "8",0,0,0,},
  268.  {NM_ITEM, arexxMacros[8].macroname,     "9",0,0,0,},
  269.  {NM_ITEM, arexxMacros[9].macroname,     "0",0,0,0,},
  270.  {NM_ITEM, "Other...",     0,0,0,0,},
  271.  
  272. #if 0
  273.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  274.  {NM_ITEM, "Start Recording",     0,NM_ITEMDISABLED,0,0,},
  275.  {NM_ITEM, "Stop Recording...",    0,NM_ITEMDISABLED,0,0,},
  276. #endif
  277.  {NM_ITEM, NM_BARLABEL,     0,NM_ITEMDISABLED,0,0,},
  278.  {NM_ITEM, "Open CommandShell",    0,0,0,0,},
  279.  {NM_ITEM, "Close CommandShell",0,0,0,0,},
  280.  
  281.  
  282.  {NM_TITLE, "Preferences",    0,0,0,0,},
  283.  {NM_ITEM, "Window",        0,0,0,0,},
  284.  {NM_SUB, "Show Memos",        "=",CHECKIT | MENUTOGGLE,0,0,},
  285.  {NM_ITEM, "Double Click",    0,0,0,0,},
  286.  {NM_SUB, "Edit Transaction",    0,CHECKIT | MENUTOGGLE, ~1,0,},
  287.  {NM_SUB, "Toggle Clear",    0,CHECKIT | MENUTOGGLE, ~2,0,},
  288.  {NM_SUB, "Unfilter",        0,CHECKIT | MENUTOGGLE, ~4,0,},
  289.  {NM_ITEM, "Date Format",    0,0,0,0,},
  290.  {NM_SUB, "12/31/99",        0,CHECKIT | MENUTOGGLE, ~1,0,},
  291.  {NM_SUB, "31/12/99",        0,CHECKIT | MENUTOGGLE, ~2,0,},
  292.  {NM_SUB, "DEC-31-99",        0,CHECKIT | MENUTOGGLE, ~4,0,},
  293.  {NM_SUB, "31-DEC-99",        0,CHECKIT | MENUTOGGLE, ~8,0,},
  294.  {NM_ITEM, NM_BARLABEL,     0,0,0,0,},
  295.  {NM_ITEM, "Check Forms...",    "F",0,0,0,},
  296.  
  297.  {NM_END, NULL, 0,0,0,0,},
  298. };
  299.  
  300. /* "flexible" menu arrangement aid */
  301. #define FILETITLE    0
  302. #define SEARCHTITLE    1
  303. #define EDITTITLE    2
  304. #define UTILITYTITLE    3
  305. #define AREXXTITLE    4
  306. #define PREFSTITLE    5
  307.  
  308. #define FILENEW        0
  309. #define FILEOPEN    2
  310. #define FILESAVE    3
  311. #define FILESAVEEXIT    4
  312. #define FILESAVEAS    5
  313. #define FILEIMPORT    7
  314. #define FILEEXPORT    8
  315. #define FILERECON    10
  316. #define FILEPRINT    12
  317. #define FILEABOUT    14
  318. #define FILEABOUTAC    1
  319. #define FILEABOUTPART    0
  320. #define FILEREGISTER    15
  321. #define FILEQUIT    17
  322.  
  323. #define FILEIMPASCII    0
  324. #define FILEEXPASCII    0
  325.  
  326. #define SEARCHSEARCH    0
  327. #define SEARCHAGAIN    1
  328. #define SEARCHJUMP    3
  329.  
  330. #define EDITQUICK    0
  331. #define EDITQCHECK    0
  332. #define EDITQWITHDRAWAL    1
  333. #define EDITQDEPOSIT    2
  334. #define EDITQSCRIPT    3
  335. #define EDITQTEMPLATE    4
  336. #define EDITDUPLICATE    1
  337. #define EDITBATCH    2
  338. #define EDITCLEAR    4
  339. #define EDITUNCLEAR    5
  340. #define EDITAPPLYSORT    7
  341. #define EDITMOVE    8
  342. #define EDITUNFILT    9
  343. #define EDITRANGE    10
  344. #define EDITRANGECLR    0
  345. #define EDITRANGEUCL    1
  346. #define EDITRANGEDED    3
  347. #define EDITRANGEUND    4
  348. #define EDITRANGEPR    5
  349. #define EDITRANGEUPR    6
  350. #define EDITRANGEVD    8
  351. #define EDITRANGEUVD    9
  352. #define EDITRANGERM    11
  353. #define EDITACCT    12
  354. #define EDITDATA    13
  355. #define EDITDMEMO    0
  356. #define EDITDNAME    1
  357. #define EDITDAMNT    2
  358.  
  359.  
  360. #define UTILITYREPORT    0
  361. #define UTILITYSCRIPT    2
  362. #define UTILITYNET    4
  363.  
  364. #define AREXXASSIGN    0
  365. #define AREXXM1        2
  366. #define AREXXM2        3
  367. #define AREXXM3        4
  368. #define AREXXM4        5
  369. #define AREXXM5        6
  370. #define AREXXM6        7
  371. #define AREXXM7        8
  372. #define AREXXM8        9
  373. #define AREXXM9        10
  374. #define AREXXM10    11
  375. #define AREXXOTHER    12
  376.  
  377. #if 0
  378. #define AREXXBEGINREC    14
  379. #define AREXXENDREC    15
  380. #endif
  381.  
  382. #define AREXXOPENCMD    14
  383. #define AREXXCLOSECMD    15
  384.  
  385.  
  386. #define PREFSWINDOW    0
  387. #define PREFSWINDOWMEMO    0
  388. #define PREFSDCLICK    1
  389. #define PREFSDCLICKE    0
  390. #define PREFSDCLICKC    1
  391. #define PREFSDCLICKU    2
  392. #define PREFSDATE    2
  393. #define PREFSDATE1    0
  394. #define PREFSDATE2    1
  395. #define PREFSDATE3    2
  396. #define PREFSDATE4    3
  397. #define PREFSFORM    4
  398.  
  399. static BOOL dokey;
  400.  
  401. UWORD __chip busyPointer37[] =
  402. {
  403.     0x0000,0x0000,
  404.  
  405.     0x0400,0x07c0,
  406.     0x0000,0x07c0,
  407.     0x0100,0x0380,
  408.     0x0000,0x07e0,
  409.     0x07c0,0x1ff8,
  410.     0x1ff0,0x3fec,
  411.     0x3ff8,0x7fde,
  412.     0x3ff8,0x7fbe,
  413.     0x7ffc,0xff7f,
  414.     0x7efc,0xffff,
  415.     0x7ffc,0xffff,
  416.     0x3ff8,0x7ffe,
  417.     0x3ff8,0x7ffe,
  418.     0x1ff0,0x3ffc,
  419.     0x07c0,0x1ff8,
  420.     0x0000,0x07e0,
  421.  
  422.     0x0000,0x0000,
  423. };
  424.  
  425. UWORD __chip movePointer37[] =
  426. {
  427.     0x0000,0x0000,
  428.  
  429.     0x0180,0x0180,
  430.     0x0f80,0x0e00,
  431.     0xfffc,0xf07c,
  432.     0x7ffc,0x8000,
  433.     0x0f80,0xf07c,
  434.     0x0180,0x0e00,
  435.     0x0000,0x0180,
  436.  
  437.     0x0000,0x0000,
  438. };
  439.  
  440. UWORD __chip movePointer39[2][7] = {
  441. {
  442.     0x0180,
  443.     0x0f80,
  444.     0xfffc,
  445.     0x7ffc,
  446.     0x0f80,
  447.     0x0180,
  448.     0x0000,
  449. },
  450. {
  451.     0x0180,
  452.     0x0e00,
  453.     0xf07c,
  454.     0x8000,
  455.     0xf07c,
  456.     0x0e00,
  457.     0x0180,
  458. },
  459. };
  460.  
  461. struct BitMap ptrBM;
  462. APTR moveObj;
  463. BOOL OS39 = TRUE, moveActive = FALSE;
  464. filterNode *moveNode;
  465. WORD moveRow = -1;
  466.  
  467. BOOL amidone;
  468.  
  469. struct TagItem *aslTagList;
  470.  
  471. struct TagItem scriptloadtags[] =
  472. {
  473.     ASL_Hail, (ULONG)"Select Script File:",
  474.     ASL_File, (ULONG)"",
  475.     ASL_Dir, (ULONG)"PROGDIR:macros",
  476.     ASL_Pattern, (ULONG)scriptPattern, /*"#?.ACscript",*/
  477.     ASL_FuncFlags, FILF_PATGAD,
  478.     TAG_DONE,
  479. };
  480.  
  481. struct TagItem scriptsavetags[] =
  482. {
  483.     ASL_Hail, (ULONG)"Save Script As:",
  484.     ASL_File, (ULONG)"untitled.ACscript",
  485.     ASL_Pattern,(ULONG)"~(#?.info)",
  486.     ASL_FuncFlags,    FILF_SAVE,
  487.     ASL_Dir, (ULONG)"PROGDIR:macros",
  488.     TAG_DONE,
  489. };
  490.  
  491. struct TagItem rexxtags[] =
  492. {
  493.     ASL_Hail, (ULONG)"Select ARexx Macro:",
  494.     ASL_File, (ULONG)"",
  495.     ASL_FuncFlags, FILF_PATGAD,
  496.     ASL_Dir, (ULONG)"PROGDIR:macros",
  497.     TAG_DONE,
  498. };
  499.  
  500. struct TagItem loadtags[] =
  501. {
  502.     ASL_Hail, (ULONG)"Open Account:",
  503.     ASL_File, (ULONG)"",
  504.     ASL_Pattern,(ULONG)filePattern, /*"#?.AC",*/
  505.     ASL_FuncFlags, FILF_PATGAD,
  506.     ASL_Dir, (ULONG)"PROGDIR:",
  507.     TAG_DONE,
  508. };
  509.  
  510. struct TagItem savetags[] =
  511. {
  512.     ASL_Hail, (ULONG)"Save Account As:",
  513.     ASL_File, (ULONG)"untitled.AC",
  514.     ASL_Pattern,(ULONG)"~(#?.info)",
  515.     ASL_Dir, (ULONG)"PROGDIR:",
  516.     ASL_FuncFlags,    FILF_SAVE,
  517.     TAG_DONE,
  518. };
  519.  
  520. struct TagItem impasciitags[] =
  521. {
  522.     ASL_Hail, (ULONG)"Import ASCII:",
  523.     ASL_File, (ULONG)"",
  524.     ASL_Pattern,(ULONG)importPattern, /*"#?.txt",*/
  525.     ASL_FuncFlags, FILF_PATGAD,
  526.     ASL_Dir, (ULONG)"PROGDIR:",
  527.     TAG_DONE,
  528. };
  529.  
  530. STRPTR *demoptr;
  531.  
  532. struct TagItem expasciitags[] =
  533. {
  534.     ASL_Hail, (ULONG)"Export Filter as ASCII:",
  535.     ASL_File, (ULONG)"untitled.txt",
  536.     ASL_Pattern,(ULONG)"~(#?.info)",
  537.     ASL_Dir, (ULONG)"PROGDIR:",
  538.     ASL_FuncFlags,    FILF_SAVE,
  539.     TAG_DONE,
  540. };
  541.  
  542. struct TagItem devtags[] =
  543. {
  544.     ASL_Hail, (ULONG)"Select Output Device:",
  545.     /*ASL_File, (ULONG)"",*/
  546.     ASL_Pattern,(ULONG)"~(#?.info)",
  547.     /*ASL_Dir, (ULONG)"PROGDIR:",*/
  548.     ASL_FuncFlags,    FILF_SAVE,
  549.     TAG_DONE,
  550. };
  551.  
  552. struct TagItem reporttags[] = {
  553.     ASL_Hail, (ULONG)"Save Report To:",
  554.     ASL_File, (ULONG)"untitled.ACreport",
  555.     ASL_Pattern,(ULONG)"#?.ACreport",
  556.     ASL_Dir, (ULONG)"PROGDIR:",
  557.     ASL_FuncFlags,    FILF_SAVE,
  558.     TAG_DONE,
  559. };
  560.  
  561.  
  562. struct TagItem netloadtags[] =
  563. {
  564.     ASL_Hail, (ULONG)"Select Summary  File:",
  565.     ASL_File, (ULONG)"",
  566.     ASL_Pattern, (ULONG)netPattern, /*"#?.ACnet",*/
  567.     ASL_Dir, (ULONG)"PROGDIR:",
  568.     ASL_FuncFlags, FILF_PATGAD,
  569.     TAG_DONE,
  570. };
  571.  
  572. struct TagItem netsavetags[] =
  573. {
  574.     ASL_Hail, (ULONG)"Save Summary As:",
  575.     ASL_File, (ULONG)"untitled.ACnet",
  576.     ASL_Pattern,(ULONG)"#?.ACnet",
  577.     ASL_Dir, (ULONG)"PROGDIR:",
  578.     ASL_FuncFlags,    FILF_SAVE,
  579.     TAG_DONE,
  580. };
  581.  
  582. struct Window *amiWindow;
  583. struct FileRequester *impasciiASL = NULL, *expasciiASL = NULL;
  584. struct FileRequester *scriptASL = NULL, *devASL = NULL, *reportASL = NULL;
  585. struct FileRequester *loadASL = NULL, *scriptsaveASL = NULL;
  586. struct FileRequester *saveASL = NULL, *netloadASL = NULL, *netsaveASL = NULL;
  587. struct FileRequester *otherRexxASL = NULL;
  588.  
  589. /* prototypes */
  590. BOOL AmiInit(void);
  591. void AmiShutdown(void);
  592. void AmiSetupMemo(void);
  593. void AmiHandleGadget(struct IntuiMessage *);
  594. void AmiHandleScript(void);
  595. void AmiEditEntry(void);
  596. void AmiProcessRawkeys(struct IntuiMessage *);
  597. void AmiRangeMark(long);
  598. BOOL AmiHandleMenu(struct IntuiMessage *);
  599. BOOL AmiAsk(char *);
  600. void AmiAbout(void);
  601. void AmiAboutPart(void);
  602. void AmiHandleGadgetDown(struct IntuiMessage *);
  603. void AmiSearchFail(void);
  604. BOOL AmiCountVerify(void);
  605. BOOL AmiAllocRequesters(void);
  606. void AmiResetBals(void);
  607. void AmiDisableAll(BOOL);
  608. void AmiParseCmd(int, char **);
  609. BOOL AmiOpenGUI(void);
  610. void AmiCloseGUI(void);
  611. void AmiMoveRestore(void);
  612. void AmiMoveActive(void);
  613. void AmiCheckRenumber(char,long);
  614. void AmiLocalMsg(struct IntuiMessage *);
  615. void AmiSetupDclick(void);
  616. void AmiSetupDate(void);
  617. void AmiDuplicateEntry(void);
  618. void AmiToggleClear(void);
  619. void AmiArexxMenu(void);
  620. void AmiApplySort(void);
  621. LONG AmiBaseHelp(void);
  622. void AmiBaseLink(char *);
  623. void AmiHelpMsg(void);
  624. void AmiRunMacro(char *fname);
  625.  
  626. /* Code */
  627. /*********************************************************************************/
  628. main(int argc, char **argv)
  629. { 
  630.  ULONG signal, sigmask;
  631.  
  632.  seltempGUI = edittempGUI = newGUI = filterGUI = sortGUI = analGUI = formGUI = NULL;
  633.  entryGUI = recGUI = acctGUI =  searchGUI = catGUI = statGUI = repGUI = scriptGUI = NULL;
  634.  qdateGUI = qmemoGUI = qamntGUI = qnameGUI = memoGUI = amntGUI = nameGUI = netGUI = NULL;
  635.  printGUI = groupGUI = arexxGUI = keyGUI = NULL;
  636.  
  637.  
  638.    /* support either command or tooltypes or wbench */
  639.     if (argc == 0) {
  640.         argc = _WBArgc;
  641.         argv = _WBArgv;
  642.     }
  643.  
  644.     AmiParseCmd(argc,argv);
  645.  
  646.     sprintf(amiWindowTitle,AC_WindowTitle);
  647.     ptrKey = &usrKey;
  648.  
  649.     /* Attempt to open library */ 
  650.     if (GUIFrontBase = OpenLibrary(GUIFRONTNAME, GUIFRONTVERSION))
  651.     {
  652.         /* Create our application anchor structure */
  653.  
  654.         if (guiapp = GF_CreateGUIApp(AC_AppID,
  655.             GFA_Version,    AC_Version,
  656.             GFA_LongDesc,   AC_LongDesc,
  657.             GFA_Author,     AC_Author,
  658.             GFA_Date,       AC_Date,
  659.             TAG_DONE))
  660.         {
  661.               
  662.             /* Create a gui for our application */
  663.        TRYLABEL:
  664.             if (gui = GF_CreateGUI(guiapp, AC_MainPanel,AC_MainSpecs,
  665.                 GUI_InitialOrientation, AC_InitialOrientation,
  666.                 GUI_ExtendedError,      &exterr,
  667.                 GUI_WindowTitle,        amiWindowTitle,
  668.                 GUI_OpenGUI,            TRUE,
  669.                 GUI_ExtraIDCMP,         IDCMP_RAWKEY|IDCMP_ACTIVEWINDOW|IDCMP_REFRESHWINDOW,
  670.         GUI_NewMenu,        amiMenu,
  671.         GUI_ScreenTitle,    AC_Title,
  672.                 TAG_DONE))
  673.             {
  674.                 amidone = FALSE;
  675.         
  676.                DataListInit();
  677.            
  678.             /* initialize application interface */
  679.             if (!amidone && AmiInit() != TRUE) amidone = TRUE;
  680.  
  681.         if (AmigaGuideBase != NULL) {
  682.             amigaguide = TRUE;
  683.             AmiBaseHelp();
  684.         }
  685.  
  686.             AmiLock();
  687.         KeyVerify(ptrKey);
  688.  
  689.         /* open panels */
  690.         if (!amidone && AmiOpenGUI() != TRUE) amidone = TRUE;
  691.         if (!amidone && DataInit() != TRUE) amidone = TRUE;
  692.         if (!amidone && AnalysisSetup() != TRUE) amidone = TRUE;
  693.          
  694.         if (!amidone) GF_GetGUIAttr(gui,GUI_MenuStrip, &menuStrip, TAG_DONE);
  695.         if (menuStrip == NULL) amidone = TRUE;
  696.  
  697.         KeyVerify(&dummykey);
  698.  
  699.         if (!amidone && EasyRexxBase != NULL) {
  700.             if (axOpen() == FALSE) amidone = TRUE;
  701.             sigmask = ER_SIGNAL(axContext);
  702.             OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,NOITEM,NOSUB));
  703.             sprintf(arexxTemp,"T:%s",axContext->portname);
  704.         }
  705.         else     { 
  706.             sigmask = 0;
  707.             axContext = NULL;
  708.             OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,NOITEM,NOSUB));
  709.         }
  710.  
  711. /*        GF_SetAliasKey(gui,0x40,GID_GETSELTYPE);*/
  712.  
  713.         AmiArexxMenu();
  714.  
  715.         demoptr = &AC_Demo;
  716.  
  717.         if (!amidone && bootfile) 
  718.             AmiOpen(currFile,TRUE);
  719.  
  720.         /* set up showMenu check */
  721.         if (!amidone) AmiSetupMemo();
  722.  
  723.         if (!amidone) AmiSetupDclick();
  724.     
  725.         if (!amidone) AmiSetupDate();
  726.  
  727.         AmiUnlock();
  728.                 
  729.         if (amidone)     {
  730.             AmiAnnounce("Failed to initialize application:\nTry a smaller font?\nTry more overscan?\nTry a proportional font (ie:helvetica)?");
  731.         }
  732.         else if (FALLBACK && layoutwarn)
  733.             AmiAnnounce("Font did not fit properly:\nCompromised window layout.\n(cosmetic warning only)");
  734.  
  735.  
  736.         if (!dokey) AmiAnnounce(*demoptr);
  737.  
  738.         /* Process input events */
  739.                 while (!amidone || (axContext && ER_SAFETOQUIT(axContext)==FALSE))
  740.                 {
  741.                     struct IntuiMessage *imsg;
  742.  
  743.                     /* Wait for an event to occur */
  744.  
  745.                     signal = GF_Wait(guiapp,ER_SIGNAL(axContext) | AmigaGuideSignal(agc));
  746.  
  747.             /* AREXX message? */
  748.             ER_SETSIGNALS(axContext,signal);
  749.             if (signal & ER_SIGNAL(axContext)) {
  750.             amidone = axHandle(axContext);
  751.             continue;
  752.             }
  753.  
  754.             /* Amigaguide message? */
  755.             else if (signal & AmigaGuideSignal(agc)) {
  756.             AmiHelpMsg();
  757.             continue;
  758.             }
  759.             
  760.                     /* We only bother to listen for CLOSEWINDOW events.
  761.                      * Of course, in a real application, you would be
  762.                      * examining the Class field for IDCMP_GADGETUP
  763.                      * messages and act accordingly.
  764.                      */
  765.  
  766.                     while (imsg = GF_GetIMsg(guiapp))
  767.                     {    
  768.             if (imsg->IDCMPWindow->UserData == seltempGUI) {
  769.                 if (selWin != NULL) 
  770.                     seldone = SelTempMsg(imsg);
  771.             }
  772.             else    if (imsg->IDCMPWindow->UserData == gui) {
  773.                 AmiLocalMsg(imsg);                                  
  774.             }
  775.  
  776.                         GF_ReplyIMsg(imsg);
  777.                     }
  778.  
  779.             if (seldone == TRUE) {
  780.             GF_SetGUIAttr(seltempGUI, GUI_OpenGUI, FALSE, TAG_DONE);
  781.             selWin = NULL;
  782.             seldone = FALSE;
  783.             }
  784.                 }
  785.  
  786.                 /* We're done with the GUI, so free it. GF_DestroyGUIApp
  787.                  * actually does this for us, but it still looks nicer if
  788.                  * we do it manually (I think :-)
  789.                  */
  790.         AmiLock();
  791.         if (amigaguide && agc) CloseAmigaGuide(agc);
  792.         DataFreeAll();    
  793.             AmiShutdown();
  794.         AmiUnlock();
  795.         if (EasyRexxBase != NULL) {
  796.             axClose();
  797.             remove(arexxTemp);
  798.         }
  799.             GF_DestroyGUI(gui);
  800.         LibClose();
  801.             }
  802.             else {
  803.                 Printf("Unable to create GUI (Error data: %ld.%ld)\n", exterr.ee_ErrorCode, exterr.ee_ErrorData);
  804.         
  805.         /* attempt to fall back */
  806.         if (AC_MainPanel[21] == GUILF_EqualShare) {
  807.             AC_MainPanel[21] = GUILF_PropShare;
  808.             FALLBACK = TRUE;
  809.             goto TRYLABEL;
  810.         }
  811.         }
  812.  
  813.             /* Destroy application anchor structure */
  814.             GF_DestroyGUIApp(guiapp);
  815.         }
  816.         else
  817.             PutStr("Unable to open guifront.library\n");
  818.  
  819.         CloseLibrary(GUIFrontBase);
  820.     }
  821.     else
  822.         PutStr("Requires guifront.library V37+\n");
  823.  
  824. }
  825.  
  826. /**********************************************************
  827. * AmiLocalMsg()
  828. *
  829. *    Handles messages from afar
  830. ***********************************************************/
  831. void AmiLocalMsg(struct IntuiMessage *imsg)
  832. {
  833.     switch (imsg->Class) {
  834.                                        
  835.                            case IDCMP_RAWKEY:
  836.                     AmiProcessRawkeys(imsg);
  837.                     break;
  838.  
  839.                case IDCMP_MENUPICK:
  840.                     amidone = AmiHandleMenu(imsg);
  841.                     break;
  842.  
  843.                            case IDCMP_GADGETDOWN:
  844.                     AmiHandleGadgetDown(imsg);
  845.                     break;
  846.                                         
  847.                case IDCMP_MOUSEMOVE:
  848.                     RegMoveList(&filtered,imsg->Code);
  849.                     RegRefresh(FALSE);
  850.                     break;
  851.  
  852.                            case IDCMP_CLOSEWINDOW:
  853.                                         amidone = AmiAsk(quitstr);
  854.                     break;
  855.                               
  856.                            case IDCMP_GADGETUP:
  857.                     AmiHandleGadget(imsg);
  858.                                         break;
  859.                                    
  860.                case IDCMP_REFRESHWINDOW:
  861.                     RegRefresh(TRUE);
  862.                     break;
  863.      
  864.                            default:
  865.                                         RegRefresh(TRUE);
  866.                                         break;                                           
  867.                         }
  868. }
  869.  
  870. /**********************************************************
  871. * AmiInit()
  872. *
  873. *    Initialize basic variables and images
  874. ***********************************************************/
  875. BOOL AmiInit(void)
  876. {
  877.  char buffer[50];
  878.  PrefsHandle *ph;
  879.  
  880.     OS39 = TRUE;
  881.         if (LibOpen(39L) != TRUE) {
  882.         if (LibOpen(37L) != TRUE)
  883.             return (FALSE);
  884.         OS39 = FALSE;    
  885.     }
  886.  
  887.     GF_GetGUIAttr(gui,GUI_Window,&amiWindow,TAG_DONE);
  888.  
  889.         if (RegInit() != TRUE) return (FALSE);
  890.     if (AmiAllocRequesters() != TRUE) return (FALSE);
  891.  
  892.     GF_LockPrefsList();
  893.         for (ph = GF_FirstPrefsNode(); ph != NULL; ph = GF_NextPrefsNode(ph)) {
  894.             GF_CopyAppID(ph,buffer);
  895.             if (strcmpi(buffer,AC_AppID) == 0)
  896.                 break;
  897.         }
  898.         if (ph == NULL)
  899.             buffer[0]=0;
  900.  
  901.         GF_GetPrefsAttr (buffer,
  902.             PRF_SimpleRefresh, &simpleRefresh,
  903.             TAG_DONE);
  904.  
  905.     GF_UnlockPrefsList();
  906.     
  907.     if (simpleRefresh)
  908.         simpleRefresh = TRUE;
  909.  
  910.  
  911.     /* otherwise, */
  912.     AmiDisableAll(TRUE);        
  913.  
  914.      dokey = KeyReadFile();
  915.  
  916.   if (OS39) {
  917.     InitBitMap(&ptrBM,2,16,7);
  918.     ptrBM.Planes[0] = (char *)movePointer39[0];
  919.     ptrBM.Planes[1] = (char *)movePointer39[1];
  920.     moveObj = NewObject(NULL,POINTERCLASS,
  921.         POINTERA_XOffset,0,
  922.         POINTERA_YOffset,-3,
  923.         POINTERA_XResolution, POINTERXRESN_HIRES,
  924.         POINTERA_YResolution, POINTERYRESN_HIGHASPECT,
  925.         POINTERA_BitMap, &ptrBM,
  926.         TAG_DONE);
  927.   }
  928.     
  929.         return (TRUE);
  930. }
  931.  
  932. /**********************************************************
  933. * AmiShutdown()
  934. *
  935. *    Quitting the application
  936. **********************************************************/
  937. void AmiShutdown(void) 
  938. {
  939.     if (OS39) {
  940.         /*printf("os39 specifics\n");*/
  941.         DisposeObject(moveObj);
  942.     }
  943.  
  944.     AmiCloseGUI();
  945.     if (scriptASL) FreeAslRequest(scriptASL);
  946.     if (loadASL) FreeAslRequest(loadASL);
  947.      if (saveASL) FreeAslRequest(saveASL);
  948.      if (impasciiASL) FreeAslRequest(impasciiASL);
  949.      if (expasciiASL) FreeAslRequest(expasciiASL);
  950.     if (otherRexxASL) FreeAslRequest(otherRexxASL);
  951.  
  952.     if (aslTagList) FreeTagItems(aslTagList);
  953.  
  954.     RegFreeAll();
  955.     AnalysisFree();
  956. }
  957.  
  958. /*********************************************************
  959. * AmiHandleGadget()
  960. *
  961. *    Handle gadget activity of this panel
  962. **********************************************************/
  963. void AmiHandleGadget( struct IntuiMessage *imsg)
  964. {
  965.  struct Gadget *gad = (struct Gadget *)(imsg->IAddress);
  966.  /*UWORD code = imsg->Code; */
  967.  
  968.  if (moveActive)
  969.     AmiMoveRestore();
  970.  
  971.  switch (gad->GadgetID) {
  972.  
  973.     case GID_ANALYSIS:
  974.         if (AnalysisGUI())
  975.             AmiDisableSel(FALSE);
  976.         break;
  977.  
  978.     case GID_SORT:
  979.         if (SortGUI() == TRUE) {
  980.             AmiLock();
  981.             /*DataRebuildFilters();*/
  982.             if (!IsListEmpty(&sortfields))
  983.                 DataSortFilter((filterNode *)filtered.mlh_Head,
  984.                            (filterNode *)filtered.mlh_TailPred,
  985.                            (sortNode *)sortfields.lh_Head);
  986.             else DataRebuildFilters();
  987.             RegNewFilter();
  988.             AmiUnlock();
  989.         }
  990.         break;
  991.  
  992.     case GID_GETSELTYPE:
  993.         SelTempGUI();
  994.         AmiNewTemp();
  995.         break;
  996.  
  997.     case GID_STATS:
  998.         StatGUI();
  999.         break;
  1000.  
  1001.     case GID_BUDGET:
  1002.         CatGUI();
  1003.         break;
  1004.  
  1005.     case GID_NEWTYPE:
  1006.         EditTempGUI();
  1007.         
  1008.         /* update type field */
  1009.         AmiNewTemp();
  1010.         break;
  1011.  
  1012.     case GID_FILTER:
  1013.         if (FilterGUI() == TRUE) {
  1014.             AmiLock();
  1015.             memcpy(&filterControl, &currFilter, sizeof(filterSetting));
  1016.             DataRebuildFilters();
  1017.             if (autosort == TRUE && !IsListEmpty(&sortfields))
  1018.                 DataSortFilter((filterNode *)filtered.mlh_Head,
  1019.                            (filterNode *)filtered.mlh_TailPred,
  1020.                            (sortNode *)sortfields.lh_Head);
  1021.             RegNewFilter();
  1022.             DataFilterBalance(&filtered);
  1023.             DataBuildBal(usrAccount.decimal,&filtAmnt,filtStr);
  1024.             AmiUpdateFilt(filtStr);
  1025.             AmiUnlock();
  1026.         }
  1027.         break;
  1028.  
  1029.     case GID_EDIT:
  1030.         AmiEditEntry();
  1031.         break;
  1032.  
  1033. #if 0
  1034.     case GID_RECONCILE:
  1035.         ReconcileGUI();
  1036.         break;
  1037. #endif
  1038.  
  1039.      }
  1040. }
  1041.  
  1042. /******************************************************************
  1043. * AmiEnterData()
  1044. *
  1045. *    Called by seltemp
  1046. *******************************************************************/
  1047. void AmiEnterData(void)
  1048. {
  1049.  entryNode *entry;
  1050.  filterNode *filt;
  1051.  BOOL del;
  1052.  
  1053. if (entryCount >= 30)
  1054.     if (AmiCountVerify()) return;
  1055. #ifdef EVALUATION
  1056.         if (entryCount >= 30) {
  1057.             AmiAnnounce("You have met or exceeded the evaluation\nlimit of 30 entries.\n\nPlease see the documents for registration information.\nThanks!");
  1058.             return;
  1059.         }
  1060. #endif
  1061.         if (amntState.currTemplate == SCRIPTTYPE) 
  1062.             AmiHandleScript();
  1063.         else do {
  1064.             entry = EntryGUI("Enter New Transaction",FALSE, NULL, &del);
  1065.             if (entry != NULL) {
  1066.                 DataAddEntry(entry,&entries, &filt);
  1067.                             
  1068.                 /* update curr balance */
  1069.                 if (!(entry->flags & VOIDED)) {
  1070.                     DataUpdateBal(entry->type, &entry->amount,
  1071.                         &amntState.currAmnt,currStr);
  1072.                     AmiUpdateCurr(currStr);
  1073.                 }
  1074.         
  1075.                 if (filt != NULL) {
  1076.                     RegAddEntry(filt);
  1077.                     if ( !(entry->flags & VOIDED)) {
  1078.                         DataUpdateBal(entry->type, &entry->amount,
  1079.                             &filtAmnt,filtStr);
  1080.                         AmiUpdateFilt(filtStr);
  1081.                     }
  1082.                     AmiDisableSel(TRUE);
  1083.                 }
  1084.                 
  1085.                 memcpy(&currDate,&entry->date,sizeof(dateType));
  1086.                 currCentury = entry->date.year/100;
  1087.             }
  1088.         
  1089.         } while (entry != NULL && batchmode);
  1090.  
  1091.  return;
  1092. }
  1093.  
  1094. /*******************************************************************
  1095. * AmiHandleScript()
  1096. *
  1097. *    scripting engine
  1098. ********************************************************************/
  1099. void AmiHandleScript(void)
  1100. {
  1101. char fname[FILESIZE], line[FILESIZE];
  1102. FILE *scr;
  1103. BOOL del = FALSE;
  1104. entryNode *entry;
  1105. filterNode *filt;
  1106.  
  1107.  /* open requester */
  1108.  AmiLock();
  1109.  
  1110.  if (AmiGetFile(gui,scriptASL,fname,FILESIZE)) {
  1111.  
  1112.     if ( !(scr = fopen(fname,"r")) ) {
  1113.         AmiAnnounce("Could not open script file.");
  1114.         return;
  1115.      }
  1116.  
  1117.     /*while (fscanf(scr,"%s",line) != EOF) */
  1118.     while (fgets(line,FILESIZE-1,scr) != NULL) {
  1119.         /* remove \n */
  1120.         if (strlen(line)>0)
  1121.             line[strlen(line)-1]=0;
  1122.  
  1123.         amntState.currTemplate = DataNode2Ord(&templates,line);
  1124.         
  1125.         entry = EntryGUI("Enter New Transaction", TRUE, NULL, &del);
  1126.         if (entry != NULL && !skipped) {
  1127.             DataAddEntry(entry,&entries, &filt);
  1128.                 
  1129.             /* update curr balance */
  1130.             if (!(entry->flags & VOIDED)) {
  1131.                 DataUpdateBal(entry->type, &entry->amount,
  1132.                     &amntState.currAmnt, currStr);
  1133.                 AmiUpdateCurr(currStr);
  1134.             }
  1135.         
  1136.             if (filt != NULL) {
  1137.                 if ( !(entry->flags & VOIDED)) {
  1138.                     DataUpdateBal(entry->type, &entry->amount, 
  1139.                         &filtAmnt, filtStr);
  1140.                     AmiUpdateFilt(filtStr);
  1141.  
  1142.                 }
  1143.                 RegAddEntry(filt);
  1144.             }
  1145.  
  1146.             memcpy(&currDate,&entry->date,sizeof(dateType));
  1147.             currCentury = entry->date.year/100;
  1148.         }
  1149.     
  1150.         /* if enter data was canceled (not skipped), quit script */
  1151.         if (entry == NULL && !skipped)
  1152.             break;
  1153.     }
  1154.      /* close file */
  1155.     fclose(scr);
  1156.  
  1157.      /* return curr template to script type */
  1158.     amntState.currTemplate = SCRIPTTYPE;
  1159.  }
  1160.  AmiUnlock();
  1161.  
  1162. }
  1163.  
  1164. /*********************************************************************
  1165. * AmiNewTemp
  1166. *
  1167. *    Opens user template selection panel
  1168. *********************************************************************/
  1169. void AmiNewTemp(void)
  1170. {
  1171. templateNode *temp;
  1172.  
  1173.  /* update type field */
  1174.  temp = (templateNode *)DataOrd2Node(&templates,amntState.currTemplate);
  1175.  GF_SetGadgetAttrs(gui,gadgetspecs[GID_SELTYPE].gs_Gadget,
  1176.     GTTX_Text,temp->tempname,
  1177.       TAG_DONE);            
  1178. }
  1179.  
  1180. /*************************************************
  1181. * AmiProcessRawkeys
  1182. *
  1183. *    Process the rawkeys into ansi
  1184. **************************************************/
  1185. void AmiProcessRawkeys(struct IntuiMessage *imsg)
  1186. {
  1187. static BOOL upevent = FALSE;
  1188. static BOOL renum = FALSE;
  1189. static long upval;
  1190. static BOOL shift = FALSE, ctrl = FALSE;
  1191.  
  1192.  
  1193. if (moveActive)
  1194.     AmiMoveRestore();
  1195.  
  1196.  
  1197. /* check renumber scheme */
  1198. if (renum && upevent && imsg->Code > 0x0 && imsg->Code < 0xA){
  1199.     if (upval == (0x4f | 0x80)) {
  1200.         AmiCheckRenumber(0,imsg->Code);
  1201.     }
  1202.  
  1203.     else if (upval == (0x4e | 0x80)) {
  1204.         AmiCheckRenumber(1,imsg->Code);
  1205.     }
  1206.  
  1207.     renum = FALSE;
  1208.     return;
  1209. }
  1210.  
  1211. if (upevent && imsg->Code != upval)
  1212.     return;
  1213.  
  1214.  
  1215. upevent = FALSE;
  1216. renum = FALSE;
  1217.  
  1218. /* for now, use raw keys */
  1219. switch (imsg->Code) {
  1220.     case 0x40:    
  1221.         if (!alldisabled) {
  1222.             SelTempGUI();
  1223.             AmiNewTemp();
  1224.         }
  1225.         break;
  1226.  
  1227.     case 0xe1:
  1228.     case 0xe0:
  1229.         shift = FALSE;
  1230.         break;
  1231.  
  1232.     case 0x61:
  1233.     case 0x60:
  1234.         shift = TRUE;
  1235.         break;
  1236.  
  1237.     case 0xe3:
  1238.         ctrl = FALSE;
  1239.         break;
  1240.     
  1241.     case 0x63:
  1242.         ctrl = TRUE;
  1243.         break;
  1244.  
  1245.     case 0x4f:
  1246.         upevent = renum = TRUE;
  1247.         upval = imsg->Code | 0x80;
  1248.         break;
  1249.  
  1250.     case 0x4e:
  1251.         upevent = renum = TRUE;
  1252.         upval = imsg->Code | 0x80;
  1253.         break;
  1254.  
  1255.     case 0x4c:
  1256.  
  1257.         upevent = TRUE;
  1258.         upval = imsg->Code | 0x80;
  1259.         if (shift) 
  1260.             RegKeyScroll(SHIFTUP);
  1261.         else if (ctrl)
  1262.             RegKeyScroll(CTRLUP);
  1263.         else 
  1264.             RegKeyScroll(UP);
  1265.         break;
  1266.  
  1267.     case 0x4d:
  1268.         upevent = TRUE;
  1269.         upval = imsg->Code | 0x80;
  1270.  
  1271.         if (shift) 
  1272.             RegKeyScroll(SHIFTDOWN);
  1273.         else if (ctrl)
  1274.             RegKeyScroll(CTRLDOWN);
  1275.         else 
  1276.             RegKeyScroll(DOWN);
  1277.         break;
  1278.  
  1279.     case HELP_KEY:
  1280.         AmiBaseLink(guideLinks[MAIN_PANEL]);
  1281.         break;
  1282. }
  1283.  
  1284. #if 0
  1285. UBYTE buffer[9];
  1286. struct InputEvent ie;
  1287. APTR *eventptr;
  1288.  
  1289. ie.ie_Class = IECLASS_RAWKEY;
  1290. ie.ie_Code = imsg->Code;
  1291. ie.ie_Qualifier = imsg->Qualifier;
  1292. eventptr = imsg->IAddress;
  1293. ie.ie_EventAddress = *eventptr;
  1294.  
  1295. x=MapRawKey(&ie, buffer, 8, NULL); 
  1296. if (x == -1)
  1297.     return;
  1298. else if (x) {
  1299.     buffer[x]=0;
  1300.     printf("MAPS TO:[%s]:",buffer);
  1301.     for (y=0;y<x;y++)
  1302.         printf(" %x",buffer[y]);
  1303.     printf("\n");
  1304. }
  1305. #endif
  1306. }
  1307.  
  1308. /*******************************************************
  1309. * AmiDuplicateEntry()
  1310. *
  1311. *    Duplicate and edit current transaction
  1312. ********************************************************/
  1313. void AmiDuplicateEntry(void)
  1314. {
  1315.  filterNode *find, *filt;
  1316.  entryNode *entry, orig;
  1317.  BOOL del;
  1318.  
  1319.  find = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  1320.  if (find == NULL) return;
  1321.  memcpy(&orig,find->entry,sizeof(entryNode));
  1322.  
  1323.  /* raise panel */
  1324.  do {
  1325.     if (orig.type == CHECKTYPE)
  1326.         orig.check = amntState.currCheckNumber;
  1327.  
  1328.      entry = EntryGUI("Duplicated Transaction",FALSE,&orig, &del);
  1329.  
  1330.     if (entry != NULL) {
  1331.         DataAddEntry(entry,&entries, &filt);
  1332.                     
  1333.         /* update curr balance */
  1334.         if (!(entry->flags & VOIDED)) {
  1335.             DataUpdateBal(entry->type, &entry->amount, &amntState.currAmnt,currStr);
  1336.             AmiUpdateCurr(currStr);
  1337.         }
  1338.         
  1339.         if (filt != NULL) {
  1340.             RegAddEntry(filt);
  1341.             if ( !(entry->flags & VOIDED)) {
  1342.                 DataUpdateBal(entry->type, &entry->amount, &filtAmnt, filtStr);
  1343.                 AmiUpdateFilt(filtStr);
  1344.             }
  1345.             AmiDisableSel(TRUE);
  1346.         }
  1347.         
  1348.         memcpy(&currDate,&entry->date,sizeof(dateType));    
  1349.         memcpy(&orig.date,&entry->date,sizeof(dateType));
  1350.         currCentury = entry->date.year/100;
  1351.     }
  1352.         
  1353.  } while (entry != NULL && batchmode);
  1354. }
  1355.  
  1356. /*******************************************************
  1357. * AmiEditEntry()
  1358. *
  1359. *    Edits an entry by poping up entry panel
  1360. ********************************************************/
  1361. void AmiEditEntry(void)
  1362. {
  1363.  BOOL del;
  1364.  amountType amount;
  1365.  UBYTE type, flag;
  1366.  filterNode *find;
  1367.  entryNode *edit, *entry;
  1368.  
  1369.     find = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  1370.         edit = find->entry;
  1371.  
  1372.         /* lets remove its amount */
  1373.         amount = edit->amount;
  1374.         type = edit->type;
  1375.         flag = edit->flags;
  1376.  
  1377.         if ( !(flag & VOIDED) ) {
  1378.             if (edit->type != DEPOSITTYPE ) {
  1379.                 DataUpdateBal(DEPOSITTYPE,&edit->amount, &amntState.currAmnt,currStr);
  1380.                 DataUpdateBal(DEPOSITTYPE,&edit->amount, &filtAmnt, filtStr);
  1381.             }
  1382.             else {
  1383.                 DataUpdateBal(CHECKTYPE,&edit->amount,&amntState.currAmnt,currStr);
  1384.                 DataUpdateBal(CHECKTYPE,&edit->amount,&filtAmnt, filtStr);
  1385.             }
  1386.         }
  1387.         else amount = 0;
  1388.             
  1389.         /* raise panel */
  1390.         entry = EntryGUI("Edit Transaction",FALSE,edit, &del);
  1391.         if (entry != NULL ) {
  1392.             memcpy( ((char *)edit)+sizeof(struct MinNode),
  1393.                 ((char *)entry)+sizeof(struct MinNode),
  1394.                 sizeof(entryNode)-sizeof(struct MinNode));
  1395.  
  1396.             if (DataTestFilter(edit,&filterControl)) {
  1397.                 RegRedrawSel(find);
  1398.                 if ( !(edit->flags & VOIDED))
  1399.                     DataUpdateBal(type,&edit->amount, &filtAmnt, filtStr);
  1400.             }
  1401.         
  1402.             else {
  1403.                 DataRemoveFilter(find);
  1404.                 RegRemoveSel();
  1405.             }
  1406.  
  1407.             if ( !(edit->flags & VOIDED) )
  1408.                 DataUpdateBal(type,&edit->amount, &amntState.currAmnt, currStr);
  1409.  
  1410.             AmiUpdateCurr(currStr);
  1411.             AmiUpdateFilt(filtStr);
  1412.             
  1413.             memcpy(&currDate,&entry->date,sizeof(dateType));
  1414.             currCentury = entry->date.year/100;
  1415.         }
  1416.         else {
  1417.             if (del == TRUE) {
  1418.                 DataRemoveEntry(edit,find);
  1419.                 amiChangedItems = TRUE;
  1420.                 RegRemoveSel();
  1421.                 if ( !(flag & VOIDED) ) {
  1422.                     AmiUpdateCurr(currStr);
  1423.                     AmiUpdateFilt(filtStr);
  1424.                 }
  1425.             }
  1426.  
  1427.             else {
  1428.             /* oops, stick the old one back in! */
  1429.             if ( !(flag & VOIDED) )
  1430.                 DataUpdateBal(type,&amount, &amntState.currAmnt, currStr);
  1431.                 DataUpdateBal(type,&amount, &filtAmnt, filtStr);
  1432.             }
  1433.         }
  1434. }
  1435.  
  1436. /******************************************************
  1437. * AmiHandleMenu()
  1438. *
  1439. *    process menu selections
  1440. *******************************************************/
  1441. BOOL AmiHandleMenu(struct IntuiMessage *imsg)
  1442. {
  1443.  BOOL done = FALSE, donemenu = FALSE;
  1444.  UWORD menunum;
  1445.  UWORD row;
  1446.  UWORD title, item, sub;
  1447.  amountType amount;
  1448.  struct MenuItem *menu;
  1449.  char fname[FILESIZE+15];
  1450.  filterNode *filt;
  1451.  
  1452.   menunum = imsg->Code;
  1453.   while ( (menunum != MENUNULL) && (!donemenu) ) {
  1454.     menu  = ItemAddress(menuStrip,menunum);
  1455.       title = MENUNUM(menunum);
  1456.     item = ITEMNUM(menunum);
  1457.     sub = SUBNUM(menunum);
  1458.  
  1459.     if (title == FILETITLE) {
  1460.         AmiMoveRestore();
  1461.         switch (item) {
  1462.             case FILENEW:
  1463.                 if (AmiAsk(newstr)) {
  1464.                     
  1465.                     if (AcctGUI("New Account",TRUE) == TRUE) {
  1466.                         amntState.currTemplate = CHECKTYPE;
  1467.                         AmiNewTemp();
  1468.                         seldone = TRUE;
  1469.                         SelTempStrip();
  1470.  
  1471.                         AmiLock();
  1472.                         DataFreeAll();    
  1473.                         DataInit(); /* zeros out stuff! */
  1474.                         
  1475.  
  1476.                         AmiDisableSel(TRUE);
  1477.                         RegNewFilter();        
  1478.                         AmiArexxMenu();
  1479.  
  1480.                         memcpy(&usrAccount, &tempAcct, sizeof(accntState));
  1481.  
  1482.                         DataUpdateBal(DEPOSITTYPE,&usrAccount.beginAmount,
  1483.                             &amntState.currAmnt, currStr);
  1484.                         AmiUpdateCurr(currStr);
  1485.  
  1486.                         amntState.currCheckNumber = usrAccount.checknumber-1;
  1487.                         sprintf(currFile,"%s","untitled.AC");
  1488.                         sprintf(amiWindowTitle,"%s: %s",AC_WindowTitle,currFile);
  1489.                         SetWindowTitles(amiWindow,amiWindowTitle,(UBYTE *)-1);
  1490.                         AmiDisableAll(FALSE);
  1491.                         OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVE,NOSUB));
  1492.                         OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEEXIT,NOSUB));
  1493.                         DataBuildBal(usrAccount.decimal,&amntState.currAmnt,currStr);
  1494.                         DataBuildBal(usrAccount.decimal,&amntState.stateAmnt,stateStr);
  1495.                         DataBuildBal(usrAccount.decimal,&filtAmnt,filtStr);
  1496.                         AmiUpdateCurr(currStr);
  1497.                         AmiUpdateState(stateStr);
  1498.                         AmiUpdateFilt(filtStr);
  1499.                         amiChangedItems = TRUE;
  1500.                         AmiUnlock();
  1501.                     }
  1502.                 }
  1503.                 break;
  1504.  
  1505.             case FILEOPEN:
  1506.                 AmiOpen(NULL,FALSE);
  1507.                 break;
  1508.             
  1509.             case FILESAVEEXIT:
  1510.                 if (AmiSave(NULL,FALSE))
  1511.                     done = TRUE;
  1512.                 break;
  1513.                 
  1514.             case FILESAVE:
  1515.                 AmiSave(NULL,FALSE);
  1516.                 break;
  1517.                 
  1518.             case FILESAVEAS:
  1519.                 AmiSave(NULL,TRUE);
  1520.                 break;
  1521.  
  1522.             case FILEPRINT:
  1523.                 PrintGUI();
  1524.                 break;
  1525.  
  1526.             case FILEIMPORT:
  1527.                 if (entryCount >= 30)
  1528.                     if (AmiCountVerify()) break;
  1529.  
  1530.                 switch (sub) {
  1531.                     case FILEIMPASCII:
  1532.                         
  1533.                         if (selRow == -1) {
  1534.                             if (!DataQuery(gui,"Items will be appended to\nthe bottom of the database.",
  1535.                                     "OK|Cancel")) {
  1536.                                 break;
  1537.                             }
  1538.                         }
  1539.                         else {
  1540.                             if (!DataQuery(gui,"Items will be appended under\nthe selected transaction.",
  1541.                                     "OK|Cancel")) {
  1542.                                 break;
  1543.                             }
  1544.                         }
  1545.  
  1546.                         AmiLock();
  1547.                         if (AmiGetFile(gui,impasciiASL,fname,FILESIZE)) {
  1548.                                 if (ImportAscii(fname) != TRUE)
  1549.                                     AmiAnnounce("Problem importing file.");
  1550.                         }
  1551.                         AmiUnlock();
  1552.  
  1553.                     break;
  1554.                 }
  1555.                 break;
  1556.  
  1557.             case FILEEXPORT:
  1558.                 switch (sub) {
  1559.                     case FILEEXPASCII:
  1560.                         AmiLock();
  1561.                         if (AmiGetFile(gui,expasciiASL,fname,FILESIZE)) {
  1562.                                 if (ExportAscii(fname) != TRUE)
  1563.                                     AmiAnnounce("Problem exporting file.");
  1564.                         }
  1565.                         AmiUnlock();
  1566.  
  1567.                         break;
  1568.                 }
  1569.                 break;
  1570.  
  1571.  
  1572.             case FILERECON:
  1573.                 ReconcileGUI();
  1574.                 break;
  1575.     
  1576.             case FILEABOUT:
  1577.                 switch (sub) {
  1578.                     case FILEABOUTAC:
  1579.                         AmiAbout();
  1580.                     break;
  1581.  
  1582.                     case FILEABOUTPART:
  1583.                         AmiAboutPart();
  1584.                     break;
  1585.                 }
  1586.                 break;
  1587.     
  1588.             case FILEREGISTER:
  1589.                 KeyGUI();
  1590.                 break;
  1591.  
  1592.             case FILEQUIT:
  1593.                 done = AmiAsk(quitstr);
  1594.                 break;
  1595.         }
  1596.     }
  1597.  
  1598.     else if (title == SEARCHTITLE) {
  1599.         AmiMoveRestore();
  1600.  
  1601.         switch (item) {
  1602.             case SEARCHSEARCH:
  1603.                 if (SearchGUI(&row)) {
  1604.                     row = DataSearchFilter(&filtered,&searchControl);
  1605.                     if (row == -1) {
  1606.                         /* announce to user of search failure */
  1607.                         AmiSearchFail();
  1608.                     }
  1609.                     else {
  1610.                         searchControl.lastrow = selRow = row;
  1611.                         RegMoveToSel(&filtered);
  1612.                         AmiDisableSel(FALSE);
  1613.                     }
  1614.                 }
  1615.                 break;
  1616.     
  1617.             case SEARCHAGAIN:
  1618.                 row = DataSearchFilter(&filtered,&searchControl);
  1619.                 if (row == -1) {
  1620.                     /* announce to user of search failure */
  1621.                     AmiSearchFail();    
  1622.                 }
  1623.                 else {
  1624.                     searchControl.lastrow = selRow = row;
  1625.                     RegMoveToSel(&filtered);
  1626.                 }
  1627.                 break;
  1628.  
  1629.             case SEARCHJUMP:
  1630.                 if (selRow != -1)
  1631.                     RegMoveToSel(&filtered);
  1632.                 break;
  1633.         }
  1634.     }
  1635.  
  1636.     else if (title == EDITTITLE) {
  1637.         switch (item) {
  1638.             case EDITDATA:
  1639.                 AmiMoveRestore();
  1640.                 switch (sub) {
  1641.                     case EDITDMEMO:
  1642.                         MemoGUI();
  1643.                         break;
  1644.  
  1645.                     case EDITDAMNT:
  1646.                         AmntGUI();
  1647.                         break;
  1648.  
  1649.                     case EDITDNAME:
  1650.                         NameGUI();
  1651.                         break;
  1652.                 }
  1653.                 break;
  1654.  
  1655.             case EDITQUICK:
  1656.                 AmiMoveRestore();
  1657.                 switch (sub) {
  1658.                     case EDITQCHECK:
  1659.                         amntState.currTemplate = CHECKTYPE;
  1660.                         AmiNewTemp();
  1661.                         AmiEnterData();
  1662.                         break;
  1663.  
  1664.                     case EDITQWITHDRAWAL:
  1665.                         amntState.currTemplate = WITHDRAWALTYPE;
  1666.                         AmiNewTemp();
  1667.                         AmiEnterData();
  1668.                         break;
  1669.  
  1670.                     case EDITQDEPOSIT:
  1671.                         amntState.currTemplate = DEPOSITTYPE;
  1672.                         /* update type field */
  1673.                         AmiNewTemp();
  1674.                         AmiEnterData();
  1675.                         break;
  1676.  
  1677.                     case EDITQTEMPLATE:
  1678.                         AmiEnterData();
  1679.                         break;
  1680.     
  1681.                     case EDITQSCRIPT:
  1682.                         amntState.currTemplate = SCRIPTTYPE;
  1683.                         AmiNewTemp();
  1684.                         AmiEnterData();
  1685.                         break;
  1686.                 }
  1687.                 break;
  1688.  
  1689.             case EDITBATCH:
  1690.                 AmiMoveRestore();
  1691.                 batchmode = !batchmode;
  1692.                 break;
  1693.  
  1694.             case EDITCLEAR:
  1695.                 AmiMoveRestore();
  1696.                 filt = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  1697.                 filt->entry->flags |= CLEARED;
  1698.  
  1699.                 amount = filt->entry->amount;
  1700.                 
  1701.                 if (DataTestFilter(filt->entry,&filterControl))
  1702.                     RegRedrawSel(filt);
  1703.                 else     {
  1704.                     if ( !(filt->entry->flags & VOIDED)) {
  1705.                         DataUpdateBal( 
  1706.                             (filt->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  1707.                             &amount, &filtAmnt, filtStr);
  1708.                         AmiUpdateFilt(filtStr);
  1709.                     }
  1710.                     DataRemoveFilter(filt);
  1711.                     RegRemoveSel();
  1712.                 }
  1713.                 amiChangedItems = TRUE;
  1714.                 break;
  1715.     
  1716.             case EDITUNCLEAR:
  1717.                 AmiMoveRestore();
  1718.                 filt = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  1719.                 filt->entry->flags &= ~CLEARED;
  1720.  
  1721.                 amount = filt->entry->amount;
  1722.                 
  1723.                 if (DataTestFilter(filt->entry,&filterControl))
  1724.                     RegRedrawSel(filt);
  1725.                 else    {
  1726.                     if ( !(filt->entry->flags & VOIDED)) {
  1727.                         DataUpdateBal( 
  1728.                             (filt->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  1729.                             &amount, &filtAmnt, filtStr);
  1730.                         AmiUpdateFilt(filtStr);
  1731.                     }
  1732.                     DataRemoveFilter(filt);
  1733.                     RegRemoveSel();
  1734.                 }
  1735.                 amiChangedItems = TRUE;
  1736.                 break;
  1737.  
  1738.             case EDITDUPLICATE:
  1739.                 AmiMoveRestore();
  1740.                 AmiDuplicateEntry();
  1741.                 break;
  1742.  
  1743.             case EDITMOVE:
  1744.                 if (moveActive) {
  1745.                     AmiMoveRestore();
  1746.                 }
  1747.                 else    {
  1748.                     ActivateWindow(amiWindow);
  1749.                     AmiMoveActive();
  1750.                 }
  1751.                 break;
  1752.  
  1753.             case EDITAPPLYSORT:
  1754.                 AmiApplySort();
  1755.                 break;
  1756.  
  1757.             case EDITUNFILT:
  1758.                 AmiMoveRestore();
  1759.                 AmiLock();
  1760.                 filt = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  1761.                 amount = filt->entry->amount;
  1762.                 if ( !(filt->entry->flags & VOIDED)) {
  1763.                     DataUpdateBal( 
  1764.                         (filt->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  1765.                         &amount, &filtAmnt, filtStr);
  1766.                     AmiUpdateFilt(filtStr);
  1767.                 }
  1768.                 DataRemoveFilter(filt);
  1769.                 RegRemoveSel();
  1770.                 AmiUnlock();
  1771.                 break;
  1772.  
  1773.             case EDITRANGE:
  1774.                 AmiMoveRestore();
  1775.                 AmiRangeMark(sub);
  1776.                 break;
  1777.             
  1778.             case EDITACCT:
  1779.                 AmiMoveRestore();
  1780.                 if (AcctGUI("Account Information",FALSE) == TRUE) {
  1781.                     amount = 0;
  1782.                     DataUpdateBal(DEPOSITTYPE,&amount, 
  1783.                         &amntState.currAmnt,currStr);
  1784.                     AmiUpdateCurr(currStr);
  1785.                 }
  1786.                 break;
  1787.  
  1788.  
  1789.         }
  1790.     }
  1791.  
  1792.     else if (title == UTILITYTITLE) {
  1793.         AmiMoveRestore();
  1794.         switch (item) {
  1795.             case UTILITYREPORT:
  1796.                 ReportGUI();
  1797.                 break;
  1798.  
  1799.             case UTILITYSCRIPT:
  1800.                 ScriptGUI();
  1801.                 break;
  1802.  
  1803.             case UTILITYNET:
  1804.                 NetGUI();
  1805.                 break;
  1806.         }
  1807.     }
  1808.  
  1809.     else if (title == AREXXTITLE) {
  1810.         AmiMoveRestore();
  1811.         switch (item) {
  1812.             case AREXXASSIGN:
  1813.                 if (ArexxGUI())
  1814.                     AmiArexxMenu();
  1815.                 break;
  1816.     
  1817.             case AREXXM1:
  1818.                 AmiRunMacro(arexxMacros[0].macrofile);
  1819.                 break;
  1820.         
  1821.             case AREXXM2:
  1822.                 AmiRunMacro(arexxMacros[1].macrofile);        
  1823.                 break;
  1824.         
  1825.             case AREXXM3:
  1826.                 AmiRunMacro(arexxMacros[2].macrofile);        
  1827.                 break;
  1828.                     
  1829.             case AREXXM4:
  1830.                 AmiRunMacro(arexxMacros[3].macrofile);                        
  1831.                 break;
  1832.         
  1833.             case AREXXM5:
  1834.                 AmiRunMacro(arexxMacros[4].macrofile);                        
  1835.                 break;
  1836.  
  1837.             case AREXXM6:
  1838.                 AmiRunMacro(arexxMacros[5].macrofile);        
  1839.                 break;
  1840.  
  1841.             case AREXXM7:
  1842.                 AmiRunMacro(arexxMacros[6].macrofile);                
  1843.                 break;
  1844.  
  1845.             case AREXXM8:
  1846.                 AmiRunMacro(arexxMacros[7].macrofile);        
  1847.                 break;
  1848.         
  1849.             case AREXXM9:
  1850.                 AmiRunMacro(arexxMacros[8].macrofile);                
  1851.                 break;
  1852.         
  1853.             case AREXXM10:
  1854.                 AmiRunMacro(arexxMacros[9].macrofile);
  1855.                 break;
  1856.     
  1857.             case AREXXOTHER:
  1858.  
  1859.                 AmiLock();
  1860.                 if (AmiGetFile(gui,otherRexxASL,fname,FILESIZE)) {
  1861.                      AmiUnlock();
  1862.                     AmiRunMacro(fname);
  1863.                 }
  1864.                 else {
  1865.                     AmiUnlock();
  1866.                 }
  1867.  
  1868.                 break;
  1869.  
  1870. #if 0    
  1871.             case AREXXBEGINREC:
  1872.                 break;
  1873.     
  1874.             case AREXXENDREC:
  1875.                 break;
  1876. #endif
  1877.     
  1878.             case AREXXOPENCMD:
  1879.                 axOpenCmd();
  1880.                 break;
  1881.     
  1882.             case AREXXCLOSECMD:
  1883.                 axCloseCmd();
  1884.                 break;
  1885.         }
  1886.     }
  1887.  
  1888.     else if (title == PREFSTITLE) {
  1889.         AmiMoveRestore();
  1890.         switch (item) {
  1891.             case PREFSWINDOW:
  1892.                 switch (sub) {
  1893.                     case PREFSWINDOWMEMO:
  1894.                         RegSwapMemo();
  1895.                         break;
  1896.                 }
  1897.                 break;
  1898.  
  1899.             case PREFSDCLICK:
  1900.                 switch (sub) {
  1901.                     case PREFSDCLICKE:
  1902.                         dclicktype = 0;
  1903.                         break;
  1904.  
  1905.                     case PREFSDCLICKC:
  1906.                         dclicktype=1;
  1907.                         break;
  1908.     
  1909.                     case PREFSDCLICKU:
  1910.                         dclicktype=2;
  1911.                         break;
  1912.  
  1913.                 }
  1914.                 break;
  1915.  
  1916.             case PREFSDATE:
  1917.                 switch (sub) {
  1918.                     case PREFSDATE1:
  1919.                         dateFormat = DATE_MMDDYY;
  1920.                         RegResetOffsets(1);
  1921.                         RegRedrawFilter(0);
  1922.                         QDateNewFormat();
  1923.                         break;
  1924.                     case PREFSDATE2:
  1925.                         dateFormat = DATE_DDMMYY;
  1926.                         RegResetOffsets(1);
  1927.                         RegRedrawFilter(0);
  1928.                         QDateNewFormat();
  1929.                         break;
  1930.                     case PREFSDATE3:
  1931.                         dateFormat = DATE_DEC_12;
  1932.                         RegResetOffsets(1);
  1933.                         RegRedrawFilter(0);
  1934.                         QDateNewFormat();
  1935.                         break;
  1936.                     case PREFSDATE4:
  1937.                         dateFormat = DATE_12_DEC;
  1938.                         RegResetOffsets(1);
  1939.                         RegRedrawFilter(0);
  1940.                         QDateNewFormat();
  1941.                         break;
  1942.                 } 
  1943.                 break;
  1944.  
  1945.             case PREFSFORM:
  1946.                 FormGUI();
  1947.                 break;
  1948.         }
  1949.     }
  1950.  
  1951.     menunum = menu->NextSelect;
  1952.  }
  1953.  
  1954.  return (done);
  1955. }
  1956.  
  1957. /********************************************************************
  1958. * AmiApplySort()
  1959. *
  1960. *    Enforce current order of filter
  1961. *********************************************************************/
  1962. void AmiApplySort(void)
  1963. {
  1964.  filterNode *filt = NULL;
  1965.  entryNode *last = NULL;
  1966.  
  1967.  AmiLock();
  1968.  if (!DataQuery(gui,"This will affect all filtered entries.\nAre you sure?","OK|Cancel")) {
  1969.     AmiUnlock();
  1970.     return;
  1971.  }
  1972.  
  1973.  while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) {
  1974.  
  1975.     /* first entry will be our "top" */
  1976.     if (last != NULL) {
  1977.         Remove((struct Node *)filt->entry);
  1978.         Insert((struct List *)&entries,(struct Node *)filt->entry,(struct Node *)last);
  1979.     }
  1980.  
  1981.     last = filt->entry;
  1982.  }
  1983.  
  1984.  AmiUnlock();
  1985. }
  1986.  
  1987. /*********************************************************************
  1988. * AmiRangeMark()
  1989. *
  1990. *    Mark all filtered transactions
  1991. **********************************************************************/
  1992. void AmiRangeMark(long item)
  1993. {
  1994.  filterNode *filt = NULL;
  1995.  amountType amount;
  1996.  
  1997.  /* verify! */
  1998.  AmiLock();
  1999.  if (!DataQuery(gui,"This will affect all filtered entries.\nAre you sure?","OK|Cancel")) {
  2000.     AmiUnlock();
  2001.     return;
  2002.  }
  2003.  
  2004.  switch (item) {
  2005.      case EDITRANGECLR:
  2006.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) 
  2007.             filt->entry->flags |= CLEARED;
  2008.         break;
  2009.  
  2010.      case EDITRANGEUCL:
  2011.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) 
  2012.             filt->entry->flags &= ~CLEARED;
  2013.         break;
  2014.  
  2015.      case EDITRANGEDED:
  2016.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) 
  2017.             filt->entry->flags |= TAXDEDUCT;
  2018.         break;
  2019.  
  2020.      case EDITRANGEUND:
  2021.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) 
  2022.             filt->entry->flags &= ~TAXDEDUCT;
  2023.         break;
  2024.  
  2025.      case EDITRANGEPR:
  2026.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) {
  2027.             if (filt->entry->type != CHECKTYPE)
  2028.                 continue;
  2029.  
  2030.             filt->entry->flags |= PRINTED;
  2031.         }
  2032.         break;
  2033.  
  2034.      case EDITRANGEUPR:
  2035.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) {
  2036.             if (filt->entry->type != CHECKTYPE)
  2037.                 continue;
  2038.  
  2039.             filt->entry->flags &= ~PRINTED;
  2040.         }
  2041.         break;
  2042.  
  2043.      case EDITRANGEVD:
  2044.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) {
  2045.  
  2046.             if (filt->entry->type != CHECKTYPE)
  2047.                 continue;
  2048.  
  2049.             amount = filt->entry->amount;
  2050.             if ( !(filt->entry->flags & VOIDED)) {
  2051.                 DataUpdateBal( 
  2052.                     (filt->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  2053.                     &amount, &amntState.currAmnt, currStr);
  2054.             }
  2055.                 filt->entry->flags |= VOIDED;
  2056.         }
  2057.         break;
  2058.  
  2059.      case EDITRANGEUVD:
  2060.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,(struct Node *)filt)) != NULL) {
  2061.             if (filt->entry->type != CHECKTYPE)
  2062.                 continue;
  2063.  
  2064.             amount = filt->entry->amount;
  2065.             if ((filt->entry->flags & VOIDED)) {
  2066.                 DataUpdateBal(
  2067.                     (filt->entry->type==DEPOSITTYPE)?DEPOSITTYPE:WITHDRAWALTYPE,
  2068.                     &amount, &amntState.currAmnt, currStr);
  2069.             }
  2070.             filt->entry->flags &= ~VOIDED;
  2071.         }
  2072.         break;
  2073.  
  2074.      case EDITRANGERM:
  2075.         while ( (filt = (filterNode *)DataGetNext((struct List *)&filtered,NULL)) != NULL) {
  2076.             amount = filt->entry->amount;
  2077.             if ( !(filt->entry->flags & VOIDED)) {
  2078.                 DataUpdateBal( 
  2079.                     (filt->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  2080.                     &amount, &amntState.currAmnt, currStr);
  2081.             }
  2082.             DataRemoveEntry(filt->entry,filt);
  2083.         }
  2084.         break;
  2085.  }
  2086.  
  2087.  amiChangedItems = TRUE;
  2088.  DataUpdateFilters(&filtered); 
  2089.  if (autosort == TRUE && !IsListEmpty(&sortfields))
  2090.     DataSortFilter((filterNode *)filtered.mlh_Head,
  2091.                (filterNode *)filtered.mlh_TailPred,
  2092.                (sortNode *)sortfields.lh_Head);
  2093.  RegNewFilter();
  2094.  DataFilterBalance(&filtered);
  2095.  DataBuildBal(usrAccount.decimal, &filtAmnt,filtStr);
  2096.  AmiUpdateFilt(filtStr);
  2097.  AmiUpdateCurr(currStr);
  2098.  AmiUnlock();
  2099. }
  2100.  
  2101. /*********************************************************************
  2102. * AmiToggleClear()
  2103. *
  2104. *    Toggles the clear flag of transaction
  2105. **********************************************************************/
  2106. void AmiToggleClear(void)
  2107. {
  2108.  filterNode *find;
  2109.  
  2110.  find = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  2111.  find->entry->flags ^= CLEARED;
  2112.   
  2113.  if (DataTestFilter(find->entry,&filterControl)) 
  2114.     RegRedrawSel(find);
  2115.  
  2116.  else {
  2117.     if ( !(find->entry->flags & VOIDED))
  2118.         DataUpdateBal((find->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  2119.                 &find->entry->amount, &filtAmnt, filtStr);
  2120.  
  2121.     DataRemoveFilter(find);
  2122.     RegRemoveSel();
  2123.     AmiUpdateFilt(filtStr);
  2124.  }
  2125. }
  2126.  
  2127. /**********************************************************************
  2128. * AmiSearchFail()
  2129. *
  2130. *    Prompt user with search failure
  2131. ***********************************************************************/
  2132. void AmiSearchFail(void)
  2133. {
  2134.  struct EasyStruct es;
  2135.  char *str = "No search matches found.";
  2136.  
  2137.  es.es_StructSize = sizeof(struct EasyStruct);
  2138.  es.es_Flags = 0;
  2139.  es.es_Title = "amiCheck NOTICE:";
  2140.  es.es_TextFormat = str;
  2141.  es.es_GadgetFormat = "OK";
  2142.  AmiLock();
  2143.  GF_EasyRequest(gui,amiWindow,&es,NULL); 
  2144.  AmiUnlock();
  2145. }
  2146.  
  2147. /**********************************************************************
  2148. * AmiAboutPart()
  2149. *
  2150. *    About information! third party support
  2151. ***********************************************************************/
  2152. void AmiAboutPart(void)
  2153. {
  2154.  struct EasyStruct es;
  2155.  char str[220];
  2156.  
  2157.  sprintf(str,"A big thankyou to the following\nquality third-party support:\nEasyRexx © 1994,1995 Ketil Hunn\nGuiFront © 1994 Michael Berg\n");
  2158.  es.es_StructSize = sizeof(struct EasyStruct);
  2159.  es.es_Flags = 0;
  2160.  es.es_Title = "About Third Parties:";
  2161.  es.es_TextFormat = str;
  2162.  es.es_GadgetFormat = "OK";
  2163.  AmiLock();
  2164.  GF_EasyRequest(gui,amiWindow,&es,NULL);
  2165.  AmiUnlock();
  2166.  
  2167. }
  2168.  
  2169. /**********************************************************************
  2170. * AmiAbout()
  2171. *
  2172. *    About information!
  2173. ***********************************************************************/
  2174. void AmiAbout(void)
  2175. {
  2176.  struct EasyStruct es;
  2177. #if 0
  2178. #ifdef EVALUATION
  2179.  char *SpecialString = "Shareware EVALUATION copy.";
  2180. #else
  2181.  char *SpecialString = "Registration ID found. Thank you!";
  2182. #endif
  2183. #endif
  2184.  char str[220];
  2185.  
  2186.  sprintf(str,"%s %s\nCopyright © 1995 Douglas M. Dyer\ndyer@alx.sticomet.com\n\nCheckbook software for the Amiga® computer\n\nPrinter Checks:\n1-800-336-4168  Acct#Q00305",
  2187.     AC_AppID,AC_Version);
  2188.  
  2189.  es.es_StructSize = sizeof(struct EasyStruct);
  2190.  es.es_Flags = 0;
  2191.  es.es_Title = "About amiCheck:";
  2192.  es.es_TextFormat = str;
  2193.  es.es_GadgetFormat = "OK";
  2194.  AmiLock();
  2195.  GF_EasyRequest(gui,amiWindow,&es,NULL);
  2196.  AmiUnlock();
  2197.  
  2198. }
  2199.  
  2200. /*********************************************************************
  2201. * AmiAnnounce()
  2202. *
  2203. *    Announce using a requester
  2204. **********************************************************************/
  2205. void AmiAnnounce(char *str)
  2206. {
  2207.  struct EasyStruct es;
  2208.  
  2209.  es.es_StructSize = sizeof(struct EasyStruct);
  2210.  es.es_Flags = 0;
  2211.  es.es_Title = "amiCheck NOTICE:";
  2212.  es.es_TextFormat = str;
  2213.  es.es_GadgetFormat = "OK";
  2214.  AmiLock();
  2215.  GF_EasyRequest(gui,amiWindow,&es,NULL);
  2216.  AmiUnlock();
  2217.  
  2218. }
  2219.  
  2220. /**********************************************************************
  2221. * AmiAsk()
  2222. *
  2223. *    ok/cancel requester
  2224. ***********************************************************************/
  2225. BOOL AmiAsk(char *str)
  2226. {
  2227.  struct EasyStruct es;
  2228.  BOOL val = TRUE;
  2229.  
  2230.  if ( amiChangedItems == TRUE) {
  2231.     es.es_StructSize = sizeof(struct EasyStruct);
  2232.     es.es_Flags = 0;
  2233.     es.es_Title = "amiCheck NOTICE:";
  2234.     es.es_TextFormat = str;
  2235.     es.es_GadgetFormat = "OK|Save First|Cancel";
  2236.     AmiLock();
  2237.     val = GF_EasyRequest(gui,amiWindow,&es,NULL);
  2238.     AmiUnlock();
  2239.  
  2240.     /* save first if asked! */
  2241.      if (val == 2) {
  2242.         if (AmiSave(NULL,FALSE))
  2243.             val--;
  2244.      }
  2245.  } 
  2246.  
  2247.  return (val);
  2248. }
  2249.  
  2250.  
  2251. /************************************************************
  2252. * AmiDisableSel()
  2253. *
  2254. *    Disables items that are not needed when no item
  2255. *    is selected.
  2256. *************************************************************/
  2257. void AmiDisableSel(BOOL dis)
  2258. {
  2259.  UWORD menunum1, menunum2, menunum3, menunum4, menunum5, menunum6;
  2260.  static BOOL disit = FALSE;
  2261.  
  2262.  if (dis == disit)
  2263.     return;
  2264.  
  2265.  disit = dis;
  2266.  
  2267.  /* disable menu items */
  2268.  menunum1 = FULLMENUNUM(EDITTITLE,EDITCLEAR,NOSUB);
  2269.  menunum2 = FULLMENUNUM(EDITTITLE,EDITUNCLEAR,NOSUB);
  2270.  menunum3 = FULLMENUNUM(EDITTITLE,EDITMOVE,NOSUB);
  2271.  menunum4 = FULLMENUNUM(SEARCHTITLE,SEARCHJUMP,NOSUB);
  2272.  menunum5 = FULLMENUNUM(EDITTITLE,EDITUNFILT,NOSUB);
  2273.  menunum6 = FULLMENUNUM(EDITTITLE,EDITDUPLICATE,NOSUB);
  2274.  if (dis) {
  2275.     OffMenu(amiWindow, menunum1);
  2276.     OffMenu(amiWindow, menunum2);
  2277.     OffMenu(amiWindow, menunum3);
  2278.     OffMenu(amiWindow, menunum4);
  2279.     OffMenu(amiWindow, menunum5);
  2280.     OffMenu(amiWindow, menunum6);
  2281.  }
  2282.  else {
  2283.     OnMenu(amiWindow, menunum1);
  2284.     OnMenu(amiWindow, menunum2);
  2285.     OnMenu(amiWindow, menunum3);
  2286.     OnMenu(amiWindow, menunum4);
  2287.     OnMenu(amiWindow, menunum5);
  2288.     OnMenu(amiWindow, menunum6);
  2289.  }
  2290.  
  2291.  /* disable edit button */
  2292.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_EDIT]->gs_Gadget,
  2293.         GA_Disabled,dis,
  2294.         TAG_DONE);
  2295.  
  2296.  if (dis)
  2297.      AmiMoveRestore();
  2298. }
  2299.  
  2300. /************************************************************
  2301. * AmiDisableAll()
  2302. *
  2303. *    Disables all items - no account
  2304. *************************************************************/
  2305. void AmiDisableAll(BOOL dis)
  2306. {
  2307.  alldisabled = dis;
  2308.  
  2309.  /* turn off the other stuff if this is all off */
  2310.  if (dis)
  2311.     AmiDisableSel(TRUE);
  2312.  
  2313.  /* disable gadgets */
  2314.  if (dis == TRUE)
  2315.    GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_TREND]->gs_Gadget,
  2316.         GA_Disabled,dis,
  2317.         TAG_DONE);
  2318.  
  2319.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_GETSELTYPE]->gs_Gadget,
  2320.         GA_Disabled,dis,
  2321.         TAG_DONE);
  2322.  
  2323.  /*
  2324.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_ENTERTYPE]->gs_Gadget,
  2325.         GA_Disabled,dis,
  2326.         TAG_DONE);
  2327.  */
  2328.  
  2329.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_NEWTYPE]->gs_Gadget,
  2330.         GA_Disabled,dis,
  2331.         TAG_DONE);
  2332.  
  2333.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_FILTER]->gs_Gadget,
  2334.         GA_Disabled,dis,
  2335.         TAG_DONE);
  2336.  
  2337.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_STATS]->gs_Gadget,
  2338.         GA_Disabled,dis,
  2339.         TAG_DONE);
  2340.  
  2341.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_BUDGET]->gs_Gadget,
  2342.         GA_Disabled,dis,
  2343.         TAG_DONE);
  2344.  
  2345.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_ANALYSIS]->gs_Gadget,
  2346.         GA_Disabled,dis,
  2347.         TAG_DONE);
  2348.  
  2349.  GF_SetGadgetAttrs(gui,AC_MainSpecs[GID_SORT]->gs_Gadget,
  2350.         GA_Disabled,dis,
  2351.         TAG_DONE);
  2352.  
  2353.  
  2354.  /* disable menu items */
  2355.  if (dis) {
  2356.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEEXIT,NOSUB));
  2357.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVE,NOSUB));
  2358.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEAS,NOSUB));
  2359.     OffMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITQUICK,NOSUB));
  2360.     OffMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITBATCH,NOSUB));
  2361.     OffMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITAPPLYSORT,NOSUB));
  2362.     OffMenu(amiWindow,FULLMENUNUM(SEARCHTITLE,SEARCHSEARCH,NOSUB));
  2363.      OffMenu(amiWindow,FULLMENUNUM(SEARCHTITLE,SEARCHAGAIN,NOSUB));
  2364.      OffMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITRANGE,NOSUB));
  2365.     OffMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITACCT,NOSUB));
  2366.     OffMenu(amiWindow,FULLMENUNUM(UTILITYTITLE,UTILITYREPORT,NOSUB));
  2367.     OffMenu(amiWindow,FULLMENUNUM(PREFSTITLE,PREFSFORM,NOSUB));
  2368.     OffMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITDATA,NOSUB));
  2369.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILEIMPORT,NOSUB));
  2370.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILEEXPORT,NOSUB));
  2371.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILEPRINT,NOSUB));
  2372.     OffMenu(amiWindow,FULLMENUNUM(FILETITLE,FILERECON,NOSUB));
  2373.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXASSIGN,NOSUB));
  2374.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM1,NOSUB));
  2375.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM2,NOSUB));    
  2376.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM3,NOSUB));
  2377.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM4,NOSUB));
  2378.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM5,NOSUB));
  2379.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM6,NOSUB));
  2380.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM7,NOSUB));
  2381.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM8,NOSUB));
  2382.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM9,NOSUB));
  2383.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM10,NOSUB));
  2384.  
  2385.     /* "never" turn these off */
  2386. #if 0
  2387.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXOTHER,NOSUB));
  2388.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXOPENCMD,NOSUB));
  2389.     OffMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXCLOSECMD,NOSUB));
  2390. #endif
  2391.  }
  2392.  else {
  2393.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVE,NOSUB));
  2394.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEEXIT,NOSUB));
  2395.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEAS,NOSUB));
  2396.     OnMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITQUICK,NOSUB));
  2397.     OnMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITBATCH,NOSUB));
  2398.     OnMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITAPPLYSORT,NOSUB));
  2399.     OnMenu(amiWindow,FULLMENUNUM(SEARCHTITLE,SEARCHSEARCH,NOSUB));
  2400.      OnMenu(amiWindow,FULLMENUNUM(SEARCHTITLE,SEARCHAGAIN,NOSUB));
  2401.     OnMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITACCT,NOSUB));
  2402.     OnMenu(amiWindow,FULLMENUNUM(UTILITYTITLE,UTILITYREPORT,NOSUB));
  2403.     OnMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITRANGE,NOSUB));
  2404.     OnMenu(amiWindow,FULLMENUNUM(EDITTITLE,EDITDATA,NOSUB));
  2405.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILERECON,NOSUB));
  2406.     OnMenu(amiWindow,FULLMENUNUM(PREFSTITLE,PREFSFORM,NOSUB));
  2407.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILEPRINT,NOSUB));
  2408.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILEIMPORT,NOSUB));
  2409.     OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILEEXPORT,NOSUB));
  2410.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXASSIGN,NOSUB));
  2411.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM1,NOSUB));
  2412.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM2,NOSUB));    
  2413.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM3,NOSUB));
  2414.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM4,NOSUB));
  2415.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM5,NOSUB));
  2416.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM6,NOSUB));
  2417.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM7,NOSUB));
  2418.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM8,NOSUB));
  2419.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM9,NOSUB));
  2420.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXM10,NOSUB));
  2421.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXOTHER,NOSUB));
  2422.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXOPENCMD,NOSUB));
  2423.     OnMenu(amiWindow,FULLMENUNUM(AREXXTITLE,AREXXCLOSECMD,NOSUB));
  2424.  }
  2425. }
  2426.  
  2427. /*********************************************************
  2428. * AmiHandleGadgetDown()
  2429. *
  2430. *    Handle those down buttons
  2431. **********************************************************/
  2432. void AmiHandleGadgetDown(struct IntuiMessage *imsg)
  2433. {
  2434.  struct Gadget *gad = (struct Gadget *)(imsg->IAddress);
  2435.  UWORD code = imsg->Code;
  2436.  filterNode *node;
  2437.  amountType amount;
  2438.  
  2439.  switch (gad->GadgetID) {
  2440.     case GID_REGFIELD:
  2441.         if (RegHitTest(imsg->Micros, imsg->Seconds, imsg->MouseX,imsg->MouseY)) {
  2442.             if (dclicktype == 1)
  2443.                 AmiToggleClear();
  2444.  
  2445.             else if (dclicktype == 2) {
  2446.                 node = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  2447.                 amount = node->entry->amount;
  2448.                 if ( !(node->entry->flags & VOIDED)) {
  2449.                     DataUpdateBal( 
  2450.                         (node->entry->type==DEPOSITTYPE)?WITHDRAWALTYPE:DEPOSITTYPE,
  2451.                         &amount, &filtAmnt, filtStr);
  2452.                     AmiUpdateFilt(filtStr);
  2453.                 }
  2454.                 DataRemoveFilter(node);
  2455.                 RegRemoveSel();
  2456.             }
  2457.                 
  2458.             else    AmiEditEntry();
  2459.         }
  2460.         break;
  2461.  
  2462.     case GID_REGVSCROL:
  2463.         RegMoveList(&filtered,code);
  2464.         RegRefresh(FALSE);
  2465.         break;
  2466.  
  2467.  }
  2468. }
  2469.  
  2470. /**********************************************************
  2471. * AmiAllocRequesters()
  2472. *
  2473. *    Alocates and sets up asl requestors for both loads and
  2474. *    one saveas
  2475. ***********************************************************/
  2476. BOOL AmiAllocRequesters(void)
  2477. {
  2478.  
  2479.  /* allocate the generic tag list */
  2480.  aslTagList = AllocateTagItems(5);
  2481.  if (aslTagList) {
  2482.     aslTagList[0].ti_Tag =     ASL_Window;
  2483.     aslTagList[0].ti_Data = (unsigned long)amiWindow;
  2484.     aslTagList[1].ti_Tag = ASL_Height;
  2485.     aslTagList[1].ti_Data = amiAslHeight;
  2486.     aslTagList[2].ti_Tag = ASL_OKText;
  2487.     aslTagList[2].ti_Data = (unsigned long)"OK";
  2488.     aslTagList[3].ti_Tag = ASL_CancelText;
  2489.     aslTagList[3].ti_Data = (unsigned long)"Cancel";
  2490.     aslTagList[4].ti_Tag = TAG_DONE;
  2491.  }
  2492.  else return (FALSE);
  2493.  
  2494.  scriptASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2495.         scriptloadtags);
  2496.  if (scriptASL == NULL)
  2497.     return (FALSE);
  2498.  
  2499.  scriptsaveASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2500.         scriptsavetags);
  2501.  if (scriptsaveASL == NULL)
  2502.     return (FALSE);
  2503.  
  2504.  otherRexxASL =  (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2505.         rexxtags);
  2506.  if (otherRexxASL == NULL)
  2507.     return (FALSE);
  2508.  
  2509.  loadASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2510.         loadtags);
  2511.  if (loadASL == NULL)
  2512.     return (FALSE);
  2513.  
  2514.  saveASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2515.         savetags);
  2516.  if (saveASL == NULL)
  2517.     return (FALSE);
  2518.  
  2519.  impasciiASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2520.         impasciitags);
  2521.  if (impasciiASL == NULL)
  2522.     return (FALSE);
  2523.  
  2524.  expasciiASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2525.         expasciitags);
  2526.  if (expasciiASL == NULL)
  2527.     return (FALSE);
  2528.  
  2529.  netsaveASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2530.         netsavetags);
  2531.  if (netsaveASL == NULL)
  2532.     return (FALSE);
  2533.  
  2534.  netloadASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2535.         netloadtags);
  2536.  if (netloadASL == NULL)
  2537.     return (FALSE);
  2538.  
  2539.  reportASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2540.         reporttags);
  2541.  if (reportASL == NULL)
  2542.     return (FALSE);
  2543.  
  2544.  devASL = (struct FileRequester *)AllocAslRequest(ASL_FileRequest,
  2545.         devtags);
  2546.  if (devASL == NULL)
  2547.     return (FALSE);
  2548.  
  2549.  return (TRUE);
  2550. }
  2551.  
  2552. /****************************************************************
  2553. * AmiUpdateFilt()
  2554. *
  2555. *    Updates the Filter balance field
  2556. *****************************************************************/
  2557. void AmiUpdateFilt(char *str)
  2558. {
  2559.  strcpy(filtStr,str);
  2560.  GF_SetGadgetAttrs(gui,gadgetspecs[GID_RUNBAL].gs_Gadget,
  2561.     GTTX_Text,filtStr,
  2562.     TAG_DONE);
  2563. }
  2564.  
  2565. /****************************************************************
  2566. * AmiUpdateCurr()
  2567. *
  2568. *    Updates the curr balance field
  2569. *****************************************************************/
  2570. void AmiUpdateCurr(char *str)
  2571. {
  2572.  strcpy(currStr,str);
  2573.  GF_SetGadgetAttrs(gui,gadgetspecs[GID_CURRBAL].gs_Gadget,
  2574.     GTTX_Text,currStr,
  2575.     TAG_DONE);
  2576. }
  2577.  
  2578. /****************************************************************
  2579. * AmiUpdateState()
  2580. *
  2581. *    Updates the Statement balance field
  2582. *****************************************************************/
  2583. void AmiUpdateState(char *str)
  2584. {
  2585.  strcpy(stateStr,str);
  2586.  GF_SetGadgetAttrs(gui,gadgetspecs[GID_STATBAL].gs_Gadget,
  2587.     GTTX_Text,stateStr,
  2588.     TAG_DONE);
  2589. }
  2590.  
  2591. /*******************************************************************************
  2592. * AmiParseCmd()
  2593. *
  2594. *    Parse the input tooltypes and parameters
  2595. ********************************************************************************/
  2596. void AmiParseCmd(int argc, char **argv)
  2597. {
  2598.  char *ptr;
  2599.  ULONG rows;
  2600.  char dtype[80];
  2601.  
  2602.  strcpy(filePattern,DEFAULT_FILEPATTERN);
  2603.  strcpy(importPattern,DEFAULT_IMPORTPATTERN);
  2604.  strcpy(scriptPattern,DEFAULT_SCRIPTPATTERN);
  2605.  strcpy(netPattern,DEFAULT_NETPATTERN);
  2606.  
  2607. #if 0
  2608.  if (argc==0) {
  2609.     sprintf(iconPath,"AC_Icons/");
  2610.     sprintf(guidePath,"documents/amiCheck.guide");
  2611.     return;
  2612.  }
  2613.  else {
  2614.     ptr = PathPart(argv[0]);
  2615.     if (ptr != NULL) {
  2616.         if (*ptr == '/')
  2617.             *(ptr+1) = NULL;
  2618.         else *ptr = NULL;
  2619.  
  2620.         sprintf(iconPath,"%sAC_Icons/",argv[0]);
  2621.         sprintf(guidePath,"%sdocuments/amiCheck.guide",argv[0]);        
  2622.     }
  2623.     else {
  2624.         sprintf(iconPath,"AC_Icons/");
  2625.         sprintf(guidePath,"documents/amiCheck.guide");
  2626.     }
  2627.  }
  2628.  
  2629. #endif
  2630.  
  2631.  while (argc>1) {
  2632.     /* templaterows */
  2633.     if (strnicmp(argv[argc-1],"TEMPLATEROWS",strlen("TEMPLATEROWS") ) == 0) {
  2634.         ptr = strchr(argv[argc-1],'=');
  2635.         if (ptr != NULL) {
  2636.             sscanf(ptr+1,"%d",&rows);
  2637.             if (rows < 5) rows = 5;
  2638.             SP_SelTempSpecs[GID_SPTEMPLIST]->gs_MinHeight = rows;
  2639.         }
  2640.     }
  2641.  
  2642.     /* aslheight */
  2643.     else if (strnicmp(argv[argc-1],"ASLHEIGHT",strlen("ASLHEIGHT") ) == 0) {
  2644.         ptr = strchr(argv[argc-1],'=');
  2645.         if (ptr != NULL) {
  2646.             sscanf(ptr+1,"%u",&amiAslHeight);
  2647.         }
  2648.     }
  2649.  
  2650.     /* numcols */
  2651.     else if (strnicmp(argv[argc-1],"NUMCOLS",strlen("NUMCOLS") ) == 0) {
  2652.         ptr = strchr(argv[argc-1],'=');
  2653.         if (ptr != NULL) {
  2654.             sscanf(ptr+1,"%d",&rows);
  2655.             if (rows < 5) rows = 5;
  2656.             gadgetspecs[GID_REGFIELD].gs_MinWidth = rows;
  2657.         }
  2658.     }
  2659.  
  2660.     /* numrows */
  2661.     else if (strnicmp(argv[argc-1],"NUMROWS",strlen("NUMROWS") ) == 0) {
  2662.         ptr = strchr(argv[argc-1],'=');
  2663.         if (ptr != NULL) {
  2664.             sscanf(ptr+1,"%d",&rows);
  2665.             if (rows < 5) rows = 5;
  2666.             gadgetspecs[GID_REGFIELD].gs_MinHeight = rows;
  2667.         }
  2668.     }
  2669.  
  2670.     /* layout change warning */
  2671.     else if (strnicmp(argv[argc-1],"NOLAYOUTWARN",strlen("NOLAYOUTWARN") ) == 0) {
  2672.         layoutwarn = FALSE;    
  2673.     }
  2674.  
  2675.     /* autosort flag */
  2676.     else if (strnicmp(argv[argc-1],"AUTOSORT",strlen("AUTOSORT") ) == 0) {
  2677.         autosort = TRUE;    
  2678.     }
  2679.  
  2680.     /* show memo flag */
  2681.     else if (strnicmp(argv[argc-1],"SHOWMEMO",strlen("SHOWMEMO") ) == 0) {
  2682.         showMemo = TRUE;
  2683.     }
  2684.  
  2685.     /* DCLICK flag */
  2686.     else if (strnicmp(argv[argc-1],"DCLICK",strlen("DCLICK") ) == 0) {
  2687.         dclicktype = 0;
  2688.         ptr = strchr(argv[argc-1],'=');
  2689.         if (ptr != NULL) {
  2690.             sscanf(ptr+1,"%s",dtype);
  2691.             if (strnicmp(dtype,"CLEAR",strlen("CLEAR")) == 0)
  2692.                 dclicktype = 1;
  2693.             else if (strnicmp(dtype,"UNFILT",strlen("UNFILT")) == 0)
  2694.                 dclicktype = 2;
  2695.             else if (strnicmp(dtype,"EDIT",strlen("EDIT")) == 0)
  2696.                 dclicktype = 0;
  2697.         }
  2698.     }
  2699.  
  2700.     /* DATE flag */
  2701.     else if (strnicmp(argv[argc-1],"DATE",strlen("DATE") ) == 0) {
  2702.         dateFormat = DATE_MMDDYY;
  2703.         ptr = strchr(argv[argc-1],'=');
  2704.         if (ptr != NULL) {
  2705.             sscanf(ptr+1,"%s",dtype);
  2706.             if (strnicmp(dtype,"FORMAT1",strlen("FORMAT1")) == 0)
  2707.                 dateFormat = DATE_MMDDYY;
  2708.             else if (strnicmp(dtype,"FORMAT2",strlen("FORMAT2")) == 0)
  2709.                 dateFormat = DATE_DDMMYY;
  2710.             else if (strnicmp(dtype,"FORMAT3",strlen("FORMAT3")) == 0)
  2711.                 dateFormat = DATE_DEC_12;
  2712.             else if (strnicmp(dtype,"FORMAT4",strlen("FORMAT4")) == 0)
  2713.                 dateFormat = DATE_12_DEC;
  2714.         }
  2715.     }
  2716.  
  2717.     /* LOAD pattern */
  2718.     else  if (strnicmp(argv[argc-1],"LOADPATTERN",strlen("LOADPATTERN") ) == 0) {
  2719.         ptr = strchr(argv[argc-1],'=');
  2720.         if (ptr != NULL) {
  2721.             sscanf(ptr+1,"%s",dtype);
  2722.             if (strlen(dtype) < FILEPATTERN_SIZE) {
  2723.                 strcpy(filePattern,dtype);
  2724.             }
  2725.         }
  2726.     }
  2727.  
  2728.     /* IMPORT pattern */
  2729.     else  if (strnicmp(argv[argc-1],"IMPORTPATTERN",strlen("IMPORTPATTERN") ) == 0) {
  2730.         ptr = strchr(argv[argc-1],'=');
  2731.         if (ptr != NULL) {
  2732.             sscanf(ptr+1,"%s",dtype);
  2733.             if (strlen(dtype) < FILEPATTERN_SIZE) {
  2734.                 strcpy(importPattern,dtype);
  2735.             }
  2736.         }
  2737.     }
  2738.  
  2739.     /* SCRIPT pattern */
  2740.     else  if (strnicmp(argv[argc-1],"SCRIPTPATTERN",strlen("SCRIPTPATTERN") ) == 0) {
  2741.         ptr = strchr(argv[argc-1],'=');
  2742.         if (ptr != NULL) {
  2743.             sscanf(ptr+1,"%s",dtype);
  2744.             if (strlen(dtype) < FILEPATTERN_SIZE) {
  2745.                 strcpy(scriptPattern,dtype);
  2746.             }
  2747.         }
  2748.     }
  2749.  
  2750.     /* NET pattern */
  2751.     else  if (strnicmp(argv[argc-1],"NETPATTERN",strlen("NETPATTERN") ) == 0) {
  2752.         ptr = strchr(argv[argc-1],'=');
  2753.         if (ptr != NULL) {
  2754.             sscanf(ptr+1,"%s",dtype);
  2755.             if (strlen(dtype) < FILEPATTERN_SIZE) {
  2756.                 strcpy(netPattern,dtype);
  2757.             }
  2758.         }
  2759.     }
  2760.  
  2761.     /* is it a tooltype comment or file name? */
  2762.     else if ( (char)*argv[argc-1] != '(' && !bootfile) {
  2763.         /* assume it to be a file */
  2764.         strcpy(currFile, argv[argc-1]);
  2765.         bootfile = TRUE;
  2766.     }
  2767.     argc--;
  2768.  }
  2769. }
  2770.  
  2771. /********************************************************************************
  2772. * AmiOpenGUI()
  2773. *
  2774. *    open all guis in system
  2775. *
  2776. *********************************************************************************/
  2777. BOOL AmiOpenGUI(void)
  2778. {
  2779.  
  2780.  seltempGUI =  GF_CreateGUI(guiapp, SP_SelTempPanel,SP_SelTempSpecs,
  2781.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2782.                 GUI_WindowTitle,        (ULONG)"Templates",
  2783.                 GUI_OpenGUI,            (ULONG)FALSE,
  2784.                 GUI_Backfill,           (ULONG)FALSE,
  2785.         GUI_ExtraIDCMP,        (ULONG)IDCMP_RAWKEY,
  2786.         GUI_NewMenu,        amiMenu,
  2787.         GUI_ScreenTitle,    AC_Title,
  2788.                 TAG_DONE);
  2789.  if (seltempGUI == NULL)
  2790.     return (FALSE);
  2791.  
  2792.  edittempGUI = GF_CreateGUI(guiapp, TP_EditTempPanel,TP_EditTempSpecs,
  2793.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2794.                 GUI_WindowTitle,        (ULONG)"Edit Template List",
  2795.                 GUI_OpenGUI,            (ULONG)FALSE,
  2796.                 GUI_Backfill,           (ULONG)TRUE,
  2797.         GUI_ExtraIDCMP,        (ULONG)IDCMP_RAWKEY,
  2798.         GUI_ScreenTitle,    AC_Title,
  2799.                 TAG_DONE);
  2800.  if (edittempGUI == NULL)
  2801.     return (FALSE);
  2802.  
  2803.  newGUI = GF_CreateGUI(guiapp, NP_EnterPanel,NP_EnterSpecs,
  2804.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2805.                 GUI_WindowTitle,        (ULONG)NULL,
  2806.                 GUI_OpenGUI,            (ULONG)FALSE,
  2807.                 GUI_Backfill,           (ULONG)TRUE,
  2808.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_RAWKEY | IDCMP_ACTIVEWINDOW),
  2809.         GUI_ScreenTitle,    AC_Title,
  2810.                 TAG_DONE);
  2811.  if (newGUI == NULL)
  2812.     return (FALSE);
  2813.  
  2814.  filterGUI = GF_CreateGUI(guiapp, FP_FilterPanel,FP_FilterSpecs,
  2815.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2816.                 GUI_WindowTitle,        (ULONG)"Edit Filter Settings",
  2817.                 GUI_OpenGUI,            (ULONG)FALSE,
  2818.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_RAWKEY | IDCMP_ACTIVEWINDOW),
  2819.                 GUI_Backfill,           (ULONG)TRUE,
  2820.         GUI_ScreenTitle,    AC_Title,
  2821.                 TAG_DONE);
  2822.  if (filterGUI == NULL)
  2823.     return (FALSE);
  2824.  
  2825.  memcpy(&dummykey,ptrKey,sizeof(usrkey));
  2826.  
  2827.  sortGUI = GF_CreateGUI(guiapp, SRP_SortPanel,SRP_SortSpecs,
  2828.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2829.                 GUI_WindowTitle,        (ULONG)"Register Sort",
  2830.                 GUI_OpenGUI,            (ULONG)FALSE,
  2831.                 GUI_Backfill,           (ULONG)TRUE,
  2832.         GUI_ExtraIDCMP,        (ULONG)IDCMP_RAWKEY,
  2833.         GUI_ScreenTitle,    AC_Title,
  2834.                 TAG_DONE);
  2835.  if (sortGUI == NULL)
  2836.     return (FALSE);
  2837.  
  2838.  entryGUI = GF_CreateGUI(guiapp, EP_EnterPanel,EP_EnterSpecs,
  2839.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2840.                 GUI_WindowTitle,        (ULONG)NULL,
  2841.                 GUI_OpenGUI,            (ULONG)FALSE,
  2842.                 GUI_Backfill,           (ULONG)TRUE,
  2843.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_RAWKEY | IDCMP_ACTIVEWINDOW),
  2844.         GUI_ScreenTitle,    AC_Title,
  2845.                 TAG_DONE);
  2846.  if (entryGUI == NULL)
  2847.     return (FALSE);
  2848.  
  2849.  recGUI = GF_CreateGUI(guiapp, RCP_RecPanel,RCP_RecSpecs,
  2850.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2851.                 GUI_WindowTitle,        (ULONG)"Reconciliation",
  2852.                 GUI_OpenGUI,            (ULONG)FALSE,
  2853.                 GUI_Backfill,           (ULONG)TRUE,
  2854.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_RAWKEY | IDCMP_ACTIVEWINDOW),
  2855.         GUI_ScreenTitle,    AC_Title,
  2856.                 TAG_DONE);
  2857.  if (recGUI == NULL)
  2858.     return (FALSE);
  2859.  
  2860.  acctGUI = GF_CreateGUI(guiapp, ACP_AcctPanel,ACP_AcctSpecs,
  2861.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2862.                 GUI_WindowTitle,        (ULONG)NULL,
  2863.                 GUI_OpenGUI,            (ULONG)FALSE,
  2864.                 GUI_Backfill,           (ULONG)TRUE,
  2865.           GUI_ExtraIDCMP,        (ULONG)IDCMP_ACTIVEWINDOW,
  2866.         GUI_ScreenTitle,    AC_Title,
  2867.                 TAG_DONE);
  2868.  if (acctGUI == NULL)
  2869.     return (FALSE);
  2870.  
  2871.  searchGUI = GF_CreateGUI(guiapp, SEP_SearchPanel,SEP_SearchSpecs,
  2872.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2873.                 GUI_WindowTitle,        (ULONG)"Register Search ",
  2874.                 GUI_OpenGUI,            (ULONG)FALSE,
  2875.                 GUI_Backfill,           (ULONG)TRUE,
  2876.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2877.         GUI_ScreenTitle,    AC_Title,
  2878.         TAG_DONE);
  2879.  if (searchGUI == NULL)
  2880.     return (FALSE);
  2881.  
  2882.  catGUI = GF_CreateGUI(guiapp, CP_CatPanel,CP_CatSpecs,
  2883.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2884.                 GUI_WindowTitle,        (ULONG)"Edit Category List",
  2885.                 GUI_OpenGUI,            (ULONG)FALSE,
  2886.             GUI_Backfill,           (ULONG)TRUE,
  2887.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_RAWKEY | IDCMP_ACTIVEWINDOW),
  2888.         GUI_ScreenTitle,    AC_Title,
  2889.                 TAG_DONE);
  2890.  if (catGUI == NULL)
  2891.     return (FALSE);
  2892.  
  2893.  statGUI = GF_CreateGUI(guiapp, STP_StatPanel,STP_StatSpecs,
  2894.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2895.                 GUI_WindowTitle,        (ULONG)"Register Statistics ",
  2896.                 GUI_OpenGUI,            (ULONG)FALSE,
  2897.                 GUI_Backfill,           (ULONG)FALSE,
  2898.         GUI_ExtraIDCMP,        (ULONG)IDCMP_RAWKEY,
  2899.         GUI_ScreenTitle,    AC_Title,
  2900.                 TAG_DONE);
  2901.  if (statGUI == NULL)
  2902.     return (FALSE);
  2903.  
  2904.  repGUI = GF_CreateGUI(guiapp, REP_ReportPanel,REP_ReportSpecs,
  2905.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2906.                 GUI_WindowTitle,        (ULONG)"Report Generator",
  2907.                 GUI_OpenGUI,            (ULONG)FALSE,
  2908.                 GUI_Backfill,           (ULONG)TRUE,
  2909.         GUI_ExtraIDCMP,        (ULONG)IDCMP_ACTIVEWINDOW,
  2910.         GUI_ScreenTitle,    AC_Title,
  2911.                  TAG_DONE);
  2912.  if (repGUI == NULL)
  2913.     return (FALSE);
  2914.  
  2915.  scriptGUI = GF_CreateGUI(guiapp, SCP_ScriptPanel,SCP_ScriptSpecs,
  2916.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2917.                 GUI_WindowTitle,        (ULONG)"Script Editor ",
  2918.                 GUI_OpenGUI,            (ULONG)FALSE,
  2919.                 GUI_Backfill,           (ULONG)TRUE,
  2920.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2921.         GUI_ScreenTitle,    AC_Title,
  2922.                  TAG_DONE);
  2923.  if (scriptGUI == NULL)
  2924.     return (FALSE);
  2925.  
  2926.  groupGUI = GF_CreateGUI(guiapp, GRP_GroupPanel,GRP_GroupSpecs,
  2927.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2928.                 GUI_WindowTitle,        (ULONG)"Group Editor ",
  2929.                 GUI_OpenGUI,            (ULONG)FALSE,
  2930.                 GUI_Backfill,           (ULONG)TRUE,
  2931.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2932.         GUI_ScreenTitle,    AC_Title,
  2933.                  TAG_DONE);
  2934.  if (groupGUI == NULL)
  2935.     return (FALSE);
  2936.  
  2937.  analGUI = GF_CreateGUI(guiapp, AN_MainPanel,AN_MainSpecs,
  2938.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2939.                 GUI_WindowTitle,        (ULONG)"Graphical Analysis",
  2940.                 GUI_OpenGUI,            (ULONG)FALSE,
  2941.                 GUI_Backfill,           (ULONG)FALSE,
  2942.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2943.         GUI_ScreenTitle,    AC_Title,
  2944.                  TAG_DONE);
  2945.  if (analGUI == NULL)
  2946.     return (FALSE);
  2947.  
  2948.  qdateGUI = GF_CreateGUI(guiapp, QD_DatePanel,QD_DateSpecs,
  2949.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2950.                 GUI_WindowTitle,        (ULONG)"Dates",
  2951.                 GUI_OpenGUI,            (ULONG)FALSE,
  2952.                 GUI_Backfill,           (ULONG)TRUE,
  2953.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2954.         GUI_ScreenTitle,    AC_Title,
  2955.                  TAG_DONE);
  2956.  if (qdateGUI == NULL)
  2957.     return (FALSE);
  2958.  
  2959.  qmemoGUI = GF_CreateGUI(guiapp, QM_MemoPanel,QM_MemoSpecs,
  2960.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2961.                 GUI_WindowTitle,        (ULONG)"Memos",
  2962.                 GUI_OpenGUI,            (ULONG)FALSE,
  2963.                 GUI_Backfill,           (ULONG)FALSE,
  2964.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2965.         GUI_ScreenTitle,    AC_Title,
  2966.                  TAG_DONE);
  2967.  if (qmemoGUI == NULL)
  2968.     return (FALSE);
  2969.  
  2970.  memoGUI = GF_CreateGUI(guiapp, M_MemoPanel,M_MemoSpecs,
  2971.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2972.                 GUI_WindowTitle,        (ULONG)"Quick-Memo Editor",
  2973.                 GUI_OpenGUI,            (ULONG)FALSE,
  2974.                 GUI_Backfill,           (ULONG)TRUE,
  2975.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2976.         GUI_ScreenTitle,    AC_Title,
  2977.                  TAG_DONE);
  2978.  if (memoGUI == NULL)
  2979.     return (FALSE);
  2980.  
  2981.  qnameGUI = GF_CreateGUI(guiapp, QN_NamePanel,QN_NameSpecs,
  2982.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2983.                 GUI_WindowTitle,        (ULONG)"Payees",
  2984.                 GUI_OpenGUI,            (ULONG)FALSE,
  2985.                 GUI_Backfill,           (ULONG)FALSE,
  2986.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2987.         GUI_ScreenTitle,    AC_Title,
  2988.                  TAG_DONE);
  2989.  if (qnameGUI == NULL)
  2990.     return (FALSE);
  2991.  
  2992.  qamntGUI = GF_CreateGUI(guiapp, QA_AmntPanel,QA_AmntSpecs,
  2993.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  2994.                 GUI_WindowTitle,        (ULONG)"Amounts",
  2995.                 GUI_OpenGUI,            (ULONG)FALSE,
  2996.                 GUI_Backfill,           (ULONG)FALSE,
  2997.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  2998.         GUI_ScreenTitle,    AC_Title,
  2999.                  TAG_DONE);
  3000.  if (qamntGUI == NULL)
  3001.     return (FALSE);
  3002.  
  3003.  nameGUI = GF_CreateGUI(guiapp, N_NamePanel,N_NameSpecs,
  3004.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3005.                 GUI_WindowTitle,        (ULONG)"Quick-Payee Editor",
  3006.                 GUI_OpenGUI,            (ULONG)FALSE,
  3007.                 GUI_Backfill,           (ULONG)TRUE,
  3008.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3009.         GUI_ScreenTitle,    AC_Title,
  3010.                  TAG_DONE);
  3011.  if (nameGUI == NULL)
  3012.     return (FALSE);
  3013.  
  3014.  amntGUI = GF_CreateGUI(guiapp, A_AmntPanel,A_AmntSpecs,
  3015.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3016.                 GUI_WindowTitle,        (ULONG)"Quick-Amount Editor",
  3017.                 GUI_OpenGUI,            (ULONG)FALSE,
  3018.                 GUI_Backfill,           (ULONG)TRUE,
  3019.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3020.         GUI_ScreenTitle,    AC_Title,
  3021.                  TAG_DONE);
  3022.  if (amntGUI == NULL)
  3023.     return (FALSE);
  3024.  
  3025.  formGUI = GF_CreateGUI(guiapp, FP_FormPanel,FP_FormSpecs,
  3026.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3027.                 GUI_WindowTitle,        (ULONG)"Check Forms ",
  3028.                 GUI_OpenGUI,            (ULONG)FALSE,
  3029.                 GUI_Backfill,           (ULONG)TRUE,
  3030.         GUI_ExtraIDCMP,        (ULONG)IDCMP_ACTIVEWINDOW,
  3031.         GUI_ScreenTitle,    AC_Title,
  3032.                  TAG_DONE);
  3033.  if (formGUI == NULL)
  3034.     return (FALSE);
  3035.  
  3036.  netGUI = GF_CreateGUI(guiapp, NET_NetPanel,NET_NetSpecs,
  3037.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3038.                 GUI_WindowTitle,        (ULONG)"Net Worth Analysis",
  3039.                 GUI_OpenGUI,            (ULONG)FALSE,
  3040.                 GUI_Backfill,           (ULONG)TRUE,
  3041.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3042.         GUI_ScreenTitle,    AC_Title,
  3043.                  TAG_DONE);
  3044.  if (netGUI == NULL)
  3045.     return (FALSE);
  3046.  
  3047.  printGUI = GF_CreateGUI(guiapp, PR_PrintPanel,PR_PrintSpecs,
  3048.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3049.                 GUI_WindowTitle,        (ULONG)"Print Checks",
  3050.                 GUI_OpenGUI,            (ULONG)FALSE,
  3051.                 GUI_Backfill,           (ULONG)TRUE,
  3052.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3053.         GUI_ScreenTitle,    AC_Title,
  3054.                  TAG_DONE);
  3055.  if (printGUI == NULL)
  3056.     return (FALSE);
  3057.  
  3058.  arexxGUI = GF_CreateGUI(guiapp, AX_ArexxPanel,AX_ArexxSpecs,
  3059.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3060.                 GUI_WindowTitle,        (ULONG)"Assign Macros",
  3061.                 GUI_OpenGUI,            (ULONG)FALSE,
  3062.                 GUI_Backfill,           (ULONG)TRUE,
  3063.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3064.         GUI_ScreenTitle,    AC_Title,
  3065.                  TAG_DONE);
  3066.  if (arexxGUI == NULL)
  3067.     return (FALSE);
  3068.  
  3069.  keyGUI = GF_CreateGUI(guiapp, KEY_KeyPanel,KEY_KeySpecs,
  3070.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3071.                 GUI_WindowTitle,        (ULONG)"Keyfile Registration",
  3072.                 GUI_OpenGUI,            (ULONG)FALSE,
  3073.                 GUI_Backfill,           (ULONG)TRUE,
  3074.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3075.         GUI_ScreenTitle,    AC_Title,
  3076.                  TAG_DONE);
  3077.  if (keyGUI == NULL)
  3078.     return (FALSE);
  3079.  
  3080. #if 0
  3081.  budgetGUI = GF_CreateGUI(guiapp, BP_BudgetPanel,BP_BudgetSpecs,
  3082.                 GUI_InitialOrientation, (ULONG)GUIL_VertGroup,
  3083.                 GUI_WindowTitle,        (ULONG)"Budget Distribution",
  3084.                 GUI_OpenGUI,            (ULONG)TRUE,
  3085.                 GUI_Backfill,           (ULONG)TRUE,
  3086.         GUI_ExtraIDCMP,        (ULONG)(IDCMP_ACTIVEWINDOW | IDCMP_RAWKEY),
  3087.         GUI_ScreenTitle,    AC_Title,
  3088.                  TAG_DONE);
  3089.  if (budgetGUI == NULL)
  3090.     return (FALSE);
  3091. #endif
  3092.  
  3093.  return (TRUE);
  3094. }
  3095.  
  3096. /********************************************************************************
  3097. * AmiCloseGUI()
  3098. *
  3099. *    Destroys guis
  3100. *
  3101. *********************************************************************************/
  3102. void AmiCloseGUI(void)
  3103. {
  3104.  selWin = NULL;
  3105. if (seltempGUI) GF_DestroyGUI(seltempGUI);
  3106. if (edittempGUI) GF_DestroyGUI(edittempGUI);
  3107. if (newGUI) GF_DestroyGUI(newGUI);
  3108. if (filterGUI) GF_DestroyGUI(filterGUI);
  3109. if (sortGUI) GF_DestroyGUI(sortGUI);
  3110. if (entryGUI) GF_DestroyGUI(entryGUI);
  3111. if (recGUI) GF_DestroyGUI(recGUI);
  3112. if (acctGUI) GF_DestroyGUI(acctGUI);
  3113. if (searchGUI) GF_DestroyGUI(searchGUI);
  3114. if (catGUI) GF_DestroyGUI(catGUI);
  3115. if (statGUI) GF_DestroyGUI(statGUI);
  3116. if (repGUI) GF_DestroyGUI(repGUI);
  3117. if (scriptGUI) GF_DestroyGUI(scriptGUI);
  3118. if (groupGUI) GF_DestroyGUI(groupGUI);
  3119. if (analGUI) GF_DestroyGUI(analGUI);
  3120. if (formGUI) GF_DestroyGUI(formGUI);
  3121. if (netGUI) GF_DestroyGUI(netGUI);
  3122. if (qdateGUI) GF_DestroyGUI(qdateGUI);
  3123. if (qmemoGUI) GF_DestroyGUI(qmemoGUI);
  3124. if (memoGUI) GF_DestroyGUI(memoGUI);
  3125. if (nameGUI) GF_DestroyGUI(nameGUI);
  3126. if (amntGUI) GF_DestroyGUI(amntGUI);
  3127. if (qamntGUI) GF_DestroyGUI(qamntGUI);
  3128. if (qnameGUI) GF_DestroyGUI(qnameGUI);
  3129. if (printGUI) GF_DestroyGUI(printGUI);
  3130. if (arexxGUI) GF_DestroyGUI(arexxGUI);
  3131. if (keyGUI) GF_DestroyGUI(keyGUI);
  3132. #if 0
  3133. if (budgetGUI) GF_DestroyGUI(budgetGUI);
  3134. #endif
  3135. }
  3136.  
  3137. /********************************************************
  3138. * AmiMoveSwap()
  3139. *
  3140. *    Move the selected item!
  3141. *********************************************************/
  3142. void AmiMoveSwap(void)
  3143. {
  3144.  filterNode *ftemp;
  3145.  entryNode *etemp, *entemp;
  3146.  UWORD eord, enord;
  3147.  
  3148.  if (!moveActive || selRow == -1)
  3149.     return;
  3150.  
  3151.  ftemp = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  3152.  if (ftemp != moveNode) {
  3153.  
  3154.     /* move the template nodes first */
  3155.     Remove((struct Node *)moveNode);
  3156.     if (selRow > moveRow) 
  3157.         Insert( (struct List *)&filtered,(struct Node *)moveNode, (struct Node *)ftemp);
  3158.     else     Insert( (struct List *)&filtered,(struct Node *)moveNode, (struct Node *)ftemp->node.mln_Pred);
  3159.     
  3160.     /* swap the ACTUAL ENTRY NODE */
  3161.     etemp = moveNode->entry;
  3162.     entemp = ftemp->entry;
  3163.     eord = DataFindNode( (struct List *)&entries, (struct Node *)etemp);
  3164.      enord = DataFindNode( (struct List *)&entries, (struct Node *)entemp);
  3165.     Remove((struct Node *)etemp);    
  3166.  
  3167.     if (enord > eord)
  3168.         Insert( (struct List *)&entries,(struct Node *)etemp, (struct Node *)entemp);
  3169.     else    Insert( (struct List *)&entries,(struct Node *)etemp, (struct Node *)entemp->node.mln_Pred);
  3170.  
  3171.     /* display changes */
  3172.     RegMoveList(&filtered,regTopRow);
  3173.     RegRefresh(FALSE);
  3174. /*
  3175.     RegRedrawRow(moveNode);    
  3176.     RegRedrawSel(entemp);
  3177. */
  3178.  
  3179.     amiChangedItems = TRUE;
  3180.  }     
  3181.  
  3182.  AmiMoveRestore();
  3183. }
  3184.  
  3185. /********************************************************
  3186. * AmiMoveActive()
  3187. *
  3188. *    activates mouse ptr and move state
  3189. *********************************************************/
  3190. void AmiMoveActive(void)
  3191. {
  3192.  moveActive = TRUE;
  3193.  moveNode = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  3194.  moveRow = selRow;
  3195.  if (!OS39)
  3196.     SetPointer(amiWindow,movePointer37,7,14,0,-3);
  3197.  else 
  3198.     SetWindowPointer(amiWindow,
  3199.         WA_Pointer,moveObj,        
  3200.         TAG_DONE);
  3201. }
  3202.  
  3203.  
  3204. /********************************************************
  3205. * AmiMoveRestore()
  3206. *
  3207. *    restores mouse ptr and move state
  3208. *********************************************************/
  3209. void AmiMoveRestore(void)
  3210. {
  3211.  
  3212.  moveActive = FALSE;
  3213.  moveNode = NULL;
  3214.  if (!OS39)
  3215.     ClearPointer(amiWindow);
  3216.  else {
  3217.     /*printf("os39 specific\n");*/
  3218.     SetWindowPointer(amiWindow,
  3219.         WA_Pointer,NULL,        
  3220.         TAG_DONE);
  3221.  }
  3222. }
  3223.  
  3224. /********************************************************
  3225. * AmiUnlock()
  3226. *
  3227. *    Unlocks amicheck, supplies normal pointer
  3228. *********************************************************/
  3229. void AmiUnlock()
  3230. {
  3231.  
  3232.  GF_UnlockGUI(gui);
  3233.  if (selWin != NULL)
  3234.     GF_UnlockGUI(seltempGUI);
  3235.  
  3236.  if (!OS39)
  3237.     ClearPointer(amiWindow);
  3238.  else {
  3239.     /*printf("os39 specific\n");*/
  3240.     SetWindowPointer(amiWindow,
  3241.         WA_Pointer,NULL,
  3242.         WA_BusyPointer,FALSE,
  3243.         TAG_DONE);
  3244.  }
  3245. }
  3246.  
  3247. /********************************************************
  3248. * AmiLock()
  3249. *
  3250. *    locks amicheck, supplies wait pointer
  3251. *********************************************************/
  3252. void AmiLock()
  3253. {
  3254.  
  3255.  GF_LockGUI(gui);
  3256.  
  3257.  if (selWin != NULL)
  3258.     GF_LockGUI(seltempGUI);
  3259.  
  3260.  if (!OS39)
  3261.     SetPointer(amiWindow,busyPointer37,16,16,-5,0);
  3262.  else {
  3263.     /*printf("os39 specific\n");*/
  3264.     SetWindowPointer(amiWindow,
  3265.         WA_Pointer,NULL,
  3266.         WA_BusyPointer,TRUE,
  3267.         WA_PointerDelay,FALSE,
  3268.         TAG_DONE);
  3269.  }
  3270. }
  3271.  
  3272. /**********************************************************************
  3273. * AmiCheckRenumber()
  3274. *
  3275. * renumber a check quickly -+ 1-9
  3276. ***********************************************************************/
  3277. void AmiCheckRenumber(char op, long amnt)
  3278. {
  3279.  filterNode *filt;
  3280.  
  3281.  if (selRow == -1)
  3282.     return;
  3283.  
  3284.  filt = (filterNode *)DataOrd2Node((struct List *)&filtered,selRow);
  3285.  if (filt->entry->type != CHECKTYPE)
  3286.     return;
  3287.  
  3288.  switch (op) {
  3289.     case 0:    
  3290.         if (filt->entry->check >= amnt) {
  3291.             filt->entry->check -= amnt;
  3292.             RegRedrawSel(filt);        
  3293.             amiChangedItems = TRUE;
  3294.             amntState.currCheckNumber = filt->entry->check+1;
  3295.         }
  3296.         break;
  3297.     case 1:    ;
  3298.         if (filt->entry->check + amnt < filt->entry->check)
  3299.             break;
  3300.         filt->entry->check += amnt;
  3301.         RegRedrawSel(filt);
  3302.         amiChangedItems = TRUE;
  3303.         amntState.currCheckNumber = filt->entry->check+1; 
  3304.         break;
  3305.  }
  3306. }
  3307.  
  3308. /**********************************************************************************
  3309. * AmiSetupMemo()
  3310. *
  3311. *     Inits the show memo check in the menu to the tooltype
  3312. ***********************************************************************************/
  3313. void AmiSetupMemo(void)
  3314. {
  3315.  struct MenuItem *menu;
  3316.  
  3317.  menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSWINDOW,PREFSWINDOWMEMO));
  3318.  menu->Flags &= ~CHECKED;
  3319.  if (showMemo) menu->Flags |= CHECKED;
  3320.  ResetMenuStrip(amiWindow,menuStrip);
  3321. }
  3322.  
  3323.  
  3324. /**********************************************************************************
  3325. * AmiSetupDclick()
  3326. *
  3327. *     Inits the check in the dclick to the tooltype
  3328. ***********************************************************************************/
  3329. void AmiSetupDclick(void)
  3330. {
  3331.  struct MenuItem *menu;
  3332.  
  3333.  switch (dclicktype) {
  3334.     case 1:
  3335.          menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSDCLICK,PREFSDCLICKC));
  3336.          menu->Flags |= CHECKED;
  3337.          ResetMenuStrip(amiWindow,menuStrip);
  3338.         break;
  3339.  
  3340.     case 2:
  3341.          menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSDCLICK,PREFSDCLICKU));
  3342.          menu->Flags |= CHECKED;
  3343.          ResetMenuStrip(amiWindow,menuStrip);
  3344.         break;
  3345.  
  3346.     default:
  3347.          menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSDCLICK,PREFSDCLICKE));
  3348.          menu->Flags |= CHECKED;
  3349.          ResetMenuStrip(amiWindow,menuStrip);
  3350.         break;
  3351.  }
  3352. }
  3353.  
  3354. /**********************************************************************************
  3355. * AmiSetupDate()
  3356. *
  3357. *     Inits the check in the date to the tooltype
  3358. ***********************************************************************************/
  3359. void AmiSetupDate(void)
  3360. {
  3361.  struct MenuItem *menu;
  3362.  
  3363.  switch (dateFormat) {
  3364.     case DATE_DEC_12:
  3365.          menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSDATE,PREFSDATE2));
  3366.          menu->Flags |= CHECKED;
  3367.          ResetMenuStrip(amiWindow,menuStrip);
  3368.         break;
  3369.  
  3370.     case DATE_12_DEC:
  3371.          menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSDATE,PREFSDATE3));
  3372.          menu->Flags |= CHECKED;
  3373.          ResetMenuStrip(amiWindow,menuStrip);
  3374.         break;
  3375.  
  3376.     default:
  3377.          menu = ItemAddress(menuStrip,FULLMENUNUM(PREFSTITLE,PREFSDATE,PREFSDATE1));
  3378.          menu->Flags |= CHECKED;
  3379.          ResetMenuStrip(amiWindow,menuStrip);
  3380.         break;
  3381.  }
  3382. }
  3383.  
  3384. /**************************************************************************************
  3385. * AmiArexxMenu()
  3386. *
  3387. *    Sets up macro labels in menu
  3388. ***************************************************************************************/
  3389. void AmiArexxMenu(void)
  3390. {
  3391.  int x;
  3392.  struct MenuItem *menu;
  3393.  
  3394.  for (x=0;x<MAXMACROS;x++) {
  3395.      menu = ItemAddress(menuStrip, FULLMENUNUM(AREXXTITLE,AREXXM1+x,NOSUB));
  3396.     ResetMenuStrip(amiWindow,menuStrip);
  3397.  }
  3398.  
  3399. /*sprintf(arexxMacros[2].macroname,"now at %d\n",entryCount);*/
  3400. }
  3401.  
  3402. /**************************************************************************
  3403. * AmiSave()
  3404. *
  3405. *    Save the application
  3406. ****************************************************************************/
  3407. BOOL AmiSave(char *fname, BOOL saveas)
  3408. {
  3409. BOOL ret = TRUE;
  3410.  
  3411. AmiLock();
  3412.  
  3413. /* is this a new file? */
  3414. if (saveas) {
  3415.     if (fname != NULL) {
  3416.         strcpy(currFile, fname);
  3417.         stcgfn(currNode, currFile);
  3418.     }
  3419.     else {
  3420.         if (AmiGetFile(gui,saveASL,currFile,FILESIZE) == 0) {
  3421.             ret = FALSE;
  3422.             goto FINISHED;
  3423.         }
  3424.  
  3425.         strcpy(currNode, saveASL->fr_File);
  3426.     }
  3427. }
  3428.  
  3429.  
  3430. if (DataSaveFile(currFile, saveas) == FALSE) {
  3431.         AmiAnnounce("Encountered trouble trying to save file.");
  3432. }
  3433. else {
  3434.     if (saveas) {
  3435.         DataAttachIcon(iconPath,"AC_Account",currFile);
  3436.         sprintf(amiWindowTitle,"%s: %s",AC_WindowTitle,    currNode);
  3437.         SetWindowTitles(amiWindow,amiWindowTitle,(UBYTE *)-1);
  3438.         OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVE,NOSUB));
  3439.         OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEEXIT,NOSUB));
  3440.     }
  3441.  
  3442.     amiChangedItems = FALSE;
  3443. }    
  3444.  
  3445. FINISHED:
  3446.  
  3447. AmiUnlock();
  3448. return ret;
  3449. }
  3450.  
  3451. /***************************************************************
  3452. * AmiOpen()
  3453. *
  3454. *    Open an application
  3455. ****************************************************************/
  3456. void AmiOpen(char *appfile, BOOL force)
  3457. {
  3458. char fname[FILESIZE];
  3459.  
  3460. if (force || AmiAsk(newstr)) {
  3461.  
  3462.     /* open, and change window title */
  3463.     AmiLock();
  3464.     if (appfile != NULL || AmiGetFile(gui,loadASL,fname,FILESIZE)) {
  3465.         AmiDisableSel(TRUE);
  3466.         OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVE,NOSUB));
  3467.         OnMenu(amiWindow,FULLMENUNUM(FILETITLE,FILESAVEEXIT,NOSUB));
  3468.  
  3469.         AmiLock();
  3470.  
  3471.         /* file was selected, open it */
  3472.         if (appfile != NULL)
  3473.             strcpy(fname,appfile);
  3474.  
  3475.         seldone = TRUE;
  3476.         SelTempStrip();
  3477.                         
  3478.         amiChangedItems = FALSE;
  3479.         DataFreeAll();    
  3480.         DataInit();
  3481.                         
  3482.         RegNewFilter();        
  3483.         AmiResetBals();
  3484.  
  3485.         /* insert data */
  3486.         if (DataLoadFile(fname) != TRUE) {
  3487.             AmiAnnounce("Encountered trouble opening file\n");
  3488.         }
  3489.         else {
  3490.             /* partition out file name */
  3491.             if (appfile != NULL) {
  3492.                 stcgfn(currNode,appfile);
  3493.                 strcpy(currFile,appfile);
  3494.             }
  3495.             else    {
  3496.                 strcpy(currNode,loadASL->fr_File);
  3497.                 strcpy(currFile,fname);
  3498.             }
  3499.  
  3500.             sprintf(amiWindowTitle,"%s: %s",AC_WindowTitle,
  3501.                 currNode);
  3502.             SetWindowTitles(amiWindow,amiWindowTitle,(UBYTE *)-1);
  3503.  
  3504.             if (autosort == TRUE && !IsListEmpty(&sortfields))
  3505.                 DataSortFilter((filterNode *)filtered.mlh_Head,
  3506.                            (filterNode *)filtered.mlh_TailPred,
  3507.                            (sortNode *)sortfields.lh_Head);
  3508.  
  3509.             AmiArexxMenu();
  3510.  
  3511.             RegNewFilter();
  3512.             DataFilterBalance(&filtered);
  3513.             AmiNewTemp();
  3514.                             
  3515.             DataBuildBal(usrAccount.decimal,&amntState.currAmnt,currStr);
  3516.             DataBuildBal(usrAccount.decimal,&amntState.stateAmnt,stateStr);
  3517.             DataBuildBal(usrAccount.decimal,&filtAmnt,filtStr);
  3518.             AmiUpdateCurr(currStr);
  3519.             AmiUpdateState(stateStr);
  3520.             AmiUpdateFilt(filtStr);
  3521.                             
  3522.             /* enable items */
  3523.             AmiDisableAll(FALSE);
  3524.         }
  3525.         AmiUnlock();
  3526.     }
  3527.     AmiUnlock();
  3528. }
  3529.                 
  3530. }
  3531.  
  3532.  
  3533. /***************************************************
  3534. * AmiBaseHelp()
  3535. *
  3536. *    Initialize the amigaguide context
  3537. ***************************************************/
  3538. LONG AmiBaseHelp(void)
  3539. {
  3540.  LONG retval = 0L;
  3541.  
  3542.   /* Fill in the NewAmigaGuide structure */
  3543.   memset(&newAG,0,sizeof(struct NewAmigaGuide));
  3544.   newAG.nag_Name = guidePath; /*guidePath;*/
  3545.   newAG.nag_Screen = amiWindow->WScreen;
  3546.   newAG.nag_BaseName = "amiCheck";
  3547.  
  3548.   /* Open the AmigaGuide client */
  3549.   if ( !(agc = OpenAmigaGuideAsync(&newAG, 
  3550.             TAG_DONE))) {
  3551.  
  3552.     /* Get the reason for failure */
  3553.       retval = IoErr();
  3554.   }
  3555.  
  3556.   return (retval);
  3557. }
  3558.  
  3559.  
  3560. /***************************************************
  3561. * AmiBaseLink()
  3562. *
  3563. *    Jump to a particular context
  3564. ****************************************************/
  3565. void AmiBaseLink(char *link)
  3566. {
  3567.  
  3568.  if (!amigaguide || agc == NULL)
  3569.     return;
  3570.  
  3571.  SendAmigaGuideCmd(agc,
  3572.     link,
  3573.     NULL);
  3574. }
  3575.  
  3576. /****************************************************
  3577. * AmiHelpMsg()
  3578. *
  3579. *    Handle AmigaGuide messages
  3580. *****************************************************/
  3581. void AmiHelpMsg(void)
  3582. {
  3583.  struct AmigaGuideMsg *agm;
  3584.  
  3585.  while ( agm = GetAmigaGuideMsg(agc)) {
  3586.  
  3587. #if 0
  3588.     switch (agm->agm_Type) {
  3589.  
  3590.         case ToolCmdReplyID:
  3591.             if (agm->agm_Pri_Ret) {
  3592.                 printf("ERROR!\n");
  3593.                 printf("reason=%d,str=%s\n",agm->agm_Sec_Ret,agm->agm_Data);
  3594.             }
  3595.             break;
  3596.  
  3597.         case ToolStatusID:
  3598.             if (agm->agm_Pri_Ret) {
  3599.                 printf("Status: ERROR!\n");
  3600.                 printf("reason=%d,str=%s\n",agm->agm_Sec_Ret,agm->agm_Data);
  3601.             }
  3602.             break;
  3603.     }
  3604. #endif
  3605.     ReplyAmigaGuideMsg(agm);
  3606.  }
  3607.  
  3608. }
  3609.  
  3610. /**************************************************
  3611. * AmiHelpKey()
  3612. *
  3613. *    Open help link based on key
  3614. ***************************************************/
  3615. void AmiHelpKey(struct IntuiMessage *imsg, ULONG panel)
  3616. {
  3617.  
  3618.  if (imsg->Code == HELP_KEY && amigaguide){
  3619.     AmiBaseLink(guideLinks[panel]);
  3620.  }
  3621. }
  3622.  
  3623. /***********************************************************************
  3624. * AmiRunMacro()
  3625. *
  3626. *    Run a macro given a file name
  3627. ************************************************************************/
  3628. void AmiRunMacro(char *fname)
  3629. {
  3630. char copybuf[1024];
  3631. ULONG bytes=0;
  3632. FILE *new = NULL, *orig= NULL;
  3633.  
  3634.  
  3635. orig = fopen(fname,"r");
  3636. if (orig == NULL) {
  3637.     AmiAnnounce("Cannot read macro file.");
  3638.     return;
  3639. }
  3640.  
  3641. /* create temporary file in T: */
  3642. if ( (new= fopen(arexxTemp,"wc")) == NULL) {
  3643.     AmiAnnounce("Trouble preparing to run macro.");
  3644.     return;
  3645. }
  3646.  
  3647. /* copy stub "address amicheck" to it */
  3648. fprintf(new,"/* comment */\nADDRESS %s\n",axContext->portname);
  3649.  
  3650. /* insert rest of macro */
  3651. while ( (bytes = fread(copybuf,1,1024,orig)))
  3652.     fwrite(copybuf,1,bytes,new);
  3653.  
  3654. fclose(orig);
  3655. fclose(new);
  3656.  
  3657. /* execute macro */
  3658.  
  3659. /* execute macro */
  3660. /*
  3661. sprintf(copybuf,"run sys:rexxc/rx %s\n",arexxTemp);
  3662. system(copybuf);
  3663. */
  3664.  
  3665. sprintf(copybuf,"sys:rexxc/rx %s\n",arexxTemp);
  3666. SystemTags(copybuf,
  3667.     SYS_Asynch, TRUE,
  3668.     TAG_DONE);
  3669. #if 0
  3670. RunARexxMacro(
  3671.     axContext,
  3672.     ER_MacroFile, fname,
  3673.     TAG_DONE);
  3674. #endif
  3675. }
  3676.  
  3677. /*************************************************************************
  3678. * AmiGetFile()
  3679. *
  3680. *    Get a file from an ASL requester
  3681. **************************************************************************/
  3682. BOOL AmiGetFile(GUIFront *wgui, struct FileRequester *asl, char *filestore, int storesize) 
  3683. {
  3684.  BOOL retval = FALSE;
  3685.  
  3686.  if (asl == NULL || filestore == NULL)
  3687.     return FALSE;
  3688.  
  3689.  /* lock panel */
  3690.  AmiLock();
  3691.  GF_LockGUI(wgui);
  3692.  
  3693.  
  3694.  if (GF_AslRequest(asl,aslTagList)) {
  3695.  
  3696.     if (!DataGetFileName(filestore,storesize,asl->fr_Drawer,asl->fr_File))
  3697.         strncpy(filestore,asl->fr_File,storesize);
  3698.  
  3699.     retval = TRUE;
  3700.  }
  3701.  
  3702.  /* unlock panel */
  3703.  GF_UnlockGUI(wgui);
  3704.  AmiUnlock();
  3705.  
  3706.  return (retval);
  3707. }
  3708.  
  3709. /******************************************************
  3710. * AmiCountVerify()
  3711. *
  3712. *    Verify for the entry count
  3713. *******************************************************/
  3714. BOOL AmiCountVerify(void) 
  3715. {
  3716.  BOOL anno = !(dummykey.id == dummykey.verify);
  3717.  
  3718.  if (anno)
  3719.     AmiAnnounce(*demoptr);
  3720.  
  3721.  return anno;
  3722. }
  3723.  
  3724. /*******************************************************
  3725. * AmiResetBals()
  3726. *
  3727. *    Reset the balances to zero 
  3728. ********************************************************/
  3729. void AmiResetBals(void) 
  3730. {
  3731.  amountType zero = 0;
  3732.  char amnt[AMNTSIZE];
  3733.  
  3734.  DataInitBal(DEPOSITTYPE,&zero,&amntState.currAmnt);
  3735.  DataInitBal(DEPOSITTYPE,&zero,&amntState.stateAmnt);
  3736.  DataInitBal(DEPOSITTYPE,&zero,&filtAmnt);
  3737.  
  3738.  DataBuildBal(usrAccount.decimal,&amntState.currAmnt,amnt);
  3739.  AmiUpdateCurr(amnt);
  3740.  
  3741.  DataBuildBal(usrAccount.decimal,&amntState.stateAmnt,amnt);
  3742.  AmiUpdateState(amnt);
  3743.  
  3744.  DataBuildBal(usrAccount.decimal,&filtAmnt,amnt);
  3745.  AmiUpdateFilt(amnt);
  3746. }
  3747.