home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 19 Printer / 19-Printer.zip / LAPRINT.ZIP / LAPRINT0.C < prev    next >
C/C++ Source or Header  |  1991-01-23  |  148KB  |  3,004 lines
  1.  
  2. /************************************************************************
  3. *                                                                       *
  4. *  (c) Cray Research, Inc., 1991.  All rights reserved.                 *
  5. *                                                                       *
  6. *     This program and/or module and all modifications made by Cray     *
  7. *  Research, Inc., are the sole property of Cray Research, Inc., and    *
  8. *  shall not be made available to or used by any person or persons      *
  9. *  without the prior written permission of Cray Research, Inc.          *
  10. *                                                                       *
  11. *     Programs and/or modules which are deemed in the public domain or  *
  12. *  whose copyright is held by another legal entity other than Cray      *
  13. *  Research, Inc., shall be deemed excluded from the above named        *
  14. *  restrictions and protections.                                        *
  15. *                                                                       *
  16. *     All changes made by Cray Research Inc which represent original    *
  17. *  work, modifications, descriptions or ideas to the above excluded     *
  18. *  programs and/or modules shall not be made available to or used by    *
  19. *  any person or persons without the prior written permission of        *
  20. *  Cray Research, Inc.                                                  *
  21. *                                                                       *
  22. ************************************************************************/
  23.        
  24. #define  EXTERN extern
  25. #include "LAPRINT.h"
  26.  
  27.  
  28. /***************************************************************************/
  29. /*                                                                         */
  30. /* Dialog Window Procedure                                                 */
  31. /*                                                                         */
  32. /* This procedure is associated with the dialog box that is included in    */
  33. /* the function name of the procedure. It provides the service routines    */
  34. /* for the events (messages) that occur because the end user operates      */
  35. /* one of the dialog box's buttons, entry fields, or controls.             */
  36. /*                                                                         */
  37. /* The SWITCH statement in the function distributes the dialog box         */
  38. /* messages to the respective service routines, which are set apart by     */
  39. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  40. /* procedures must provide an appropriate service routine for their end    */
  41. /* user initiated messages as well as for the general PM messages (like    */
  42. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  43. /* which there is no programmed CASE condition (no service routine),       */
  44. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  45. /* disposed of by PM.                                                      */
  46. /*                                                                         */
  47. /***************************************************************************/
  48.  
  49. MRESULT EXPENTRY CFGOPENMsgProc(hWndDlg, message, mp1, mp2)
  50. HWND hWndDlg;
  51. USHORT message;
  52. MPARAM mp1;
  53. MPARAM mp2;
  54. { 
  55.  
  56.  static CHAR szCRI_Copyright[]="(c) Cray Research, Inc., 1991.";
  57.  
  58.  static SHORT sfValidate = TRUE;
  59.  INT    i;
  60.  static CHAR  szWorkBuf[90];
  61.  static HWND  hWndParent;
  62.  CFGOPENStruct FAR *Cfgopen;
  63.           
  64.  switch(message)
  65.    {
  66.     case WM_INITDLG:
  67.          Cfgopen = (CFGOPENStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_CFGOPEN);
  68.          hWndParent = (HWND)mp2;
  69.          cwCenter(hWndDlg, (HWND)hWndParent);
  70.          /* Initialize entry field control: szConfig_Directory             */
  71.          WinSendDlgItemMsg(hWndDlg, DID_CURRENT_DIR, EM_SETTEXTLIMIT, MPFROMSHORT(100), 0L);
  72.          if(Cfgopen->szConfig_Directory[0])
  73.             WinSetDlgItemText(hWndDlg, DID_CURRENT_DIR, Cfgopen->szConfig_Directory);
  74.          /* Initialize entry field control: szConfig_Filename              */
  75.          WinSendDlgItemMsg(hWndDlg, DID_CONFIG_FN, EM_SETTEXTLIMIT, MPFROMSHORT(100), 0L);
  76.          if(Cfgopen->szConfig_Filename[0])
  77.             WinSetDlgItemText(hWndDlg, DID_CONFIG_FN, Cfgopen->szConfig_Filename);
  78.          /* Initialize list box control:                                   */
  79.          cwFillDirListBox(hWndDlg, DID_DIRECTORY, DID_CURRENT_DIR);
  80.          /* Initialize list box control:                                   */
  81.          cwFillFileListBox(hWndDlg, "*.ini", DID_FILES);
  82.  
  83.          WinEnableWindow((WinWindowFromID(hWndDlg,
  84.                                           DID_CURRENT_DIR)),
  85.                          FALSE);
  86.  
  87.          WinEnableWindow((WinWindowFromID(hWndDlg,
  88.                                           DID_CONFIG_FN)),
  89.                          FALSE);
  90.  
  91.          break; /* End of WM_INITDLG */
  92.    
  93.     case WM_CONTROL:
  94.          switch(SHORT1FROMMP(mp1))
  95.            {
  96.             case DID_CURRENT_DIR: /* Entry field variable: "szConfig_Directory" */
  97.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  98.                    { 
  99.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  100.                          break;
  101.  
  102.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  103.                          break;
  104.  
  105.                     default: /* Default other messages                     */
  106.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  107.                          break;
  108.                    }
  109.                  break;
  110.  
  111.             case DID_CONFIG_FN: /* Entry field variable: "szConfig_Filename" */
  112.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  113.                    { 
  114.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  115.                          break;
  116.  
  117.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  118.                          break;
  119.  
  120.                     default: /* Default other messages                     */
  121.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  122.                          break;
  123.                    }
  124.                  break;
  125.  
  126.             case DID_DIRECTORY: /* List box                                */
  127.                  {
  128.                   USHORT sSelect;       /* index to selected listbox item  */
  129.                   USHORT CurDisk;       /* number of the current disk      */
  130.                   ULONG  DriveMap;      /* logical drive map               */
  131.                   CHAR   szBuffer[100];
  132.  
  133.                   /* If the user has not pressed enter or double clicked   */
  134.                   /* the mouse on an item, then break out of this case     */
  135.                   if(SHORT2FROMMP(mp1) != LN_ENTER)
  136.                      break;
  137.  
  138.                    /* Determine the index to the selected item             */
  139.                    sSelect = (USHORT)WinSendDlgItemMsg(hWndDlg,
  140.                                                        SHORT1FROMMP(mp1),
  141.                                                        LM_QUERYSELECTION,
  142.                                                        0L, 0L);
  143.  
  144.                    /* Query the text of the selected item                  */
  145.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1),
  146.                                      LM_QUERYITEMTEXT,
  147.                                      MPFROM2SHORT(sSelect, sizeof(szBuffer)),
  148.                                      MPFROMP(szBuffer));
  149.  
  150.                    /* Is the selected item a drive or directory            */
  151.                    if(szBuffer[0] == '[' && 
  152.                       szBuffer[2] == ':' && 
  153.                       szBuffer[3] == ']')
  154.                      {
  155.                       /* Save current drive in case of error               */
  156.                       DosQCurDisk(&CurDisk, &DriveMap);
  157.                       /* Log to new drive, on error restore to previous    */
  158.                       if(DosSelectDisk(szBuffer[1] - '@') != 0)
  159.                          DosSelectDisk(CurDisk);
  160.                       /* Fill the listbox with new directory information   */
  161.                       /* if an error occurs, restore to previous drive     */
  162.                       if(cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_CURRENT_DIR) == -1)
  163.                         {
  164.                          WinLoadString(hAB, 0, IDS_DISK_ERR,
  165.                                        sizeof(szBuffer), szBuffer);
  166.                          WinMessageBox(HWND_DESKTOP, hWndDlg,
  167.                                        szBuffer, szAppName,
  168.                                        0, MB_OK | MB_INFORMATION);
  169.                          DosSelectDisk(CurDisk);
  170.                          cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_CURRENT_DIR);
  171.                         }
  172.                       cwFillFileListBox(hWndDlg, "*.ini", DID_FILES);
  173.                      }
  174.                    else /* A directory was selected                        */
  175.                      {
  176.                       /* Change to new directory                           */
  177.                       DosChDir(szBuffer, 0L);
  178.                       /*  Fill the listbox with new directory information  */
  179.                       cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_CURRENT_DIR);
  180.                       cwFillFileListBox(hWndDlg, "*.ini", DID_FILES);
  181.                      }
  182.                  }
  183.                  break;
  184.  
  185.             case DID_FILES: /* List box                                    */
  186.                  {
  187.                    USHORT sSelectIndex;
  188.                    CHAR   szSelectText[80];   
  189.  
  190.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  191.                        break;
  192.  
  193.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  194.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  195.  
  196.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  197.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  198.                                    MPFROMP(szSelectText));
  199.                    WinSetDlgItemText(hWndDlg, DID_CONFIG_FN, szSelectText);
  200.                  }
  201.                  break;
  202.  
  203.            }
  204.          break; /* End of WM_CONTROL */
  205.    
  206.     case WM_COMMAND:
  207.          switch(SHORT1FROMMP(mp1))
  208.            {
  209.             case DID_OK: /* Button text: "Open"                            */
  210.                   Cfgopen = (CFGOPENStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_CFGOPEN);
  211.                  /* Query the string value in the entry field control and  */
  212.                  /* move the string value to the dialog structure variable */
  213.                  WinQueryDlgItemText(hWndDlg, DID_CURRENT_DIR,
  214.                                      sizeof(Cfgopen->szConfig_Directory),
  215.                                      Cfgopen->szConfig_Directory);
  216.                  if(Cfgopen->szConfig_Directory[0] == 0)
  217.                    {
  218.                     /* If required field is not completed inform user and  */
  219.                     /* query what he wants to do about it by presenting a  */
  220.                     /* message box with the push buttons "Retry" and       */
  221.                     /* "Cancel"                                            */
  222.                     strcpy(szWorkBuf, "Directory field not completed");
  223.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  224.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  225.                     
  226.                     /* If the user presses "Cancel", post a message to the */
  227.                     /* DID_CANCEL case and break out of this case          */
  228.                     if(i == MBID_CANCEL)
  229.                       {
  230.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  231.                        break;
  232.                       }
  233.  
  234.                     /* If the user presses "Retry", set focus to the       */
  235.                     /* control that needs to be completed and break out    */
  236.                     /* of this case                                        */
  237.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_CURRENT_DIR));
  238.                     break;
  239.                    }
  240.                  /* Query the string value in the entry field control and  */
  241.                  /* move the string value to the dialog structure variable */
  242.                  WinQueryDlgItemText(hWndDlg, DID_CONFIG_FN,
  243.                                      sizeof(Cfgopen->szConfig_Filename),
  244.                                      Cfgopen->szConfig_Filename);
  245.                  if(Cfgopen->szConfig_Filename[0] == 0)
  246.                    {
  247.                     /* If required field is not completed inform user and  */
  248.                     /* query what he wants to do about it by presenting a  */
  249.                     /* message box with the push buttons "Retry" and       */
  250.                     /* "Cancel"                                            */
  251.                     strcpy(szWorkBuf, "Configuration filename field not completed");
  252.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  253.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  254.                     
  255.                     /* If the user presses "Cancel", post a message to the */
  256.                     /* DID_CANCEL case and break out of this case          */
  257.                     if(i == MBID_CANCEL)
  258.                       {
  259.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  260.                        break;
  261.                       }
  262.  
  263.                     /* If the user presses "Retry", set focus to the       */
  264.                     /* control that needs to be completed and break out    */
  265.                     /* of this case                                        */
  266.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_CONFIG_FN));
  267.                     break;
  268.                    }
  269.  
  270.                  if(BgmReadConfigFile(hWndDlg) == TRUE)
  271.                  {
  272.                  WinDismissDlg(hWndDlg, TRUE);
  273.                  }
  274.                  break;
  275.  
  276.             case DID_CANCEL: /* Button text: "Cancel"                      */
  277.                  /* Ignore data values entered into the dialog controls    */
  278.                  /* and dismiss the dialog window                          */
  279.                  WinDismissDlg(hWndDlg, FALSE);
  280.                  break;
  281.  
  282.             case DID_HELP: /* Button text: "Help"                          */
  283.                  break;
  284.  
  285.            }
  286.          break; /* End of WM_COMMAND */
  287.                                
  288.     case WM_CLOSE:
  289.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  290.          break; /* End of WM_CLOSE */
  291.            
  292.     case WM_FAILEDVALIDATE:
  293.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  294.          sfValidate = FALSE;
  295.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  296.          sfValidate = TRUE;
  297.          return((MRESULT)TRUE);
  298.          break; /* End of WM_FAILEDVALIDATE */
  299.  
  300.     default:
  301.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  302.          break;
  303.    }
  304.  return FALSE;
  305. } /* End of CFGOPENMsgProc */
  306.  
  307.  
  308. /***************************************************************************/
  309. /*                                                                         */
  310. /* Dialog Window Procedure                                                 */
  311. /*                                                                         */
  312. /* This procedure is associated with the dialog box that is included in    */
  313. /* the function name of the procedure. It provides the service routines    */
  314. /* for the events (messages) that occur because the end user operates      */
  315. /* one of the dialog box's buttons, entry fields, or controls.             */
  316. /*                                                                         */
  317. /* The SWITCH statement in the function distributes the dialog box         */
  318. /* messages to the respective service routines, which are set apart by     */
  319. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  320. /* procedures must provide an appropriate service routine for their end    */
  321. /* user initiated messages as well as for the general PM messages (like    */
  322. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  323. /* which there is no programmed CASE condition (no service routine),       */
  324. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  325. /* disposed of by PM.                                                      */
  326. /*                                                                         */
  327. /***************************************************************************/
  328.  
  329. MRESULT EXPENTRY CFGSAVEMsgProc(hWndDlg, message, mp1, mp2)
  330. HWND hWndDlg;
  331. USHORT message;
  332. MPARAM mp1;
  333. MPARAM mp2;
  334. { 
  335.  static SHORT sfValidate = TRUE;
  336.  INT    i;
  337.  static CHAR  szWorkBuf[90];
  338.  static HWND  hWndParent;
  339.  CFGSAVEStruct FAR *Cfgsave;
  340.           
  341.  switch(message)
  342.    {
  343.     case WM_INITDLG:
  344.          Cfgsave = (CFGSAVEStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_CFGSAVE);
  345.          hWndParent = (HWND)mp2;
  346.          cwCenter(hWndDlg, (HWND)hWndParent);
  347.          /* Initialize entry field control: szConfig_Directory             */
  348.          WinSendDlgItemMsg(hWndDlg, DID_CURRENT_DIR, EM_SETTEXTLIMIT, MPFROMSHORT(100), 0L);
  349.          if(Cfgsave->szConfig_Directory[0])
  350.             WinSetDlgItemText(hWndDlg, DID_CURRENT_DIR, Cfgsave->szConfig_Directory);
  351.          /* Initialize entry field control: szConfig_Filename              */
  352.          WinSendDlgItemMsg(hWndDlg, DID_CONFIG_FN, EM_SETTEXTLIMIT, MPFROMSHORT(100), 0L);
  353.          if(Cfgsave->szConfig_Filename[0])
  354.             WinSetDlgItemText(hWndDlg, DID_CONFIG_FN, Cfgsave->szConfig_Filename);
  355.          /* Initialize list box control:                                   */
  356.          cwFillDirListBox(hWndDlg, DID_DIRECTORY, DID_CURRENT_DIR);
  357.          /* Initialize list box control:                                   */
  358.          cwFillFileListBox(hWndDlg, "*.ini", DID_FILES);
  359.  
  360.          WinEnableWindow((WinWindowFromID(hWndDlg,
  361.                                           DID_CURRENT_DIR)),
  362.                          FALSE);
  363.  
  364.          break; /* End of WM_INITDLG */
  365.    
  366.     case WM_CONTROL:
  367.          switch(SHORT1FROMMP(mp1))
  368.            {
  369.             case DID_CURRENT_DIR: /* Entry field variable: "szConfig_Directory" */
  370.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  371.                    { 
  372.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  373.                          break;
  374.  
  375.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  376.                          break;
  377.  
  378.                     default: /* Default other messages                     */
  379.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  380.                          break;
  381.                    }
  382.                  break;
  383.  
  384.             case DID_CONFIG_FN: /* Entry field variable: "szConfig_Filename" */
  385.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  386.                    { 
  387.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  388.                          break;
  389.  
  390.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  391.                          break;
  392.  
  393.                     default: /* Default other messages                     */
  394.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  395.                          break;
  396.                    }
  397.                  break;
  398.  
  399.             case DID_DIRECTORY: /* List box                                */
  400.                  {
  401.                   USHORT sSelect;       /* index to selected listbox item  */
  402.                   USHORT CurDisk;       /* number of the current disk      */
  403.                   ULONG  DriveMap;      /* logical drive map               */
  404.                   CHAR   szBuffer[100];
  405.  
  406.                   /* If the user has not pressed enter or double clicked   */
  407.                   /* the mouse on an item, then break out of this case     */
  408.                   if(SHORT2FROMMP(mp1) != LN_ENTER)
  409.                      break;
  410.  
  411.                    /* Determine the index to the selected item             */
  412.                    sSelect = (USHORT)WinSendDlgItemMsg(hWndDlg,
  413.                                                        SHORT1FROMMP(mp1),
  414.                                                        LM_QUERYSELECTION,
  415.                                                        0L, 0L);
  416.  
  417.                    /* Query the text of the selected item                  */
  418.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1),
  419.                                      LM_QUERYITEMTEXT,
  420.                                      MPFROM2SHORT(sSelect, sizeof(szBuffer)),
  421.                                      MPFROMP(szBuffer));
  422.  
  423.                    /* Is the selected item a drive or directory            */
  424.                    if(szBuffer[0] == '[' && 
  425.                       szBuffer[2] == ':' && 
  426.                       szBuffer[3] == ']')
  427.                      {
  428.                       /* Save current drive in case of error               */
  429.                       DosQCurDisk(&CurDisk, &DriveMap);
  430.                       /* Log to new drive, on error restore to previous    */
  431.                       if(DosSelectDisk(szBuffer[1] - '@') != 0)
  432.                          DosSelectDisk(CurDisk);
  433.                       /* Fill the listbox with new directory information   */
  434.                       /* if an error occurs, restore to previous drive     */
  435.                       if(cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_CURRENT_DIR) == -1)
  436.                         {
  437.                          WinLoadString(hAB, 0, IDS_DISK_ERR,
  438.                                        sizeof(szBuffer), szBuffer);
  439.                          WinMessageBox(HWND_DESKTOP, hWndDlg,
  440.                                        szBuffer, szAppName,
  441.                                        0, MB_OK | MB_INFORMATION);
  442.                          DosSelectDisk(CurDisk);
  443.                          cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_CURRENT_DIR);
  444.                         }
  445.                       cwFillFileListBox(hWndDlg, "*.ini", DID_FILES);
  446.                      }
  447.                    else /* A directory was selected                        */
  448.                      {
  449.                       /* Change to new directory                           */
  450.                       DosChDir(szBuffer, 0L);
  451.                       /*  Fill the listbox with new directory information  */
  452.                       cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_CURRENT_DIR);
  453.                       cwFillFileListBox(hWndDlg, "*.ini", DID_FILES);
  454.                      }
  455.                  }
  456.                  break;
  457.  
  458.             case DID_FILES: /* List box                                    */
  459.                  {
  460.                    USHORT sSelectIndex;
  461.                    CHAR   szSelectText[80];   
  462.  
  463.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  464.                        break;
  465.  
  466.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  467.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  468.  
  469.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  470.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  471.                                    MPFROMP(szSelectText));
  472.                    WinSetDlgItemText(hWndDlg, DID_CONFIG_FN, szSelectText);
  473.                  }
  474.                  break;
  475.  
  476.            }
  477.          break; /* End of WM_CONTROL */
  478.    
  479.     case WM_COMMAND:
  480.          switch(SHORT1FROMMP(mp1))
  481.            {
  482.             case DID_OK: /* Button text: "Save"                            */
  483.                   Cfgsave = (CFGSAVEStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_CFGSAVE);
  484.                  /* Query the string value in the entry field control and  */
  485.                  /* move the string value to the dialog structure variable */
  486.                  WinQueryDlgItemText(hWndDlg, DID_CURRENT_DIR,
  487.                                      sizeof(Cfgsave->szConfig_Directory),
  488.                                      Cfgsave->szConfig_Directory);
  489.                  if(Cfgsave->szConfig_Directory[0] == 0)
  490.                    {
  491.                     /* If required field is not completed inform user and  */
  492.                     /* query what he wants to do about it by presenting a  */
  493.                     /* message box with the push buttons "Retry" and       */
  494.                     /* "Cancel"                                            */
  495.                     strcpy(szWorkBuf, "Directory field not completed");
  496.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  497.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  498.                     
  499.                     /* If the user presses "Cancel", post a message to the */
  500.                     /* DID_CANCEL case and break out of this case          */
  501.                     if(i == MBID_CANCEL)
  502.                       {
  503.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  504.                        break;
  505.                       }
  506.  
  507.                     /* If the user presses "Retry", set focus to the       */
  508.                     /* control that needs to be completed and break out    */
  509.                     /* of this case                                        */
  510.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_CURRENT_DIR));
  511.                     break;
  512.                    }
  513.                  /* Query the string value in the entry field control and  */
  514.                  /* move the string value to the dialog structure variable */
  515.                  WinQueryDlgItemText(hWndDlg, DID_CONFIG_FN,
  516.                                      sizeof(Cfgsave->szConfig_Filename),
  517.                                      Cfgsave->szConfig_Filename);
  518.                  if(Cfgsave->szConfig_Filename[0] == 0 ||
  519.                     isspace((int)Cfgsave->szConfig_Filename[0]) != 0)
  520.                    {
  521.                     /* If required field is not completed inform user and  */
  522.                     /* query what he wants to do about it by presenting a  */
  523.                     /* message box with the push buttons "Retry" and       */
  524.                     /* "Cancel"                                            */
  525.                     strcpy(szWorkBuf, "Configuration filename field not completed");
  526.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  527.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  528.                     
  529.                     /* If the user presses "Cancel", post a message to the */
  530.                     /* DID_CANCEL case and break out of this case          */
  531.                     if(i == MBID_CANCEL)
  532.                       {
  533.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  534.                        break;
  535.                       }
  536.  
  537.                     /* If the user presses "Retry", set focus to the       */
  538.                     /* control that needs to be completed and break out    */
  539.                     /* of this case                                        */
  540.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_CONFIG_FN));
  541.                     break;
  542.                    }
  543.  
  544.                  if(BgmWriteConfigFile(hWndDlg,
  545.                                        FALSE)
  546.                   == TRUE)
  547.                  {
  548.                  WinDismissDlg(hWndDlg, TRUE);
  549.                  }
  550.                  break;
  551.  
  552.             case DID_CANCEL: /* Button text: "Cancel"                      */
  553.                  /* Ignore data values entered into the dialog controls    */
  554.                  /* and dismiss the dialog window                          */
  555.                  WinDismissDlg(hWndDlg, FALSE);
  556.                  break;
  557.  
  558.             case DID_HELP: /* Button text: "Help"                          */
  559.                  break;
  560.  
  561.            }
  562.          break; /* End of WM_COMMAND */
  563.                                
  564.     case WM_CLOSE:
  565.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  566.          break; /* End of WM_CLOSE */
  567.            
  568.     case WM_FAILEDVALIDATE:
  569.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  570.          sfValidate = FALSE;
  571.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  572.          sfValidate = TRUE;
  573.          return((MRESULT)TRUE);
  574.          break; /* End of WM_FAILEDVALIDATE */
  575.  
  576.     default:
  577.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  578.          break;
  579.    }
  580.  return FALSE;
  581. } /* End of CFGSAVEMsgProc */
  582.  
  583.  
  584. /***************************************************************************/
  585. /*                                                                         */
  586. /* Dialog Window Procedure                                                 */
  587. /*                                                                         */
  588. /* This procedure is associated with the dialog box that is included in    */
  589. /* the function name of the procedure. It provides the service routines    */
  590. /* for the events (messages) that occur because the end user operates      */
  591. /* one of the dialog box's buttons, entry fields, or controls.             */
  592. /*                                                                         */
  593. /* The SWITCH statement in the function distributes the dialog box         */
  594. /* messages to the respective service routines, which are set apart by     */
  595. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  596. /* procedures must provide an appropriate service routine for their end    */
  597. /* user initiated messages as well as for the general PM messages (like    */
  598. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  599. /* which there is no programmed CASE condition (no service routine),       */
  600. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  601. /* disposed of by PM.                                                      */
  602. /*                                                                         */
  603. /***************************************************************************/
  604.  
  605. MRESULT EXPENTRY FSELECTMsgProc(hWndDlg, message, mp1, mp2)
  606. HWND hWndDlg;
  607. USHORT message;
  608. MPARAM mp1;
  609. MPARAM mp2;
  610. { 
  611.  static SHORT sfValidate = TRUE;
  612.  INT    i;
  613.  static CHAR  szWorkBuf[90];
  614.  static HWND  hWndParent;
  615.  FSELECTStruct FAR *Fselect;
  616.           
  617.  switch(message)
  618.    {
  619.     case WM_INITDLG:
  620.          Fselect = (FSELECTStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_FSELECT);
  621.          hWndParent = (HWND)mp2;
  622.          cwCenter(hWndDlg, (HWND)hWndParent);
  623.          /* Initialize entry field control: szSelected_Directory           */
  624.          WinSendDlgItemMsg(hWndDlg, DID_SELECTED_DIR, EM_SETTEXTLIMIT, MPFROMSHORT(100), 0L);
  625.          if(Fselect->szSelected_Directory[0])
  626.             WinSetDlgItemText(hWndDlg, DID_SELECTED_DIR, Fselect->szSelected_Directory);
  627.          /* Initialize entry field control: szSelected_Filename            */
  628.          WinSendDlgItemMsg(hWndDlg, DID_SELECTED_FN, EM_SETTEXTLIMIT, MPFROMSHORT(100), 0L);
  629.          /* Initialize list box control:                                   */
  630.          cwFillDirListBox(hWndDlg, DID_DIRECTORY, DID_SELECTED_DIR);
  631.          /* Initialize list box control:                                   */
  632.          cwFillFileListBox(hWndDlg, "*.*", DID_FILES);
  633.  
  634.          if(BgmPrintActive == TRUE)
  635.          {
  636.            WinEnableWindow((WinWindowFromID(hWndDlg,
  637.                                             DID_PRINT)),
  638.                            FALSE);
  639.          }
  640.  
  641.          WinEnableWindow((WinWindowFromID(hWndDlg,
  642.                                           DID_SELECTED_DIR)),
  643.                          FALSE);
  644.  
  645.          WinEnableWindow((WinWindowFromID(hWndDlg,
  646.                                           DID_SELECTED_FN)),
  647.                          FALSE);
  648.  
  649.          hWndFSELECT = hWndDlg;
  650.          break; /* End of WM_INITDLG */
  651.    
  652.     case WM_CONTROL:
  653.          switch(SHORT1FROMMP(mp1))
  654.            {
  655.             case DID_SELECTED_DIR: /* Entry field variable: "szSelected_Directory" */
  656.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  657.                    { 
  658.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  659.                          break;
  660.  
  661.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  662.                          break;
  663.  
  664.                     default: /* Default other messages                     */
  665.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  666.                          break;
  667.                    }
  668.                  break;
  669.  
  670.             case DID_SELECTED_FN: /* Entry field variable: "szSelected_Filename" */
  671.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  672.                    { 
  673.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  674.                          break;
  675.  
  676.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  677.                          break;
  678.  
  679.                     default: /* Default other messages                     */
  680.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  681.                          break;
  682.                    }
  683.                  break;
  684.  
  685.             case DID_DIRECTORY: /* List box                                */
  686.                  {
  687.                   USHORT sSelect;       /* index to selected listbox item  */
  688.                   USHORT CurDisk;       /* number of the current disk      */
  689.                   ULONG  DriveMap;      /* logical drive map               */
  690.                   CHAR   szBuffer[100];
  691.  
  692.                   /* If the user has not pressed enter or double clicked   */
  693.                   /* the mouse on an item, then break out of this case     */
  694.                   if(SHORT2FROMMP(mp1) != LN_ENTER)
  695.                      break;
  696.  
  697.                    /* Determine the index to the selected item             */
  698.                    sSelect = (USHORT)WinSendDlgItemMsg(hWndDlg,
  699.                                                        SHORT1FROMMP(mp1),
  700.                                                        LM_QUERYSELECTION,
  701.                                                        0L, 0L);
  702.  
  703.                    /* Query the text of the selected item                  */
  704.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1),
  705.                                      LM_QUERYITEMTEXT,
  706.                                      MPFROM2SHORT(sSelect, sizeof(szBuffer)),
  707.                                      MPFROMP(szBuffer));
  708.  
  709.                    /* Is the selected item a drive or directory            */
  710.                    if(szBuffer[0] == '[' && 
  711.                       szBuffer[2] == ':' && 
  712.                       szBuffer[3] == ']')
  713.                      {
  714.                       /* Save current drive in case of error               */
  715.                       DosQCurDisk(&CurDisk, &DriveMap);
  716.                       /* Log to new drive, on error restore to previous    */
  717.                       if(DosSelectDisk(szBuffer[1] - '@') != 0)
  718.                          DosSelectDisk(CurDisk);
  719.                       /* Fill the listbox with new directory information   */
  720.                       /* if an error occurs, restore to previous drive     */
  721.                       if(cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_SELECTED_DIR) == -1)
  722.                         {
  723.                          WinLoadString(hAB, 0, IDS_DISK_ERR,
  724.                                        sizeof(szBuffer), szBuffer);
  725.                          WinMessageBox(HWND_DESKTOP, hWndDlg,
  726.                                        szBuffer, szAppName,
  727.                                        0, MB_OK | MB_INFORMATION);
  728.                          DosSelectDisk(CurDisk);
  729.                          cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_SELECTED_DIR);
  730.                         }
  731.                       cwFillFileListBox(hWndDlg, "*.*", DID_FILES);
  732.                      }
  733.                    else /* A directory was selected                        */
  734.                      {
  735.                       /* Change to new directory                           */
  736.                       DosChDir(szBuffer, 0L);
  737.                       /*  Fill the listbox with new directory information  */
  738.                       cwFillDirListBox(hWndDlg, SHORT1FROMMP(mp1), DID_SELECTED_DIR);
  739.                       cwFillFileListBox(hWndDlg, "*.*", DID_FILES);
  740.                      }
  741.                  }
  742.                  break;
  743.  
  744.             case DID_FILES: /* List box                                    */
  745.                  {
  746.                    USHORT sSelectIndex;
  747.                    CHAR   szSelectText[80];   
  748.  
  749.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  750.                        break;
  751.  
  752.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  753.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  754.  
  755.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  756.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  757.                                    MPFROMP(szSelectText));
  758.                    WinSetDlgItemText(hWndDlg, DID_SELECTED_FN, szSelectText);
  759.                  }
  760.                  break;
  761.  
  762.            }
  763.          break; /* End of WM_CONTROL */
  764.    
  765.     case WM_COMMAND:
  766.          switch(SHORT1FROMMP(mp1))
  767.            {
  768.             case DID_OK: /* Button text: "Enter"                           */
  769.                   Fselect = (FSELECTStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_FSELECT);
  770.                  /* Query the string value in the entry field control and  */
  771.                  /* move the string value to the dialog structure variable */
  772.                  WinQueryDlgItemText(hWndDlg, DID_SELECTED_DIR,
  773.                                      sizeof(Fselect->szSelected_Directory),
  774.                                      Fselect->szSelected_Directory);
  775.                  if(Fselect->szSelected_Directory[0] == 0)
  776.                    {
  777.                     /* If required field is not completed inform user and  */
  778.                     /* query what he wants to do about it by presenting a  */
  779.                     /* message box with the push buttons "Retry" and       */
  780.                     /* "Cancel"                                            */
  781.                     strcpy(szWorkBuf, "Directory field not completed");
  782.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  783.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  784.                     
  785.                     /* If the user presses "Cancel", post a message to the */
  786.                     /* DID_CANCEL case and break out of this case          */
  787.                     if(i == MBID_CANCEL)
  788.                       {
  789.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  790.                        break;
  791.                       }
  792.  
  793.                     /* If the user presses "Retry", set focus to the       */
  794.                     /* control that needs to be completed and break out    */
  795.                     /* of this case                                        */
  796.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_SELECTED_DIR));
  797.                     break;
  798.                    }
  799.                  /* Query the string value in the entry field control and  */
  800.                  /* move the string value to the dialog structure variable */
  801.                  WinQueryDlgItemText(hWndDlg, DID_SELECTED_FN,
  802.                                      sizeof(Fselect->szSelected_Filename),
  803.                                      Fselect->szSelected_Filename);
  804.                  if(Fselect->szSelected_Filename[0] == 0)
  805.                    {
  806.                     /* If required field is not completed inform user and  */
  807.                     /* query what he wants to do about it by presenting a  */
  808.                     /* message box with the push buttons "Retry" and       */
  809.                     /* "Cancel"                                            */
  810.                     strcpy(szWorkBuf, "Filename field not completed");
  811.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  812.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  813.                     
  814.                     /* If the user presses "Cancel", post a message to the */
  815.                     /* DID_CANCEL case and break out of this case          */
  816.                     if(i == MBID_CANCEL)
  817.                       {
  818.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  819.                        break;
  820.                       }
  821.  
  822.                     /* If the user presses "Retry", set focus to the       */
  823.                     /* control that needs to be completed and break out    */
  824.                     /* of this case                                        */
  825.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_SELECTED_FN));
  826.                     break;
  827.                    }
  828.  
  829.                  hWndFSELECT = 0;
  830.  
  831.                  WinDismissDlg(hWndDlg, TRUE);
  832.                  break;
  833.  
  834.             case DID_PRINT: /* Button text: "Print"                        */
  835.                   Fselect = (FSELECTStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_FSELECT);
  836.                  /* Query the string value in the entry field control and  */
  837.                  /* move the string value to the dialog structure variable */
  838.                  WinQueryDlgItemText(hWndDlg, DID_SELECTED_DIR,
  839.                                      sizeof(Fselect->szSelected_Directory),
  840.                                      Fselect->szSelected_Directory);
  841.                  if(Fselect->szSelected_Directory[0] == 0)
  842.                    {
  843.                     /* If required field is not completed inform user and  */
  844.                     /* query what he wants to do about it by presenting a  */
  845.                     /* message box with the push buttons "Retry" and       */
  846.                     /* "Cancel"                                            */
  847.                     strcpy(szWorkBuf, "Directory field not completed");
  848.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  849.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  850.  
  851.                     /* If the user presses "Cancel", post a message to the */
  852.                     /* DID_CANCEL case and break out of this case          */
  853.                     if(i == MBID_CANCEL)
  854.                       {
  855.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  856.                        break;
  857.                       }
  858.  
  859.                     /* If the user presses "Retry", set focus to the       */
  860.                     /* control that needs to be completed and break out    */
  861.                     /* of this case                                        */
  862.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_SELECTED_DIR));
  863.                     break;
  864.                    }
  865.                  /* Query the string value in the entry field control and  */
  866.                  /* move the string value to the dialog structure variable */
  867.                  WinQueryDlgItemText(hWndDlg, DID_SELECTED_FN,
  868.                                      sizeof(Fselect->szSelected_Filename),
  869.                                      Fselect->szSelected_Filename);
  870.                  if(Fselect->szSelected_Filename[0] == 0)
  871.                    {
  872.                     /* If required field is not completed inform user and  */
  873.                     /* query what he wants to do about it by presenting a  */
  874.                     /* message box with the push buttons "Retry" and       */
  875.                     /* "Cancel"                                            */
  876.                     strcpy(szWorkBuf, "Filename field not completed");
  877.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  878.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  879.  
  880.                     /* If the user presses "Cancel", post a message to the */
  881.                     /* DID_CANCEL case and break out of this case          */
  882.                     if(i == MBID_CANCEL)
  883.                       {
  884.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  885.                        break;
  886.                       }
  887.  
  888.                     /* If the user presses "Retry", set focus to the       */
  889.                     /* control that needs to be completed and break out    */
  890.                     /* of this case                                        */
  891.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_SELECTED_FN));
  892.                     break;
  893.                    }
  894.  
  895.                   if (!WinIsWindow(hAB, hWndFSELECTDID_PRINTObject))
  896.                     {
  897.                      /* if the window is not a valid window, allocate memory */
  898.                      /* for the thread's stack                               */
  899.                      DosAllocSeg(4096, &FSELECTDID_PRINTObjSel, SEG_NONSHARED);
  900.                      FSELECTDID_PRINTObjStack = (CHAR *)MAKEP(FSELECTDID_PRINTObjSel, 0);  
  901.                      _beginthread((void FAR *)FSELECTDID_PRINTObjFunction, FSELECTDID_PRINTObjStack, 4096, 0);
  902.                     }
  903.                  break;
  904.  
  905.             case DID_CANCEL: /* Button text: "Cancel"                      */
  906.                  /* Ignore data values entered into the dialog controls    */
  907.                  /* and dismiss the dialog window                          */
  908.  
  909.                  hWndFSELECT = 0;
  910.  
  911.                  WinDismissDlg(hWndDlg, FALSE);
  912.                  break;
  913.  
  914.             case DID_HELP: /* Button text: "Help"                          */
  915.                  break;
  916.  
  917.            }
  918.          break; /* End of WM_COMMAND */
  919.                                
  920.     case WM_CLOSE:
  921.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  922.          break; /* End of WM_CLOSE */
  923.            
  924.     case WM_FAILEDVALIDATE:
  925.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  926.          sfValidate = FALSE;
  927.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  928.          sfValidate = TRUE;
  929.          return((MRESULT)TRUE);
  930.          break; /* End of WM_FAILEDVALIDATE */
  931.  
  932.     default:
  933.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  934.          break;
  935.    }
  936.  return FALSE;
  937. } /* End of FSELECTMsgProc */
  938.  
  939.  
  940. /***************************************************************************/
  941. /*                                                                         */
  942. /* Dialog Window Procedure                                                 */
  943. /*                                                                         */
  944. /* This procedure is associated with the dialog box that is included in    */
  945. /* the function name of the procedure. It provides the service routines    */
  946. /* for the events (messages) that occur because the end user operates      */
  947. /* one of the dialog box's buttons, entry fields, or controls.             */
  948. /*                                                                         */
  949. /* The SWITCH statement in the function distributes the dialog box         */
  950. /* messages to the respective service routines, which are set apart by     */
  951. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  952. /* procedures must provide an appropriate service routine for their end    */
  953. /* user initiated messages as well as for the general PM messages (like    */
  954. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  955. /* which there is no programmed CASE condition (no service routine),       */
  956. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  957. /* disposed of by PM.                                                      */
  958. /*                                                                         */
  959. /***************************************************************************/
  960.  
  961. MRESULT EXPENTRY SELPRTERMsgProc(hWndDlg, message, mp1, mp2)
  962. HWND hWndDlg;
  963. USHORT message;
  964. MPARAM mp1;
  965. MPARAM mp2;
  966. { 
  967.  static SHORT sfValidate = TRUE;
  968.  INT    i;
  969.  static CHAR  szWorkBuf[90];
  970.  static HWND  hWndParent;
  971.  SELPRTERStruct FAR *Selprter;
  972.  
  973.  CHAR *result;
  974.           
  975.  switch(message)
  976.    {
  977.     case WM_INITDLG:
  978.          Selprter = (SELPRTERStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_SELPRTER);
  979.          hWndParent = (HWND)mp2;
  980.          cwCenter(hWndDlg, (HWND)hWndParent);
  981.          /* Initialize entry field control: szSelected_Printer_Name        */
  982.          WinSendDlgItemMsg(hWndDlg, DID_SELECTED_PRINTER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  983.          for (i=0; i < 128; i++)
  984.             if (Selprter->szPrinter_List[i][0])
  985.                WinSendDlgItemMsg(hWndDlg, DID_PRINTER_LIST, LM_INSERTITEM,
  986.                          MPFROM2SHORT(LIT_SORTASCENDING, 0),
  987.                          MPFROMP(Selprter->szPrinter_List[i]));
  988.          break; /* End of WM_INITDLG */
  989.    
  990.     case WM_CONTROL:
  991.          switch(SHORT1FROMMP(mp1))
  992.            {
  993.             case DID_SELECTED_PRINTER_NAME: /* Entry field variable: "szSelected_Printer_Name" */
  994.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  995.                    { 
  996.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  997.                          break;
  998.  
  999.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1000.                          {
  1001.                           /* Validate the field                            */
  1002.                           static char buffer[24];
  1003.                           WinQueryDlgItemText(hWndDlg, DID_SELECTED_PRINTER_NAME,
  1004.                                               sizeof(buffer), buffer);
  1005.                           if(buffer[0]==0x00)
  1006.                             break;
  1007.                           if(sfValidate && !cwAlphaValidate(buffer))
  1008.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  1009.                          }
  1010.                          break;
  1011.  
  1012.                     default: /* Default other messages                     */
  1013.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1014.                          break;
  1015.                    }
  1016.                  break;
  1017.  
  1018.             case DID_PRINTER_LIST: /* List box                             */
  1019.                  {
  1020.                    USHORT sSelectIndex;
  1021.                    CHAR   szSelectText[80];   
  1022.  
  1023.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  1024.                        break;
  1025.  
  1026.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  1027.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  1028.  
  1029.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  1030.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  1031.                                    MPFROMP(szSelectText));
  1032.  
  1033.                    /*****************************************************
  1034.                    *                                                    *
  1035.                    *     This section separates the printer name from   *
  1036.                    *     its description and then loads just the name.  *
  1037.                    *                                                    *
  1038.                    *****************************************************/
  1039.                    result = strtok(szSelectText," ");
  1040.                    WinSetDlgItemText(hWndDlg, DID_SELECTED_PRINTER_NAME, szSelectText);
  1041.                  }
  1042.                  break;
  1043.  
  1044.            }
  1045.          break; /* End of WM_CONTROL */
  1046.    
  1047.     case WM_COMMAND:
  1048.          switch(SHORT1FROMMP(mp1))
  1049.            {
  1050.             case DID_OK: /* Button text: "Select"                          */
  1051.                   Selprter = (SELPRTERStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_SELPRTER);
  1052.                  /* Query the string value in the entry field control and  */
  1053.                  /* move the string value to the dialog structure variable */
  1054.                  WinQueryDlgItemText(hWndDlg, DID_SELECTED_PRINTER_NAME,
  1055.                                      sizeof(Selprter->szSelected_Printer_Name),
  1056.                                      Selprter->szSelected_Printer_Name);
  1057.                  if(Selprter->szSelected_Printer_Name[0] == 0)
  1058.                    {
  1059.                     /* If required field is not completed inform user and  */
  1060.                     /* query what he wants to do about it by presenting a  */
  1061.                     /* message box with the push buttons "Retry" and       */
  1062.                     /* "Cancel"                                            */
  1063.                     strcpy(szWorkBuf, "Printer name required.  Push retry to supply one or cancel to abort dialog.");
  1064.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  1065.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  1066.                     
  1067.                     /* If the user presses "Cancel", post a message to the */
  1068.                     /* DID_CANCEL case and break out of this case          */
  1069.                     if(i == MBID_CANCEL)
  1070.                       {
  1071.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1072.                        break;
  1073.                       }
  1074.  
  1075.                     /* If the user presses "Retry", set focus to the       */
  1076.                     /* control that needs to be completed and break out    */
  1077.                     /* of this case                                        */
  1078.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_SELECTED_PRINTER_NAME));
  1079.                     break;
  1080.                    }
  1081.                  WinDismissDlg(hWndDlg, TRUE);
  1082.                  break;
  1083.  
  1084.             case DID_CANCEL: /* Button text: "Cancel"                      */
  1085.                  /* Ignore data values entered into the dialog controls    */
  1086.                  /* and dismiss the dialog window                          */
  1087.                  WinDismissDlg(hWndDlg, FALSE);
  1088.                  break;
  1089.  
  1090.             case DID_HELP: /* Button text: "Help"                          */
  1091.                  break;
  1092.  
  1093.            }
  1094.          break; /* End of WM_COMMAND */
  1095.                                
  1096.     case WM_CLOSE:
  1097.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1098.          break; /* End of WM_CLOSE */
  1099.            
  1100.     case WM_FAILEDVALIDATE:
  1101.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  1102.          sfValidate = FALSE;
  1103.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  1104.          sfValidate = TRUE;
  1105.          return((MRESULT)TRUE);
  1106.          break; /* End of WM_FAILEDVALIDATE */
  1107.  
  1108.     default:
  1109.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1110.          break;
  1111.    }
  1112.  return FALSE;
  1113. } /* End of SELPRTERMsgProc */
  1114.  
  1115.  
  1116. /***************************************************************************/
  1117. /*                                                                         */
  1118. /* Dialog Window Procedure                                                 */
  1119. /*                                                                         */
  1120. /* This procedure is associated with the dialog box that is included in    */
  1121. /* the function name of the procedure. It provides the service routines    */
  1122. /* for the events (messages) that occur because the end user operates      */
  1123. /* one of the dialog box's buttons, entry fields, or controls.             */
  1124. /*                                                                         */
  1125. /* The SWITCH statement in the function distributes the dialog box         */
  1126. /* messages to the respective service routines, which are set apart by     */
  1127. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  1128. /* procedures must provide an appropriate service routine for their end    */
  1129. /* user initiated messages as well as for the general PM messages (like    */
  1130. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  1131. /* which there is no programmed CASE condition (no service routine),       */
  1132. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  1133. /* disposed of by PM.                                                      */
  1134. /*                                                                         */
  1135. /***************************************************************************/
  1136.  
  1137. MRESULT EXPENTRY PRTERADDMsgProc(hWndDlg, message, mp1, mp2)
  1138. HWND hWndDlg;
  1139. USHORT message;
  1140. MPARAM mp1;
  1141. MPARAM mp2;
  1142. { 
  1143.  static SHORT sfValidate = TRUE;
  1144.  INT    i;
  1145.  static CHAR  szWorkBuf[90];
  1146.  static HWND  hWndParent;
  1147.  PRTERADDStruct FAR *Prteradd;
  1148.  
  1149.  static INT free_entry;      /* Number of first free entry in the printer table. */
  1150.  SELPRTERStruct FAR *Selprter;
  1151.  CHAR *result;
  1152.  LOADRETURNStruct FAR *Return_Values;
  1153.  
  1154.  Selprter = (SELPRTERStruct FAR *)WinQueryWindowULong(hWndClient,
  1155.                                                       OFFSET_SELPRTER);
  1156.           
  1157.  switch(message)
  1158.    {
  1159.     case WM_INITDLG:
  1160.          Prteradd = (PRTERADDStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_PRTERADD);
  1161.          hWndParent = (HWND)mp2;
  1162.          cwCenter(hWndDlg, (HWND)hWndParent);
  1163.  
  1164.          Return_Values = (LOADRETURNStruct FAR *)
  1165.                          BgmLoadListBox(hWndDlg,
  1166.                                         DID_PRINTER_LIST,
  1167.                                         Selprter->szPrinter_List,
  1168.                                         "Printer list is full.  You will need to remove a printer in order to add one.",
  1169.                                         TRUE);
  1170.  
  1171.          if((free_entry = Return_Values->free_entry) == -1)
  1172.          {
  1173.            break;
  1174.          }
  1175.  
  1176.          /* Initialize entry field control: szAdd_Printer_Name             */
  1177.          WinSendDlgItemMsg(hWndDlg, DID_ADD_PRINTER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  1178.          /* Initialize entry field control: szAdd_Printer_Desc             */
  1179.          WinSendDlgItemMsg(hWndDlg, DID_ADD_PRINTER_DESC, EM_SETTEXTLIMIT, MPFROMSHORT(103), 0L);
  1180.          break; /* End of WM_INITDLG */
  1181.    
  1182.     case WM_CONTROL:
  1183.          switch(SHORT1FROMMP(mp1))
  1184.            {
  1185.             case DID_ADD_PRINTER_NAME: /* Entry field variable: "szAdd_Printer_Name" */
  1186.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  1187.                    { 
  1188.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  1189.                          break;
  1190.  
  1191.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1192.                          {
  1193.                           /* Validate the field                            */
  1194.                           static char buffer[24];
  1195.                           WinQueryDlgItemText(hWndDlg, DID_ADD_PRINTER_NAME,
  1196.                                               sizeof(buffer), buffer);
  1197.                           if(buffer[0]==0x00)
  1198.                             break;
  1199.                           if(sfValidate && !cwAlphaValidate(buffer))
  1200.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  1201.                          }
  1202.                          break;
  1203.  
  1204.                     default: /* Default other messages                     */
  1205.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1206.                          break;
  1207.                    }
  1208.                  break;
  1209.  
  1210.             case DID_ADD_PRINTER_DESC: /* Entry field variable: "szAdd_Printer_Desc" */
  1211.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  1212.                    { 
  1213.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  1214.                          break;
  1215.  
  1216.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1217.                          break;
  1218.  
  1219.                     default: /* Default other messages                     */
  1220.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1221.                          break;
  1222.                    }
  1223.                  break;
  1224.  
  1225.             case DID_PRINTER_LIST: /* List box                             */
  1226.                  {
  1227.  
  1228.                    /*****************************************************
  1229.                    *                                                    *
  1230.                    *     This section obtains from the printer list the *
  1231.                    *     entry pointed to by the end-user.  We break it *
  1232.                    *     into its two components (name and description).*
  1233.                    *     We then load these components into their       *
  1234.                    *     respective fields.                             *
  1235.                    *                                                    *
  1236.                    *     One example of when an user might point to an  *
  1237.                    *     entry is when he want to save some typing.     *
  1238.                    *                                                    *
  1239.                    *****************************************************/
  1240.                    USHORT sSelectIndex;
  1241.                    CHAR   szSelectText[129];
  1242.  
  1243.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  1244.                        break;
  1245.  
  1246.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  1247.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  1248.  
  1249.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  1250.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  1251.                                    MPFROMP(szSelectText));
  1252.  
  1253.                    result = strtok(szSelectText," ");
  1254.                    WinSetDlgItemText(hWndDlg,
  1255.                                      DID_ADD_PRINTER_NAME,
  1256.                                      (PSZ) result);
  1257.  
  1258.                    result = strchr(szSelectText,'\0');
  1259.                    *result++;
  1260.  
  1261.                    WinSetDlgItemText(hWndDlg,
  1262.                                      DID_ADD_PRINTER_DESC,
  1263.                                      result);
  1264.                  }
  1265.                  break;
  1266.  
  1267.            }
  1268.          break; /* End of WM_CONTROL */
  1269.    
  1270.     case WM_COMMAND:
  1271.          switch(SHORT1FROMMP(mp1))
  1272.            {
  1273.             case DID_OK: /* Button text: "Add"                             */
  1274.                   Prteradd = (PRTERADDStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_PRTERADD);
  1275.                  /* Query the string value in the entry field control and  */
  1276.                  /* move the string value to the dialog structure variable */
  1277.                  WinQueryDlgItemText(hWndDlg, DID_ADD_PRINTER_NAME,
  1278.                                      sizeof(Prteradd->szAdd_Printer_Name),
  1279.                                      Prteradd->szAdd_Printer_Name);
  1280.                  if(Prteradd->szAdd_Printer_Name[0] == 0)
  1281.                    {
  1282.                     /* If required field is not completed inform user and  */
  1283.                     /* query what he wants to do about it by presenting a  */
  1284.                     /* message box with the push buttons "Retry" and       */
  1285.                     /* "Cancel"                                            */
  1286.                     strcpy(szWorkBuf, "Printer name required.  Push retry to supply one or cancel to abort dialog.");
  1287.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  1288.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  1289.                     
  1290.                     /* If the user presses "Cancel", post a message to the */
  1291.                     /* DID_CANCEL case and break out of this case          */
  1292.                     if(i == MBID_CANCEL)
  1293.                       {
  1294.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1295.                        break;
  1296.                       }
  1297.  
  1298.                     /* If the user presses "Retry", set focus to the       */
  1299.                     /* control that needs to be completed and break out    */
  1300.                     /* of this case                                        */
  1301.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_ADD_PRINTER_NAME));
  1302.                     break;
  1303.                    }
  1304.                  /* Query the string value in the entry field control and  */
  1305.                  /* move the string value to the dialog structure variable */
  1306.                  WinQueryDlgItemText(hWndDlg, DID_ADD_PRINTER_DESC,
  1307.                                      sizeof(Prteradd->szAdd_Printer_Desc),
  1308.                                      Prteradd->szAdd_Printer_Desc);
  1309.  
  1310.                  if(BgmAddPrtSrv(hWndDlg,
  1311.                                  DID_ADD_PRINTER_NAME,
  1312.                                  free_entry,
  1313.                                  Selprter->szPrinter_List,
  1314.                                  Prteradd->szAdd_Printer_Name,
  1315.                                  Prteradd->szAdd_Printer_Desc,
  1316.                                  "Printer name duplication.  Push retry to change printer name or push cancel to abort.")
  1317.                     == TRUE)
  1318.                  {
  1319.                  WinDismissDlg(hWndDlg, TRUE);
  1320.                  }
  1321.                  break;
  1322.  
  1323.             case DID_CANCEL: /* Button text: "Cancel"                      */
  1324.                  /* Ignore data values entered into the dialog controls    */
  1325.                  /* and dismiss the dialog window                          */
  1326.                  WinDismissDlg(hWndDlg, FALSE);
  1327.                  break;
  1328.  
  1329.             case DID_HELP: /* Button text: "Help"                          */
  1330.                  break;
  1331.  
  1332.            }
  1333.          break; /* End of WM_COMMAND */
  1334.                                
  1335.     case WM_CLOSE:
  1336.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1337.          break; /* End of WM_CLOSE */
  1338.            
  1339.     case WM_FAILEDVALIDATE:
  1340.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  1341.          sfValidate = FALSE;
  1342.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  1343.          sfValidate = TRUE;
  1344.          return((MRESULT)TRUE);
  1345.          break; /* End of WM_FAILEDVALIDATE */
  1346.  
  1347.     default:
  1348.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1349.          break;
  1350.    }
  1351.  return FALSE;
  1352. } /* End of PRTERADDMsgProc */
  1353.  
  1354.  
  1355. /***************************************************************************/
  1356. /*                                                                         */
  1357. /* Dialog Window Procedure                                                 */
  1358. /*                                                                         */
  1359. /* This procedure is associated with the dialog box that is included in    */
  1360. /* the function name of the procedure. It provides the service routines    */
  1361. /* for the events (messages) that occur because the end user operates      */
  1362. /* one of the dialog box's buttons, entry fields, or controls.             */
  1363. /*                                                                         */
  1364. /* The SWITCH statement in the function distributes the dialog box         */
  1365. /* messages to the respective service routines, which are set apart by     */
  1366. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  1367. /* procedures must provide an appropriate service routine for their end    */
  1368. /* user initiated messages as well as for the general PM messages (like    */
  1369. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  1370. /* which there is no programmed CASE condition (no service routine),       */
  1371. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  1372. /* disposed of by PM.                                                      */
  1373. /*                                                                         */
  1374. /***************************************************************************/
  1375.  
  1376. MRESULT EXPENTRY PRTERDELMsgProc(hWndDlg, message, mp1, mp2)
  1377. HWND hWndDlg;
  1378. USHORT message;
  1379. MPARAM mp1;
  1380. MPARAM mp2;
  1381. { 
  1382.  static SHORT sfValidate = TRUE;
  1383.  INT    i;
  1384.  static CHAR  szWorkBuf[90];
  1385.  static HWND  hWndParent;
  1386.  PRTERDELStruct FAR *Prterdel;
  1387.           
  1388.  static INT last_entry;      /* Number of last acrive entry in the printer table. */
  1389.  SELPRTERStruct FAR *Selprter;
  1390.  CHAR *result;
  1391.  LOADRETURNStruct FAR *Return_Values;
  1392.  
  1393.  Selprter = (SELPRTERStruct FAR *)WinQueryWindowULong(hWndClient,
  1394.                                                       OFFSET_SELPRTER);
  1395.  switch(message)
  1396.    {
  1397.     case WM_INITDLG:
  1398.          Prterdel = (PRTERDELStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_PRTERDEL);
  1399.          hWndParent = (HWND)mp2;
  1400.          cwCenter(hWndDlg, (HWND)hWndParent);
  1401.  
  1402.          Return_Values = (LOADRETURNStruct FAR *)
  1403.                          BgmLoadListBox(hWndDlg,
  1404.                                         DID_PRINTER_LIST,
  1405.                                         Selprter->szPrinter_List,
  1406.                                         "A printer does not exist to delete.  The printer list is empty.",
  1407.                                         FALSE);
  1408.  
  1409.          if((last_entry = Return_Values->last_entry) == -1)
  1410.          {
  1411.            break;
  1412.          }
  1413.  
  1414.          /* Initialize entry field control: szDelete_Printer_Name          */
  1415.          WinSendDlgItemMsg(hWndDlg, DID_DELETE_PRINTER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  1416.          break; /* End of WM_INITDLG */
  1417.    
  1418.     case WM_CONTROL:
  1419.          switch(SHORT1FROMMP(mp1))
  1420.            {
  1421.             case DID_DELETE_PRINTER_NAME: /* Entry field variable: "szDelete_Printer_Name" */
  1422.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  1423.                    { 
  1424.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  1425.                          break;
  1426.  
  1427.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1428.                          {
  1429.                           /* Validate the field                            */
  1430.                           static char buffer[24];
  1431.                           WinQueryDlgItemText(hWndDlg, DID_DELETE_PRINTER_NAME,
  1432.                                               sizeof(buffer), buffer);
  1433.                           if(buffer[0]==0x00)
  1434.                             break;
  1435.                           if(sfValidate && !cwAlphaValidate(buffer))
  1436.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  1437.                          }
  1438.                          break;
  1439.  
  1440.                     default: /* Default other messages                     */
  1441.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1442.                          break;
  1443.                    }
  1444.                  break;
  1445.  
  1446.             case DID_PRINTER_LIST: /* List box                             */
  1447.                  {
  1448.  
  1449.                    /*****************************************************
  1450.                    *                                                    *
  1451.                    *     This section obtains from the printer list the *
  1452.                    *     entry pointed to by the end-user.  We breakout *
  1453.                    *     of its the name component and then load the    *
  1454.                    *     name into its field.                           *
  1455.                    *                                                    *
  1456.                    *     One example of when an user might point to an  *
  1457.                    *     entry is when he want to save some typing.     *
  1458.                    *                                                    *
  1459.                    *****************************************************/
  1460.                    USHORT sSelectIndex;
  1461.                    CHAR   szSelectText[25];
  1462.  
  1463.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  1464.                        break;
  1465.  
  1466.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  1467.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  1468.  
  1469.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  1470.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  1471.                                    MPFROMP(szSelectText));
  1472.  
  1473.                    result = strtok(szSelectText," ");
  1474.                    WinSetDlgItemText(hWndDlg,
  1475.                                      DID_DELETE_PRINTER_NAME,
  1476.                                      (PSZ) result);
  1477.                  }
  1478.                  break;
  1479.  
  1480.            }
  1481.          break; /* End of WM_CONTROL */
  1482.    
  1483.     case WM_COMMAND:
  1484.          switch(SHORT1FROMMP(mp1))
  1485.            {
  1486.             case DID_OK: /* Button text: "Delete"                          */
  1487.                   Prterdel = (PRTERDELStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_PRTERDEL);
  1488.                  /* Query the string value in the entry field control and  */
  1489.                  /* move the string value to the dialog structure variable */
  1490.                  WinQueryDlgItemText(hWndDlg, DID_DELETE_PRINTER_NAME,
  1491.                                      sizeof(Prterdel->szDelete_Printer_Name),
  1492.                                      Prterdel->szDelete_Printer_Name);
  1493.                  if(Prterdel->szDelete_Printer_Name[0] == 0)
  1494.                    {
  1495.                     /* If required field is not completed inform user and  */
  1496.                     /* query what he wants to do about it by presenting a  */
  1497.                     /* message box with the push buttons "Retry" and       */
  1498.                     /* "Cancel"                                            */
  1499.                     strcpy(szWorkBuf, "Printer name required.  Push retry to supply one or cancel to abort dialog.");
  1500.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  1501.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  1502.                     
  1503.                     /* If the user presses "Cancel", post a message to the */
  1504.                     /* DID_CANCEL case and break out of this case          */
  1505.                     if(i == MBID_CANCEL)
  1506.                       {
  1507.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1508.                        break;
  1509.                       }
  1510.  
  1511.                     /* If the user presses "Retry", set focus to the       */
  1512.                     /* control that needs to be completed and break out    */
  1513.                     /* of this case                                        */
  1514.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_DELETE_PRINTER_NAME));
  1515.                     break;
  1516.                    }
  1517.  
  1518.                  if(BgmDeletePrtSrv(hWndDlg,
  1519.                                     DID_DELETE_PRINTER_NAME,
  1520.                                     last_entry,
  1521.                                     Selprter->szPrinter_List,
  1522.                                     Prterdel->szDelete_Printer_Name,
  1523.                                     "Printer name not found.  Push retry to change printer name or push cancel to abort.")
  1524.                     == TRUE)
  1525.                  {
  1526.                  WinDismissDlg(hWndDlg, TRUE);
  1527.                  }
  1528.                  break;
  1529.  
  1530.             case DID_CANCEL: /* Button text: "Cancel"                      */
  1531.                  /* Ignore data values entered into the dialog controls    */
  1532.                  /* and dismiss the dialog window                          */
  1533.                  WinDismissDlg(hWndDlg, FALSE);
  1534.                  break;
  1535.  
  1536.             case DID_HELP: /* Button text: "Help"                          */
  1537.                  break;
  1538.  
  1539.            }
  1540.          break; /* End of WM_COMMAND */
  1541.                                
  1542.     case WM_CLOSE:
  1543.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1544.          break; /* End of WM_CLOSE */
  1545.            
  1546.     case WM_FAILEDVALIDATE:
  1547.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  1548.          sfValidate = FALSE;
  1549.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  1550.          sfValidate = TRUE;
  1551.          return((MRESULT)TRUE);
  1552.          break; /* End of WM_FAILEDVALIDATE */
  1553.  
  1554.     default:
  1555.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1556.          break;
  1557.    }
  1558.  return FALSE;
  1559. } /* End of PRTERDELMsgProc */
  1560.  
  1561.  
  1562. /***************************************************************************/
  1563. /*                                                                         */
  1564. /* Dialog Window Procedure                                                 */
  1565. /*                                                                         */
  1566. /* This procedure is associated with the dialog box that is included in    */
  1567. /* the function name of the procedure. It provides the service routines    */
  1568. /* for the events (messages) that occur because the end user operates      */
  1569. /* one of the dialog box's buttons, entry fields, or controls.             */
  1570. /*                                                                         */
  1571. /* The SWITCH statement in the function distributes the dialog box         */
  1572. /* messages to the respective service routines, which are set apart by     */
  1573. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  1574. /* procedures must provide an appropriate service routine for their end    */
  1575. /* user initiated messages as well as for the general PM messages (like    */
  1576. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  1577. /* which there is no programmed CASE condition (no service routine),       */
  1578. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  1579. /* disposed of by PM.                                                      */
  1580. /*                                                                         */
  1581. /***************************************************************************/
  1582.  
  1583. MRESULT EXPENTRY PRTCHANGMsgProc(hWndDlg, message, mp1, mp2)
  1584. HWND hWndDlg;
  1585. USHORT message;
  1586. MPARAM mp1;
  1587. MPARAM mp2;
  1588. { 
  1589.  static SHORT sfValidate = TRUE;
  1590.  INT    i;
  1591.  static CHAR  szWorkBuf[90];
  1592.  static HWND  hWndParent;
  1593.  PRTCHANGStruct FAR *Prtchang;
  1594.           
  1595.  
  1596.  static INT Selected_Entry_Number;
  1597.  SELPRTERStruct FAR *Selprter;
  1598.  CHAR *result;
  1599.  LOADRETURNStruct FAR *Return_Values;
  1600.  
  1601.  Selprter = (SELPRTERStruct FAR *)WinQueryWindowULong(hWndClient,
  1602.                                                       OFFSET_SELPRTER);
  1603.  switch(message)
  1604.    {
  1605.     case WM_INITDLG:
  1606.          Prtchang = (PRTCHANGStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_PRTCHANG);
  1607.          hWndParent = (HWND)mp2;
  1608.          cwCenter(hWndDlg, (HWND)hWndParent);
  1609.          Selected_Entry_Number = -1;
  1610.  
  1611.          Return_Values = (LOADRETURNStruct FAR *)
  1612.                          BgmLoadListBox(hWndDlg,
  1613.                                         DID_PRINTER_LIST,
  1614.                                         Selprter->szPrinter_List,
  1615.                                         "A printer does not exist to change.  The printer list is empty.",
  1616.                                         FALSE);
  1617.  
  1618.          if (Return_Values->last_entry == -1)
  1619.          {
  1620.            break;
  1621.          }
  1622.  
  1623.          /* Initialize entry field control: szChange_Printer_Name          */
  1624.          WinSendDlgItemMsg(hWndDlg, DID_CHANGE_PRINTER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  1625.          /* Initialize entry field control: szChange_Printer_Desc          */
  1626.          WinSendDlgItemMsg(hWndDlg, DID_CHANGE_PRINTER_DESC, EM_SETTEXTLIMIT, MPFROMSHORT(103), 0L);
  1627.          break; /* End of WM_INITDLG */
  1628.    
  1629.     case WM_CONTROL:
  1630.          switch(SHORT1FROMMP(mp1))
  1631.            {
  1632.             case DID_CHANGE_PRINTER_NAME: /* Entry field variable: "szChange_Printer_Name" */
  1633.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  1634.                    { 
  1635.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  1636.                          break;
  1637.  
  1638.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1639.                          {
  1640.                           /* Validate the field                            */
  1641.                           static char buffer[24];
  1642.                           WinQueryDlgItemText(hWndDlg, DID_CHANGE_PRINTER_NAME,
  1643.                                               sizeof(buffer), buffer);
  1644.                           if(buffer[0]==0x00)
  1645.                             break;
  1646.                           if(sfValidate && !cwAlphaValidate(buffer))
  1647.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  1648.                          }
  1649.                          break;
  1650.  
  1651.                     default: /* Default other messages                     */
  1652.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1653.                          break;
  1654.                    }
  1655.                  break;
  1656.  
  1657.             case DID_CHANGE_PRINTER_DESC: /* Entry field variable: "szChange_Printer_Desc" */
  1658.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  1659.                    { 
  1660.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  1661.                          break;
  1662.  
  1663.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1664.                          break;
  1665.  
  1666.                     default: /* Default other messages                     */
  1667.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1668.                          break;
  1669.                    }
  1670.                  break;
  1671.  
  1672.             case DID_PRINTER_LIST: /* List box                             */
  1673.                  {
  1674.  
  1675.                    /*****************************************************
  1676.                    *                                                    *
  1677.                    *     This section obtains from the printer list the *
  1678.                    *     entry pointed to by the end-user.  We break it *
  1679.                    *     into its two components (name and description).*
  1680.                    *     We then load these components into their       *
  1681.                    *     respective fields.                             *
  1682.                    *                                                    *
  1683.                    *     One example of when an user might point to an  *
  1684.                    *     entry is when he want to save some typing.     *
  1685.                    *                                                    *
  1686.                    *****************************************************/
  1687.                    USHORT sSelectIndex;
  1688.                    CHAR   szSelectText[129];
  1689.  
  1690.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  1691.                        break;
  1692.  
  1693.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  1694.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  1695.  
  1696.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  1697.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  1698.                                    MPFROMP(szSelectText));
  1699.  
  1700.                    /*****************************************************
  1701.                    *                                                    *
  1702.                    *     This section finds the printer entry the user  *
  1703.                    *     just selected.  The change key (DID_OK) code   *
  1704.                    *     uses this number to indicate which entry the   *
  1705.                    *     user is changing.  This approach permits the   *
  1706.                    *     end-user to change both the name and           *
  1707.                    *     description instead of just the name.          *
  1708.                    *                                                    *
  1709.                    *****************************************************/
  1710.                    for(i=0; i < 128; i++)
  1711.                    {
  1712.                      if (Selprter->szPrinter_List[i][0])
  1713.                      {
  1714.                        if(strnicmp(Selprter->szPrinter_List[i],
  1715.                                    szSelectText,
  1716.                                    strlen(szSelectText)) == 0)
  1717.                        {
  1718.                          Selected_Entry_Number = i;
  1719.                          break;
  1720.                        }
  1721.                      }
  1722.                    }
  1723.  
  1724.                    result = strtok(szSelectText," ");
  1725.                    WinSetDlgItemText(hWndDlg,
  1726.                                      DID_CHANGE_PRINTER_NAME,
  1727.                                      (PSZ) result);
  1728.  
  1729.                    result = strchr(szSelectText,'\0');
  1730.                    *result++;
  1731.  
  1732.                    WinSetDlgItemText(hWndDlg,
  1733.                                      DID_CHANGE_PRINTER_DESC,
  1734.                                      result);
  1735.                  }
  1736.                  break;
  1737.  
  1738.            }
  1739.          break; /* End of WM_CONTROL */
  1740.    
  1741.     case WM_COMMAND:
  1742.          switch(SHORT1FROMMP(mp1))
  1743.            {
  1744.             case DID_OK: /* Button text: "Change"                          */
  1745.                   Prtchang = (PRTCHANGStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_PRTCHANG);
  1746.                  /* Query the string value in the entry field control and  */
  1747.                  /* move the string value to the dialog structure variable */
  1748.                  WinQueryDlgItemText(hWndDlg, DID_CHANGE_PRINTER_NAME,
  1749.                                      sizeof(Prtchang->szChange_Printer_Name),
  1750.                                      Prtchang->szChange_Printer_Name);
  1751.                  if(Prtchang->szChange_Printer_Name[0] == 0)
  1752.                    {
  1753.                     /* If required field is not completed inform user and  */
  1754.                     /* query what he wants to do about it by presenting a  */
  1755.                     /* message box with the push buttons "Retry" and       */
  1756.                     /* "Cancel"                                            */
  1757.                     strcpy(szWorkBuf, "Printer name required.  Push retry to supply one or cancel to abort dialog.");
  1758.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  1759.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  1760.                     
  1761.                     /* If the user presses "Cancel", post a message to the */
  1762.                     /* DID_CANCEL case and break out of this case          */
  1763.                     if(i == MBID_CANCEL)
  1764.                       {
  1765.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1766.                        break;
  1767.                       }
  1768.  
  1769.                     /* If the user presses "Retry", set focus to the       */
  1770.                     /* control that needs to be completed and break out    */
  1771.                     /* of this case                                        */
  1772.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_CHANGE_PRINTER_NAME));
  1773.                     break;
  1774.                    }
  1775.                  /* Query the string value in the entry field control and  */
  1776.                  /* move the string value to the dialog structure variable */
  1777.                  WinQueryDlgItemText(hWndDlg, DID_CHANGE_PRINTER_DESC,
  1778.                                      sizeof(Prtchang->szChange_Printer_Desc),
  1779.                                      Prtchang->szChange_Printer_Desc);
  1780.  
  1781.                  if(BgmChangePrtSrv(hWndDlg,
  1782.                                     DID_CHANGE_PRINTER_NAME,
  1783.                                     Selected_Entry_Number,
  1784.                                     Selprter->szPrinter_List,
  1785.                                     Prtchang->szChange_Printer_Name,
  1786.                                     Prtchang->szChange_Printer_Desc,
  1787.                                     "Printer name not found.  Push retry to change printer name or push cancel to abort.")
  1788.                     != -1)
  1789.                  {
  1790.                  WinDismissDlg(hWndDlg, TRUE);
  1791.                  }
  1792.                  break;
  1793.  
  1794.             case DID_CANCEL: /* Button text: "Cancel"                      */
  1795.                  /* Ignore data values entered into the dialog controls    */
  1796.                  /* and dismiss the dialog window                          */
  1797.                  WinDismissDlg(hWndDlg, FALSE);
  1798.                  break;
  1799.  
  1800.             case DID_HELP: /* Button text: "Help"                          */
  1801.                  break;
  1802.  
  1803.            }
  1804.          break; /* End of WM_COMMAND */
  1805.                                
  1806.     case WM_CLOSE:
  1807.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  1808.          break; /* End of WM_CLOSE */
  1809.            
  1810.     case WM_FAILEDVALIDATE:
  1811.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  1812.          sfValidate = FALSE;
  1813.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  1814.          sfValidate = TRUE;
  1815.          return((MRESULT)TRUE);
  1816.          break; /* End of WM_FAILEDVALIDATE */
  1817.  
  1818.     default:
  1819.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1820.          break;
  1821.    }
  1822.  return FALSE;
  1823. } /* End of PRTCHANGMsgProc */
  1824.  
  1825.  
  1826. /***************************************************************************/
  1827. /*                                                                         */
  1828. /* Dialog Window Procedure                                                 */
  1829. /*                                                                         */
  1830. /* This procedure is associated with the dialog box that is included in    */
  1831. /* the function name of the procedure. It provides the service routines    */
  1832. /* for the events (messages) that occur because the end user operates      */
  1833. /* one of the dialog box's buttons, entry fields, or controls.             */
  1834. /*                                                                         */
  1835. /* The SWITCH statement in the function distributes the dialog box         */
  1836. /* messages to the respective service routines, which are set apart by     */
  1837. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  1838. /* procedures must provide an appropriate service routine for their end    */
  1839. /* user initiated messages as well as for the general PM messages (like    */
  1840. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  1841. /* which there is no programmed CASE condition (no service routine),       */
  1842. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  1843. /* disposed of by PM.                                                      */
  1844. /*                                                                         */
  1845. /***************************************************************************/
  1846.  
  1847. MRESULT EXPENTRY SELSERVMsgProc(hWndDlg, message, mp1, mp2)
  1848. HWND hWndDlg;
  1849. USHORT message;
  1850. MPARAM mp1;
  1851. MPARAM mp2;
  1852. { 
  1853.  static SHORT sfValidate = TRUE;
  1854.  INT    i;
  1855.  static CHAR  szWorkBuf[90];
  1856.  static HWND  hWndParent;
  1857.  SELSERVStruct FAR *Selserv;
  1858.  
  1859.  CHAR *result;
  1860.           
  1861.  switch(message)
  1862.    {
  1863.     case WM_INITDLG:
  1864.          Selserv = (SELSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_SELSERV);
  1865.          hWndParent = (HWND)mp2;
  1866.          cwCenter(hWndDlg, (HWND)hWndParent);
  1867.          /* Initialize entry field control: szSelected_Server_Name         */
  1868.          WinSendDlgItemMsg(hWndDlg, DID_SELECTED_SERVER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  1869.          for (i=0; i < 128; i++)
  1870.             if (Selserv->szServer_List[i][0])
  1871.                WinSendDlgItemMsg(hWndDlg, DID_SERVER_LIST, LM_INSERTITEM,
  1872.                          MPFROM2SHORT(LIT_SORTASCENDING, 0),
  1873.                          MPFROMP(Selserv->szServer_List[i]));
  1874.          /* Initialize check box control: ckSelected_UNIX_Format           */
  1875.          WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT, BM_SETCHECK,
  1876.              MPFROMSHORT(Selserv->ckSelected_UNIX_Format), 0L);
  1877.  
  1878.          /***************************************************************
  1879.          *                                                              *
  1880.          *     This section insures the UNIX format checks are the      *
  1881.          *     same both in this dialog and on the pulldown.  The       *
  1882.          *     pulldown is the master control except when processing    *
  1883.          *     this dialog's DID_OK (Select button) message.            *
  1884.          *                                                              *
  1885.          ***************************************************************/
  1886.          if ((SHORT) WinSendMsg(WinWindowFromID(hWndFrame, FID_MENU),
  1887.                                 MM_QUERYITEMATTR,
  1888.                                 MPFROM2SHORT(IDM_O_UNIXFORMAT, TRUE),
  1889.                                 MPFROMSHORT(MIA_CHECKED))
  1890.              == MIA_CHECKED)
  1891.          {
  1892.            Selserv->ckSelected_UNIX_Format = TRUE;
  1893.          }
  1894.          else
  1895.          {
  1896.            Selserv->ckSelected_UNIX_Format = FALSE;
  1897.          }
  1898.          WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT, BM_SETCHECK,
  1899.              MPFROMSHORT(Selserv->ckSelected_UNIX_Format), 0L);
  1900.  
  1901.          break; /* End of WM_INITDLG */
  1902.    
  1903.     case WM_CONTROL:
  1904.          switch(SHORT1FROMMP(mp1))
  1905.            {
  1906.             case DID_UNIX_FORMAT: /* Checkbox text: "Use UNIX format"      */
  1907.                  {
  1908.                   USHORT checked;
  1909.  
  1910.                   /* Query check box control for current state             */
  1911.                   /* on return checked is set to:                          */
  1912.                   /*           1 if check box is in unchecked state        */
  1913.                   /*           0 if check box is in checked state          */
  1914.                   checked = !WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT,
  1915.                                                BM_QUERYCHECK, 0L, 0L );
  1916.                   /* Set checkbox control state                            */
  1917.                   WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT,
  1918.                                     BM_SETCHECK, MPFROMSHORT(checked), 0L);
  1919.                  }  
  1920.                  break;
  1921.  
  1922.             case DID_SELECTED_SERVER_NAME: /* Entry field variable: "szSelected_Server_Name" */
  1923.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  1924.                    { 
  1925.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  1926.                          break;
  1927.  
  1928.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  1929.                          {
  1930.                           /* Validate the field                            */
  1931.                           static char buffer[24];
  1932.                           WinQueryDlgItemText(hWndDlg, DID_SELECTED_SERVER_NAME,
  1933.                                               sizeof(buffer), buffer);
  1934.                           if(buffer[0]==0x00)
  1935.                             break;
  1936.                           if(sfValidate && !cwAlphaValidate(buffer))
  1937.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  1938.                          }
  1939.                          break;
  1940.  
  1941.                     default: /* Default other messages                     */
  1942.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  1943.                          break;
  1944.                    }
  1945.                  break;
  1946.  
  1947.             case DID_SERVER_LIST: /* List box                              */
  1948.                  {
  1949.                    USHORT sSelectIndex;
  1950.                    CHAR   szSelectText[80];   
  1951.                    USHORT checked;
  1952.  
  1953.                    Selserv = (SELSERVStruct FAR *)WinQueryWindowULong(hWndClient,
  1954.                                                                       OFFSET_SELSERV);
  1955.  
  1956.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  1957.                        break;
  1958.  
  1959.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  1960.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  1961.  
  1962.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  1963.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  1964.                                    MPFROMP(szSelectText));
  1965.  
  1966.                    /*****************************************************
  1967.                    *                                                    *
  1968.                    *     This section sets the UNIX format check box    *
  1969.                    *     based upon the entry selected by the end-user. *
  1970.                    *     We need to scan through the server list to     *
  1971.                    *     find the selected entry and then use the       *
  1972.                    *     server UNIX format array to set the box.       *
  1973.                    *                                                    *
  1974.                    *****************************************************/
  1975.                    for(i=0; i < 128; i++)
  1976.                    {
  1977.                      if (Selserv->szServer_List[i][0])
  1978.                      {
  1979.                        if(strnicmp(Selserv->szServer_List[i],
  1980.                                    szSelectText,
  1981.                                    strlen(szSelectText)) == 0)
  1982.                        {
  1983.                          checked = (USHORT) Selserv->ckServer_UNIX_Format[i];
  1984.                          WinSendDlgItemMsg(hWndDlg,
  1985.                                            DID_UNIX_FORMAT,
  1986.                                            BM_SETCHECK,
  1987.                                            MPFROMSHORT(checked),
  1988.                                            0L);
  1989.                          break;
  1990.                        }
  1991.                      }
  1992.                    }
  1993.  
  1994.                    /*****************************************************
  1995.                    *                                                    *
  1996.                    *     This section separates the server name from    *
  1997.                    *     its description and then loads just the name.  *
  1998.                    *                                                    *
  1999.                    *****************************************************/
  2000.                    result = strtok(szSelectText," ");
  2001.                    WinSetDlgItemText(hWndDlg, DID_SELECTED_SERVER_NAME, szSelectText);
  2002.                  }
  2003.                  break;
  2004.  
  2005.            }
  2006.          break; /* End of WM_CONTROL */
  2007.    
  2008.     case WM_COMMAND:
  2009.          switch(SHORT1FROMMP(mp1))
  2010.            {
  2011.             case DID_OK: /* Button text: "Select"                          */
  2012.                   Selserv = (SELSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_SELSERV);
  2013.                  /* Query the check box control for its current state,     */
  2014.                  /* and set the dialog structure variable                  */
  2015.                  Selserv->ckSelected_UNIX_Format = 
  2016.                     (INT)(WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT,
  2017.                                             BM_QUERYCHECK, 0L, 0L));
  2018.                  /* Query the string value in the entry field control and  */
  2019.                  /* move the string value to the dialog structure variable */
  2020.                  WinQueryDlgItemText(hWndDlg, DID_SELECTED_SERVER_NAME,
  2021.                                      sizeof(Selserv->szSelected_Server_Name),
  2022.                                      Selserv->szSelected_Server_Name);
  2023.                  if(Selserv->szSelected_Server_Name[0] == 0)
  2024.                    {
  2025.                     /* If required field is not completed inform user and  */
  2026.                     /* query what he wants to do about it by presenting a  */
  2027.                     /* message box with the push buttons "Retry" and       */
  2028.                     /* "Cancel"                                            */
  2029.                     strcpy(szWorkBuf, "Server name required.  Push retry to supply one or cancel to abort dialog.");
  2030.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  2031.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  2032.                     
  2033.                     /* If the user presses "Cancel", post a message to the */
  2034.                     /* DID_CANCEL case and break out of this case          */
  2035.                     if(i == MBID_CANCEL)
  2036.                       {
  2037.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2038.                        break;
  2039.                       }
  2040.  
  2041.                     /* If the user presses "Retry", set focus to the       */
  2042.                     /* control that needs to be completed and break out    */
  2043.                     /* of this case                                        */
  2044.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_SELECTED_SERVER_NAME));
  2045.                     break;
  2046.                    }
  2047.  
  2048.                  /*******************************************************
  2049.                  *                                                      *
  2050.                  *     This section sets the UNIX format pulldown check *
  2051.                  *     value based upon the selected server's value.    *
  2052.                  *                                                      *
  2053.                  *******************************************************/
  2054.                  if(Selserv->ckSelected_UNIX_Format == TRUE)
  2055.                  {
  2056.                    i = MIA_CHECKED;
  2057.                  }
  2058.                  else
  2059.                  {
  2060.                    i = FALSE;
  2061.                  }
  2062.                  WinSendMsg(WinWindowFromID(hWndFrame, FID_MENU),
  2063.                             MM_SETITEMATTR,
  2064.                             MPFROM2SHORT(IDM_O_UNIXFORMAT, TRUE),
  2065.                             MPFROM2SHORT(MIA_CHECKED, i));
  2066.  
  2067.                  WinDismissDlg(hWndDlg, TRUE);
  2068.                  break;
  2069.  
  2070.             case DID_CANCEL: /* Button text: "Cancel"                      */
  2071.                  /* Ignore data values entered into the dialog controls    */
  2072.                  /* and dismiss the dialog window                          */
  2073.                  WinDismissDlg(hWndDlg, FALSE);
  2074.                  break;
  2075.  
  2076.             case DID_HELP: /* Button text: "Help"                          */
  2077.                  break;
  2078.  
  2079.            }
  2080.          break; /* End of WM_COMMAND */
  2081.                                
  2082.     case WM_CLOSE:
  2083.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2084.          break; /* End of WM_CLOSE */
  2085.            
  2086.     case WM_FAILEDVALIDATE:
  2087.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  2088.          sfValidate = FALSE;
  2089.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  2090.          sfValidate = TRUE;
  2091.          return((MRESULT)TRUE);
  2092.          break; /* End of WM_FAILEDVALIDATE */
  2093.  
  2094.     default:
  2095.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2096.          break;
  2097.    }
  2098.  return FALSE;
  2099. } /* End of SELSERVMsgProc */
  2100.  
  2101.  
  2102. /***************************************************************************/
  2103. /*                                                                         */
  2104. /* Dialog Window Procedure                                                 */
  2105. /*                                                                         */
  2106. /* This procedure is associated with the dialog box that is included in    */
  2107. /* the function name of the procedure. It provides the service routines    */
  2108. /* for the events (messages) that occur because the end user operates      */
  2109. /* one of the dialog box's buttons, entry fields, or controls.             */
  2110. /*                                                                         */
  2111. /* The SWITCH statement in the function distributes the dialog box         */
  2112. /* messages to the respective service routines, which are set apart by     */
  2113. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  2114. /* procedures must provide an appropriate service routine for their end    */
  2115. /* user initiated messages as well as for the general PM messages (like    */
  2116. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  2117. /* which there is no programmed CASE condition (no service routine),       */
  2118. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  2119. /* disposed of by PM.                                                      */
  2120. /*                                                                         */
  2121. /***************************************************************************/
  2122.  
  2123. MRESULT EXPENTRY ADDSERVMsgProc(hWndDlg, message, mp1, mp2)
  2124. HWND hWndDlg;
  2125. USHORT message;
  2126. MPARAM mp1;
  2127. MPARAM mp2;
  2128. { 
  2129.  static SHORT sfValidate = TRUE;
  2130.  INT    i;
  2131.  static CHAR  szWorkBuf[90];
  2132.  static HWND  hWndParent;
  2133.  ADDSERVStruct FAR *Addserv;
  2134.           
  2135.  
  2136.  static INT free_entry;      /* Number of first free entry in the server table. */
  2137.  SELSERVStruct FAR *Selserv;
  2138.  CHAR *result;
  2139.  LOADRETURNStruct FAR *Return_Values;
  2140.  
  2141.  Selserv = (SELSERVStruct FAR *)WinQueryWindowULong(hWndClient,
  2142.                                                     OFFSET_SELSERV);
  2143.  switch(message)
  2144.    {
  2145.     case WM_INITDLG:
  2146.          Addserv = (ADDSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_ADDSERV);
  2147.          hWndParent = (HWND)mp2;
  2148.          cwCenter(hWndDlg, (HWND)hWndParent);
  2149.  
  2150.          Return_Values = (LOADRETURNStruct FAR *)
  2151.                          BgmLoadListBox(hWndDlg,
  2152.                                         DID_SERVER_LIST,
  2153.                                         Selserv->szServer_List,
  2154.                                         "Server list is full.  You will need to remove a server in order to add one.",
  2155.                                         TRUE);
  2156.  
  2157.          if((free_entry = Return_Values->free_entry) == -1)
  2158.          {
  2159.            break;
  2160.          }
  2161.  
  2162.          /* Initialize entry field control: szAdd_Server_Name              */
  2163.          WinSendDlgItemMsg(hWndDlg, DID_ADD_SERVER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  2164.          /* Initialize entry field control: szAdd_Server_Desc              */
  2165.          WinSendDlgItemMsg(hWndDlg, DID_ADD_SERVER_DESC, EM_SETTEXTLIMIT, MPFROMSHORT(103), 0L);
  2166.          break; /* End of WM_INITDLG */
  2167.    
  2168.     case WM_CONTROL:
  2169.          switch(SHORT1FROMMP(mp1))
  2170.            {
  2171.             case DID_UNIX_FORMAT: /* Checkbox text: "Use UNIX format"      */
  2172.                  {
  2173.                   USHORT checked;
  2174.  
  2175.                   /* Query check box control for current state             */
  2176.                   /* on return checked is set to:                          */
  2177.                   /*           1 if check box is in unchecked state        */
  2178.                   /*           0 if check box is in checked state          */
  2179.                   checked = !WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT,
  2180.                                                BM_QUERYCHECK, 0L, 0L );
  2181.                   /* Set checkbox control state                            */
  2182.                   WinSendDlgItemMsg(hWndDlg, DID_UNIX_FORMAT,
  2183.                                     BM_SETCHECK, MPFROMSHORT(checked), 0L);
  2184.                  }  
  2185.                  break;
  2186.  
  2187.             case DID_ADD_SERVER_NAME: /* Entry field variable: "szAdd_Server_Name" */
  2188.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  2189.                    { 
  2190.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  2191.                          break;
  2192.  
  2193.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  2194.                          {
  2195.                           /* Validate the field                            */
  2196.                           static char buffer[24];
  2197.                           WinQueryDlgItemText(hWndDlg, DID_ADD_SERVER_NAME,
  2198.                                               sizeof(buffer), buffer);
  2199.                           if(buffer[0]==0x00)
  2200.                             break;
  2201.                           if(sfValidate && !cwAlphaValidate(buffer))
  2202.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  2203.                          }
  2204.                          break;
  2205.  
  2206.                     default: /* Default other messages                     */
  2207.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2208.                          break;
  2209.                    }
  2210.                  break;
  2211.  
  2212.             case DID_ADD_SERVER_DESC: /* Entry field variable: "szAdd_Server_Desc" */
  2213.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  2214.                    { 
  2215.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  2216.                          break;
  2217.  
  2218.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  2219.                          break;
  2220.  
  2221.                     default: /* Default other messages                     */
  2222.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2223.                          break;
  2224.                    }
  2225.                  break;
  2226.  
  2227.             case DID_SERVER_LIST: /* List box                              */
  2228.                  {
  2229.  
  2230.                    /*****************************************************
  2231.                    *                                                    *
  2232.                    *     This section obtains from the server list the  *
  2233.                    *     entry pointed to by the end-user.  We break it *
  2234.                    *     into its two components (name and description).*
  2235.                    *     We then load these components into their       *
  2236.                    *     respective fields.                             *
  2237.                    *                                                    *
  2238.                    *     One example of when an user might point to an  *
  2239.                    *     entry is when he want to save some typing.     *
  2240.                    *                                                    *
  2241.                    *****************************************************/
  2242.                    USHORT checked;
  2243.                    USHORT sSelectIndex;
  2244.                    CHAR   szSelectText[129];
  2245.  
  2246.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  2247.                        break;
  2248.  
  2249.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  2250.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  2251.  
  2252.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  2253.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  2254.                                    MPFROMP(szSelectText));
  2255.  
  2256.                    /*****************************************************
  2257.                    *                                                    *
  2258.                    *     This section sets the UNIX format check box    *
  2259.                    *     based upon the entry selected by the end-user. *
  2260.                    *     We need to scan through the server list to     *
  2261.                    *     find the selected entry and then use the       *
  2262.                    *     server UNIX format array to set the box.       *
  2263.                    *                                                    *
  2264.                    *****************************************************/
  2265.                    for(i=0; i < 128; i++)
  2266.                    {
  2267.                      if (Selserv->szServer_List[i][0])
  2268.                      {
  2269.                        if(strnicmp(Selserv->szServer_List[i],
  2270.                                    szSelectText,
  2271.                                    strlen(szSelectText)) == 0)
  2272.                        {
  2273.                          checked = (USHORT) Selserv->ckServer_UNIX_Format[i];
  2274.                          WinSendDlgItemMsg(hWndDlg,
  2275.                                            DID_UNIX_FORMAT,
  2276.                                            BM_SETCHECK,
  2277.                                            MPFROMSHORT(checked),
  2278.                                            0L);
  2279.                          break;
  2280.                        }
  2281.                      }
  2282.                    }
  2283.  
  2284.                    result = strtok(szSelectText," ");
  2285.                    WinSetDlgItemText(hWndDlg,
  2286.                                      DID_ADD_SERVER_NAME,
  2287.                                      (PSZ) result);
  2288.  
  2289.                    result = strchr(szSelectText,'\0');
  2290.                    *result++;
  2291.  
  2292.                    WinSetDlgItemText(hWndDlg,
  2293.                                      DID_ADD_SERVER_DESC,
  2294.                                      result);
  2295.                  }
  2296.                  break;
  2297.  
  2298.            }
  2299.          break; /* End of WM_CONTROL */
  2300.    
  2301.     case WM_COMMAND:
  2302.          switch(SHORT1FROMMP(mp1))
  2303.            {
  2304.             case DID_OK: /* Button text: "Add"                             */
  2305.                   Addserv = (ADDSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_ADDSERV);
  2306.                  /* Query the string value in the entry field control and  */
  2307.                  /* move the string value to the dialog structure variable */
  2308.                  WinQueryDlgItemText(hWndDlg, DID_ADD_SERVER_NAME,
  2309.                                      sizeof(Addserv->szAdd_Server_Name),
  2310.                                      Addserv->szAdd_Server_Name);
  2311.                  if(Addserv->szAdd_Server_Name[0] == 0)
  2312.                    {
  2313.                     /* If required field is not completed inform user and  */
  2314.                     /* query what he wants to do about it by presenting a  */
  2315.                     /* message box with the push buttons "Retry" and       */
  2316.                     /* "Cancel"                                            */
  2317.                     strcpy(szWorkBuf, "Server name required.  Push retry to supply one or cancel to abort dialog.");
  2318.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  2319.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  2320.                     
  2321.                     /* If the user presses "Cancel", post a message to the */
  2322.                     /* DID_CANCEL case and break out of this case          */
  2323.                     if(i == MBID_CANCEL)
  2324.                       {
  2325.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2326.                        break;
  2327.                       }
  2328.  
  2329.                     /* If the user presses "Retry", set focus to the       */
  2330.                     /* control that needs to be completed and break out    */
  2331.                     /* of this case                                        */
  2332.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_ADD_SERVER_NAME));
  2333.                     break;
  2334.                    }
  2335.                  /* Query the string value in the entry field control and  */
  2336.                  /* move the string value to the dialog structure variable */
  2337.                  WinQueryDlgItemText(hWndDlg, DID_ADD_SERVER_DESC,
  2338.                                      sizeof(Addserv->szAdd_Server_Desc),
  2339.                                      Addserv->szAdd_Server_Desc);
  2340.  
  2341.                  if(BgmAddPrtSrv(hWndDlg,
  2342.                                  DID_ADD_SERVER_NAME,
  2343.                                  free_entry,
  2344.                                  Selserv->szServer_List,
  2345.                                  Addserv->szAdd_Server_Name,
  2346.                                  Addserv->szAdd_Server_Desc,
  2347.                                  "Server name duplication.  Push retry to change server name or push cancel to abort.")
  2348.                     == TRUE)
  2349.                  {
  2350.                    Selserv->ckServer_UNIX_Format[free_entry] =
  2351.                       (INT)(WinSendDlgItemMsg(hWndDlg,
  2352.                                               DID_UNIX_FORMAT,
  2353.                                               BM_QUERYCHECK,
  2354.                                               0L,
  2355.                                               0L));
  2356.  
  2357.                  WinDismissDlg(hWndDlg, TRUE);
  2358.                  }
  2359.                  break;
  2360.  
  2361.             case DID_CANCEL: /* Button text: "Cancel"                      */
  2362.                  /* Ignore data values entered into the dialog controls    */
  2363.                  /* and dismiss the dialog window                          */
  2364.                  WinDismissDlg(hWndDlg, FALSE);
  2365.                  break;
  2366.  
  2367.             case DID_HELP: /* Button text: "Help"                          */
  2368.                  break;
  2369.  
  2370.            }
  2371.          break; /* End of WM_COMMAND */
  2372.                                
  2373.     case WM_CLOSE:
  2374.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2375.          break; /* End of WM_CLOSE */
  2376.            
  2377.     case WM_FAILEDVALIDATE:
  2378.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  2379.          sfValidate = FALSE;
  2380.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  2381.          sfValidate = TRUE;
  2382.          return((MRESULT)TRUE);
  2383.          break; /* End of WM_FAILEDVALIDATE */
  2384.  
  2385.     default:
  2386.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2387.          break;
  2388.    }
  2389.  return FALSE;
  2390. } /* End of ADDSERVMsgProc */
  2391.  
  2392.  
  2393. /***************************************************************************/
  2394. /*                                                                         */
  2395. /* Dialog Window Procedure                                                 */
  2396. /*                                                                         */
  2397. /* This procedure is associated with the dialog box that is included in    */
  2398. /* the function name of the procedure. It provides the service routines    */
  2399. /* for the events (messages) that occur because the end user operates      */
  2400. /* one of the dialog box's buttons, entry fields, or controls.             */
  2401. /*                                                                         */
  2402. /* The SWITCH statement in the function distributes the dialog box         */
  2403. /* messages to the respective service routines, which are set apart by     */
  2404. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  2405. /* procedures must provide an appropriate service routine for their end    */
  2406. /* user initiated messages as well as for the general PM messages (like    */
  2407. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  2408. /* which there is no programmed CASE condition (no service routine),       */
  2409. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  2410. /* disposed of by PM.                                                      */
  2411. /*                                                                         */
  2412. /***************************************************************************/
  2413.  
  2414. MRESULT EXPENTRY DELSERVMsgProc(hWndDlg, message, mp1, mp2)
  2415. HWND hWndDlg;
  2416. USHORT message;
  2417. MPARAM mp1;
  2418. MPARAM mp2;
  2419. { 
  2420.  static SHORT sfValidate = TRUE;
  2421.  INT    i;
  2422.  static CHAR  szWorkBuf[90];
  2423.  static HWND  hWndParent;
  2424.  DELSERVStruct FAR *Delserv;
  2425.           
  2426.  
  2427.  static INT last_entry;      /* Number of first free entry in the server table. */
  2428.  SELSERVStruct FAR *Selserv;
  2429.  CHAR *result;
  2430.  LOADRETURNStruct FAR *Return_Values;
  2431.  
  2432.  Selserv = (SELSERVStruct FAR *)WinQueryWindowULong(hWndClient,
  2433.                                                     OFFSET_SELSERV);
  2434.  switch(message)
  2435.    {
  2436.     case WM_INITDLG:
  2437.          Delserv = (DELSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_DELSERV);
  2438.          hWndParent = (HWND)mp2;
  2439.          cwCenter(hWndDlg, (HWND)hWndParent);
  2440.  
  2441.          Return_Values = (LOADRETURNStruct FAR *)
  2442.                          BgmLoadListBox(hWndDlg,
  2443.                                         DID_SERVER_LIST,
  2444.                                         Selserv->szServer_List,
  2445.                                         "A server does not exist to delete.  The server list is empty.",
  2446.                                         FALSE);
  2447.  
  2448.          if((last_entry = Return_Values->last_entry) == -1)
  2449.          {
  2450.            break;
  2451.          }
  2452.  
  2453.          /* Initialize entry field control: szDelete_Server_Name           */
  2454.          WinSendDlgItemMsg(hWndDlg, DID_DELETE_SERVER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  2455.          break; /* End of WM_INITDLG */
  2456.    
  2457.     case WM_CONTROL:
  2458.          switch(SHORT1FROMMP(mp1))
  2459.            {
  2460.             case DID_DELETE_SERVER_NAME: /* Entry field variable: "szDelete_Server_Name" */
  2461.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  2462.                    { 
  2463.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  2464.                          break;
  2465.  
  2466.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  2467.                          {
  2468.                           /* Validate the field                            */
  2469.                           static char buffer[24];
  2470.                           WinQueryDlgItemText(hWndDlg, DID_DELETE_SERVER_NAME,
  2471.                                               sizeof(buffer), buffer);
  2472.                           if(buffer[0]==0x00)
  2473.                             break;
  2474.                           if(sfValidate && !cwAlphaValidate(buffer))
  2475.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  2476.                          }
  2477.                          break;
  2478.  
  2479.                     default: /* Default other messages                     */
  2480.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2481.                          break;
  2482.                    }
  2483.                  break;
  2484.  
  2485.             case DID_SERVER_LIST: /* List box                              */
  2486.                  {
  2487.  
  2488.                    /*****************************************************
  2489.                    *                                                    *
  2490.                    *     This section obtains from the server list the  *
  2491.                    *     entry pointed to by the end-user.  We break it *
  2492.                    *     into its two components (name and description).*
  2493.                    *     We then load these components into their       *
  2494.                    *     respective fields.                             *
  2495.                    *                                                    *
  2496.                    *     One example of when an user might point to an  *
  2497.                    *     entry is when he want to save some typing.     *
  2498.                    *                                                    *
  2499.                    *****************************************************/
  2500.                    USHORT sSelectIndex;
  2501.                    CHAR   szSelectText[129];
  2502.  
  2503.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  2504.                        break;
  2505.  
  2506.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  2507.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  2508.  
  2509.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  2510.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  2511.                                    MPFROMP(szSelectText));
  2512.  
  2513.                    result = strtok(szSelectText," ");
  2514.                    WinSetDlgItemText(hWndDlg,
  2515.                                      DID_DELETE_SERVER_NAME,
  2516.                                      (PSZ) result);
  2517.                  }
  2518.                  break;
  2519.  
  2520.            }
  2521.          break; /* End of WM_CONTROL */
  2522.    
  2523.     case WM_COMMAND:
  2524.          switch(SHORT1FROMMP(mp1))
  2525.            {
  2526.             case DID_OK: /* Button text: "Delete"                          */
  2527.                   Delserv = (DELSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_DELSERV);
  2528.                  /* Query the string value in the entry field control and  */
  2529.                  /* move the string value to the dialog structure variable */
  2530.                  WinQueryDlgItemText(hWndDlg, DID_DELETE_SERVER_NAME,
  2531.                                      sizeof(Delserv->szDelete_Server_Name),
  2532.                                      Delserv->szDelete_Server_Name);
  2533.                  if(Delserv->szDelete_Server_Name[0] == 0)
  2534.                    {
  2535.                     /* If required field is not completed inform user and  */
  2536.                     /* query what he wants to do about it by presenting a  */
  2537.                     /* message box with the push buttons "Retry" and       */
  2538.                     /* "Cancel"                                            */
  2539.                     strcpy(szWorkBuf, "Server name required.  Push retry to supply one or cancel to abort dialog.");
  2540.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  2541.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  2542.                     
  2543.                     /* If the user presses "Cancel", post a message to the */
  2544.                     /* DID_CANCEL case and break out of this case          */
  2545.                     if(i == MBID_CANCEL)
  2546.                       {
  2547.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2548.                        break;
  2549.                       }
  2550.  
  2551.                     /* If the user presses "Retry", set focus to the       */
  2552.                     /* control that needs to be completed and break out    */
  2553.                     /* of this case                                        */
  2554.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_DELETE_SERVER_NAME));
  2555.                     break;
  2556.                    }
  2557.  
  2558.                  if(BgmDeletePrtSrv(hWndDlg,
  2559.                                     DID_DELETE_SERVER_NAME,
  2560.                                     last_entry,
  2561.                                     Selserv->szServer_List,
  2562.                                     Delserv->szDelete_Server_Name,
  2563.                                     "Server name not found.  Push retry to change server name or push cancel to abort.")
  2564.                     == TRUE)
  2565.                  {
  2566.                  WinDismissDlg(hWndDlg, TRUE);
  2567.                  }
  2568.                  break;
  2569.  
  2570.             case DID_CANCEL: /* Button text: "Cancel"                      */
  2571.                  /* Ignore data values entered into the dialog controls    */
  2572.                  /* and dismiss the dialog window                          */
  2573.                  WinDismissDlg(hWndDlg, FALSE);
  2574.                  break;
  2575.  
  2576.             case DID_HELP: /* Button text: "Help"                          */
  2577.                  break;
  2578.  
  2579.            }
  2580.          break; /* End of WM_COMMAND */
  2581.                                
  2582.     case WM_CLOSE:
  2583.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2584.          break; /* End of WM_CLOSE */
  2585.            
  2586.     case WM_FAILEDVALIDATE:
  2587.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  2588.          sfValidate = FALSE;
  2589.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  2590.          sfValidate = TRUE;
  2591.          return((MRESULT)TRUE);
  2592.          break; /* End of WM_FAILEDVALIDATE */
  2593.  
  2594.     default:
  2595.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2596.          break;
  2597.    }
  2598.  return FALSE;
  2599. } /* End of DELSERVMsgProc */
  2600.  
  2601.  
  2602. /***************************************************************************/
  2603. /*                                                                         */
  2604. /* Dialog Window Procedure                                                 */
  2605. /*                                                                         */
  2606. /* This procedure is associated with the dialog box that is included in    */
  2607. /* the function name of the procedure. It provides the service routines    */
  2608. /* for the events (messages) that occur because the end user operates      */
  2609. /* one of the dialog box's buttons, entry fields, or controls.             */
  2610. /*                                                                         */
  2611. /* The SWITCH statement in the function distributes the dialog box         */
  2612. /* messages to the respective service routines, which are set apart by     */
  2613. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  2614. /* procedures must provide an appropriate service routine for their end    */
  2615. /* user initiated messages as well as for the general PM messages (like    */
  2616. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  2617. /* which there is no programmed CASE condition (no service routine),       */
  2618. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  2619. /* disposed of by PM.                                                      */
  2620. /*                                                                         */
  2621. /***************************************************************************/
  2622.  
  2623. MRESULT EXPENTRY CHNGSERVMsgProc(hWndDlg, message, mp1, mp2)
  2624. HWND hWndDlg;
  2625. USHORT message;
  2626. MPARAM mp1;
  2627. MPARAM mp2;
  2628. { 
  2629.  static SHORT sfValidate = TRUE;
  2630.  INT    i;
  2631.  static CHAR  szWorkBuf[90];
  2632.  static HWND  hWndParent;
  2633.  CHNGSERVStruct FAR *Chngserv;
  2634.           
  2635.  
  2636.  static INT Selected_Entry_Number;
  2637.  SELSERVStruct FAR *Selserv;
  2638.  CHAR *result;
  2639.  LOADRETURNStruct FAR *Return_Values;
  2640.  
  2641.  Selserv = (SELSERVStruct FAR *)WinQueryWindowULong(hWndClient,
  2642.                                                     OFFSET_SELSERV);
  2643.  switch(message)
  2644.    {
  2645.     case WM_INITDLG:
  2646.          Chngserv = (CHNGSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_CHNGSERV);
  2647.          hWndParent = (HWND)mp2;
  2648.          cwCenter(hWndDlg, (HWND)hWndParent);
  2649.  
  2650.          Selected_Entry_Number = -1;
  2651.  
  2652.          Return_Values = (LOADRETURNStruct FAR *)
  2653.                          BgmLoadListBox(hWndDlg,
  2654.                                         DID_SERVER_LIST,
  2655.                                         Selserv->szServer_List,
  2656.                                         "A server does not exist to change.  The server list is empty.",
  2657.                                         FALSE);
  2658.  
  2659.          if (Return_Values->last_entry == -1)
  2660.          {
  2661.            break;
  2662.          }
  2663.  
  2664.          /* Initialize entry field control: szChange_Server_Name           */
  2665.          WinSendDlgItemMsg(hWndDlg, DID_CHANGE_SERVER_NAME, EM_SETTEXTLIMIT, MPFROMSHORT(24), 0L);
  2666.          /* Initialize entry field control: szChange_Server_Desc           */
  2667.          WinSendDlgItemMsg(hWndDlg, DID_CHANGE_SERVER_DESC, EM_SETTEXTLIMIT, MPFROMSHORT(103), 0L);
  2668.          break; /* End of WM_INITDLG */
  2669.    
  2670.     case WM_CONTROL:
  2671.          switch(SHORT1FROMMP(mp1))
  2672.            {
  2673.             case DID_CHANGE_UNIX_FORMAT: /* Checkbox text: "Use UNIX format" */
  2674.                  {
  2675.                   USHORT checked;
  2676.  
  2677.                   /* Query check box control for current state             */
  2678.                   /* on return checked is set to:                          */
  2679.                   /*           1 if check box is in unchecked state        */
  2680.                   /*           0 if check box is in checked state          */
  2681.                   checked = !WinSendDlgItemMsg(hWndDlg, DID_CHANGE_UNIX_FORMAT,
  2682.                                                BM_QUERYCHECK, 0L, 0L );
  2683.                   /* Set checkbox control state                            */
  2684.                   WinSendDlgItemMsg(hWndDlg, DID_CHANGE_UNIX_FORMAT,
  2685.                                     BM_SETCHECK, MPFROMSHORT(checked), 0L);
  2686.                  }  
  2687.                  break;
  2688.  
  2689.             case DID_CHANGE_SERVER_NAME: /* Entry field variable: "szChange_Server_Name" */
  2690.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  2691.                    { 
  2692.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  2693.                          break;
  2694.  
  2695.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  2696.                          {
  2697.                           /* Validate the field                            */
  2698.                           static char buffer[24];
  2699.                           WinQueryDlgItemText(hWndDlg, DID_CHANGE_SERVER_NAME,
  2700.                                               sizeof(buffer), buffer);
  2701.                           if(buffer[0]==0x00)
  2702.                             break;
  2703.                           if(sfValidate && !cwAlphaValidate(buffer))
  2704.                             WinPostMsg(hWndDlg, WM_FAILEDVALIDATE, mp1, 0);
  2705.                          }
  2706.                          break;
  2707.  
  2708.                     default: /* Default other messages                     */
  2709.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2710.                          break;
  2711.                    }
  2712.                  break;
  2713.  
  2714.             case DID_CHANGE_SERVER_DESC: /* Entry field variable: "szChange_Server_Desc" */
  2715.                  switch(SHORT2FROMMP(mp1)) /* switch on Notification Code  */
  2716.                    { 
  2717.                     case EN_SETFOCUS:/* Entry field is receiving the focus */
  2718.                          break;
  2719.  
  2720.                     case EN_KILLFOCUS: /* Entry field is losing the focus  */
  2721.                          break;
  2722.  
  2723.                     default: /* Default other messages                     */
  2724.                          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2725.                          break;
  2726.                    }
  2727.                  break;
  2728.  
  2729.             case DID_SERVER_LIST: /* List box                              */
  2730.                  {
  2731.  
  2732.                    /*****************************************************
  2733.                    *                                                    *
  2734.                    *     This section obtains from the server list the  *
  2735.                    *     entry pointed to by the end-user.  We break it *
  2736.                    *     into its two components (name and description).*
  2737.                    *     We then load these components into their       *
  2738.                    *     respective fields.                             *
  2739.                    *                                                    *
  2740.                    *     One example of when an user might point to an  *
  2741.                    *     entry is when he want to save some typing.     *
  2742.                    *                                                    *
  2743.                    *****************************************************/
  2744.                    USHORT checked;
  2745.                    USHORT sSelectIndex;
  2746.                    CHAR   szSelectText[129];
  2747.  
  2748.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  2749.                        break;
  2750.  
  2751.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  2752.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  2753.  
  2754.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  2755.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  2756.                                    MPFROMP(szSelectText));
  2757.  
  2758.                    /*****************************************************
  2759.                    *                                                    *
  2760.                    *     This section performs two functions:           *
  2761.                    *                                                    *
  2762.                    *     1)  Sets the UNIX format check box based upon  *
  2763.                    *         the entry selected by the end-user.        *
  2764.                    *         We need to scan through the server list to *
  2765.                    *         find the selected entry and then use the   *
  2766.                    *         server UNIX format array to set the box.   *
  2767.                    *                                                    *
  2768.                    *     2)  Finds the server entry the user just       *
  2769.                    *         selected.  The change key (DID_OK) code    *
  2770.                    *         uses this number to indicate which entry   *
  2771.                    *         the user is changing.  This approach       *
  2772.                    *         permits the end-user to change both the    *
  2773.                    *         name and description instead of just the   *
  2774.                    *         name.                                      *
  2775.                    *                                                    *
  2776.                    *****************************************************/
  2777.                    for(i=0; i < 128; i++)
  2778.                    {
  2779.                      if (Selserv->szServer_List[i][0])
  2780.                      {
  2781.                        if(strnicmp(Selserv->szServer_List[i],
  2782.                                    szSelectText,
  2783.                                    strlen(szSelectText)) == 0)
  2784.                        {
  2785.                          Selected_Entry_Number = i;
  2786.                          checked = (USHORT) Selserv->ckServer_UNIX_Format[i];
  2787.                          WinSendDlgItemMsg(hWndDlg,
  2788.                                            DID_UNIX_FORMAT,
  2789.                                            BM_SETCHECK,
  2790.                                            MPFROMSHORT(checked),
  2791.                                            0L);
  2792.                          break;
  2793.                        }
  2794.                      }
  2795.                    }
  2796.  
  2797.                    result = strtok(szSelectText," ");
  2798.                    WinSetDlgItemText(hWndDlg,
  2799.                                      DID_CHANGE_SERVER_NAME,
  2800.                                      (PSZ) result);
  2801.  
  2802.                    result = strchr(szSelectText,'\0');
  2803.                    *result++;
  2804.  
  2805.                    WinSetDlgItemText(hWndDlg,
  2806.                                      DID_CHANGE_SERVER_DESC,
  2807.                                      result);
  2808.                  }
  2809.                  break;
  2810.  
  2811.            }
  2812.          break; /* End of WM_CONTROL */
  2813.    
  2814.     case WM_COMMAND:
  2815.          switch(SHORT1FROMMP(mp1))
  2816.            {
  2817.             case DID_OK: /* Button text: "Change"                          */
  2818.                   Chngserv = (CHNGSERVStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_CHNGSERV);
  2819.                  /* Query the string value in the entry field control and  */
  2820.                  /* move the string value to the dialog structure variable */
  2821.                  WinQueryDlgItemText(hWndDlg, DID_CHANGE_SERVER_NAME,
  2822.                                      sizeof(Chngserv->szChange_Server_Name),
  2823.                                      Chngserv->szChange_Server_Name);
  2824.                  if(Chngserv->szChange_Server_Name[0] == 0)
  2825.                    {
  2826.                     /* If required field is not completed inform user and  */
  2827.                     /* query what he wants to do about it by presenting a  */
  2828.                     /* message box with the push buttons "Retry" and       */
  2829.                     /* "Cancel"                                            */
  2830.                     strcpy(szWorkBuf, "Server name required.  Push retry to supply one or cancel to abort dialog.");
  2831.                     i = WinMessageBox(HWND_DESKTOP, hWndDlg, szWorkBuf,
  2832.                                       szAppName, 0, MB_RETRYCANCEL|MB_ICONEXCLAMATION);
  2833.                     
  2834.                     /* If the user presses "Cancel", post a message to the */
  2835.                     /* DID_CANCEL case and break out of this case          */
  2836.                     if(i == MBID_CANCEL)
  2837.                       {
  2838.                        WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2839.                        break;
  2840.                       }
  2841.  
  2842.                     /* If the user presses "Retry", set focus to the       */
  2843.                     /* control that needs to be completed and break out    */
  2844.                     /* of this case                                        */
  2845.                     WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, DID_CHANGE_SERVER_NAME));
  2846.                     break;
  2847.                    }
  2848.                  /* Query the string value in the entry field control and  */
  2849.                  /* move the string value to the dialog structure variable */
  2850.                  WinQueryDlgItemText(hWndDlg, DID_CHANGE_SERVER_DESC,
  2851.                                      sizeof(Chngserv->szChange_Server_Desc),
  2852.                                      Chngserv->szChange_Server_Desc);
  2853.  
  2854.                  if((i = BgmChangePrtSrv(hWndDlg,
  2855.                                          DID_CHANGE_SERVER_NAME,
  2856.                                          Selected_Entry_Number,
  2857.                                          Selserv->szServer_List,
  2858.                                          Chngserv->szChange_Server_Name,
  2859.                                          Chngserv->szChange_Server_Desc,
  2860.                                          "Server name not found.  Push retry to change server name or push cancel to abort."))
  2861.                     != -1)
  2862.                  {
  2863.                    Selserv->ckServer_UNIX_Format[i] =
  2864.                       (INT)(WinSendDlgItemMsg(hWndDlg,
  2865.                                               DID_UNIX_FORMAT,
  2866.                                               BM_QUERYCHECK,
  2867.                                               0L,
  2868.                                               0L));
  2869.                  WinDismissDlg(hWndDlg, TRUE);
  2870.                  }
  2871.                  break;
  2872.  
  2873.             case DID_CANCEL: /* Button text: "Cancel"                      */
  2874.                  /* Ignore data values entered into the dialog controls    */
  2875.                  /* and dismiss the dialog window                          */
  2876.                  WinDismissDlg(hWndDlg, FALSE);
  2877.                  break;
  2878.  
  2879.             case DID_HELP: /* Button text: "Help"                          */
  2880.                  break;
  2881.  
  2882.            }
  2883.          break; /* End of WM_COMMAND */
  2884.                                
  2885.     case WM_CLOSE:
  2886.          WinPostMsg(hWndDlg, WM_COMMAND, MPFROMSHORT(DID_CANCEL), 0L);
  2887.          break; /* End of WM_CLOSE */
  2888.            
  2889.     case WM_FAILEDVALIDATE:
  2890.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  2891.          sfValidate = FALSE;
  2892.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  2893.          sfValidate = TRUE;
  2894.          return((MRESULT)TRUE);
  2895.          break; /* End of WM_FAILEDVALIDATE */
  2896.  
  2897.     default:
  2898.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2899.          break;
  2900.    }
  2901.  return FALSE;
  2902. } /* End of CHNGSERVMsgProc */
  2903.  
  2904.  
  2905. /***************************************************************************/
  2906. /*                                                                         */
  2907. /* Dialog Window Procedure                                                 */
  2908. /*                                                                         */
  2909. /* This procedure is associated with the dialog box that is included in    */
  2910. /* the function name of the procedure. It provides the service routines    */
  2911. /* for the events (messages) that occur because the end user operates      */
  2912. /* one of the dialog box's buttons, entry fields, or controls.             */
  2913. /*                                                                         */
  2914. /* The SWITCH statement in the function distributes the dialog box         */
  2915. /* messages to the respective service routines, which are set apart by     */
  2916. /* the CASE clauses. Like any other PM window, the Dialog Window           */
  2917. /* procedures must provide an appropriate service routine for their end    */
  2918. /* user initiated messages as well as for the general PM messages (like    */
  2919. /* the WM_CLOSE message). If a message is sent to this procedure for       */
  2920. /* which there is no programmed CASE condition (no service routine),       */
  2921. /* the message is defaulted to the WinDefDlgProc function, where it is     */
  2922. /* disposed of by PM.                                                      */
  2923. /*                                                                         */
  2924. /***************************************************************************/
  2925.  
  2926. MRESULT EXPENTRY QUERYPRTMsgProc(hWndDlg, message, mp1, mp2)
  2927. HWND hWndDlg;
  2928. USHORT message;
  2929. MPARAM mp1;
  2930. MPARAM mp2;
  2931. { 
  2932.  static SHORT sfValidate = TRUE;
  2933.  INT    i;
  2934.  static HWND  hWndParent;
  2935.  QUERYPRTStruct FAR *Queryprt;
  2936.           
  2937.  switch(message)
  2938.    {
  2939.     case WM_INITDLG:
  2940.          Queryprt = (QUERYPRTStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_QUERYPRT);
  2941.          hWndParent = (HWND)mp2;
  2942.          cwCenter(hWndDlg, (HWND)hWndParent);
  2943.          for (i=0; i < 128; i++)
  2944.             if (Queryprt->szQuery_Remote_Printer_List[i][0])
  2945.                WinSendDlgItemMsg(hWndDlg, DID_Q_R_P_LIST_BOX, LM_INSERTITEM,
  2946.                          MPFROM2SHORT(LIT_SORTASCENDING, 0),
  2947.                          MPFROMP(Queryprt->szQuery_Remote_Printer_List[i]));
  2948.          break; /* End of WM_INITDLG */
  2949.    
  2950.     case WM_CONTROL:
  2951.          switch(SHORT1FROMMP(mp1))
  2952.            {
  2953.             case DID_Q_R_P_LIST_BOX: /* List box                           */
  2954.                  {
  2955.                    USHORT sSelectIndex;
  2956.                    CHAR   szSelectText[80];   
  2957.  
  2958.                    if (SHORT2FROMMP(mp1) != LN_SELECT)
  2959.                        break;
  2960.  
  2961.                    sSelectIndex = (USHORT)WinSendDlgItemMsg(hWndDlg,
  2962.                           SHORT1FROMMP(mp1), LM_QUERYSELECTION, 0L, 0L);
  2963.  
  2964.                    WinSendDlgItemMsg(hWndDlg, SHORT1FROMMP(mp1), LM_QUERYITEMTEXT,
  2965.                                    MPFROM2SHORT(sSelectIndex, sizeof(szSelectText)),
  2966.                                    MPFROMP(szSelectText));
  2967.                  }
  2968.                  break;
  2969.  
  2970.            }
  2971.          break; /* End of WM_CONTROL */
  2972.    
  2973.     case WM_COMMAND:
  2974.          switch(SHORT1FROMMP(mp1))
  2975.            {
  2976.             case DID_OK: /* Button text: "Continue"                        */
  2977.                   Queryprt = (QUERYPRTStruct FAR *)WinQueryWindowULong(hWndClient, OFFSET_QUERYPRT);
  2978.                  WinDestroyWindow(hWndDlg);
  2979.                  hWndQUERYPRT = 0;
  2980.                  break;
  2981.  
  2982.            }
  2983.          break; /* End of WM_COMMAND */
  2984.                                
  2985.     case WM_CLOSE:
  2986.          WinDismissDlg(hWndDlg, FALSE);
  2987.          break; /* End of WM_CLOSE */
  2988.            
  2989.     case WM_FAILEDVALIDATE:
  2990.          WinAlarm(HWND_DESKTOP, WA_ERROR);
  2991.          sfValidate = FALSE;
  2992.          WinSetFocus(HWND_DESKTOP, WinWindowFromID(hWndDlg, SHORT1FROMMP(mp1)));
  2993.          sfValidate = TRUE;
  2994.          return((MRESULT)TRUE);
  2995.          break; /* End of WM_FAILEDVALIDATE */
  2996.  
  2997.     default:
  2998.          return(WinDefDlgProc(hWndDlg, message, mp1, mp2));
  2999.          break;
  3000.    }
  3001.  return FALSE;
  3002. } /* End of QUERYPRTMsgProc */
  3003.  
  3004.