 






          DIGITAL                                           AV-B838A-TE-JO


                      ܸDECforms_V1.2򤴻ѤΤͤ(2)


          ܸDECformsѤ꤬ȤޤܽǤϡ
          ܸDECforms ե೫ȯμפФ뽤ˤĤ
          ޤѤɬɤߤ

          ܸDECforms ե೫ȯμפ3-1ǻֹ椬ȴ
          ޤʲΤ褦˽Ƥ


                /* This is the employee_record form */                   1
                Form EMPLOYEE                                            2

                    Form Data
                        Copy                                             3
                            EMPLOYEE_RECORD of "DEPT_FILE.TLB"
                        End Copy
                        HIRE_DATE Character(6)
                        PREV_EMPLOYER Character(30)
                    End Data

                    Form Record EMPLOYEE_RECORD                          4
                        Copy                                             5
                            EMPLOYEE_RECORD Of "DEPT_FILE.TLB"
                        End Copy
                    End Record

                    Form Record EMPLOYEE_HISTORY
                        HIRE_DATE Character(6)
                        PREV_EMPLOYER Character(30)
                    End Record




                                                             (΢̤³)

 







                    Layout EASY                                          6
                        Device                                           7
                            Terminal DECVT
                                Type %VT200
                        End Device
                        Units Characters                                 8
                        Size 24 Lines by 80 Columns                      9

                        Panel BASIC                                      10
                            Literal Text                                 11
                                Line 5
                                Column 5
                                Value "Name: "
                            End Literal

                            Field NAME                                   12
                                Same Line
                                Next Column
                                Use Help Message
                                    "Enter employee's name"
                            End Field

                        End Panel

                    End Layout
                End Form
                /* End of employee_record form */                        13











            Copyright  1991 Digital Equipment Corporation Japan. All rights reserved.


                                           2
