# GFB definitions

**URL:** <https://techcommunity.softwareag.com/t/gfb-definitions/98571>\
**Category:** Forum\
**Tags:** Adabas-Natural, Adabas, Adabas-Add-on-Products, Event-Replicator-for-Adabas\
**Created:** [October 4, 2011, 5:23pm UTC](https://techcommunity.softwareag.com/t/gfb-definitions/98571 "2011-10-04T17:23:09Z")\
**Posts on this page:** 4\
**Page:** 1

<div class="post-metadata">

**Author:** ![system](https://global.discourse-cdn.com/techcommunity/original/3X/c/d/cd19967bb605d28a72d77eb83a1cae22f3df2eb8.svg) [@system](https://techcommunity.softwareag.com/u/system)\
**Post date:** [October 4, 2011, 5:23pm UTC](https://techcommunity.softwareag.com/t/gfb-definitions/98571/1 "2011-10-04T17:23:09Z")

</div>

I was working with the following environment:  
Mainframe: ADA814, WCP612, NAT414, ARF321  
Linux: ADA632

I would like to replicate a file which has PE fields and MU fields, I have not Predict in Mainframe and I would like to know how can I define the GFB definitions using SYSRPTR applications?

I already read the manual and I am afraid it is not clear for me.

My best regards,

---

<div class="post-metadata">

**Author:** ![Dieter\_W\_Storr](https://sea1.discourse-cdn.com/techcommunity/user_avatar/techcommunity.softwareag.com/dieter_w_storr/32/91_2.png) [@Dieter\_W\_Storr](https://techcommunity.softwareag.com/u/Dieter_W_Storr)\
**Post date:** [November 3, 2011, 5:44pm UTC](https://techcommunity.softwareag.com/t/gfb-definitions/98571/2 "2011-11-03T17:44:19Z")

</div>

This is how Predict generates the GFB.  
I hope this will help you. See the fields AM1, AM2 etc.

Global Format G100006  
FB=‘AA,8,P,AB,50,A,AC,15,A,AD,8,A,AE,10,A,AF’  
‘,1,A,AG,10,A,AH,8,A,AI,8,A,AM1,5,P,AM2,5’  
‘,P,AM3,5,P,AM4,5,P,AM5,5,P,AM6,5,P,AM7,5’  
‘,P,AM8,5,P,AM9,5,P,AM10,5,P,AM11,5,P,AM1’  
‘2,5,P,AM13,5,P,AM14,5,P,AM15,5,P,AM16,5,’  
‘P,AM17,5,P,AM18,5,P,AM19,5,P,AM20,5,P,AM’  
‘21,5,P,AN,2,U,AO,2,U,AP,8,A,AT,8,A,AQ,5,’  
‘P,AR,5,P,AV,8,A,AX1,7,P,AX2,7,P,AX3,7,P,’  
‘AX4,7,P,AX5,7,P,AX6,7,P,AX7,7,P,AX8,7,P,’  
‘AX9,7,P,AX10,7,P,AX11,7,P,AX12,7,P,AX13,’  
‘7,P,AX14,7,P,AX15,7,P,AX16,7,P,AX17,7,P,’  
‘AX18,7,P,AX19,7,P,AX20,7,P,AX21,7,P,AX22’  
‘,7,P,AX23,7,P,AX24,7,P,AX25,7,P,AX26,7,P’  
‘,AX27,7,P,AX28,7,P,AX29,7,P,AX30,7,P,AX3’  
‘1,7,P,AX32,7,P,AX33,7,P,AX34,7,P,AX35,7,’  
‘P,AX36,7,P,AX37,7,P,AX38,7,P,AX39,7,P,AX’  
‘40,7,P,AX41,7,P,AX42,7,P,AX43,7,P,AX44,7’  
‘,P,AX45,7,P,AX46,7,P.’

Dieter Storr

---

<div class="post-metadata">

**Author:** ![Dieter\_W\_Storr](https://sea1.discourse-cdn.com/techcommunity/user_avatar/techcommunity.softwareag.com/dieter_w_storr/32/91_2.png) [@Dieter\_W\_Storr](https://techcommunity.softwareag.com/u/Dieter_W_Storr)\
**Post date:** [November 3, 2011, 6:00pm UTC](https://techcommunity.softwareag.com/t/gfb-definitions/98571/3 "2011-11-03T18:00:22Z")

</div>

You define all information (destination, subscription, format) on an external dataset and load it.

On the mainframe, the JCL for SYSRPTR looks like this:

//RPLOD EXEC NATBT,DEPT=ST,DB=TEST,SYSOUT=_,  
// PRM=‘SYS=STRPTR,AUTO=ON,PROFILE=REPTORT’  
//_ PRM=‘MADIO=0,MAXCL=0,MT=0,IM=D,AUTO=ON,EDPSIZE=64’  
//\* PARM=(‘IM=D,ID=’‘,’‘,MADIO=0,MAXCL=0,MT=0,’,  
//\* ‘EDPSIZE=64,INTENS=1’)  
//DDPRINT DD SYSOUT=\*  
//SYSUDUMP DD SYSOUT=\*  
//DDCARD DD \*  
ADARUN DB=00302,SVC=214,MODE=MULTI  
//CMPRINT DD SYSOUT=\*  
//CMWKF01 DD DISP=SHR,DSN=DIETER.DBID302.DEFIN.TEXT \<\<== definitions  
//CMSYNIN DD \*  
LOGON SYSRPTR  
SYSPROF  
RPLOD NAME=\*,DBID=302,FNR=10,REPLACE=Y  
//

---

<div class="post-metadata">

**Author:** ![system](https://global.discourse-cdn.com/techcommunity/original/3X/c/d/cd19967bb605d28a72d77eb83a1cae22f3df2eb8.svg) [@system](https://techcommunity.softwareag.com/u/system)\
**Post date:** [April 2, 2021, 3:01pm UTC](https://techcommunity.softwareag.com/t/gfb-definitions/98571/4 "2021-04-02T15:01:03Z")

</div>


