IMS Database.ppt

1、IMS Database,Day 1-Topics Covered,What is IMS DB Some General Concepts DBD PSB,What is IMS DB,IMS Information Management System Hierarchical Structure Each Box in the hierarchy represents a segment,B3,A2,D1,B2,A1,C1,ROOT SEGMENT (PARENT),SEGMENT OCCURRNCES,TWIN SEGMENTS,DEPENDENT SEGMENTS,- Level 1,

2、- Level 2,B1,HIERARCHICAL STRUCTURE,IMS GENERAL CONCEPTS,FOLLOWS INVERTED TREE STRUCTURE ROOT SEGMENT WILL BE ON TOP EACH SEGMENT (EXCEPT ROOT SEGMENT) IS DIRECTLY DEPENDENT ON ONLY ONE SEGMENT,Continued .,IMS general concepts,Segment Smallest unit of data that DL/I can fetch Each segment will have

3、unique 8 characters name- ARINVHDR (Invoice DB root segment) It is like a file record It has one or more fields like file record,General concepts contd.,Segment type Category of data for ex In invoice DB ARINVHDR, ARINVDTL, ARINVPMT etc represents the segment type Segment Occurrence One specific seg

4、ment of a particular segment type. Within a DB there is one of segment type but an unlimited no of occurrences of segment type,IMS Supports,15 Levels 255 segment type 1000 fields Unlimited number of occurrences,General concepts contd.,Root segment The segment at the top of the hierarchy is root segm

5、ent Database Record One occurrence of root segment along with all subordinate occurrences.,General Concepts contd.,Dependent segments All segments other than the root segment are dependent segments Parent segment Child Segment ,2,4,1,3,5,7,6,8,9,1. WHICH SEGMENTS ARE DEPENDENT ON SEGMENT 4? 2. WHICH

6、 SEGMENTS ARE CHILD SEGMENTS OF SEGMENT 1? 3. WHICH SEGMENTS ARE DEPENDENT SEGMENTS OF SEGMENT 1? 4. HOW MANY LEVELS?,EXERCISE - 1,IMS GENERAL CONCEPTS,Continued .,DATABASE RECORD,IMS GENERAL CONCEPTS,Continued .,DL/I Processing,Sequential Processing Random Processing Position in a DB,DL/I control b

7、locks,More Into IMS,DL/I and the Application Program,DL/I Application PGM contd.,DL/I acts as an interface between the application program and the access method No direct COBOL file I/O statements rather CALL statements to invoke DL/I DL/I invokes the access method and not the application program,Ho

8、w to execute IMS PGM,DFSRRC00,DL/I control blocks,DBD Data Base Descriptor PSB Program Specification Block,DBD,It defines the physical structure of the database One DBD for each database,More about DBD,Parent = 0 for the root segment is optional and can be omitted If two segments have the same paren

9、t their sequence in the DBDGEN job determines their sequence in the data base hierarchy Ex ARCINVCF DB. Field is defined as a key or search field,STATEMENTS IN DBD MACRO,DL/I CONTROL BLOCKS,DATA BASE DESCRIPTION (DBD),STATEMENT,DESCRIPTION,DBD,SPECIFIES DATABASE NAME, ACCESS METHOD,DATASET,SPECIFIES

10、 DD NAME TO BE USED IN JCL, DISK TYPE,SEGM,SPECIFIES SEGMENT NAME,SEGMENT LENGTH, PARENT,FIELD,SPECIFIES FIELD NAME, LENGTH, STARTING POSITION IDENTIFIES A FIELD AS KEY OR SEARCH FIELD,Continued .,SAMPLE DBDGEN PRINTNOGEN DBDNAME=COUNTRY,ACCESS=HDAM DATASETDD1=CTRY,DEVICE=3380 SEGMNAME=CTRYSEG,PAREN

11、T=0,BYTES=10 FIELDNAME=(CTRCODE,SEQ,U),BYTES=10,START=1,TYPE=C SEGMNAME=STATSEG,PARENT=CTRYSEG,BYTES=5 FIELDNAME=(STATCODE,SEQ,U),BYTES=5,START=1,TYPE=C SEGMNAME=DISTSEG,PARENT=STATSEG,BYTES=9 FIELDNAME=(DISTCODE,SEQ),BYTES=3,START=1,TYPE=C FIELDNAME=POPULTON,BYTES=6,START=4,TYPE=P DBDGEN FINISH END

12、,DL/I CONTROL BLOCKS,Continued .,PSB,It defines the application program view of the database Specify the data bases (one or more) the program can access Specify the processing the program can do on the data elements described in the PSB Application program can share PSB,TYPE,DESCRIPTION,C,Character

13、(Default),COBOL PICTURE,X,P,Packed Decimal,COMP-3,Z,Zoned Decimal,S9,H,Half Word Binary,9(4) COMP,F,Full Word Binary,9(8) COMP,DL/I CONTROL BLOCKS,DATATYPES USED IN DBDGEN,Continued .,A,B,C,D,E,DATABASE,PCB,DL/I CONTROL BLOCKS,PCB GIVES LOGICAL VIEW OF A DATABASE PORTION OF DATABASE THAT THE PROGRAM

14、 PROCESSES IS CALLED APPLICATION DATA STRUCTURE,A,C,E,Continued .,PRINT NOGEN PCB TYPE=DB,DBDNAME=COUNTRY,KEYLEN=15,PROCOPT=LS SENSEG NAME=CTRYSEG SENSEG NAME=STATSEG,PARENT=CTRYSEG PSBGEN END KEYLEN IS THE LENGTH OF CONCATENATED KEY,DL/I CONTROL BLOCKS,SAMPLE PSBGEN,Continued .,PROCOPT,DESCRIPTION,

15、G,Get or Read,I,Insert,R,Replace,D,Delete,A,All Options (G, I, R, D),L,Initial Load,LS,Sequential Initial Load,K,Access only Key of segment,O,Used with G to Indicate that Hold is not allowed,P,Path Calls,PROCOPTS IN PSB DEFINES SECURITY LEVEL FOR THE PROGRAM,DL/I CONTROL BLOCKS,Continued .,DBD1,DBD3

16、,DBD2,PCB1,PCB2,PCB3,PCB4,DL/I CONTROL BLOCKS,APPLICATION PROGRAM CAN HAVE MULTIPLE VIEWS OF A DATABASE BY USING SEPARATE PCBS FOR A SINGLE DATABASE,PSB,Continued .,PRINT NOGEN PCB TYPE=DB,DBDNAME=COUNTRY,KEYLEN=15 SENSEG NAME=CTRYSEG,PROCOPT=G SENSEG NAME=STATSEG,PARENT=CTRYSEG,PROCOPT=R SENSEG NAM

17、E=DISTSEG,PARENT=STATSEG,PROCOPT=A PSBGEN END,1. LIST THE SEGMENTS THAT MAY BE UPDATED USING THIS PSB 2. LIST THE SEGMENTS THAT CANNOT BE UPDATED 3. GIVE THE VALID PROCOPT TO BE CODED FOR ADDING AND REPLACING RECORDS IN CTRYSEG SEGMENT,DL/I CONTROL BLOCKS,Continued .,EMPDATA,WORKDATA,DEPTDATA,BENDAT

18、A,BASED ON THE ABOVE VIEW OF DATABASE FILL IN THE MISSING PIECES OF PCB PCB TYPE=DB,DBDNAME=EMPDB,KEYLEN=16,PROCOPT=G SENSEG NAME=_,PARENT=_ SENSEG NAME=_,PARENT=_ SENSEG NAME=_,PARENT=_ SENSEG NAME=_,PARENT=_ PSBGEN LANG=COBOL,PSBNAME=EMPPSBY END,DL/I CONTROL BLOCKS,Continued .,PSB,Segment Level Se

19、nsitivity The program can access the segments defined in PCB and all fields of that segment. Field Level Sensitivity Within a segment access to specific fields One program has one PSB or multiple programs can have one,PCB Program Communication Block,One PCB for each database the application program

20、can access If PROCOPT coded at segment level will overwrite the one at the segment level. Ex ARC0766,Format of Entry statement,ENTRY DLITCBL USING PCB-1 PCB-2 . . PCB-n,Entry Statement Contd.,It Links all the PCBs defined in the PSBGEN to the program Order mentioned must be same as that specified in

21、 the PSBGEN The control is transferred to the program The address of each PCB defined in the PSB is supplied,GOBACK,GOBACK is used instead of STOP RUN It transfers control back to DL/I which then deallocates the resources and closes all DB and data sets,DL/I Calls,The programs use the call statement

22、 rather than direct Access method like Read, write, Rewrite etc. The control is transferred from COBOL to DL/I which in turn does the processing,CALL Statement Format,CALL CBLTDLI USING FUNC-CD PCB-MASK I-O AREA SSA,Function Code,It determines the Function to be perform on the DB. ARC includes a cop

23、ybook YKDBFUNC which contains all the function which can be performed on the DB. Defined as PIC X(4) field.,Function Code layout in ARC,01 DB-FUNCTION-CODES. 05 GU PIC X(4) VALUE GU. 05 GHU PIC X(4) VALUE GHU. 05 GN PIC X(4) VALUE GN. 05 GHN PIC X(4) VALUE GHN. 05 GNP PIC X(4) VALUE GNP. 05 GHNP PIC

24、 X(4) VALUE GHNP. 05 ISRT PIC X(4) VALUE ISRT. 05 REPL PIC X(4) VALUE REPL. 05 DLET PIC X(4) VALUE DLET.,Get Functions,GU GN GNP GHU GHN GHNP,Update Functions,ISRT DLET REPL,PCB Mask,Defined in Linkage section Tells which DB to use for the request made A field is used after every call to know whethe

25、r the call is successful or not,LINKAGE SECTION 01DB-PCB-1. 03 DBD-NAMEPIC X(8). 03 SEG-LEVELPIC X(2). 03 STATUS-CODEPIC X(2). 03 PROC-OPTIONSPIC X(4). 03 IMS-RESERVEDPIC S9(5) COMP. 03 SEG-NAMEPIC X(8). 03 KEY-LENPIC S9(5) COMP. 03 NUM-SENS-SEGSPIC S9(5) COMP. 03 KEY-FEEDBACKPIC X(?). = length depe

26、nds on segment key,THE PCB MASK,COBOL BASICS FOR IMS,Continued .,There should be at least one PCB for each database used Status code of PCB mask explains whether a call is successful or not The sequence in which PCB masks are defined in linkage section need not be same as that in PSBGEN macro,THE PC

27、B MASK,Continued .,I-O Area,Defined in the working storage Contains the retrieved data after the call is successful Used to update the segment from the contained data,THE SSA IS AN AREA IN WORKING STORAGE USED TO IDENTIFY THE SEGMENT TO WHICH ACCESS IS REQUIRED IT IS AN OPTIONAL DL/I CALL PARAMETER

28、THAT QUALIFIES A CALL BY SPECIFIYING A PARTICULAR SEGMENT TYPE OR OCCURRENCE WHEN SPECIFIED IN A DL/I CALL THE SSA ALWAYS FOLLOWS I/O PARAMETER THERE MAY BE 1 TO 15 SSAs IN A CALL STATEMENT THE SSAs MUST APPEAR IN HIERARCHICAL ORDER BY SEGMENT TYPE THE SSA CONTAINS INFORMATION TO OBTAIN THE REQUIRED

29、 SEGMENT. THE INFORMATION COULD BY SEGMENT NAME OR SEGMENT NAME & SEGMENT KEY OR SEGMENT NAME & SEARCH FIELD,SEGMENT SEARCH ARGUMENT,UNQUALIFIED SEARCHES FOR A SPECIFIC SEGMENT TYPE QUALIFIED SEARCHES FOR A SPECIFIC SEGMENT OCCURRENCE MORE EFFICIENT THAN UNQUALIFIED SSA,TYPES OF SSAS,SEGMENT SEARCH

30、ARGUMENT,Continued .,WORKING-STORAGE-SECTION. . 01 HISTORY-SSA. 05 SEGMENT-NAMEPIC X(8) VALUE CTRYSEG . 05 FILLERPIC X(1) VALUE SPACE. Blank in 9th position,UNQUALIFIED SSA,C,T,R,Y,S,E,G,SEGMENT SEARCH ARGUMENT,Continued .,Segment Search Argument,First 8 bytes contains the name of the SSA 9th byte c

31、ontains a blank Segment name must be the one defined in DBDGEN If segment name less than eight characters - ?,WORKING-STORAGE-SECTION. . 01 SSA-EMPLOYEE. 03SEGMENT-NAMEPIC X(8)VALUE EMPLOYEE 03BEGIN-QUALIFYPIC X(1)VALUE (. 03KEY-NAMEPIC X(8)VALUE EMPKEY . 03OPERATORPIC X(2)VALUE =. 03KEY-VALUEPIC X(

32、12). 03END-QUALIFYPIC X(1)VALUE ). PROCEDURE DIVISION. . MOVE 123456789000 TO KEY-VALUE. CALL CBLTDLI USING FUNC-CODE, PCB-MASK-1, IO-AREA, SSA-EMPLOYEE.,QUALIFIED SSA,SEGMENT SEARCH ARGUMENT,Continued .,Segment Search Argument - Qualified,First 8 bytes contains the name of the SSA 9th byte contains

33、 a ( Position 10 to 17 is an eight character field name. 18 and 19 2 character relational operator End a field value with the ) parenthesis Segment name must be the one defined in DBDGEN,Segment search argument Qualified contd.,Used to specify a specific segment occurrence based on the field passed

34、Field can be key field or the search field Field must be defined in the DBDGEN The key value varies,OPERATORS USED IN QUALIFIED SSA,OPERATOR,SYMBOLS,Equal to,EQ, = , =,Not Equal to,NE, =, =,Less than,LT, , ,Less than or Equal to,LE, =, =,Greater than,GT, , ,Greater than or Equal to,GE, =, =,SEGMENT

35、SEARCH ARGUMENT,Continued .,Command Codes,COMMAND CODES INCREASE THE FUNCTIONALITY OF IMS CALLS COMMAND CODES ARE DESIGNATED BY AN ASTERISK * FOLLOWED BY CHARACTERS,ONE OR MORE COMMAND CODES CAN BE USED IN SSA EACH COMMAND CODE IS REPRESENTED BY A SINGLE CHARACTER FOLLOWING AN ASTERISK AFTER SEGMENT

36、 NAME,COMMAND CODES,H,I,S,T,O,R,Y,*,-,DL/I CONSIDERS ALL CHARACTERS FOLLOWING * TO BE COMMAND CODES TILL IT ENCOUNTERS A BLANK OR ( RESULTS IN MINIMIZING THE NUMBER OF CALLS AND HENCE IMPROVE PROGRAM EFFICIENCY,Command Codes,* at the 9th byte of SSA Command code at 10th byte Space or left parenthesi

37、s to know a unqualified SSA or a qualified SSA,SOME COMMAND CODES,COMMAND CODES,COMMAND CODE,DESCRIPTION,D,RETRIEVE A PATH,F,FIRST OCCURRENCE OF SEGMENT TYPE,L,LAST OCCURRENCE OF SEGMENT TYPE,U,MAINTAIN CURRENT POSITION AT THIS LEVEL,V,MAINTAIN CURRENT POSITION AT THIS AND HIGHER LEVELS,N,DO NOT REP

38、LACE THIS SEGMENT,C,USE A CONCATENATED KEY,P,ESTABLISH PARENTAGE AT THIS LEVEL,-,NULL/IGNORE,Continued .,NULL COMMAND CODE PRESENT IN ALL SSAS IN ARC ANY SPECIFIC COMMAND CODE CAN BE USED AND MODIFY THIS FIELD TO FUNCTION ACCORDINGLY,COMMAND CODE “ - ”,COMMAND CODES,Continued .,REQUESTS DL/I TO USE

39、PATH CALLS ALLOWS ENTIRE PATH IN SEGMENT HIERARCHY TO BE RETRIEVED IN ONE SINGLE CALL FOR PROGRAMS USING PATH CALLS PROCOPT IN PSB SHOULD HAVE “P” AS ONE OF THE VALUES DL/I DOES NOT RETRIEVE SEGMENTS IF THE CORRESPONDING SSA DOES NOT HAVE PATH COMMAND CODE “D”,COMMAND CODE “D”,COMMAND CODES,Continue

40、d .,SEGMENT IN THE LAST SSA WILL ALWAYS BE RETRIEVED EVEN IF SSA DOES NOT HAVE COMMAND CODE “D” FOR ISRT CALLS SSAS FOR LOWER LEVEL SEGMENTS NEED NOT HAVE “D” COMMAND CODE, “D” COMMAND CODE IS PROPAGATED TO ALL SPECIFIED SEGMENTS AUTOMATICALLY I/O AREA USED SHOULD BE BIG ENOUGH TO ACCOMMODATE ALL SE

41、GMENTS IN PATH,COMMAND CODE “D”,COMMAND CODES,Continued .,CALL CBLTDLI USING GN , LS-PCB-MASK, WS-SEG-IO-AREA,SEGMENTA*D(AKEY=1) SEGMENTB*D(BKEY=2) SEGMENTD*-(DKEY=5) AFTER THE CALLSEGMENTS #1, #2 & #5 WILL BE RETURNED IN I/O AREA,PATH CALLS EXAMPLE,1,6,5,11,7,10,4,2,8,3,9,AKEY,BKEY,EKEY,CKEY,DKEY,F

42、KEY,Continued .,COMMAND CODES,CALL PROCESSES FIRST OCCURRENCE OF THE SEGMENT TYPE EXAMPLE: SEGMENT 2 CAN BE RETRIEVED AFTER SEGMENT 4 BY USING CALL CBLTDLI USING GNP LS-PCB-MASK, WS-SEG-IO-AREA, SEGMENTB*F,COMMAND CODE “F”,COMMAND CODES,4,3,1,2,SEGMENTA,SEGMENTB,SEGMENTC,Continued .,COMMAND CODE “L”

43、,COMMAND CODES,CALL PROCESSES LAST OCCURRENCE OF THE SEGMENT TYPE EXAMPLE: SEGMENT 4 CAN BE RETRIEVED AFTER SEGMENT 2 BY USING CALL CBLTDLI USING GNP LS-PCB-MASK, WS-SEG-IO-AREA, SEGMENTC*L,4,3,1,2,SEGMENTA,SEGMENTB,SEGMENTC,Continued .,COMMAND CODE “N”,COMMAND CODES,USED IN REPL CALLS FOLLOWING PAT

44、H CALLS IF ANY SEGMENT RETRIEVED DURING PATH CALL NEED NOT BE REPLACED COMMAND CODE “N” IS USED IN SSA OF THAT SEGMENT,Continued .,DL/I CALLS,Calls,Qualified Call Call with SSA Unqualified Call Call without SSA,ONE OF THE FOLLOWING FUNCTIONS WILL BE USED IN A RETRIEVAL DL/I CALL GU- GET UNIQUE GN- G

45、ET NEXT GNP- GET NEXT WITHIN PARENT WHEN A RETRIEVAL IS DONE WITH AN INTENT TO UPDATE OR DELETE RECORDS, THE ABOVE FUNCTION CODES WILL BE PREFIXED WITH HOLD GHU- GET HOLD UNIQUE GHN- GET HOLD NEXT GHNP- GET HOLD NEXT WITHIN PARENT,DL/I RETRIEVAL CALLS,DL/I CALLS,GU call,Random processing of records

46、Independent of the position established by previous calls Can be used with Qualified or unqualified SSA Returns 1st occurrence with unqualified Returns 1st occurrence with non-unique key,GET UNIQUE CALL CBLTDLI USING GU , PCB-MASK, SEGMENT-IO-AREA SEGMENTA*-(AKEY=1) SEGMENTB*-(BKEY=2) SEGMENTD*-(DKE

47、Y=6) AFTER THE CALLSEGMENTD WITH DKEY=6 WILL BE IN SEGMENT-IO-AREA,1,6,5,11,7,10,4,2,8,3,9,AKEY,BKEY,EKEY,CKEY,DKEY,FKEY,EXERCISE: WRITE A GU TO RETRIEVE FKEY=10,DL/I CALLS,WHAT WILL BE THE OUTPUT OF A GU CALL WITH NO SSA?,DL/I CALLS,Expected Status codes with GU,Space if call is successful GE Segme

48、nt not found If GE not handled - ?,GET NEXT RETREIVAL SEQUENCE TOP TO BOTTOM FRONT TO BACK LEFT TO RIGHT,1,6,5,11,7,10,4,2,8,3,9,AKEY,BKEY,EKEY,CKEY,DKEY,FKEY,GK,GA,DL/I CALLS,Continued .,GN Call,Sequential processing of DB Used mostly when no of segments are to read or process Can use unqualified o

49、r Qualified SSA,CALL CBLTDLI USING GN , PCB-MASK, SEG-IO-AREA, SEGMENTA*-(AKEY=1) SEGMENTE*-(EKEY=8) AFTER THE CALLSEGMENTE WITH EKEY=8 WILL BE IN PROGRAM I/O AREA,1,6,5,11,7,10,4,2,8,3,9,AKEY,BKEY,EKEY,CKEY,DKEY,FKEY,EXERCISE: WHAT WILL BE THE RESULTS OF FOUR CONSEQUETIVE GNs AFTER EKEY=8 IS RETRIE

50、VED,DL/I CALLS,CALL CBLTDLI USING GN , LS-PCB-MASK, SEGMENT-IO-AREA, SEGMENTA*-(AKEY=1) SEGMENTB*-(BKEY=2) CALL CBLTDLI USING GNP , LS-PCB-MASK, SEGMENT-IO-AREA AFTER THE CALLSEGMENTC WITH CKEY=3 WILL BE IN SEGMENT-IO-AREA,GET NEXT WITHIN PARENT,1,6,5,11,7,10,4,2,8,3,9,AKEY,BKEY,EKEY,CKEY,DKEY,FKEY,

51、DL/I CALLS,WHAT WILL BE THE OUTPUT IF GNP IS DONE 4 MORE TIMES IN PREVIOUS EXAMPLE?,DL/I CALLS,Continued .,Status Code during Sequential retrieval,Spaces if the call is successful GE Segment not found GB End of database (with GN only) GA Unqualified GN or GNP call. Never for qualified call GK - Unqu

52、alified GN or GNP call. Never for qualified call. Same level GP Without establishing parentage if GNP issued,CALLCBLTDLI USING GN , LS-PCB-MASK, WS-SEG-IO-AREA, SEGMENTA*D(AKEY=1) SEGMENTE*D(EKEY=8) SEGMENTF*-(FKEY=10) WHAT WILL BE THE RESULT AFTER SUCCESSFUL COMPLETION OF THE ABOVE CALL?,PATH CALLS

53、 EXERCISE,1,6,5,11,7,10,4,2,8,3,9,BKEY,EKEY,CKEY,DKEY,FKEY,DL/I CALLS,Continued .,FUNCTIONS IDENTICAL TO GU/GN/GNP INDICATES THE REQUESTED SEGMENT(S) MAY BE DELETED OR REPLACED FORCING IMS TO PUT A LOCK ON THESE SEGMENTS WHICH WILL BE RELEASED ONLY AFTER ANOTHER CALL BY SAME PCB THIS ENSURES DATA IN

54、TEGRITY,GET HOLD CALLS (GHU/GHN/GHNP),Continued .,DL/I CALLS,MUST HAVE BEEN OBTAINED WITH A GET HOLD CALL (GHU, GHN, GHNP) NO INTERVENING CALLS BETWEEN GET HOLD CALL AND REPLACE/DELETE CALLS MULTIPLE REPLACE ALLOWED AFTER GET HOLD,DELETE/REPLACE CALLS,Continued .,DL/I CALLS,CALL CBLTDLI USING GHU ,

55、LS-PCB-MASK, WS-SEGMENT-IO-AREA SEGMENTA*-(AKEY=1) SEGMENTB*-(BKEY=2) CALL CBLTDLI USING DLET, LS-PCB-MASK,DELETE CALL,WHAT WILL BE THE RESULT IF THE FIRST GHU CALL IS SEGMENTA*D(AKEY=1)?,Continued .,DL/I CALLS,1,6,5,11,7,10,4,2,8,3,9,BKEY,EKEY,CKEY,DKEY,UPDATE CONTENTS OF A SEGMENT KEY FIELD SHOULD

56、 NOT BE ALTERED SSAs ARE NOT USED NORMALLY COMMAND CODES D - TO REPLACE PATH OF SEGMENTS N - TO EXCLUDE SEGMENTS FROM PATH,REPLACE (REPL),Continued .,DL/I CALLS,Expected Status Codes DLET & REPL,AJ Qualified SSA DJ No or unsuccessful hold call DA Key field changed,CALL CBLTDLI USING GHU , LS-PCB-MASK, WS-IO-AREA, SEGMENTA*-(AKEY=1) SEGMENTB*-(BKEY=2) SEGMENTC*-(CKEY=3) Change contents of WS-IO-AREA CALL CBLTDLI USING REPL, LS-PCB-MASK, WS-IO-AREA WILL RESULT IN UPDATE OF SEGME