#!/usr/bin/perl

# Stupid script to fix look of html files created with sgml2html...

foreach (@ARGV) {
    print "Fixing... $_\n";
    system("mv $_ $_.orig");
    system("sed -e 's/<BODY>/<BODY BGCOLOR=\"#FFFFFF\">/g' -e 's/<HR>/<HR NOSHADE>/g' $_.orig > $_");
    unlink("$_.orig");
}

r                                                                                                                                                                                                                                                                                      **F **********************************************************************F **                                                                  **F **  DESCRIPTION  : User Interface program for  Winning Tax Limit    **1 **                 Maintanance program. 			    ** 1 **		   Press F8 or F10 to exit from menu.		    ** F **                                                                  **F **                 Choice Add:                                      **F **                     To add record to the PFD file.               **F **                     (i.e. exit) press F10, to quit press F8.     **F **                                                                  **F **                 Choice Modify:                                   **E **                     Displays PFD for the accounting period.	    ** F **                     To save modifications (i.e. exit) press F10. **F **                     To quit press F8.                            **F **                                                                  **F **                                                                  **F **  DEPENDENCIES : None                                             **F **                                                                  **F **  FORM RECORDS :                                                  **F **                                                                  **F **                                                                  **F ** ^^ ***************************************************************/   Form GM_WINNING_TAX_MNT_FORM       Form Data !         SEL_ACTION 		Word Integer  	ROW_INDEX 		Word Integer  	Group TAX_STRW             Occurs 50		/* must be same as MAX_NUM_RECORDS in gm_winning_tax_mnt.c */			  	    Current ROW_INDEX             STA_DT      ADT "             FROM_AMO    GFloating "             TO_AMO      GFloating !             PERCENT     GFloating "             EXEMPT_AMO  GFloating          End Group !         NR_RECORDS 		Word Integer '         CHECK_TO_AMO 		Longword Integer  	FIRST_DATE 		Adt  	CURR_DATE 		Adt Current 	TIME_DATE 		Datetime (12) 	CURR_LANGUAGE		Word Integer#         NULL_DATE               ADT      End Data    K     Form Data /* Only for data items - MUST match up with the C-Program! */ :         TRUE 		          Word Integer Value  1            ;         FALSE 		          Word Integer Value  0             "                                   ;         ACT_EXIT	 	  Word Integer Value  3	                 =         ACT_QUIT 	          Word Integer Value  4             " 	ACT_NEW			  Word Integer Value  5" 	ACT_SAVE		  Word Integer Value  6$ 	ACT_REVERT		  Word Integer Value  7  <         OP_ADD 		          Word Integer Value  5            >         OP_MODIFY 	          Word Integer Value  7            >         OP_DELETE 	          Word Integer Value  8            @         OP_MODIFIED 	          Word Integer Value 10            C         ACT_OK                    Word Integer Value 11             =         OP_ADDED 	          Word Integer Value 12             >         OP_SEARCH 	          Word Integer Value 13            9 	NEXT_SCREEN 	          Word Integer Value 15             @         PREV_SCREEN 	          Word Integer Value 16            ;         OP_UP 		          Word Integer Value 17             <         OP_DOWN 	          Word Integer Value 18            * 	CR_SCROLL	          Word Integer Value  1+ 	CR_SEL_ACC	          Word Integer Value  2 / 	CR_MODIFY_ICON	          Word Integer Value  4 , 	CR_ADD_ICON	          Word Integer Value  5  & 	CURSOR_RETURN1	          Word Integer& 	CURSOR_RETURN2	          Word Integer     End Data       Form Data          /* ONLY FOR TEXTS... */ 1         SAVE_SURE_TXT        	     Character(45)  0         YES_TXT             	     Character(8)  0         NO_TXT              	     Character(8)  0         MESS_INVALID_KEY    	     Character(20) 0         MESS_UNDEFINED_KEY  	     Character(25) 2         PRESS_DO_TO_CONTINUE_MESS    Character(80)% 	NO_TO_AMOIOD_MESS	     Character(80) 4         NEW_ICON                     Character(14)  4         EXIT_ICON                    Character(13)  4         SAVE_ICON                    Character(13)  4         QUIT_ICON                    Character(13)  4         REVERT_ICON                  Character(13)  3         USE_NEXT_SCREEN_MESS         Character(80)  - 	FULL_FIELD_REQUIRED_MESS     Character(80)    	STA_DT_TXT		     Character(10) # 	EXEMPT_AMO_TXT		     Character(10) ! 	FROM_AMO_TXT		     Character(10)  	TO_AMO_TXT		     Character(10)   	PERCENT_TXT		     Character(10)& 	BALANCE_PERIOD_TXT	     Character(12)4         ACCOUNTING_PERIOD_TXT        Character(17)  4         START_DATE_TIME_TXT          Character(16)  4         END_DATE_TIME_TXT            Character(15)  # 	START_DATE_TXT		     Character(10)   	END_DATE_TXT		     Character(9) 	TIME_TXT		     Character(5) 	TIME1_TXT		     Character(5) 4         SELECT_ACCOUNTING_PERIOD_TXT Character(26)  5         ACCOUNTING_PERIODS_TXT       Character(34)    4         ADD_TO_AMOIOD_TXT           Character(27)   4         SEARCH_TO_AMO_TXT           Character(30)   5         ONLINE_HELP_TXT              Character(12)    5         NAVIGATION_HLP               Character(20)    5         SCROLL_HLP                   Character(51)    5         TO_SELECT_HLP                Character(20)    5         USE_SELECT_HLP               Character(51)    5         SAVE_CHANGES_HLP             Character(20)    5         TO_SAVE_AND_EXIT_HLP         Character(51)    5         DISCARD_CHANGES_HLP          Character(20)    5         TO_DISCARD_AND_EXIT_HLP      Character(51)    5         QUIT_HLP                     Character(20)    2         USE_F8_HLP                   Character(51)5         ADD_HLP                      Character(20)    2         USE_F17_HLP                  Character(51)2         USE_F18_HLP                  Character(51)2         USE_F19_HLP                  Character(51)5         MODIFY_HLP                   Character(20)    2         USE_F20_HLP                  Character(51)2         TO_RESUME_HLP                Character(25)" 	FIRST_DISPLAY		     Character(75)                      End Data       Copy  	"PUBLIC_SRC:LANGUAGES.IFDL_INC"     End Copy       Copy& 	"PUBLIC_SRC:FORMS_BANNER.IFDL_RECORD"     End Copy       Form Record DATA_REC!         SEL_ACTION 		Word Integer % 	ROW_INDEX               Word Integer  	Group TAX_STRZ             Occurs 50			    /* must be same as MAX_NUM_RECORDS in gm_winning_tax_mnt.c */	             STA_DT      ADT   "             FROM_AMO    GFloating #             TO_AMO       GFloating  $             PERCENT      GFloating  "             EXEMPT_AMO   GFloating         End Group !         NR_RECORDS 		Word Integer  	CURR_LANGUAGE		Word Integer     End Record       Form Record MESSAGE_REC "         MESSAGEPANEL Character(80)     End Record  O     Form Record MESSAGE_REC_WAIT  /* Must particip. for forms_notity_op_wait */ 9         MESSAGEPANEL Character(80)  /* MAX_MESSAGE_LEN */      End Record       Layout MAIN_LAYOUT         Device              Terminal Type %VT100         End Device#         Size 24 Lines by 80 Columns            Viewport BANNER_VP             Lines 1 Through 2               Columns 1 Through 80         End Viewport           Viewport MAIN_VP             Lines 6 Through 21              Columns 1 Through 80         End Viewport             Viewport MESSAGE_HDR_VP              Lines 22 Through 22               Columns 1 Through 80         End Viewport  )         Viewport DEFAULT_MESSAGE_VIEWPORT              Lines 23 Through 24               Columns 1 Through 80         End Viewport   	Viewport SELECT_ACC_VP  	    Lines 18 Through 22 	    Columns 51 Through 80  	End Viewport           Viewport TITLE_VP              Lines 3 Through 5               Columns 1 Through 80         End Viewport           Viewport SAVE_SURE_VP              Lines 11 Through 17 !             Columns 31 Through 78          End Viewport           Viewport HELP_VP             Lines 3 Through 24              Columns 1 Through 80         End Viewport           Function QUIT              Is %F8         End Function           Function SELECT              Is %SELECT                %KP_COMMA         End Function           Function UP ITEM             Is %UP         End Function           Function DOWN ITEM             Is %DOWN         End Function   	Function LEFT_ITEM 
 	    Is %LEFT 
 	End Function    	Function RIGHT_ITEM 	    Is %RIGHT
 	End Function            Function GET_NEXT              Is %NEXT_SCREEN          End Function           Function GET_PREV              Is %PREV_SCREEN          End Function           Function ERROR             Is %DO         End Function /*         Function ADD_ACC             Is %F17          End Function   	Function MODIFY_ACC             Is %F20          End Function */             Disable Response             Remove All         End Response           Send Response BANNER             Display                  BANNER_PANEL             Display !                 MESSAGE_HDR_PANEL          End Response  &         Send Response MESSAGE_REC_WAIT             Deactivate                 All              Activate Wait  		On MESSAGE_HDR_PANEL-             Message PRESS_DO_TO_CONTINUE_MESS                           End Response   	Internal Response SET_LANGUAGE 7 	    /* Set all the strings which appear in the form */   ,             /* Default language: English  */  L 	    Let SAVE_SURE_TXT		    = " Are you sure that you want to save changes?"2 	    Let YES_TXT                     = "  YES   " 1 	    Let NO_TXT                      = "   NO   " = 	    Let MESS_INVALID_KEY            = "Invalid key!        " @ 	    Let MESS_UNDEFINED_KEY          = "Undefined function key!"? 	    Let PRESS_DO_TO_CONTINUE_MESS   = "Press DO to continue. " 2 	    Let NEW_ICON                    = "   New   "/ 	    Let EXIT_ICON                   = " Exit " / 	    Let SAVE_ICON                   = " Save " / 	    Let QUIT_ICON                   = " Quit " 1 	    Let REVERT_ICON                 = " Revert " K 	    Let USE_NEXT_SCREEN_MESS        = "Use Next Screen to see more items." = 	    Let FULL_FIELD_REQUIRED_MESS    = "Full field required." + 	    Let EXEMPT_AMO_TXT		    = "Exempt Amo" % 	    Let STA_DT_TXT		    = "Start Dt" :             Let EXEMPT_AMO_TXT              = "Exempt Amo".             Let FROM_AMO_TXT		    = "From Amo"*             Let TO_AMO_TXT		    = "To Amo",             Let PERCENT_TXT		    = "Percent"4 	    Let ONLINE_HELP_TXT             = "Online Help"3 	    Let NAVIGATION_HLP              = "Navigation" X 	    Let SCROLL_HLP                  = "Use Arrow keys. Use NEXT/PREV SCREEN to scroll."2 	    Let TO_SELECT_HLP               = "To Select"< 	    Let USE_SELECT_HLP              = "Use the SELECT key."8 	    Let SAVE_CHANGES_HLP            = "To Save Changes"A 	    Let TO_SAVE_AND_EXIT_HLP        = "Use F10 to save changes " ; 	    Let DISCARD_CHANGES_HLP         = "To Discard Changes" Y 	    Let TO_DISCARD_AND_EXIT_HLP     = "Use F8 to discard changes and exit to main menu." 0 	    Let QUIT_HLP                    = "To Quit"0 	    Let USE_F8_HLP                  = "Use F8.", 	    Let ADD_HLP                     = "Add"1 	    Let USE_F17_HLP                 = "Use F17." / 	    Let MODIFY_HLP                  = "Modify" 1 	    Let USE_F20_HLP                 = "Use F20." B 	    Let TO_RESUME_HLP               = "To resume, press PF1-HELP"H 	    Let FIRST_DISPLAY		    = "Don't delete without checking the dates."  0             /* End Default language: English  */  # 	    If CURR_LANGUAGE = HEBREW Then ! 		/* Set all strings to Hebrew */  	    End If              End Response          & 	Transceive Response DATA_REC DATA_REC 	    Include SET_LANGUAGE   D 	    If (SEL_ACTION<>NEXT_SCREEN) AND (SEL_ACTION<>PREV_SCREEN) Then 		Remove TITLE_VP  	    End If    	    Activate Panel MAIN_PANEL 	    	    Display ADD_DISPLAY_PANEL  8 	    Position To Field TAX_STR(1).FROM_AMO On MAIN_PANEL   	    Reset FIRST_DATE  	    Reset CURR_DATE 	    Message "  " 
 	End Response   "         Function Response TRANSMIT%             Let SEL_ACTION = ACT_EXIT              Return         End Response           Function Response QUIT%             Let SEL_ACTION = ACT_QUIT              Return Immediate         End Response  .         Function Response BOUNDARY CURSOR LEFT!             If LEFTMOST ITEM Then %                 Message %NO_LEFT_ITEM              Else/                 Position Immediate To Left Item              End If         End Response  /         Function Response BOUNDARY CURSOR RIGHT "             If RIGHTMOST ITEM Then&                 Message %NO_RIGHT_ITEM             Else0                 Position Immediate To Right Item             End If         End Response  ! 	Function Response TERMINATE HELP              Remove HELP_VP             Exit Help          End Response   	Copy ) 	    "public_src:FORMS_BANNER.IFDL_PANEL" 
 	End Copy	   	Copy * 	    "public_src:FORMS_MESSAGE.IFDL_PANEL"
 	End Copy	  &         /****************************/         Panel MAIN_PANEL             Viewport MAIN_VP   	    Function Response QUIT - /*		If ( CURSOR_RETURN1 = CR_ADD_ICON    ) OR + 		   ( CURSOR_RETURN1 = CR_MODIFY_ICON ) OR - 		   ( CURSOR_RETURN1 = CR_SCROLL      ) Then & 		    If ( SEL_ACTION <> OP_ADD ) Then:                         if ( SEL_ACTION = OP_MODIFY ) Then( 			    /* Do not go out on 1'st QUIT * /! 			    Let CURSOR_RETURN1 = FALSE  			    Let SEL_ACTION = FALSE  			    Return Immediate  			Else ! 			    /* Go out on 1'st QUIT * /   			    Let SEL_ACTION = ACT_QUIT 			    Return Immediate 	 			End If 
 		    Else 			Message " "- 			Let TAX_STR(ROW_INDEX).STA_DT = NULL_DATE   			Reset" 			    TAX_STR(ROW_INDEX).FROM_AMO 			Reset  			    TAX_STR(ROW_INDEX).STA_DT 			Let CURSOR_RETURN1 = FALSE  			Let SEL_ACTION     = ACT_OK+ 			Position To Field NEW_ICON On MAIN_PANEL  		    End If 		Else 		    Let SEL_ACTION = ACT_QUIT  		    Return Immediate 		End If */ 		    Let SEL_ACTION = ACT_QUIT  		    Return Immediate 	    End Response    	    Function Response UP ITEM6 		Position To Field TAX_STR(10).FROM_AMO On MAIN_PANEL             End Response   	    Function Response GET_NEXT  		Let SEL_ACTION = NEXT_SCREEN 		Return Immediate             End Response   	    Function Response GET_PREV  		Let SEL_ACTION = PREV_SCREEN 		Return Immediate             End Response /*) 	    Function Response ADD_ACC /* F17 * /   		Let CURSOR_RETURN1 = CR_SCROLL 		Let SEL_ACTION = OP_ADD 6 		Position To Field TAX_STR(10).FROM_AMO On MAIN_PANEL 		Return Immediate 	    End Response  */   /             Use Help Panel TO_AMOIOD_HELP_PANEL                Field NEW_ICON                     Line 15                      Column 1(                 Function Response SELECT& 		    Let CURSOR_RETURN1 = CR_ADD_ICON,                     Let SEL_ACTION = ACT_NEW: 		    Position To Field TAX_STR(10).FROM_AMO On MAIN_PANEL 		    Return Immediate                 End Response 		Display Reverse  		No Data Input              End Field                Field EXIT_ICON                  Line 15                  Next Column + 1  /*		Function Response NEXT ITEM 8 		    Position Immediate To Field ADD_ICON On MAIN_PANEL 		End Response */(                 Function Response SELECT-                     Let SEL_ACTION = ACT_EXIT ) 		    Let CURSOR_RETURN1 = CR_MODIFY_ICON % 		    Activate Panel SELECT_ACC_PANEL                  End Response 		Display Reverse  		No Data Input              End Field                Field SAVE_ICON          