An example

Top  Previous  Next

UNIX/Linux

#/bin/csh
#
# example_job.csh
#
# static tags
#
#@xbm use_resource ANAGSET
#@xbm use_resource FILEANAG2
#@xbm run_on_engine 1
#
 
source $XBMHOME/lib/xbmlib.csh
 
xbminit
 
source $HOME/user/include.csh
 
STEP01:
xbmstep STEP01
xbmset MYPID $$
xbmget VAR2
xbmdisplay "The first step is running with PID $MYPID"
xbmdisplay "VAR2 has been set to $VAR2 by someone else"
xbmdr $HOME/files/FILETMP1.txt
xbmdr $HOME/files/FVGHS01.dat
xbmlock
userpgm01
xbmrc
 
STEP02:
xbmstep STEP02
xbmdisplay "Please enter value for lock mode"
xbmaccept LOCK
xbmur $HOME/files/FILETMP1.txt
xbmur $HOME/files/FVGHS01.dat
if ( "$LOCK" = "YES") then
       xbmdr $HOME/files/OTHER1.txt
       xbmdr $HOME/files/OTHEr2.dat
endif
xbmlock
xrun USERPGM02 <<end_of_cards
0010** 0099**
end_of_cards
xbmrc
 
EOJ:
exit 0

Windows

<?xml version="1.0" encoding="utf-8" ?>

<package xmlns="http://schemas.microsoft.com/WindowsScriptHost">

       <job name="JOB0001">

     <!--@xbm start_paused -->

       <script language="JScript" src="D:\development\xframe\xjconv\xebewin\xebewin\scripts\xebe.js"/>

       <script language="JScript" src="D:\development\xframe\xjconv\xebewin\xebewin\test\ENVS.js"/>

       <script language="JScript">

               job("JOB01", "RC > 12");

               console("log on XBM");

               log("jobname="+wshEnv("XBM_JOBNAME"));

               log("full jobname="+wshEnv("XBM_FULL_JOBNAME"));

               log("op="+wshEnv("XBM_OPERATOR"));

          

           step("STEP1");

           dd("EDRIVER", "DRIVER,cat=FLATCAT,disp=(OLD,KEEP),type=flat");

           dd("EVSAM", "VSAM01,cat=PROVA,disp=SHR,type=vsam");

           dd("FAVARAVA", "FAVARAVA,cat=PROVA,disp=(NEW,CATLG),type=flat");

           exec("VSAMIS");

           if (flushJob()) eoj();

          

           eoj();

          

           function eoj() {

               jobObj.exit();

           }

               </script>

       </job>

</package>