React.js
Angular
Ethical Hacking
Agile
AWS
BlockChain
Cassandra
Cloud
Salesforce
Scaled Agile
TOGAF
DevOps
GIT
Jenkins
Jira
Kibana
Linux
NGINX
Ansible
Artificial Intelligence
in Machine Learning by
synatx and usage of DBREP?
Click here to read more about DevOps

1 Answer

0 votes
by

The DBREP is used to replace the current LREC with a new LREC that is supplied , Similar to DBMOD the difference being that the size of the new LREC can be different from the old LREC , The Key fields used for organisation however should be the same

If the key fields are to be changed , One should DELETE the old LREC and ADD the new LREC , so that the new LREC finds its place according to the file organisation

Mandatory Parameters for DBREP

EXAMPLE:

 

DBRED REF=TRABSQ,UP,REG=R4,ERROR=READERROR,

KEY1=(PKY=#TRABK80),

         KEY2=(R=TRABAWB,S=MI0AWB)

   #IF (DBFOUND,YES) THEN

       #IF TRABSTA,EQ,X'20' THEN

           MVC EBW000(#TRABL80),TRABSIZ

           MVC EBW000+#TRABL80(L'EXPLOSIVE),EXPLOSIVE

           LH  R6,EBW000

           LA  R6,L'EXPLOSIVE(,R6)

           STH R6,EBW000  

           DBREP REF=TRABSQ

        #ELSE

           #GOTO ITEM_NOT_EXPLOSIVE

       #EIF

   #ELSE   

       #GOTO AWB_NOT_BOOKED

   #EIF

 

   EXPLOSIVE DC C'ITEM EXPLOSIVE'

 

 

 

 

...