CN1143773A - 计算机辅助程序产生系统 - Google Patents

计算机辅助程序产生系统 Download PDF

Info

Publication number
CN1143773A
CN1143773A CN 96105579 CN96105579A CN1143773A CN 1143773 A CN1143773 A CN 1143773A CN 96105579 CN96105579 CN 96105579 CN 96105579 A CN96105579 A CN 96105579A CN 1143773 A CN1143773 A CN 1143773A
Authority
CN
China
Prior art keywords
file
pcl
pic
input
output
Prior art date
Legal status (The legal status is an assumption and is not a legal conclusion. Google has not performed a legal analysis and makes no representation as to the accuracy of the status listed.)
Pending
Application number
CN 96105579
Other languages
English (en)
Inventor
岩田奉武
蒋卫国
藤原茂
小畑纪雄
及川谦二
上坂洁
Current Assignee (The listed assignees may be inaccurate. Google has not performed a legal analysis and makes no representation or warranty as to the accuracy of the list.)
SUNRISE SYSTEM CO Ltd
Original Assignee
SUNRISE SYSTEM CO Ltd
Priority date (The priority date is an assumption and is not a legal conclusion. Google has not performed a legal analysis and makes no representation as to the accuracy of the date listed.)
Filing date
Publication date
Application filed by SUNRISE SYSTEM CO Ltd filed Critical SUNRISE SYSTEM CO Ltd
Publication of CN1143773A publication Critical patent/CN1143773A/zh
Pending legal-status Critical Current

Links

Images

Classifications

    • G—PHYSICS
    • G06—COMPUTING; CALCULATING OR COUNTING
    • G06F—ELECTRIC DIGITAL DATA PROCESSING
    • G06F8/00—Arrangements for software engineering
    • G06F8/10—Requirements analysis; Specification techniques

Landscapes

  • Engineering & Computer Science (AREA)
  • General Engineering & Computer Science (AREA)
  • Theoretical Computer Science (AREA)
  • Software Systems (AREA)
  • Physics & Mathematics (AREA)
  • General Physics & Mathematics (AREA)
  • Information Retrieval, Db Structures And Fs Structures Therefor (AREA)
  • Stored Programmes (AREA)

Abstract

通过指定与用于处理目的的FD相关的文件组织，文件存取方法和处理功能指定一个PCL。当文件组织，文件存取方法和处理功能被分别设定为X-，Y-和Z-轴时，所述PCL对应于三个轴上与其相关两值之间的交点A。使用被指定并与交点A相对应的文件组织，文件存取方法和处理功能作为一个键从事先准备在该系统中的多个PCL模式中检索一个特定的PCL。再一次使用FD对检索到的PCL进行编辑并作为一个PCL代码加以输出。由于在PCL代码中已经形成了处理功能的轮廓；所以由SPS来定义详细的处理，结果形成完整的源代码。

Description

计算机辅助程序产生系统
本发明涉及到一种用于对有效产生一个程序提供支援的计算机辅助程序产生系统。
关于计算机辅助程序产生系统已经提出了各种各样的建议。但任何一种完整的计算机辅助程序产生系统至今还没有被开发。
因此，本发明的目的就是要提供一种计算机辅助程序产生系统，这种系统能够突破研制开发的当前状态，且在这种系统中能够显著改善程序产生的效率。
为了实现上述目的，根据本发明用于对产生程序提供支援的计算机辅助程序产生系统包括一个用于输入一个文件组织的装置，一个用于输入一个文件存取方法的装置，一个用于输入处理功能的装置，和一个用于根据所述的输入文件组织，文件存取方法和处理功能检索和输出PCL的PCL检索和输出装置。
在本发明中，计算机辅助程序产生系统还可以包括一个用于输入一个文件结构的装置。
在本发明的程序产生支援系统中，所述的输入文件组织，文件存取方法和处理功能可以被输入给所述的文件结构。
在根据本发明的计算机辅助程序产生系统中，可将所述的处理功能规定给所述的文件结构。
在根据本发明的计算机辅助程序产生系统中，可将所述的处理功能规定给所述的文件结构。
在根据本发明的计算机辅助程序产生系统中，其中，可将所述的处理功能规定给所述的文件结构。
根据本发明，可以高效率地建立一个程序。另外，在程序中使用的术语可以被标准化，以使系统维护变得容易。
通过下面结合附图对本发明实施例的描述，本发明上述及其它的目的，效果以及特性和优点将变得更加明显。
图1的流程图示出了本发明的轮廓。
图2的流程图示出了本发明的轮廓。
图3示出了用于产生SYS结构图的图
图4是一个用于产生WL的屏幕显示；
图5是一个用于产生FD的屏幕显示；
图6是一个用于产生与屏幕显示相关的FD的屏幕显示；
图7用于解释PCL的指定；
图8示出了用于标记与PCL相关的文件组织和文件存取方法的屏幕显示；
图9示出了用于标记与PCL相关的处理功能的屏幕显示；和
图10示出了用于产生SPS的屏幕显示。
下面结合附图表描述本发明。
首先描述在对本发明描述中使用的术语及意义。
(1)PCL(词形变化(Para digm)连接逻辑)
这是本发明的一个主要部分，它是通过对″处理功能″，″文件组织″和″文件存取方法″进行指定而自动产生的。一个程序是通过在下面将要描述的将这个PCL和SPS相互结合而建立起来的。
(2)SPS(单处理段)
它被用于对不能通过自动产生的PCL进行规定的处理功能进行指定。利用SPS指定的处理功能是可以被规定为单处理的最小单元。处理功能被规定用于完成整个工作处理。
(3)WL(字表)
它被用于将在字处理中使用的术语和在程序中使用的术语联系起来，以在一个表中进行存贮。
(4)FD(文件定义)
它用于定义在工作处理中使用的多个文件中的每一个的内容，在FD中不仅包括存贮在诸如是一个磁盘单元中的外部存贮单元的文件，还包括在显示终端的屏幕显示的文件，同时还包括将要被打印的格式，一个文件的内容是概括在所述文件中将要含有的数据项(记录等)来定义的。
(5)SYS结构图(系统结构)
它表示工作处理流程的分析结果，并规定在输入和输出操作期间有关文件和功能的输入和输出操作。所述FD和PCL是根据SYS结构图建立的。<一实施例的说明>
下面结合图1和图2来解释本发明一个实施例的处理过程。
当要产生与处理相关的程序时，首先对处理流程进行分析，以识别所需的格式和处理功能。然后，根据所识别的处理流程，产生SYS结构图(S101)
根据SYS结构图，所在商业处理中使用的形式出现的项被选择和输入。所述商业项与在程序中将要使用的项相互联系，以完成一个WL(字表)(S102)。例如，在所建立程序被用于薪金计算处理的情况下，选择与诸如″基本支出″，″家庭津贴″，″职务津贴″，″工作津贴″，″住房补贴″，″对易津贴″，″加班补贴″和″社会保险金″等各项相关的项并加以输入，并使之与在程序中使用的项相连系。后面将详细描述WL的产生。
接着，使用所产生的WL，根据处理分析，产生FD，以定义处理所需的文件(S103)。在所述的FD中，不仅包括存贮在诸如是一个磁盘的外部存贮单元内的文件，同时还包括在显示终端的屏幕上所显示的文件以及将要被打印的格式。所述FD在后面还要祥细描述。
接着，通过对文件存取方法，文件组织和处理功能进行标记来标记PCL(词形变化连接逻辑)(S104)。
接着，根据文件存取方法，文件组织和处理功能从PCL库中检索和规定PCL模式。使用与所规定PCL模式对应的FD并根据规定的PCL模式产生PCL代码(S105)。所述PCL代码表示与工作处理轮廓功能相关的最终源代码，并利用一个标记输出在所述PCL中不能表示的功能部份。所述PCL将在后面祥细描述。
产生一个SPS(单处理段)以用于不能仅通过标记PCL所表示的部分处理功能(S106)。这也将在后面详加描述。
通过将SPS和PCL相互组合可以产生一个最终源程序。对源程序进行编译以产生可以在计算机上执行的目标程序。<SYS结构图的产生>
下面参考图3来描述SYS结构图的产生。所述SYS结构图是通过鼠标选择在屏幕上所准备的多个图形(磁盘上的文件，显示终端屏幕上的文件以及打印纸上的文件等)中一个而产生的。处理流程的分析结果被分成对于文件和功能的输入/输出操作。选择多个图形并用线将它们连接起来。根据所述处理的分析，产生SYS结构图。在图3中，标号d001到d004表示屏幕，标号f001到f008表示外部存贮单元上的文件，标号r001到r005表示打印格式，和标号p001到p008表示功能。当利用鼠标对显示屏幕上出现的图形顺序进行标记时，持续号被自动指定给它们，并在屏幕上显示这些顺序号。通过用线将这些利用所述持续号指定的图形连接起来可以产生SYS结构图形。根据SYS结构图形产生FD和PCL。<WL的产生>
下面结合图4描述WL的产生。WL在最初被建立起来以使这个系统中所使用的术语标准化并用作数据基础。图4示出了当WL被建立时的一个输入模式显示。名字301是在商业中使用的通用名。代码302是一个用于所述程序的代码。项属性标记诸如字符，数字和数字号等的属性。在已经寄存的项303的一个表中显示寄存项以用于确认。通常在各种商业活动中使用的项可以被记录在占用项304的一个表中，并可以通过拷贝占用项304的这个表应用于多个处理的每一个之中。在这种方式之下，相同的项可以被用于不同的处理之中。<FD的产生>
下面结合图5和图6描述FD的产生。使用所述WL产生FD，以形成多个文件(包括屏幕显示和打印格式)的内容。
图5示出了在产生FD过程中的一个显示。在这个显示中，WL是通过由标号401表示的一个名(一般商业中使用的术语)显示的。若这个项被选择，那么，这个项就被设定为一个FD的记录。名字的代码(由标号402表示)和它的属性(由标号403表示)被自动提取出来并存贮在FD中。利用这种方式产生的FD被显示出来，如标号404所示。
图6示出了在产生一个FD时的屏幕显示的例子。在这个屏幕显示中，在指定了名字以后显示相应的代码和属性。属性被显示成″VS″，由属性以指定的字符号也被显示出来。
利用这种方式，使用一般商务项，通过选择一个文件结构，包括屏幕显示和打印格式)可以输入文件内容。<PCL的标记>
由于作为处理对象的FD(输入/输出文件)是根据上述SYS结构图加以指定的，所以，PCL指定与该FD相关的文件组织，文件存取方法和处理功能。在图7中，如果分别将文件组织，文件存取方法和处理功能指定为X-，Y-和Z-轴，那么，PCL的指定对应于由三个轴的值所确定的交点A。把所指定的文件组织，文件存取方法和处理功能作为一个键，从予先准备在系统中的多个PCL模式检索一个特写的PCL。利用上述所指定的FD再一次对检索到的PCL模式进行编辑并作为PCL代码加以输出。由于这个原因，在有关文件上的处理被包含在一个具有完整格式的PCL代码之中。由于在所述PCL代码中已经构成了处理功能的轮廓，所以，详细的精确处理功能被限定为SPS形式，从而使源代码可以被完成。
下面，结合图8和图9来描述对PCL进行指定的例子。
在对PCL进行指定的过程中，对与根据SYS结构图定义的FD相关的格式和存取方法进行限定。这示于图8。在图8中，选择文件组织和文件存取方法，并分别以标号701和702加以指定。在图8中，选择顺序(Seg)，索引(Index)，以及相对(Relafive)之一并将其指定为文件组织。但是，文件组织并不受限于此。可以指定各种文件组织。另外，在图8中，可以选择顺序(Seg)，随机(Random)和相对(Relative)中的一个并将其指定为文件存取方法。但是，文件存取方法也不受限于此。可以指定各种文件存取方法(例如相关方法)。
接着对处理功能进行指定，这示于图9。如图中标号801所示，处理功能的指定是通过首先显示已经在系统中寄存的功能然后从这些功能中选择一个来执行的。  由于将要被选择的功能的说明已如标号802所示，所以这种选择是很容易的。
表1示出的可以被指定给PCL的一个功能表：
                     表1
 PCL 转换程序     PCL的例子
  1   转换1   与一个输入文件项相关的记录内容被转换并输出给同一文件，它的例子是：在年初集体转在换薪金主文件内″基本支出″项中的记录。
  2   转换2   文件结构是一个与输入相关的文件和一个与输出相关的文件。在输入文件一个项中的记录内容被转换并输出给输出文件，若只有所述记录是有意义的，那么，输入给另一个文件结构的转换包括在该功能之中，它的例子是：在年初集体转换在薪金主文件内″基本支出″项中的记录。
  3   提取   文件结构是一个与输入相关的文件和一个与输出相关的文件。从输入文件中抽取出与所指定键相对应的记录并将其输出给输出文件。它的例子是：从薪金数据基本文件中只抽取临时工的数据。
4 总和 文件结构是一个与输入相关的文件和一个与输出相关的文件。计算在文件项中记录的总和，并将该总和输出给输出文件。它的例子是：计算输入总和及年输入税款总和以用于年终调节。
5 分配 文件结构是一个用于输入的文件和两个用于输出的文件。所述一个文件的内容被根据一个项的状态分成两组并分别输出给所述两个输出文件它的例子是薪金主文件被分成与固定工和临时工相关的两个组。
6 询问 文件结构是两个用于输入的文件和一个用于输出的文件。作为在一个项中基准的两个输入文件之一的记录和同一个项中的另一个记录相比较当在两个记录之间获得一致或没有获得一致时，所述记录被输出给输出文件，这种情况的例子是：执行匹配处理，以提取失配数据。
  7   修改1   文件结构是两个用于输入的文件和一个用于输出的文件。在作为基准的两个输入文件之一的关键项的记录和在另一文件相同项中的记录进行比较，利用另一文件的记录对所述一个文件的记录进行修改，并在比较结果相符合时输出给输出文件。它的例子是改变或删除薪金主文件的地址数据。
  8   修改2   文件结构是3个用于输入的文件和一个用于输出的文件。根据三个输入文件之一的关键项，把剩下两个输入文件中一个的记录和在另一文件关键项中的另一记录进行比较，并且当二者相符合时，利用另一文件的记录修改剩下文件之一的记录。它的例子是：薪金主文件地址数据的改变或删除。
  9   形式输出   文件结构是一个用于输入的文件和一个用于输出的文件。在所述输入文件关键项中的记录被编辑，并输出给打印文件以作为单一形式或持续形式。注意：控制中断是按照中间总数，中值总数和主总数的最大三级。
  10   排序   文件结构是一个用于输入的文件一个用于排序工作的文件和一个用于输出的文件。输入文件关键项中的记录按上行和下行顺序变化。*注意：输出文件被限定为顺序文件。
  11   归并1   文件结构是两个用于输入的文件，一个用于归并的文件和一个用于输出的文件。在具有相同记录格式的一个指定项中的两个输入文件的内容被归并，并输出给输出文件。*注意：输出文件被限定为顺序文件。
  12   归并2   文件结构是三个用于输入的文件，一个用于归并工作的文件和一个用于输出的文件在具有相同记录格式的一个指定项中的三个输入文件的内容被归并，并输出给输出文件。*注意：输出文件被限定为顺序文件。
如表1所示，在所述实施例中设定了12种主要功能。这些功能是通过对在应用中通常使用的处理进行分析获得的。但是主功能并不局限于上述12种功能。
所述PCL模式被记录在PCL模式库中，该模式库是通过该系统对与各功能相关的处理进行定义而提供的。通过规定文件组织，文件存取方法和处理功能从所记录的PCL模式中检索一个特定的PCL模式。FD的定义被插入在PCL代码中，且产生PCL代码以检索PCL模式。
本发明不依据特定语言，并且能够建立例如ForTran语言，Basic语言和C语言的PCL代码。由于PCL代码仅是由文件组织，文件存取方法和处理功能规定的，所以，PCL代码主要执行与文件相关的处理。通过详尽的处理，J(join)被显示在产生与所述处理相关的代码的位置处，并随后显示在由SPS规定的所述代码将要消失的位置处。然后，在所述位置处SPS相互组合以完成最终源代码。<SPS的产生>
SPS是处理的最小单元，且通过对不能由PCL使用SPS加以规定的程序加以定义来完成用于应用的程序。如图10所示，利用这种定义，显示一个FD(901，902)并显示包括在FD中的数据(903)。通过选择这一个来规定与处理相关的目标。与该数据相关的功能，即所述SPS在905处被选择。使用以显示的FD数据来指定要被处理的数据(904)。
由于在SYS结构图和PCL中已经定义了与输入/输出相关的FD，就不必再输入任一个需要被处理的详细目标。另外，可以不规定程序语言的特定代码而只是通过表示SPS中一般处理的代码来规定用于数据的功能，因此可以很容易规定所述处理。所述SPS是由系统提供的。SPS是根据处理分类表示的。所述处理是使用SPS定义的。
对于写入Join(连接)的处理，SPS在PCL位置处被执行。<后处理>
SYS和PCL相互接合以建立源程序。PCL和SPS相互结合从而建立一个COBOL程序的例子示于表2。在这个表所示的例子中，利用″Procedtrre″所指出的J(join)的位置是一个与需要被定义的SPS相关的位置，且SPS是以″SPS Section″表示的。
完成并执行源程序以进行调试。若存在有任一误差，则确定引起误差的位置，并每一次通过指定PCL和产生SPS来构成程序产生的，从而重新产生和完成一个源程序。
在这个例子中，作为源程序而产生COBOL程序。但是，本发明可以应用于任一程序语言，从而使得最终建立源程序的语言不被限定为COBOL语言。
如上所述，根据本发明，能够自动建立与需要建立长项的文件的处理。因此，可以很容易地建立起用于文件处理的程序。在本系统中，由于可以很容易地改变所述文件组织和文件存取方法，所以可以很灵活地执行系统的变化。另外，若PCL和SPS被提供给各种系统结构和各种程序语言可以实现与这种系统结构和程序语言相关的用于支援程序产生的系统。由于这个原因，与现有技术系统比较，极大地改善了效率。
已经借助于最佳实施例对本发明进行了详细的描述，可以对其进行某些改变和修改而不脱离本发明较宽的范围。因此，在权利要求书中出现的权利要求覆盖了所有落入本发明实质精神以内的所有这种变化和修改。
表2
**********************************************************************
*  Module-id      ：  MO93 with face
*  Function       ：  List type 1 CONTROL BRAKE 2
*  Organization   ：  Sequential
*  Access code    ：  Sequential
*  Input file     ：  One
*  Output file    ：  One
*  Date           ：  NOV.16.1994
*******************************************************************
  IDENTIFICATION     DIVISION.
  PROGRAM-ID.                           MO93-CBL.
  AUTHOR.                               K.Kosaka.
  ENVIRONMENT        DIVISION.
  CONFIGURATION      SECTION.
  SOURCE-COMPUTER.   IBM-PC.
  OBJECT-COMPUTER.   IBM-PC.  SPECIAL-NAMES.
  INPUT-OUTPUT       SECTION.
  FILE-CONTROL.

      SELECT FILEI ASSIGN TO″C：YCOBOLVM09301.DAT″

                   ORGANIZATION LINE SEQUENTIAL.
*      SELECT FILE2 ASSIGN TO″PRN″.

     SELECT FILE2 ASSIGN TO″：CO：″.
  DATA             DIVISION.
  FILE             SECTION.
*******************************************************************
  FD  FILE1  LABEL  RECORD  IS  STANDARD.
  01  FILE1-RFC.

      02  TOKUISAKI-CODE      PIC X(6).
      02  HIZUIKE.

               03    NEN          PIC 99.

               03    TUKI         PIC 99.

               03    HI           PIC 99.

      02  SHOUKINMEI          PIC X(20).

      02  SURYO               PIC 9(3).

      02 TANKA                PIC 9(3).

      02  FIL                 PIC X(48).
********************************************************************
  FD  FILE2  LABEL  RECORD  IS  OMITTED.
  01  FILE2-REC.

      02  FIL                 PIC X(133).
****************************************************************
  WORKING-STORAGE    SECTION.
  01  OO-MIDASHI.

      02  FIL                 PIC X(22)    VALUE SPACE.
      02  FIL                 PIC X(6)     VALUE″壳上表″.

      02  FIL                 PIC X(39)        VALUE SPACE.

      02  FIL                 PIC X(4)     VALUE″PAGE″.

      02  OO-PAGE             PIC ZZZZ9.

      02  FIL                 PIC X(57).
*
  O1  TOKU-MIDASHI.    

      02                      PIC X(13)     VALUE SPACE.

          02                      PIC X(12)     VALUE″得意先コ-ド″.

      02  TOKUISAKI-CODE      PIC X(2).

          02                      PIC X(106).
*    
  01  KO-MIDASHI.

      02                  PIC X(1)    VALUE SPACE.

      02                  PIC X(4)    VALUE″日付″.

      02                  PIC X(12)   VALUE SPACE.

      02                  PIC X(7)    VALUE″商品名″.

         02                  PIC X(13)   VALUE SPACE.
				
				<dp n="d14"/>
02              PIC X(5)      VALUE″数量  ″.

    02              PIC X(11)     VALUE SPACE.
02              PIC X(4)      VALUE″单価″.

    02              PIC X(16)     VALUE SPACE.

    02              PIC X(5)      VALUE″金额″.

        02              PIC X(45)    VALUE SPACE.
*
 01 MEISAI.

    02                  PIC X(1)    VALUE SPACE.

        02  HIZUKE.
            03    NEN       PIC Z9.

                 03  TUKI       PIC Z9.

                 03  HI         PIC Z9.

      02                    PIC X(10)    VALUE SPACE.

      02  SHOUHINMEI        PIC X(20).

      02                    PIC X(2)     VALUE SPACE.

      02  SURYO             PIC ZZ9.

      02                    PIC X(13)    VALUE SPACE.

      02  TANKA             PIC ZZ9.

      02                    PIC X(12)    VALUE SPACE.

      02  KINGAKU           PIC Z.ZZZ，ZZ9.

      02                    PIC X(53)    VALUE SPACE.
*
 01  SHOU-GOUKEI-GYO.
     02                  PIC X(56)    VALUE SPACE.

         02                  PIC X(8)      VALUE″小合計″.

         02                  PIC X(5)      VALUE SPACE.
         02  SEOU-GOUKEI     PIC ZZ，ZZZ，ZZ9.

         02                  PIC X(S4)     VALUE SPACE.
*
 01 DAI-GOUKEI-GYO.

    02                  PIC X(56)     VALUE SPACE.

        02                 PIC X(8)      VALUE″大合計″.

        02                  PIC X(4)      VALUE SPACE.

        02  DAI-GOUKEI      PIC ZZZ，ZZZ.ZZ9.

        02                  PIC X(54)     VALUE SPACE.
*
 01 PCL-TBL.

    02  PCL-KINGAKU-L       PIC 9(12)     VALUE 0.
    02  PCL-KINGAKU-W       PIC 9(12)     VALUE 0.

    02  PCL-KINGAKU-O       PIC 9(12)     VALUE 0.

    02  PCL-PAGE            PIC 9(5)      VALVE 0.

    02  PCL-LINE            PIC 9(3)      VALUE 0.

    02  PCL-LINE-LIMIT      PIC 9(3)      VALUE 0.

    02  PCL-FLG             PIC X(1)      VALUE SPACE.

    02  RFAD-END-FLG1       PIC X(5)      VALUE SPACE.

    02  PCL-CHANGE-OLDCODE  PIC X(18)     VALUE SPACE.

    02  PCL-CHANGE-NEWCODE  PIC X(18)     VALUE SPACE.
******************************************************************
 PROCEDURE                 DIVISION.    
******************************************************************
 HAJIME.
*-----------------------------＜Initialize＞
*J，I，T11，&amp;FTTO1

     PERFORM SP093J001T11PCL-LINE.
     PERFORM SP093J00IT11PCL-LINE-LIMIT.
*
*------------------------------＜Open file＞
*   OPEN INPUT &amp;FII01 OUTPUT &amp;FOO01.

    OPEN INPUT FILE1 OUTPUT FILE2.
*
*****************************************************************
FILE-READ-START.
				
				<dp n="d15"/>
     PERFORM SP093J013T12SHOU-GOUKEI.
*-------------------------------＜Write Shou Goukei＞
*J，14，T11.&amp;FTT01

     PERFORM SP093J014T11PCL-KINGAKU-W.
*-------------------------------＜Write Shou Goukei＞*J，15，T51，&amp;FOO01，&amp;FTT01

     PERFORM SP093J015T51SHOU-GOUKEI-GYO.
*-------------------------------＜Initlalize Kingaku-w＞
*J，16，T11，&amp;FTT01

     PERFORM SP093J016T11PCL-KINGAKU-W.
*-------------------------------＜Set Pcl Flag＞
*J，17，T11，&amp;FTT01

     PERFORM SP093J017T11PCL-FLG.

     IF READ-END-FLG1＝″ATEND″

                         GO TO DAI-GOUKEI-WRITE.

          GO TO MIDASHI-WRITE.
*********************************************************************
 DAI-GOUKEI-WRITE.
*-------------------------------＜Edit Dai Goukei＞
*J，18，T12，&amp;FTT01

      PERFORM SP093J018T12DAI-GOUKEI.
*-------------------------------＜Write Dai Goukei＞
*J，19，T51，&amp;FOO01

      PERFORM SP093J019T51DAI-GOUKEI-GYO.
*--------------------------------＜END＞
 END-CLOSE.
*     CLOSE  &amp;FII01   &amp;FOO01.

      CLOSE  FILE1    FILE2.

      STOP   RUN.  
******************************************************************
*                          6PS SECTION
******************************************************************
*
 SP093J001T11PCL-LINE.

      MOVE  25  TO  PCL-LINE.

      EXIT.
 SP093J001T11PCL-LINE-LIMIT.

      MOVE  24  TO  PCL-LINE-LIMIT.

      EXIT.
 SP093J002T12PCL-CHANGE-OLDCODE.

      MOVE  PCL-CHANGE-NEWCODE TO PCL-CHANGE-OLDCODE.

      EXIT.
 SP093J002T12PCL-CHANGE-NEWCODE.

      MOVE TOKUISAKI-CODE OF FILE1-REC TO PCL-CHANGE-NEWCODE.

      EXIT.
 SP093J003T13PCL-PAGE.

      ADD  1  TO  PCL-PAGE.

      EXIT.
 SP093J004T11PCL-LINE.

      MOVE  0 TO  PCL-LINE.

      EXIT.
 SP093J005T12TOKUISAKI-CODE.

      MOVE  TOKUI6AKI-CODE OF FILE1-REC TO

                TOKUISAKI-CODE OF TOKU-MIDASHI.

      EXIT.
 SP093J005T12OO-PAGE.
				
				<dp n="d16"/>
*------------------------------＜Read file＞
*   READ  &amp;FII01
*           AT  END  MOVE    ″ATEND″    TO  READ-END-FLG1.

    READ  FILE1
            AT  END  MOVE    ″ATEND″    TO  READ-END-FLG1.
*-------------------------------＜Check File End or No＞

    IF READ-END-FLG1＝″ATEND″

                          GO TO SHOU-GOUKEI-WRITE.
*-------------------------------＜Initialize Brake Key＞
*J，2，T12，&amp;FII01，&amp;FTT01

       PERFORM SP093J002T12PCL-CHANGE-OLDCODE.

       PERFORM SP093J002T12PCL-CEANGE-NEWCODE.
*-------------------------------＜Check Brake Key＞

      IF PCL-CHANGE-OLDCODE NOT＝PCL-CHANGE-NEWCODE

                                 GO TO SHOU-GOUKEI-WRITE.
*-------------------------------＜Readed Data Edit＞
******************************************************************
 MIDASHI-WRITE.
*-------------------------------＜Page Line CHECK＞

      IF PCL-LINE＜PCL-LINE-LIMIT

                               GO TO MEISAI-WRITE.
*-------------------------------＜Count Page and  Initialize Line＞
*     ADD  1 TO PCL-PAGE.
*J，3，T13，&amp;FTT01

      PERFORM SP093J003T13PCL-PAGE.
*     MOVE 0 TO PCL-LINE.
*J，4，T11，&amp;FTT01

      PERFORM SP093J004T11PCL-LINE，
*--------------------------------＜Move Page and Brake Key＞
*J，5，T12，&amp;FII01.&amp;FTT01

      PERFORM SP093J005T12TOKUISAKI-CODE.

      PERFORM SP093J005T1200-PAGE.
*--------------------------------＜Write Midashi＞ 
*J，6，T51，&amp;FOO01，&amp;FTT01

      PERFORM SP093J006T51OO-MIDASHI.

      PERFORM SP093J006T51TOKU-MIDASHI.

      PERFORM SP093J006T51KO-MIDASHI.
********************************************************************
  MEISAI-WRITE.*--------------------------------＜Compute Kingaku＞
*J，7，T13，&amp;FII01，&amp;FTT01

      PERFORM SP093J007T13PCL-KINGAKU-L.

      PERFORM SP093J007T13PCL-KINGAKU-W.
*--------------------------------＜Edit Meisai＞
*J，8，T12，&amp;FII01，&amp;FTT01

      PERFORM SP093J008T12MEISAI.
*--------------------------------＜Edit Kingaku＞
*J，9，T12，&amp;FTT01，&amp;FOO01

      PERFORM SP093J009T12KINGAKU.
*--------------------------------＜Write Meisai Line＞
*J，10，T51，&amp;FOO01，&amp;FTT01

      PERFORM SP093J0L0T51MEISAI.
*---------------------------------＜Count Line＞
*J，11，T13，&amp;FTT01

      PERFORM SP093J011T13PCL-LINE.

                                GO TO FILE-READ-START.
*******************************************************************
 SHOU-GOUKEI-WRITE.
*---------------------------------＜Compute Shou Goukei＞
*J，12，T13，&amp;FOO01，&amp;FTT01

      PERFORM SP093J012T13PCL-KINGAKU-O.
*---------------------------------＜Edit Shou Goukei＞
*J，13，T12，&amp;FTT01
				
				<dp n="d17"/>
      MOVE PCL-PAGE TO OO-PAGE.

      EXIT.
SP093J006TS1OO-MIDASHI.

      WRITE  FILE2-REC  FROM  OO-MIDASHI

         AFTER PAGE  END-WRITE.

      EXIT.
SP093J006T51TOKU-MIDASHI.

      WRITE  FILE2-REC FROM TOKU-MIDASHI

         AFTER  ADVANCING  2  LINES  END-WRITE.

      EXIT.
SP093J006T51KO-MIDASHI.

      WRITE  FILE2-REC  FROM  KO-MIDASHI

         AFTER PAGE  END-WRITE.

      EXIT.
SP093J007T13PCL-KINGAKU-L.

      COMPUTE PCL-KINGAKU-L ＝ SURYO OF FILE1-REC *

                     TANKA OF FILE1-REC.

      EXIT.
SP093J007T13PCL-KINGAKU-W.

      COMPUTE  PCL-KINGAKU-W  ＝  PCL-KINGAKU-W  +  PCL-KINGAKU-L.

      EXIT.
SP093J008T12MEISAI.

      MOVE CORRESPONDING  FILE1-REC  TO  MEISAI.
      EXIT.
SP093J009T12KINGAKU.

      MOVE    PCL-KINGAKU-L  TO  KINGAKU.

      EXIT.
SP093J010T51MEISAI.

      WRITE FILE2-REC FROM MEISAI

         AFTER  ADVANCING  2  LINES  END-WRITE.

      EXIT.
SP093J011T13PCL-LINE.

      ADD  1  TO  PCL-LINE.

      EXIT.
SP093J012T13PCL-KINGAKU-O.

      COMPUTE  PCL-KINGAKU-O  ＝    PCL-KINGAKU-O    +    PCL-KINGAKU-W.

      EXIT.
SP093J013T12SHOU-GOUKEI.

      MOVE     PCL-KINGAKU-W  TO  SHOU-GOUKEI OF SHOU-GOUKEI-GYO.

      EXIT.
SP093J014T11PCL-KINGAKU-W.

      MOVE  0  TO  PCL-KINGAKU-W.

      EXIT.
SP093J015T51SHOU-GOUKEI-GYO.

      WRITE    FILE2-REC  FROM    SHOU-GOUKEI-GYO

            AFTER  ADVANCING  5  LINES  END-WRITE.

      EXIT.
SP093J016T11PCL-KINGAKU-W.

      MOVE  0 TO PCI-KINGAXU-W.
				
				<dp n="d18"/>
  EXIT.
  SP093J017T11PCL-FLG.

     MOVE  PCL-LINE-LIMIT TO  PCL-LINE.

     ADD 1 TO PCL-LINE.
  EXIT.
  SP093J018T12DAI-GOUKEI.
      MOVE PCL-KINGAKU-O  TO  DAI-GOUKEI   OF  DAI-GOUKEI-GYO.

      EXIT.
  SP093J019T51DAI-GOUKEI-GYO.

      WRITE   FILE2-REC  FROM  DAI-GOUKEI-GYO

          AFTER  ADVAKCING  3  LINES  END-WRITE.

      EXIT.
**************************************************************

Claims (6)

1。一种用于对产生程序提供支援的程序产生支援系统，包括：
用于输入文件组织的装置；
用于输入文件存取方法的装置；
用于输入处理功能的装置；
用于根据所述输入的文件组织，文件存取方法和处理功能检索和输出PCL的PCL检索和输出装置。
2。如权利要求1的程序产生支援系统，还包括用于输出文件结构的装置。
3。如权利要求2的程序产生支援系统，其中，所术输入的文件组织，文件存取方法和处理功能被输入给所述的文件结构。
4。如权利要求2的程序产生支援系统，其中，所述处理功能被规定给所述的文件结构。
5。如权利要求3的程序产生支援系统，其中，所述的处理功能被规定给所述的文件结构。
6。如权利要求2的程序产生支援系统，其中所述的处理功能被规定给所述的文件结构。
CN 96105579 1995-02-10 1996-02-07 计算机辅助程序产生系统 Pending CN1143773A (zh)

Applications Claiming Priority (2)

Application Number Priority Date Filing Date Title
JP23178/95 1995-02-10
JP2317895A JPH08221264A (ja) 1995-02-10 1995-02-10 プログラム作成支援システム

Publications (1)

Publication Number Publication Date
CN1143773A true CN1143773A (zh) 1997-02-26

Family

ID=12103395

Family Applications (1)

Application Number Title Priority Date Filing Date
CN 96105579 Pending CN1143773A (zh) 1995-02-10 1996-02-07 计算机辅助程序产生系统

Country Status (3)

Country Link
EP (1) EP0726517A1 (zh)
JP (1) JPH08221264A (zh)
CN (1) CN1143773A (zh)

Families Citing this family (2)

* Cited by examiner, † Cited by third party
Publication number Priority date Publication date Assignee Title
EP0860773B1 (en) * 1997-02-21 2004-04-14 Alcatel Method of generating a software application
FR2833371B1 (fr) * 2001-12-06 2004-06-04 Ciril Procede et dispositif de generation automatique d'applications geomatiques

Family Cites Families (3)

* Cited by examiner, † Cited by third party
Publication number Priority date Publication date Assignee Title
EP0180636A4 (en) * 1984-05-04 1986-09-22 Analysts Internat Corp DEVELOPMENT SYSTEM AND METHOD FOR A SELF-APPLICATION APPLICATION PROGRAM.
JPH02148136A (ja) * 1988-11-29 1990-06-07 Fujitsu Ltd プログラム部品の自動決定方式
JPH04175925A (ja) * 1990-11-09 1992-06-23 Hitachi Ltd プログラムチェックリスト自動生成方法

Also Published As

Publication number Publication date
JPH08221264A (ja) 1996-08-30
EP0726517A1 (en) 1996-08-14

Similar Documents

Publication Publication Date Title
US8387014B2 (en) Synchronization of concurrently modified interdependent semi-derived artifacts
US5581682A (en) Method for storing and retrieving annotations and redactions in final form documents
CN106874244B (zh) 一种基于工作序列的文档自动生成模型的构建方法
US6219831B1 (en) Device and method for converting computer programming languages
US5956510A (en) Apparatus and method for revising computer program code
JPS6120008B2 (zh)
JPH04503881A (ja) 書類管理及び作成システム
CN100338605C (zh) 一种可扩展标记语言文档修改痕迹的记录方法
US5893129A (en) Document storage and reproduction method
JP3251203B2 (ja) Ｊｃｌプログラム変換装置、ｊｃｌプログラム変換方法、および、記録媒体
CN1143773A (zh) 计算机辅助程序产生系统
US5911142A (en) System and method for bridging compliant and non-compliant files
Blobel The BOS system
CN115344270A (zh) 数据处理方法及装置、存储介质及电子设备
Runciman et al. Heap profiling for space efficiency
KR100407009B1 (ko) 프로그램재생방법 및 장치 및 프로그램재생을 위한프로그램을 기록한 매체
Prendergast The Use of Data Processing in Litigation
Avram The evolving MARC system: the concept of a data utility
JP3345522B2 (ja) データ項目部品を利用するプログラム開発支援装置
JP6827610B1 (ja) 開発支援装置、プログラム及び開発支援方法
RU2379748C2 (ru) Способ управления данными в сформированном компьютерном документе и машиночитаемый носитель с записанной на нем программой
Burleson et al. A Guide to the Potential Use of Simscript
Blobel BOS and related packages
Yoshino et al. Reverse engineering from COBOL to narrative specification
JPS62217320A (ja) リスト編集処理方法

Legal Events

Date Code Title Description
C10 Entry into substantive examination
SE01 Entry into force of request for substantive examination
C06 Publication
PB01 Publication