[next] [previous] [contents]

  Example C-1: LSE Placeholders in a BASIC Program
  !++
  ! FUNCTIONAL DESCRIPTION:
  !
  ! This procedure computes the amount of an employee's salary and prints
  ! a paycheck.
  !
  ! FORMAL PARAMETERS:
  !
  ! name -
  ! The name of the employee, last name first.
  !
  !
  !
  !--
        DECLARE INTEGER weekly_salary
        <<Fetch the employee's record.>>;
  !+
  ! Compute paychecks differently for salaried and hourly employees.
  !-
          If <<employee is salaried>>
          THEN
              <<Use a fixed weekly salary from the employee's record.>>
          ELSE
              <<Fetch the number of regular and overtime hours worked.>>;
              <<Compute the weekly pay.>>
          END IF;
          <<Print the paycheck>>
          END SUBPROGRAM paycheck