WPCaG  
                 0   (                `/  Y       3       =?   	      F   	      F        F        F   !   `   F  	)      ]G   U        	%            /     "   {                                 #                                                                                                                                                                               < 
  9 p` (      X< 6X  9  ` +   C o u r i e r         "  ? x x x  X    Xx   A p p l e   L a s e r W r i t e r   I I f   '3   pet   	 ^-(4  APLW2F.PRS   hhhhhhhh PUBD/DOC1                                                                                                                                          H    lSJ    (                    $          M e s s a g e                                                                                                                                    A                                                                 d                                                                  d                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                4                                                                  4                                                                                                                                                                                                      @                                                                  @                                                                                                                                                                                                          C k D a t a F o r m                                             <    N o d o c s                                                         M a i n M e n u                                                 6                                                                                                                                    	                                                                  &                                                                  	                                                                  	2                                                                  	                                                                  	L                                                                  	\                                                                  	                                                                  	v                                                                  	x                                                                  	                                                                  	x                                                                  	                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                                    R u n M e r g e                                                 \                                                                                                                                                                                                      	*                                                                                                                                    	                                                                  	                                                                  	H                                                                  	                                                                  	                                                                  	:                                                                  	                                                                  	                                                                  	X    M e r g e R u n                                                                                                                   N&                                                                  <                                                                  	+                                                                  &                                                                  	<                                                                  	F1                                                                  	+                                                                  21                                                                  21                                                                  	6                                                                  	d1                                                                  6                                                                  6                                                                  	6                                                                  	<    M e r g e S o r t                                               <                                                                  <                                                                  =                                                                  ,=                                                                  B                                                                  P                                                                  	&G                                                                  B                                                                  	nP                                                                  	K                                                                  	DG                                                                  	K                                                                  	nP    Q u i c k L i s t                                               P      !                                                            >S                                                                  ~S     !                                                            S     !                                                            0u     !                                                            	f[     !                                                            bW     !                                                            	u     !                                                            	e     !                                                            	[     	!                                                            	j     !                                                            	e     !                                                            	Xo     
!                                                            	 j     !                                                            	Xo     
!                                                            	u    D i r e c t o r y L i s t                                       @u     !                                                            v     !                                                            v     !                                                            x     !                                                            y     !                                                            .y     !                                                            Ҥ     !                                                            {     !                                                            }     !                                                            	>     !                                                            :     !                                                            	     !                                                            	     !                                                            	\     !                                                            	2     !                                                            	     !                                                                 !                                                                 !!                                                            	|      !                                                            	P     #!                                                            	Ҟ     "!                                                            	     $!                                                            	Ҟ     %!                                                            	    D i r e c t o r y                                                    (!                                                                 '!                                                            N     )!                                                            z     *!                                                            D     -!                                                            	¯     ,!                                                            «     +!                                                            	0     /!                                                            	     .!                                                            	     1!                                                            	|     0!                                                            	     2!                                                            	|     3!                                                            	0    S u c c e s s                                                   T                                                                          M e s s a g e    7!                                                            	     6!                                                            ^     5!                                                            	*     9!                                                            	4     8!                                                            	      ;!                                                            	$     :!                                                            	X     =!                                                            	z     <!                                                            	H     ?!                                                            	     >!                                                            	     A!                                                            	     @!                                                            	     C!                                                            	     B!                                                            	     E!                                                            	l     D!                                                            	     G!                                                            	     F!                                                            	     I!                                                            	     H!                                                            	     K!                                                            	     J!                                                            	     M!                                                            	*     L!                                                            	                                                                    4                     `      5{            "            +      1      "4      8      b      a|      a     8      ";      ?      ^      "a       f      	a      a    %            %      a7      a=     O      l                             $                        S             
/      -]      p            
      -                  
5      -c      v            =      M      ]      "`       d      	|                  
-      	      -Y
            @      	@5    AJ      
AU     
A      
A     
A      
A     
A      
A     
B<       
      ,1      /      KJ      KR          	9      	W      v      	      q      q              	            L D      	v      :/      v            	             
            )      G            4            +      -8            71       7      Jj      Js                       	            h      	             =       	s                     	/!             !      	!             k"      "      	"      -"      #      7%        &      '&      } .&      	c&      	,      } .&      I2      } L2      G2      2      	 3      } .&      &9      } )9      G9      9      :9      } *:      ?      	?      -?      @      ,@      G@      4A      } A      KC      KC    7D       D      ?D      } FD      	{D      	I      } FD      :O      } WO      T      	T      -T      U      W       X      ]X      7X       X      /Z      } 6Z      	kZ      	_      } 6Z      	[g      } 6Z      	m      } 6Z      :r      } s      x      	x      -x      y      Gy      \y      \y   
 $y      K z      Kz    gz      z      ){      2|      s|      |      7|       |      }      }      ~      ^      } e      	      	      } e      	      } e      ۊ      \      ٍ      	      } e      	\      } e      :      }       ?      	U      -^            K<      KD    q                  7             F      } M      	      	@      } M      	      } M      :<      }             	      -
            -+      )      	      	      	      	      	}      	^      	S      	      	      	      	      	      	1            	            W  o  {        +  1  V  b  h  |  8  ^          7  O  l                   /  ]  p            5  c  v            =  M  ]  |          	  
  6
  Y
      J        <  C   
  
  :
  U
  o
  
  
  
  
  
    1  D      /  J  c        9    {    W             Z      D  v    #    /      #              )  G            +  8      1  j            =   s      /!  !  !  k"  "  "  "  #  #  #  #  #  $  *$  G$  e$  {$  $  $  $  $  %  C%  c%  %  %  '&  c&  &  *  ]*  *  *  +  ,  K,  /  )0  i0  0  0  !1  2  I2  2  2   3  <3  6  7  F7  7  7  7  8  &9  9  9  9  :  =  =  <>  >  >  ?  ?  ?  ?  @  @  @  A  zA  A  A  A  A  A  B  7B  MB  cB  |B  B  B  B  B  C  !C  C  C  D  ?D  {D  D  8H  H  H  I  &J  M  M  +N  O  EO  R  RS  S  S  T  T  T  U  	V  +V  MV  {V  V  V  V  W  =W  UW  W   X   X  =X  ]X  oX  X  X  X  BY  Y  Y  Z  /Z  kZ  Z  (^  ^  ^  _  _  E`  `  a  ta  a  
b  e  5f  {f  [g  g  k  k  k  2l  m  Om  p  q  q  r  r  v  %w  iw  w  x  x  x  y  y  y  y   z  z  /z  Ez  gz  z  z  z  z  {  ){  ;{  X{  v{  {  {  2|  S|  s|  |  |  |  |  }  4}  h}  }  }  }  !~  U~  ~  ~  ~    5  ^      w        =  Έ    ^      ۊ     r  ċ    \      A    ٍ    `    8    ǒ      h    ?  |  \      j          ۢ    b  ?  U  ^    <  U  k        ٥      *  M  i            q      ϧ        F      K  ݬ  '  @            W  a      D  <  u              
        +        $          }    ^  l  S  a                      1  J      A  HD     t #| x         " B D O ??=K ' 	            
 
    !    W    //*********************************************////     NAME:          WPCHMG03.WPM   	 @    %
    
  //        	 X   //     PURPOSE:     CoachonMerge   	     ////*********************************************  //RevisionHistory//// Global(ScrnMode;MsgAdj;DefTitle;CancelMsg;Listnum;AreaHgt)Global(HotElement;SaveScrn;StndAlone;formfile)DefTitle="Coach"     //Maintitlename   	 
   ScrnMode=?ScreenHigh24CancelMsg=1Use("wpchlibr.wpm")         h           //Sharedlibraryfile   	 (

   ColorScheme()If(NOTExists(StndAlone))     ScreenSetup()EndifIf(NOTExists(Formfile))     Formfile=""EndifMsgAdj=DlgMessage()Error(Off!)	   	 0   //*********************************************////     MAINPROGRAM:Coach   	 @   ////*********************************************If(NOTExists(StndAlone))     If(NOT(?DocBlank))         `	 Error(On!)         `	 ONERROR(Nodocs)        	 
@            `	 FileNew         `	 ONERROR()         `	 Error(Off!)     Else         `	 ClearDoc()     EndifEndifCancel(Off!)OnCancelCall(CancelCoach)Call(CkDataForm)If(Result=2)     Discard(Result)     If(Formfile="table")         `	 Chain("wpch_mgt.wpm")         `	 Return     Endif     If(Formfile="letter")         `	 Chain("wpch_mgl.wpm")         `	 Return     Endif     If(Formfile="labels")         `	 Chain("wpch_mg0.wpm")         `	 Return     Endif     Message(&tbox;5000)     Result=MessageBox("Coach";&tbox;1)     QuitCoach()EndifMessage(&tbox;1000)     //ChooseToolsmenu        	 !%   Call(MainMenu)Call(RunMerge)If(Not(?DocBlank))     Call(Success)EndifRestoreStates()PosPageTopReturn//*********************************************//     ENDMAINPROGRAM   	 h)$/   //*********************************************	   	 0*%0   //*********************************************////     SUBROUTINE:CkDataForm   	 @   ////*********************************************Label(CkDataForm)     Message(&tbox;800)     Result=Messagebox("Coach";&tbox;3)Return	   	 
@   //*********************************************////     SUBROUTINE:Nodocs   	 @   ////*********************************************Label(Nodocs)DlgCreate(novar;"Coach";DlgNoCancel!;;;39;9)DlgControl(ctrllabel!;;"Coachneedsatleastoneavailable";;2;2)DlgControl(ctrllabel!;;"documentwindowtorun.Exitone";;2;3)DlgControl(ctrllabel!;;"ormoreofyourdocuments,thenrun";;2;4)DlgControl(ctrllabel!;;"Coachagain.";;2;5)DlgEndQuitCoach()	   	 (

   //*********************************************////     SUBROUTINE:MainMenu   	 @   ////*********************************************Label(MainMenu)     ToolsMenu(&valid)     allow={1618;}     exallow={0;}     accel={101;}     exaccel={1;}     subval={1617;1618;}     subacl={114;}     exsubacl={0;}     subs={1616;}     funkey={8116;}     Repeat     hbox1={     "Choose>  r [BoldOn]?
   
 Tools.";   	 H
            `	      "";}     hbox2={          "Choose>  r [BoldOn]?
   
 Merge.";   	             `	           "";}     hbox3={     "Choose>  r [BoldOn]?
   
 Run.";   	 h            `	      ""}     DisplayRewrite     Display(On!)     Result=PostIt(DefTitle;&tbox;0;12;0;2;0)     MenuActive=0         `	      Show=HotSpot(0;0;62;0;529;&funkey;1)         `	 SWITCH(Show)         `	      CaseOf1:    h      //Showmenu   	 .~            `	           sbox={"Choose>  r [BoldOn]?
   
 Run.";   	 F            `	               h "";}         `	           Result=PostIt(DefTitle;&tbox;0;12;0;3;0)         `	           ShowMenu("Coach";&sbox;59;1ScrnMode;4;3;2;1)         `	                    `	      CaseOf1592:          //ClickonTools   	  <$            `	           PosLineDown %
    
           `	      CaseOf529:          //Alt+T   	 $\(            `	           Result=PostIt(DefTitle;&tbox;0;12;0;3;0)         `	           PullDownDlg         `	           Type("t")         `	           MenuActive=8116         `	      CaseOf8116:          //[Shft+F9]   	 ($.            `	           DisplayRewrite         `	           MergeSortDlg         `	      CaseOf8085:          //Alt+=   	 +,'2            `	           sbox={1;}         `	           Result=PostIt(DefTitle;&tbox;0;12;0;3;0)   	 l-(4            `	           MenuActive=MenuBarControl("Coach";&hbox1;         `	           &sbox;5;3ScrnMode;116;&funkey)         `	      DEFAULT:    h      //Default   	 X            `	           sbox={1;}         `	           PosLineDown         `	              MenuActive=MenuBarControl("Coach";&hbox1;&sbox;5;3   ScrnMode;116;&funkey)%
     
          `	 ENDSWITCH         `	 If(MenuActive<>1)         `	      If(Show<>8116andMenuActive<>8116)       @     @     @     @     @     @     @       	 H
        	 H
      	 H
    Result=MenuControl(&hbox1;&hbox2;&hbox3;         `	           &valid;&allow;&exallow;&accel;&exaccel;         `	           &subval;&subacl;&exsubacl;&subs;&funkey)         `	           MenuActive=Result         `	      Endif         `	 Endif         `	 If(MenuActive=1)         `	      Result=PostIt(DefTitle;&tbox;0;12;0;2;0)         `	 Endif     Until(MenuActive<>1)     CancelMenus()     DisplayRewrite     MergeRunDlgReturn	   	  P   //*********************************************////     SUBROUTINE:RunMerge   	 @   ////*********************************************Label(RunMerge)     SaveScrn=0         `	 While(?Dialog<>1)         `	      DlgInput(On!)         `	      DisplayRewrite         `	      SWITCH(?Dialog)         `	      CaseOf50:              p //MergingMenu   	 (

            `	           Call(MergeRun)         `	      CaseOf304:              p //MergeSort   	 H
            `	           Call(MergeSort)         `	      CaseOf141:              p //QuickListDlg   	 h            `	           Call(QuickList)         `	      CaseOf181:              p //DirectoryList   	 8            `	           Call(DirectoryList)         `	      CaseOf223:     //EnterDirectorytoDataFile   	 X            `	           Call(Directory)         `	      ENDSWITCH         `	 EndWhileReturn	   	  X#   //*********************************************////     SUBROUTINE:MergeRunDlg=50   	 @   ////*********************************************Label(MergeRun)     DlgId=50     Up_Down=1     PostIt_Title=DefTitle     PostIt_xpos=1     PostIt_ypos=16     PostIt_Msgtype=1     HlpTitle=DefTitle     ResScrn=1     RetCtrl=1     x1={9;9;9;29;55;}     x2={71;71;26;45;61;}     y1={2;4;13;13;13;}     y2={2;4;13;13;13;}     hotkey={49;50;8156;8155;8182;}     hotpnt={0;0;1;1;1;}     helpmsg={"SelectFormFile,DataFileorMerge.";   	 h            `	      "";}     SaveScrn=0     While(?Dialog=50)         `	 SWITCH(?DialogControl)         `	      CaseOf0:         `	           info={     0;   	 f            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      5;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;50;102;100;}         `	           aclpnt={0;0;0;0;}         `	           Message(&tbox;1042)         `	           Result=ButtonControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	           HotElement=0              `	      CaseOf509:         `	           info={     509;   	 +V&1            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;   	 ^-(4            `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={8156;8155;}         `	           aclpnt={1;1;}         `	           HotElement=1         `	           Message(&tbox;1041)         `	           Form=1         `	           Result=WinEdControl(&info;&x1;&x2;         `	           &y1;&y2;&hotkey;&hotpnt;         `	           &accel;&aclpnt;&tbox;&helpmsg)         `	           HotElement=0         `	           If(?DialogControl=Info[1])         `	               h TAB         `	           Endif         `	      CaseOf510:         `	           info={     510;   	 P            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={8156;8155;}         `	           aclpnt={1;1;}         `	           HotElement=2         `	           Message(&tbox;1040)         `	           Form=0         `	           Result=WinEdControl(&info;&x1;&x2;         `	           &y1;&y2;&hotkey;&hotpnt;         `	           &accel;&aclpnt;&tbox;&helpmsg)         `	           HotElement=0         `	           If(?DialogControl=Info[1])         `	               h TAB         `	           Endif         `	      DEFAULT:         `	           info={     ?DialogControl;   	 (#.            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      5;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;   	 .h)5            `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;50;100;102;}         `	           aclpnt={0;0;0;0}         `	           allow={0;1;509;510}         `	           Message(&tbox;1042)         `	           Result=InvalidControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg;&allow)         `	           HotElement=0         `	 ENDSWITCH     EndWhileReturn	   	 
   //*********************************************////     SUBROUTINE:MergeSortDlg=304   	 @   ////*********************************************Label(MergeSort)     Repeat         `	 Tab     Until(?DialogControl=163)         `	           //DECLAREVARIABLES     DlgId=304     Up_Down=1     PostIt_Title="Coach"     PostIt_xpos=28     PostIt_ypos=2     PostIt_Msgtype=1     HlpTitle=DefTitle     ResScrn=1     RetCtrl=0     x1={30;41;}     x2={40;47;}     y1={10;14;}     y2={10;14;}     hotkey={49;8182;}     hotpnt={1;1;}     Message(&tbox;1010)     helpmsg={     "Choose>  r [BoldOn]?
   
 Merge.";   	             `	      "";         `	 }     Display(On!)     SaveScrn=0     While(?Dialog=DlgId)         `	 SWITCH(?DialogControl)         `	      CaseOf0:         `	           info={     0;   	 !%            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;109;         `	               h }         `	           aclpnt={1;1;}         `	           Result=ButtonControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;   	 ^-(4            `	           &helpmsg)         `	      CaseOf163:         `	           info={     163;   	 X            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;109;}         `	           aclpnt={1;1;}         `	           Result=ButtonControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	      DEFAULT:         `	           info={     ?DialogControl;   	 h            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;109;         `	               h }         `	           aclpnt={1;1;}         `	           allow={0;163;}         `	           Result=InvalidControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg;&allow)         `	 ENDSWITCH     EndWhile        	 #@(   Return	   	 $ )   //*********************************************////     SUBROUTINE:QuickListDlg=141   	 @   ////*********************************************Label(QuickList)         `	 //DECLAREVARIABLES         `	 DlgId=141         `	 Up_Down=1         `	 PostIt_Title=DefTitle         `	 PostIt_xpos=5         `	 PostIt_ypos=20         `	 PostIt_Msgtype=1         `	 HlpTitle=DefTitle         `	 ResScrn=1         `	 RetCtrl=1     helpmsg={     "Highlightafilename.";   	 P            `	           "";}     If(Form)         `	 Message(&tbox;1060)     Else         `	 Message(&tbox;1061)     Endif     SaveScrn=0     While(?Dialog=141)         `	 x1     ={8;54;64;}   	 F            `	 x2     ={49;70;70;}   	              `	 y1     ={6;6;20;}   	 !            `	 y2     ={19;11;20;}   	 N"            `	 hotkey={768;8182;8182;}         `	 hotpnt={0;0;1;}         `	 SWITCH(?DialogControl)         `	      CaseOf0:         `	           info={     0;   	 $ )            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={     1;}   	 ^-(4            `	           aclpnt={0;}         `	           Result=ButtonControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	      CaseOf2248:         `	           x1    h ={8;64;54;54;50;}   	 `	            `	           x2    h ={49;70;62;70;63;}   	 (
x            `	           y1    h ={6;20;6;10;11;}   	 
@            `	           y2    h ={19;20;6;10;11;}   	 	            `	           hotkey={768;8182;49;53;110;}         `	           hotpnt={2;1;1;1;0;}         `	           info={     2248;   	 (

            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      2;         `	               h }         `	           accel={     49;115;53;117;110;   	 p            `	               h }         `	           aclpnt={1;1;1;1;0;}         `	           Result=LstBxControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	      CaseOf2257:         `	           info={     2257;   	               `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={     1;   	 H&!+            `	               h }         `	           aclpnt={0;}         `	           HotElement=1         `	           Result=WinEdControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	      CaseOf2253:         `	           info={     2253;   	 P-(4            `	               h      DlgId;   	 .h)5            `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={     49;115;53;117;110;   	 	            `	               h }         `	           aclpnt={1;1;1;1;0;}         `	           Result=ButtonControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	      DEFAULT:         `	           info={     ?DialogControl;   	 H
            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={     49;50;102;108;   	             `	               h }         `	           aclpnt={0;0;0;0;}         `	           allow={0;2248;2257;2253;}         `	           Result=InvalidControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg;&allow)         `	      ENDSWITCH         `	 EndWhile     Return	   	 (#x'   //*********************************************////     SUBROUTINE:DirectoryListDlg=181   	 @   ////*********************************************Label(DirectoryList)     Tab     ShowCode(SaveScreen!)     BackTab     Display(On!)     DlgId=181     Up_Down=1     PostIt_Title=DefTitle     If(Form)         `	 PostIt_xpos=20         `	 PostIt_ypos=18     Else         `	 PostIt_xpos=20         `	 PostIt_ypos=20     Endif     PostIt_Msgtype=1     HlpTitle=DefTitle     ResScrn=1     RetCtrl=1     helpmsg={"Highlightafilename.";   	 p            `	      "";}        	 F        If(Form)         `	 Message(&tbox;1060)     Else         `	 Message(&tbox;1061)     Endif     SaveScrn=0     While(?Dialog=181)         `	 If(Form)         `	      x1={26;27;60;}         `	      x2={29;42;66;}         `	      y1={4;6;16;}         `	      y2={4;14;16;}         `	 Else         `	      x1={26;27;60;}         `	      x2={29;42;66;}         `	      y1={6;8;18;}         `	      y2={6;16;18;}         `	 Endif         `	 hotkey={768;768;8182;}         `	 hotpnt={0;2;1;}         `	 SWITCH(?DialogControl)         `	      CaseOf0:         `	           info={     0;   	 ,'3            `	               h      DlgId;   	 ^-(4            `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	               h accel={1;}         `	               h aclpnt={0;}         `	               h Result=ButtonControl(&info;&x1;&x2;         `	               h &y1;&y2;&hotkey;&hotpnt;         `	               h &accel;&aclpnt;&tbox;&helpmsg)         `	      CaseOf272:         `	           info={     272;   	 0            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	               h accel={1;}         `	               h aclpnt={0;}         `	               h HotElement=1         `	               h Result=WinEdControl(&info;&x1;&x2;         `	               h &y1;&y2;&hotkey;&hotpnt;         `	               h &accel;&aclpnt;&tbox;&helpmsg)         `	      CaseOf270:         `	           If(Form)         `	               h x1={26;27;60;47;47;}         `	               h x2={29;42;66;55;60;}         `	               h y1={4;6;16;8;12;}         `	               h y2={4;14;16;8;12;}         `	           Else         `	               h x1={26;27;60;47;47;}         `	               h x2={29;42;66;55;60;}         `	               h y1={6;8;18;10;14;}         `	               h y2={6;16;18;10;14;}         `	           Endif         `	           hotkey={768;768;8182;49;110;}         `	           hotpnt={1;2;1;1;1;}         `	           info={     270;   	 *H&1            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;   	 .h)5            `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      2;         `	               h }         `	           accel={49;115;52;117;110;}         `	           aclpnt={1;1;1;1;0;}         `	           Result=LstBxControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;         `	           &aclpnt;&tbox;&helpmsg)         `	      CaseOf273:         `	           info={     273;   	 (

            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={     1;   	 p            `	               h }         `	           aclpnt={0;}         `	           HotElement=1         `	           Result=WinEdControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;         `	           &tbox;&helpmsg)         `	      CaseOf2933:         `	           info={     2933;   	 x!            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;115;52;117;110;}         `	           aclpnt={1;1;1;1;0;}         `	           Result=ButtonControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg)         `	               `	      DEFAULT:         `	           info={     ?DialogControl;   	 ,'3            `	               h      DlgId;         `	               h      Up_Down;   	 .h)5            `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={49;115;52;117;110;}         `	           aclpnt={1;1;1;1;0;}         `	           allow={0;272;270;}         `	           Result=InvalidControl(&info;&x1;&x2;&y1;&y2;         `	           &hotkey;&hotpnt;&accel;&aclpnt;&tbox;         `	           &helpmsg;&allow)         `	 ENDSWITCH     EndWhileReturn	   	 H
   //*********************************************////     SUBROUTINE:DirectoryDlg=223   	 @   ////*********************************************Label(Directory)     Display(On!)     DlgId=223     Up_Down=1     PostIt_Title=DefTitle     PostIt_xpos=10     PostIt_ypos=17     PostIt_Msgtype=1     HlpTitle=DefTitle     ResScrn=1     RetCtrl=1          x1={14;45;55;}     x2={63;52;62;}     y1={12;14;14;}     y2={12;14;14;}     hotkey={100;8182;8182;}     hotpnt={1;1;1;}     helpmsg={"Enteradirectoryname.";   	             `	      "";}     If(Form)         `	 Message(&tbox;2006)     Else         `	 Message(&tbox;2007)     Endif     SaveScrn=0     While(?Dialog=223)         `	 SWITCH(?DialogControl)         `	      CaseOf0:         `	           info={     0;   	  .$            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	               h accel={100;         `	               h      }         `	               h aclpnt={0;}         `	               h Result=ButtonControl(&info;&x1;&x2;         `	               h &y1;&y2;&hotkey;&hotpnt;         `	               h &accel;&aclpnt;&tbox;&helpmsg)   	 ^-(4   Ї         `	           CaseOf1:         `	               h info={     1;   	 x             `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	               h accel={100;         `	               h      }         `	               h aclpnt={0;}         `	               h Result=ButtonControl(&info;&x1;&x2;         `	               h &y1;&y2;&hotkey;&hotpnt;         `	               h &accel;&aclpnt;&tbox;&helpmsg)         `	          `	           CaseOf3776:         `	               h info={     3776;   	 P            `	               h           DlgId;         `	               h           Up_Down;         `	               h           PostIt_Title;         `	               h           PostIt_xpos;         `	               h           PostIt_ypos;         `	               h           PostIt_Msgtype;         `	               h           HlpTitle;         `	               h           ResScrn;         `	               h           RetCtrl;         `	               h      }         `	               h accel={8182;1;}         `	               h aclpnt={1;0;}         `	               h HotElement=1         `	               h Result=WinEdControl(&info;&x1;&x2;         `	               h &y1;&y2;&hotkey;&hotpnt;         `	               h &accel;&aclpnt;&tbox;&helpmsg)         `	      DEFAULT:         `	           info={     ?DialogControl;   	 (#x'            `	               h      DlgId;         `	               h      Up_Down;         `	               h      PostIt_Title;         `	               h      PostIt_xpos;         `	               h      PostIt_ypos;         `	               h      PostIt_Msgtype;         `	               h      HlpTitle;         `	               h      ResScrn;         `	               h      RetCtrl;         `	               h }         `	           accel={100;         `	               h }         `	           aclpnt={0;}         `	           allow={0;1;3776}   	 .h)5            `	           Result=InvalidControl(&info;&x1;&x2;         `	           &y1;&y2;&hotkey;&hotpnt;         `	           &accel;&aclpnt;&tbox;&helpmsg;&allow)         `	 ENDSWITCH     EndWhileReturn	   	    //*********************************************////     SUBROUTINE:SucessforMerge   	 @   ////*********************************************Label(Success)     Message(&tbox;3000)     Result=Messagebox("Coach";&tbox;1)Return	   	 
@   //*********************************************////     PROCEDURE:Message   	 @   ////*********************************************PROCEDUREMessage(&tbox;Msg)SWITCH(Msg)CaseOf800:     tbox={     "";   	 
            `	      "Mergingcombinesadatafile(forexample,";         `	      "namesandaddresses)withaformfile(for";         `	      "example,formletter)tocreateathird";         `	      "document.Theformfileanddatafilemust";         `	      "becreatedandsavedbeforerunningthemerge.";         `	      "";         `	      "Haveyoucreatedandsavedtheformanddata";         `	      "files?";         `	 }CaseOf1000:tbox={    `	 "Torunthemerge,";   	 0        "";     "Choose>  r [BoldOn]?
   
 Tools>   [BoldOff]?
   
 ,";   	 p        "then>  r [BoldOn]?
   
 Merge>   [BoldOff]?
   
 ,";     "then>  r [BoldOn]?
   
 Run>   [BoldOff]?
   
 .";     "or";     "Press>  r [BoldOn]?
   
 Ctrl+F9.";   	         "";     }CaseOf1010:tbox={    `	 "Choose>  r [BoldOn]?
   
 Merge.";   	 !            `	 "";         `	 }CaseOf1040:tbox={    `	 "Typethenameofyourdatafile,thenpress>  r [Bold   	 "&   On]?
   
 Enter>   [BoldOff]?
   
 .";         `	 "or";         `	 "Press>  r [BoldOn]?
   
 F5>   [BoldOff]?
   
 Ԁtoselectthedatafile   	 $@ )   fromthefilelist.";         `	 "π";     }CaseOf1041:tbox={    `	 "Typethenameoftheformfile,thenpress>  r [Bold   	 v*%0   On]?
   
 Enter>   [BoldOff]?
   
 .";         `	 "or";         `	 "Press>  r [BoldOn]?
   
 F5>   [BoldOff]?
   
 Ԁtoselecttheformfile   	 ,,(3   fromthefilelist.";   	 -)4            `	 "π";     }CaseOf1042:tbox={    `	 "Afteryouspecifythenamesofboththeformanddata   	    files,";         `	 "";         `	 "Choose>  r [BoldOn]?
   
 Merge.";   	 
@            `	 "";     }CaseOf1060:     tbox={     "Highlighttheformfile,thenchoose>  r [Bold   	 6

   On]?
   
 Select.";         `	      "π";         `	 }CaseOf1061:     tbox={     "Highlightthedatafile,thenchoose>  r [Bold   	 l   On]?
   
 Select.";         `	      "π";         `	 }CaseOf2006:tbox={    `	 "Typethedirectorywheretheformfileislocated,   	 
   thenpress>  r [BoldOn]?
   
 Enter>   [BoldOff]?
   
 .";         `	 "";         `	 }CaseOf2007:tbox={    `	 "Typethedirectorywherethedatafileislocated,   	 x"   %
     
 thenpress>  r [BoldOn]?
   
 Enter>   [BoldOff]?
   
 .";         `	 "";         `	 }CaseOf3000:     tbox={"YouhavecompletedtheC  %
     
  oachonmerging.";         `	 "";         `	 }CaseOf5000:     tbox={"";"Tocreateaformordatafile,choose>  r [BoldOn]?
   
 Labels>   [BoldOff]?
   
 ,";">  r [BoldOn]?
   
 Letter(Merge)>   [BoldOff]?
   
 ,or>  r [BoldOn]?
   
 Tables(Merge)>   [BoldOff]?
   
 ԀfromtheCoach";"menu.";         `	 "";     }   	 -(4   ЇENDSWITCHEndProc   