Skip to content

Instantly share code, notes, and snippets.

@worksofliam
Created September 9, 2021 00:31
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save worksofliam/cfb667c8599fd552d408c9b3a286a5d8 to your computer and use it in GitHub Desktop.
Save worksofliam/cfb667c8599fd552d408c9b3a286a5d8 to your computer and use it in GitHub Desktop.
<?xml version="1.0" encoding="UTF-8"?>
<QcdCLCmd DTDVersion="1.0">
<Cmd CmdName="RUNSQLSTM" CmdLib="__LIBL" CCSID="37" HlpPnlGrp="QHSQCMDX" HlpPnlGrpLib="__LIBL" HlpID="RUNSQLSTM" MaxPos="4" Prompt="Run SQL Statements" MsgF="QSQLMSG" MsgFLib="__LIBL" ExecBatch="YES" ChgCmdExit="NO" RtvCmdExit="NO">
<Parm Kwd="SRCFILE" PosNbr="1" KeyParm="NO" Type="QUAL" Min="0" Max="1" Prompt="Source file" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES">
<Qual Type="NAME" Min="0" Max="1" Len="10" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name" />
<Qual Type="NAME" Min="0" Max="1" Prompt="Library" Len="10" Rstd="NO" Dft="*LIBL" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name">
<SpcVal>
<Value Val="*LIBL" MapTo="*LIBL" />
<Value Val="*CURLIB" MapTo="*CURLIB" />
</SpcVal>
</Qual>
</Parm>
<Parm Kwd="SRCMBR" PosNbr="2" KeyParm="NO" Type="NAME" Min="0" Max="1" Prompt="Source member" Len="10" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name" />
<Parm Kwd="COMMIT" PosNbr="4" KeyParm="NO" Type="CHAR" Min="0" Max="1" Prompt="Commitment control" Len="10" Rstd="YES" Dft="*CHG" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*CHG, *UR, *CS, *ALL, *RS...">
<SpcVal>
<Value Val="*CHG" MapTo="*CHG" />
<Value Val="*UR" MapTo="*UR" />
<Value Val="*CS" MapTo="*CS" />
<Value Val="*ALL" MapTo="*ALL" />
<Value Val="*RS" MapTo="*RS" />
<Value Val="*NONE" MapTo="*NONE" />
<Value Val="*NC" MapTo="*NC" />
<Value Val="*RR" MapTo="*RR" />
</SpcVal>
</Parm>
<Parm Kwd="NAMING" PosNbr="5" KeyParm="NO" Type="CHAR" Min="0" Max="1" Prompt="Naming" Len="10" Rstd="YES" Dft="*SYS" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*SYS, *SQL">
<SpcVal>
<Value Val="*SYS" MapTo="*SYS" />
<Value Val="*SQL" MapTo="*SQL" />
</SpcVal>
</Parm>
<Parm Kwd="ERRLVL" PosNbr="6" KeyParm="NO" PmtCtl="PMTRQS" Type="DEC" Min="0" Max="1" Prompt="Severity level" Len="2.0" Rstd="NO" Dft="10" RangeMinVal="0" RangeMaxVal="40" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="0-40" />
<Parm Kwd="DATFMT" PosNbr="7" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Date format" Len="8" Rstd="YES" Dft="*JOB" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*JOB, *USA, *ISO, *EUR...">
<SpcVal>
<Value Val="*JOB" MapTo="*JOB " />
<Value Val="*USA" MapTo="*USA" />
<Value Val="*ISO" MapTo="*ISO" />
<Value Val="*EUR" MapTo="*EUR" />
<Value Val="*JIS" MapTo="*JIS" />
<Value Val="*MDY" MapTo="*MDY" />
<Value Val="*DMY" MapTo="*DMY" />
<Value Val="*YMD" MapTo="*YMD" />
<Value Val="*JUL" MapTo="*JUL" />
</SpcVal>
</Parm>
<Parm Kwd="DATSEP" PosNbr="8" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Date separator character" Len="8" Rstd="YES" Dft="*JOB" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*JOB, /, ., ,, -, ' ', *BLANK">
<SpcVal>
<Value Val="*JOB" MapTo="*JOB " />
<Value Val="'/'" MapTo="*SLASH" />
<Value Val="'.'" MapTo="*PERIOD" />
<Value Val="','" MapTo="*COMMA" />
<Value Val="'-'" MapTo="*DASH" />
<Value Val="' '" MapTo="*BLANK" />
<Value Val="*BLANK" MapTo="*BLANK" />
</SpcVal>
</Parm>
<Parm Kwd="TIMFMT" PosNbr="9" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Time format" Len="8" Rstd="YES" Dft="*HMS" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*HMS, *USA, *ISO, *EUR, *JIS">
<SpcVal>
<Value Val="*HMS" MapTo="*HMS " />
<Value Val="*USA" MapTo="*USA" />
<Value Val="*ISO" MapTo="*ISO" />
<Value Val="*EUR" MapTo="*EUR" />
<Value Val="*JIS" MapTo="*JIS" />
</SpcVal>
</Parm>
<Parm Kwd="TIMSEP" PosNbr="10" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Time separator character" Len="8" Rstd="YES" Dft="*JOB" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*JOB, :, ., ,, ' ', *BLANK">
<SpcVal>
<Value Val="*JOB" MapTo="*JOB " />
<Value Val="':'" MapTo="*COLON" />
<Value Val="'.'" MapTo="*PERIOD" />
<Value Val="','" MapTo="*COMMA" />
<Value Val="' '" MapTo="*BLANK" />
<Value Val="*BLANK" MapTo="*BLANK" />
</SpcVal>
</Parm>
<Parm Kwd="DFTRDBCOL" PosNbr="12" KeyParm="NO" PmtCtl="PMTRQS" Type="NAME" Min="0" Max="1" Prompt="Default collection" Len="10" Rstd="NO" Dft="*NONE" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="Name">
<SpcVal>
<Value Val="*NONE" MapTo="*NONE" />
</SpcVal>
</Parm>
<Parm Kwd="SAAFLAG" PosNbr="13" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="IBM SQL flagging" Len="8" Rstd="YES" Dft="*NOFLAG" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NOFLAG, *FLAG">
<SpcVal>
<Value Val="*NOFLAG" MapTo="*NOFLAG" />
<Value Val="*FLAG" MapTo="*FLAG" />
</SpcVal>
</Parm>
<Parm Kwd="FLAGSTD" PosNbr="14" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="ANS flagging" Len="8" Rstd="YES" Dft="*NONE" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NONE, *ANS">
<SpcVal>
<Value Val="*NONE" MapTo="*NONE" />
<Value Val="*ANS" MapTo="*ANS" />
</SpcVal>
</Parm>
<Parm Kwd="DECMPT" PosNbr="15" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Decimal point" Len="10" Rstd="YES" Dft="*JOB" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*JOB, *SYSVAL, *PERIOD...">
<SpcVal>
<Value Val="*JOB" MapTo="*JOB" />
<Value Val="*SYSVAL" MapTo="*SYSVAL" />
<Value Val="*PERIOD" MapTo="*PERIOD" />
<Value Val="*COMMA" MapTo="*COMMA" />
</SpcVal>
</Parm>
<Parm Kwd="SRTSEQ" PosNbr="16" KeyParm="NO" PmtCtl="PMTRQS" Type="QUAL" Min="0" Max="1" Prompt="Sort sequence" Rstd="NO" Dft="*JOB" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="*JOB, *LANGIDUNQ...">
<SngVal>
<Value Val="*JOB" MapTo="*JOB" />
<Value Val="*LANGIDUNQ" MapTo="*LANGIDUNQ" />
<Value Val="*LANGIDSHR" MapTo="*LANGIDSHR" />
<Value Val="*HEX" MapTo="*HEX" />
</SngVal>
<Qual Type="NAME" Min="1" Max="1" Len="10" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name" />
<Qual Type="NAME" Min="0" Max="1" Prompt="Library" Len="10" Rstd="NO" Dft="*LIBL" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name">
<SpcVal>
<Value Val="*LIBL" MapTo="*LIBL" />
<Value Val="*CURLIB" MapTo="*CURLIB" />
</SpcVal>
</Qual>
</Parm>
<Parm Kwd="LANGID" PosNbr="17" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Language id" Len="10" Rstd="NO" Dft="*JOB" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="__PGM" ChoicePgm="QLGPMCHC" ChoiceLib="QSYS">
<SpcVal>
<Value Val="*JOB" MapTo="*JOB" />
</SpcVal>
<ChoicePgmText Text="*JOB, *JOBRUN..." />
<ChoicePgmValues>
<Value Val="*JOB" />
<Value Val="*JOBRUN" />
<Value Val="AFR Afrikaans" />
<Value Val="SQI Albanian" />
<Value Val="ARA Arabic" />
<Value Val="NLB Belgian Dutch" />
<Value Val="FRB Belgian French" />
<Value Val="ENB Belgium English" />
<Value Val="PTB Brazilian Portuguese" />
<Value Val="BGR Bulgarian" />
<Value Val="BEL Byelorussian" />
<Value Val="FRC Canadian French" />
<Value Val="CAT Catalan" />
<Value Val="HRV Croatian" />
<Value Val="CSY Czech" />
<Value Val="DAN Danish" />
<Value Val="NLD Dutch" />
<Value Val="ENA English Australian" />
<Value Val="ENP English Upper Case" />
<Value Val="EST Estonian" />
<Value Val="FAR Farsi" />
<Value Val="FIN Finnish" />
<Value Val="FRA French" />
<Value Val="DEU German" />
<Value Val="ELL Greek" />
<Value Val="HEB Hebrew" />
<Value Val="HUN Hungarian" />
<Value Val="ISL Icelandic" />
<Value Val="GAE Irish Gaelic" />
<Value Val="ITA Italian" />
<Value Val="JPN Japanese Katakana" />
<Value Val="KOR Korean" />
<Value Val="LAO Lao" />
<Value Val="LVA Latvian" />
<Value Val="LTU Lithuanian" />
<Value Val="MKD Macedonian" />
<Value Val="NOR Norwegian - Bokmal" />
<Value Val="NON Norwegian - Nynorsk" />
<Value Val="PLK Polish" />
<Value Val="PTG Portuguese" />
<Value Val="RMS Rhaeto-Romanic" />
<Value Val="ROM Romanian" />
<Value Val="RUS Russian" />
<Value Val="SRB Serbian" />
<Value Val="SRB Serbian Cyrillic" />
<Value Val="SRL Serbian Latin" />
<Value Val="CHS Simplified Chinese" />
<Value Val="SKY Slovakian" />
<Value Val="SLO Slovenian" />
<Value Val="ESP Spanish" />
<Value Val="SVE Swedish" />
<Value Val="FRS Swiss French" />
<Value Val="DES Swiss German" />
<Value Val="ITS Swiss Italian" />
<Value Val="THA Thai" />
<Value Val="CHT Traditional Chinese" />
<Value Val="TRK Turkish" />
<Value Val="UKR Ukrainian" />
<Value Val="URD Urdu" />
<Value Val="ENG UK English" />
<Value Val="ENU US English" />
<Value Val="VIE Vietnamese" />
</ChoicePgmValues>
</Parm>
<Parm Kwd="PRTFILE" PosNbr="19" KeyParm="NO" PmtCtl="PMTRQS" Type="QUAL" Min="0" Max="1" Prompt="Print file" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES">
<Qual Type="NAME" Min="0" Max="1" Len="10" Rstd="NO" Dft="QSYSPRT" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name" />
<Qual Type="NAME" Min="0" Max="1" Prompt="Library" Len="10" Rstd="NO" Dft="*LIBL" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Name">
<SpcVal>
<Value Val="*LIBL" MapTo="*LIBL" />
<Value Val="*CURLIB" MapTo="*CURLIB" />
</SpcVal>
</Qual>
</Parm>
<Parm Kwd="PROCESS" PosNbr="20" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Statement processing" Len="10" Rstd="YES" Dft="*RUN" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*RUN, *SYN">
<SpcVal>
<Value Val="*RUN" MapTo="*RUN" />
<Value Val="*SYN" MapTo="*SYN" />
</SpcVal>
</Parm>
<Parm Kwd="ALWCPYDTA" PosNbr="22" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Allow copy of data" Len="10" Rstd="YES" Dft="*OPTIMIZE" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*OPTIMIZE, *YES, *NO">
<SpcVal>
<Value Val="*OPTIMIZE" MapTo="*OPTIMIZE" />
<Value Val="*YES" MapTo="*YES" />
<Value Val="*NO" MapTo="*NO " />
</SpcVal>
</Parm>
<Parm Kwd="ALWBLK" PosNbr="23" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Allow blocking" Len="10" Rstd="YES" Dft="*ALLREAD" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*ALLREAD, *NONE, *READ">
<SpcVal>
<Value Val="*ALLREAD" MapTo="*ALLREAD" />
<Value Val="*NONE" MapTo="*NONE " />
<Value Val="*READ" MapTo="*READ" />
</SpcVal>
</Parm>
<Parm Kwd="SQLCURRULE" PosNbr="24" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="SQL rules" Len="10" Rstd="YES" Dft="*DB2" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*DB2, *STD">
<SpcVal>
<Value Val="*DB2" MapTo="*DB2" />
<Value Val="*STD" MapTo="*STD" />
</SpcVal>
</Parm>
<Parm Kwd="DECRESULT" PosNbr="25" KeyParm="NO" PmtCtl="PMTRQS" Type="ELEM" Min="0" Max="1" Prompt="Decimal result options" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES">
<Elem Type="INT2" Min="0" Max="1" Prompt="Maximum precision" Rstd="YES" Dft="31" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="31, 63">
<Values>
<Value Val="31" />
<Value Val="63" />
</Values>
</Elem>
<Elem Type="INT2" Min="0" Max="1" Prompt="Maximum scale" Rstd="NO" Dft="31" RangeMinVal="0" RangeMaxVal="63" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="0-63" />
<Elem Type="INT2" Min="0" Max="1" Prompt="Minimum divide scale" Rstd="NO" Dft="0" RangeMinVal="0" RangeMaxVal="9" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="0-9" />
</Parm>
<Parm Kwd="OUTPUT" PosNbr="28" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Listing output" Len="10" Rstd="YES" Dft="*NONE" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NONE, *ERROR, *NOLIST...">
<SpcVal>
<Value Val="*NONE" MapTo="*NONE" />
<Value Val="*ERROR" MapTo="*ERROR" />
<Value Val="*NOLIST" MapTo="*NOLIST" />
<Value Val="*MSG" MapTo="*MSG" />
<Value Val="*PRINT" MapTo="*PRINT" />
</SpcVal>
</Parm>
<Parm Kwd="TGTRLS" PosNbr="29" KeyParm="NO" PmtCtl="PMTRQS" Type="SNAME" Min="0" Max="1" Prompt="Target release" Len="10" Rstd="NO" Dft="*CURRENT" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="*CURRENT, VxRxMx">
<SpcVal>
<Value Val="*CURRENT" MapTo="*CURRENT" />
</SpcVal>
</Parm>
<Parm Kwd="DBGVIEW" PosNbr="30" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Debugging view" Len="10" Rstd="YES" Dft="*NONE" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NONE, *SOURCE, *STMT, *LIST">
<SpcVal>
<Value Val="*NONE" MapTo="*NONE" />
<Value Val="*SOURCE" MapTo="*SOURCE" />
<Value Val="*STMT" MapTo="*STMT" />
<Value Val="*LIST" MapTo="*LIST" />
</SpcVal>
</Parm>
<Parm Kwd="CLOSQLCSR" PosNbr="31" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Close SQL cursor" Len="10" Rstd="YES" Dft="*ENDMOD" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*ENDMOD, *ENDACTGRP">
<SpcVal>
<Value Val="*ENDMOD" MapTo="*ENDMOD" />
<Value Val="*ENDACTGRP" MapTo="*ENDACTGRP" />
</SpcVal>
</Parm>
<Parm Kwd="DLYPRP" PosNbr="32" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Delay PREPARE" Len="10" Rstd="YES" Dft="*NO" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NO, *YES">
<SpcVal>
<Value Val="*NO" MapTo="*NO " />
<Value Val="*YES" MapTo="*YES" />
</SpcVal>
</Parm>
<Parm Kwd="USRPRF" PosNbr="33" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="User profile" Len="10" Rstd="YES" Dft="*NAMING" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NAMING, *USER, *OWNER">
<SpcVal>
<Value Val="*NAMING" MapTo="*NAMING" />
<Value Val="*USER" MapTo="*USER" />
<Value Val="*OWNER" MapTo="*OWNER" />
</SpcVal>
</Parm>
<Parm Kwd="DYNUSRPRF" PosNbr="34" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Dynamic user profile" Len="10" Rstd="YES" Dft="*USER" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*USER, *OWNER">
<SpcVal>
<Value Val="*USER" MapTo="*USER" />
<Value Val="*OWNER" MapTo="*OWNER" />
</SpcVal>
</Parm>
<Parm Kwd="SRCSTMF" PosNbr="3" KeyParm="NO" Type="PNAME" Min="0" Max="1" Prompt="Source stream file" Len="5000" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="YES" Full="NO" DspInput="YES" Choice="Path name" />
<Parm Kwd="SECLVLTXT" PosNbr="21" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Second level text" Len="10" Rstd="YES" Dft="*NO" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*NO, *YES">
<SpcVal>
<Value Val="*NO" MapTo="*NO " />
<Value Val="*YES" MapTo="*YES" />
</SpcVal>
</Parm>
<Parm Kwd="MARGINS" PosNbr="11" KeyParm="NO" PmtCtl="PMTRQS" Type="ELEM" Min="0" Max="1" Prompt="Source margins" Rstd="NO" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES">
<Elem Type="INT2" Min="0" Max="1" Prompt="Right margin" Rstd="NO" Dft="80" RangeMinVal="1" RangeMaxVal="32754" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="1-32754" />
</Parm>
<Parm Kwd="CONACC" PosNbr="26" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Concurrent access resolution" Len="7" Rstd="YES" Dft="*DFT" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*DFT, *CURCMT, *WAIT">
<SpcVal>
<Value Val="*DFT" MapTo="*DFT" />
<Value Val="*CURCMT" MapTo="*CURCMT" />
<Value Val="*WAIT" MapTo="*WAIT" />
</SpcVal>
</Parm>
<Parm Kwd="OPTION" PosNbr="18" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="Source listing options" Len="8" Rstd="YES" Dft="*LIST" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*LIST, *NOSRC, *ERRLIST...">
<SpcVal>
<Value Val="*LIST" MapTo="*LIST" />
<Value Val="*NOSRC" MapTo="*NOSRC" />
<Value Val="*ERRLIST" MapTo="*ERRLIST" />
<Value Val="*NOLIST" MapTo="*NOLIST" />
</SpcVal>
</Parm>
<Parm Kwd="SYSTIME" PosNbr="27" KeyParm="NO" PmtCtl="PMTRQS" Type="CHAR" Min="0" Max="1" Prompt="System time sensitive" Len="10" Rstd="YES" Dft="*YES" AlwUnprt="YES" AlwVar="YES" Expr="NO" Full="NO" DspInput="YES" Choice="*YES, *NO">
<SpcVal>
<Value Val="*YES" MapTo="*YES" />
<Value Val="*NO" MapTo="*NO " />
</SpcVal>
</Parm>
<Dep CtlKwdRel="SPCFD" CtlKwd="SRCSTMF" NbrTrueRel="NE" NbrTrue="1" MsgID="SQL8019">
<DepParm Kwd="SRCMBR" Rel="SPCFD" />
</Dep>
<Dep CtlKwdRel="SPCFD" CtlKwd="SRCSTMF" NbrTrueRel="NE" NbrTrue="1" MsgID="SQL8023">
<DepParm Kwd="SRCFILE" Rel="SPCFD" />
</Dep>
<Dep CtlKwdRel="ALWAYS" NbrTrueRel="EQ" NbrTrue="1" MsgID="SQL8025">
<DepParm Kwd="SRCFILE" Rel="SPCFD" />
<DepParm Kwd="SRCSTMF" Rel="SPCFD" />
</Dep>
<Dep CtlKwdRel="SPCFD" CtlKwd="SRCFILE" NbrTrueRel="EQ" NbrTrue="1" MsgID="SQL8022">
<DepParm Kwd="SRCMBR" Rel="SPCFD" />
</Dep>
</Cmd>
</QcdCLCmd>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment