Directives
END SWITCH End Branching of a Program
 
Format END SWITCH
 
Description Use the END SWITCH directive to stop the branching that has been activated in an application by a SWITCH directive.
 
See Also SWITCH Branch Control, BREAK Immediate Exit of Loop, CASE Define Branch Points,
DEFAULT Branch If No Matching Case.
 
Examples 00100 PROCESS_TAXCODE:
00110 LiquorTax=0,SalesTax=0,ServiceTax=0
00120 SWITCH UCS(TaxCode$)
00130 CASE "X","Z" ! two codes are tax exempt
00140 BREAK ! stop processing for case "X" here
00150 CASE "L" ! liquor pays all liquor,sales and service tax
00160 LiquorTax=cost*LiquorTaxRate
00170 ! no break here, logic falls through
00180 CASE "S" ! pays sales and service tax
00190 SalesTax=cost*SalesTaxRate
00200 ! no break here, logic falls through
00210 CASE "V" ! service tax
00220 ServiceTax=cost*ServiceTaxRate
00230 BREAK ! end processing for this case and any that fell through
00240 DEFAULT ! enter here if case not found
00250 MSGBOX "Unknown tax code","Error"
00260 END SWITCH
00270 TotalTax=LiquorTax+SalesTax+ServiceTax
00280 RETURN