white paper4.doc

Size: px

Start display at page:

Download "white paper4.doc"

きみえいさやま
9 years ago
Views:

1 WHITE PAPER

3 - MICRO FOCUS REVOLVE COBOL COBOL COBOL COBOL M ICRO F OCUS

4 3 UNIX PC 1 IBM UNIX COBOL (1) ERP

5 (2) 2 10 OA PC Micro Focus COBOL Micro Focus Revolve Windows IBM COBOL JCL (3) OS M ICRO F OCUS 4

6 James Martin & Co. TSRM James Martin & Co. TSRM M ICRO F OCUS 5

7 M ICRO F OCUS 6 1 (1) COPY McClure McCabe (2) VSAM DB DB DDL (3)

8 (4) - Micro Focus Revolve Micro Focus Revolve Revolve Revolve IBM CICSIMS DB/DC COBOL M ICRO F OCUS 7

9 JCL IBM (1) Revolve PC COPY COPY Revolve PC JCL Revolve COPY Revolve (2) Revolve COPY COPY McClure McCabe Revolve International Function Point Users Group (IFPUG) 3.4 COBOL IFPUG M ICRO F OCUS 8

10 Description Low Average High Total External Inputs External Outputs External Inquiries Internal Logical Files External Interface Files Total Degree of Influence = 0 Adjustment Factor = (0.01 * 0) = 0.65 Final Function Point Count = 136 * 0.65 = Revolve (3) Revolve VSAM JCL DD COBOL CICS VSAM VSAM M ICRO F OCUS 9

Total Degree of Influence = 0 Adjustment Factor = 0.65 + (0.01 * 0) = 0.

11 COPY Revolve SQL IMS DLI CALL CBLTDLI IMS M ICRO F OCUS 10

12 XDM Revolve CALL Revolve CALL (4) Revolve Revolve M ICRO F OCUS 11

13 M ICRO F OCUS 12

14 COBOL COBOL COBOL COBOL COBOL COBOL (1) COBOL COBOL (ANSI74ANSI85 ) COBOL COBOL M ICRO F OCUS 13

15 COBOL (2) COBOL ON SIZE ERROR VALUE (3) COBOL COBOL COBOL ( ) Micro Focus COBOL Micro Focus Net ExpressMicro Focus Server Express (1) 200 M ICRO F OCUS 14

16 COBOL COBOL Micro Focus COBOL Micro Focus 7 4 Micro Focus ARITHMETIC(VSC2) IBM VS COBOL II COBOL ANSI66ANSI74ANSI85 COBOL Micro Focus OSVS EXAMINE EXHIBIT ON COBOL Micro Focus IBM OSVS M ICRO F OCUS 15

ANSI66ANSI74ANSI85 COBOL Micro Focus OSVS EXAMINE

17 PANVALET ++INCLUDE CA Librarian INC EJECTSKIPTITLE = TO> THAN Micro Focus COBOL COBOL COBOL REMOVE Micro Focus ABSTRACT B-AND B-EXOR B-LEFT B-NOT B-OR B-RIGHT B-XOR BROWSING CALLED CLASS-ID COERCION DEFAULT DEFINITION END-WAIT EVENT-POINTER IDENTIFIED INHERITS METHOD METHOD -ID MONITOR-POINTER MUTEX-POINTER READING REDEFINITION RESTRICTED SEMAPHORE-POINTER SHARING THREAD-LOCAL THREAD-POINTER OVERRIDEMAKESYN COBOL COBOL Micro Focus M ICRO F OCUS 16

END-WAIT EVENT-POINTER IDENTIFIED INHERITS METHOD METHOD -ID MONITOR-POINTER MUTEX-POINTER READING REDEFINITION

18 10 (2) Micro Focus COBSW 2 10 ISAM COBOL 2 (1) Micro Focus COBOL COBOL COBOL COBOL NC NC M ICRO F OCUS 17

19 (2) SED AWK SED NC' 'NX'16 ' N' 'X'16 ' DISPLAY UPON DISP DISPLAY UPON CONSOLE CONSOLE IS DISPLAY CONSOLE IS CRT M ICRO F OCUS 18

20 COBOL COBOL COBOL COBOL M ICRO F OCUS 19

21 COBOL COBOL COBOL (1) PL/I PL/I PL/I PL/I COBOL PL/I COBOL (2) COBOL C SVC M ICRO F OCUS 20

22 (3) RPG/400 AS/400 RPG RPG PKS Software AX/ware AS/400 (4) Easytrieve, CSP, Mantis 4GL PL/I 4GL COBOL (1) VSAM COBOL COBOL READ/WRITE ANSI IBM BDAM COBOL ISAM I/O 1 9 Micro Focus IBM M ICRO F OCUS 21

23 CICS VSAM EXEC CICS READ (2) IMS M ICRO F OCUS 22

24 CALL IMS CALL 'CBLTDLI' XDM CALL XDATBAS CALL CALL XDM CALL CALL 'XDATBAS' USING READM NFPADIA NFPA PAS-KEY. CALL 'XDATBAS' USING RDNXT NFPADIA NFPA PAF-KEY. CALL 'XDATBAS' USING READM NFPADIA NFPA PAF-KEY. CALL 'XDATBAS' USING DEL-M NFPADIA NFPA PAF-KEY. CALL 'XDATBAS' USING ADD-M NFPADIA NFPA PAF-KEY. CALL 'XDATBAS' USING WRITM NFPADIA NFPA PAF-KEY. READM SELECT RDNXT FETCH DEL-M DELETEADD-M INSERT WRITM UPDATE XDATBAS COBOL COBOL XDM Microsoft SQL Server IMS EXEC DLI CALL CODASYL DML (3) DB2 M ICRO F OCUS 23

25 SQL SQL COBOLANSI SQL ADABAS DML (4) VSAM Micro Focus Net Express IBM Net Express F*TRAN+ F*TRAN+ COBOL BCD EBCDIC JIS8 COBOL 1) COBOL COPY 2) F*TRAN+ M ICRO F OCUS 24

26 COBOL F*TRAN+ Access M ICRO F OCUS 25

27 CICS COBOLSEND/RECEIVE READ/WRITE NEC SCREEN SECTION COBOL COBOL SCREEN SECTION Micro Focus Dialog System COBOL GUI Visual Basic 3 C/S HTMLASP Web (1) COBOLSCREEN SECTION GUI COBOL ACCEPT/DISPLAY COBOL COBOL Micro Focus X/Open SCREEN SECTION COBOLSCREEN SECTION M ICRO F OCUS 26

28 SCREEN SECTION SCREEN SECTION Net Express Windows (2) Dialog System Micro Focus Net Express GUI Dialog System VB COBOL Windows GUI Dialog System GUI COBOL M ICRO F OCUS 27

29 CALL (3) 3 C/S COBOL Visual Basic GUI COBOL (4) Web Web HTML COBOL Web COBOL Micro Focus Micro Focus Net Express COBOL Web (5) CICS CICS IBM TX Series Micro Focus COBOL M ICRO F OCUS 28

30 JCL OS UNIX JCL IBM JCL JCL //STEP1 EXEC PGM=BATCH1 //VBTYPEIN DD DSN=PROD.VIDEO.BONDS.MASTER,DISP=SHR //GAMEMSIO DD DSN=PROD.GAME.MASTER,DISP=OLD //PLAYMSIO DD DSN=PROD.PLAY.MASTER,DISP=SHR export VBTYPEIN=/usr/data/prod/video/bonds/master.dat export GAMEMSIO=/usr/data/prod/game/master.dat export PLAYMSIO=/usr/data/prod/play/master.dat BATCH1 OS Micro Focus COBOL Mfsort M ICRO F OCUS 29

31 D COBOL 6 UNIX D D SI Micro Focus COBOL DB I/O DB I/O ABEND M ICRO F OCUS 30

32 COBOL SQL M ICRO F OCUS 31

33 COBOL M ICRO F OCUS 32

34 Tel:

<837D F838C815B DA8D738CB B838095CA8E9697E C D C838A B >

<837D F838C815B DA8D738CB B838095CA8E9697E C D C838A B > Copyright 2015 Canon IT Solutions Inc. All rights reserved. 1 / 11 マイグレーション移行元プラットフォーム別事例 NEC メインフレーム () NEC メインフレーム () IBM メインフレーム富士通メインフレーム三菱メインフレームオープン NEC メインフレーム () NEC IBM NEC NEC 1 件 30,000