Category: Uncategorized

When inserting from another file using SQl

make sure you have matching fields selected (ignore timestamps)

INSERT INTO DC@DEVLIB/M@ACTMNT (AGENT, ACCTNO, POLICY, EFFDTE,
EDSNO, INSNAM, AGYTYP) SELECT * FROM masonm/webfl100 a WHERE not
exists (select agent from dc@devlib/M@actmnt b where
a.acctno=b.acctno)
83 rows inserted in M@ACTMNT in DC@DEVLIB.

EDPX Form Validations

<HTML>
<HEAD>
<TITLE>Form Validation Example </TITLE>
<SCRIPT LANGUAGE=”JavaScript”>
<!–

//* This is an attempt to eventually pull out the file level
//* validations from the LANSA repository to be applied on client side

function validateForm()
{
var myattr=new Array();
bldAttrArray(myattr);
if(chkreqelements(myattr,’form’)) {return(true);} else {return(false);}
if(customValidations) {return(true);} else {return(false);}
}

function validateField(vfieldobj)
{
var myfieldobj=vfieldobj;
var myfieldattr=new Array();
bldFieldAttrArray(myfieldobj,myfieldattr);
if(!chkreqelements(myfieldattr,’field’)) ErrField(myfieldobj);
}

function bldAttrArray(bldattrarr)
{
var attstr=”what is in new array\n\n”;
var attnodeName=””;
var attnodeValue=””;
var k=0;
for(i=0;i<document.LANSA.elements.length;i++)
{
for(j=0;j<document.LANSA.elements[i].attributes.length;j++)
{
attnodeName=document.LANSA.elements[i].attributes[j].nodeName.toUpperCase();
if(attnodeName==”EDPX”)
{
attnodeValue=document.LANSA.elements[i].attributes[j].nodeValue;
attnodeValue=attnodeValue.toUpperCase();
k=bldattrarr.length;
bldattrarr[ k ]=document.LANSA.elements[i].id+”:”+attnodeValue;
attstr += bldattrarr[ k ]+”  “;
}
}
attstr += “\n”;
}
//* remove comment bellow to see all EDPX elements in form
//*alert( attstr );
}

function bldFieldAttrArray(fieldobj,fieldattarr)
{
var fieldattobj=fieldobj;
var fieldattstr=”what is in field array\n\n”;
var fieldattnodeName=””;
var fieldattnodeValue=””;
var k=0;
for(j=0;j<fieldattobj.attributes.length;j++)
{
fieldattnodeName=fieldattobj.attributes[j].nodeName.toUpperCase();
if(fieldattnodeName==”EDPX”)
{
fieldattnodeValue=fieldattobj.attributes[j].nodeValue;
fieldattnodeValue=fieldattnodeValue.toUpperCase();
k=fieldattarr.length;
fieldattarr[ k ]=fieldattobj.id+”:”+fieldattnodeValue;
fieldattstr += fieldattarr[ k ]+”  “;
}
}
fieldattstr += “\n”;
//* remove comment bellow to see all EDPX elements in form
//* alert(fieldattstr);
}

function chkreqelements(attarr,atttyp)
{
var cremsg=”The Following errors have been found: “;
//* For LANSA users Messages can be put in a browse list *NOBICP then do a merge list here
var crems00=”is required and must be entered”
var crems01=”has bad address “;
var crems02=”has invalid characters a-z A-Z “;
var crems03=”has invalid characters a-z A-Z 0-9 “;
var crems04=”is not a number “;
var crems05=”can not be a number “;
var crems06=”is invalid date “;
var crems07=”is not an acceptable range for Date of Birth “;
var crems08=”is invalid format ###-##-#### “;
var crems09=” “;
var crems10=” “;
var crems11=” “;
var crems12=” “;
var crems13=” “;
var crems14=” “;
var crems15=” “;
var crems99=”ERROR COUNT ->  “;
var creid=””;
var creval=””;
var crestr=””;
var dotdot=0;
var creobj=””;
var crereq=””;
var cretyp=””;
var cretxt=””;
var errcnt=0;
var cretmp=””;
cremsg += “\n\n”;

for(i=0;i<attarr.length;i++)
{
crestr=attarr[i];
dotdot=crestr.indexOf(“:”);
creid=crestr.substr(0,dotdot);
creval=crestr.substr(dotdot+1,crestr.length-1);
crereq=creval.match(“REQ”);
creobj=document.getElementById(creid);
creobj.value=trimTrailingBlanks(creobj.value);

if(creobj.value.length == 0)
{
//* Format of message here
cretmp=creobj.name+” as NULL => ”
if(creval.match(“REQ”)) {errcnt=errcnt+1;cremsg +=cretmp+crems00+”\n”;}

}
else
{
//* Format of message here
cretmp=creobj.name+” as “+creobj.value+”  => ”

//* Add new validation checks here
if(creval.match(“EML”)) {if(!emailValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems01+”\n”;}}
if(creval.match(“A2Z”)) {if(!isAlpha(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems02+”\n”;}}
if(creval.match(“A29″)) {if(!isAlphanumeric(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems03+”\n”;}}
if(creval.match(“NUM”)) {if(!isNumeric(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems04+”\n”;}}
if(creval.match(“NAN”)) {if(isNumeric(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems05+”\n”;}}
if(creval.match(“DTE”)) {if(!dmyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems06+”\n”;continue}}
if(creval.match(“DOB”)) {if(!dmyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems07+”\n”;}}
if(creval.match(“SSN”)) {if(!isSSN(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems08+”\n”;}}
if(creval.match(“ZIP”)) {if(!isZipcodeUSA(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems09+”\n”;}}
if(creval.match(“ZZZ”)) {if(!dummyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems10+”\n”;}}
if(creval.match(“ZZZ”)) {if(!dummyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems11+”\n”;}}
if(creval.match(“ZZZ”)) {if(!dummyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems12+”\n”;}}
if(creval.match(“ZZZ”)) {if(!dummyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems13+”\n”;}}
if(creval.match(“ZZZ”)) {if(!dummyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems14+”\n”;}}
if(creval.match(“ZZZ”)) {if(!dummyValidator(creobj)){errcnt=errcnt+1;cremsg +=cretmp+crems15+”\n”;}}

}

}
if(errcnt!= 0)
{
if(errcnt!=1) cremsg+=”\n”+crems99+errcnt;
if(atttyp==’form’) alert( cremsg );
return(false);
}
else
{return(true);}
}

function trimTrailingBlanks(TrimtrailingblanksValue)
{trim=TrimtrailingblanksValue;
if (trim.length==0) return trim;
for (var i=trim.length-1;i>=0;i–) if (trim.substring(i,i+1) !=’ ‘) {i++;break;}
if (i<0) i=0;
trim=trim.substring(0,i);
return trim;
}

//* ==============================================
//* Validation functions — Add new functions here
//* ==============================================

function isNumeric(elem){
var numericExpression = /^[0-9]+$/;
if(elem.value.match(numericExpression)){
return true;
}else{ return false;}
}

// If the element’s string matches the regular expression it is all letters
function isAlpha(elem){
var alphaExp = /^[a-zA-Z]+$/;
if(elem.value.match(alphaExp)){
return true;
}else{ return false;}
}

// If the element’s string matches the regular expression it is numbers and letters
function isAlphanumeric(elem){
var alphaExp = /^[0-9a-zA-Z]+$/;
if(elem.value.match(alphaExp)){
return true;
}else{ return false;}
}

function lengthRestriction(elem, min, max){
var uInput = elem.value;
if(uInput.length >= min && uInput.length <= max){
return true;
}else{ return false;}
}

function emailValidator(elem){
var emailExp = /^[\w\-\.\+]+\@[a-zA-Z0-9\.\-]+\.[a-zA-z0-9]{2,4}$/;
if(elem.value.match(emailExp)){
return true;
}else{ return false;}
}

function dummyValidator(elem){
if(elem==elem){
return true;
}else{ return false;}
}

function dmyValidator(elem) {
var RegExPattern = /^(?=\d)(?:(?:(?:(?:(?:0?[13578]|1[02])(\/|-|\.)31)\1|(?:(?:0?[1,3-9]|1[0-2])(\/|-|\.)(?:29|30)\2))(?:(?:1[6-9]|[2-9]\d)?\d{2})|(?:0?2(\/|-|\.)29\3(?:(?:(?:1[6-9]|[2-9]\d)?(?:0[48]|[2468][048]|[13579][26])|(?:(?:16|[2468][048]|[3579][26])00))))|(?:(?:0?[1-9])|(?:1[0-2]))(\/|-|\.)(?:0?[1-9]|1\d|2[0-8])\4(?:(?:1[6-9]|[2-9]\d)?\d{2}))($|\ (?=\d)))?(((0?[1-9]|1[012])(:[0-5]\d){0,2}(\ [AP]M))|([01]\d|2[0-3])(:[0-5]\d){1,2})?$/;
if (elem.value.match(RegExPattern)) {
return true;
} else { return false;}
}

function ssnValidation(elem) {
var ssn = elem.value;
var matchArr = ssn.match();
var numDashes = ssn.split(‘-‘).length – 1;
if (matchArr == null || numDashes == 1 || (parseInt(matchArr[1],10)==0)) {return false;}   else {  return true;}}

function isSSN(elem){
var numericExpression = /^(\d{3})-?\d{2}-?\d{4}$/;
if(elem.value.match(numericExpression)){
return true;
}else{ return false;}
}

function isZipcodeUSA(elem)
{
var iszip = elem.value;
var numDashes = elem.value.split(‘-‘).length – 1;
var islength = elem.value.length;
if (islength == 5)
{
if(isNumeric(elem))
{
return true;
} else { return false;}
}
}

//#######################################
//### Highlight/Unhighlight Focused Input Fields
//#######################################
function focusWork(focusworkThis,focusworkEvent)
{var Event=focusworkEvent;
var This=focusworkThis;
if (Event.type==’focus’) This.style.backgroundColor=’Yellow’;
if (Event.type==’blur’)
{ This.style.backgroundColor=’White’;
validateField(This);}
}
//#######################################
//### Error Notify Red Background Fields
//#######################################
function ErrField(errfieldThis)
{ var This=errfieldThis;
This.style.backgroundColor=’Pink’;
}

function isCustom()
{
//* Put your custom specific validations here (false=fail)
if(‘a’ == ‘a’) {return(true);}
else {return false;}
}

</SCRIPT>
</HEAD>

<BODY>
<CENTER>
<FONT SIZE=”5″ COLOR=”#006600″ FACE=”verdana”>Form Validation</FONT>
</CENTER><BR><BR>
<FORM METHOD=POST ACTION=”http://www.MerchantsGroup.com/” NAME=”LANSA”>
<TABLE ALIGN=”CENTER”>
<TR>
<TD>First Name</TD>
<TD><INPUT TYPE=”TEXT” NAME=”FIRST NAME” ID=”fname” EDPX=”RXQA2Z004010REQ” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)”></TD>
</TR>
<TR>
<TD>Last Name</TD>
<TD><INPUT TYPE=”TEXT” NAME=”LAST NAME” ID=”lname” EDPX=”REQa2z” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)””></TD>
</TR>
<TR>
<TD>Date of Birth</TD>
<TD><INPUT TYPE=”TEXT” NAME=”DATE OF BIRTH” ID=”dob” EDPX=”REQDTEDOB” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)””></TD>
</TR>
<TR>
<TD>Email</TD>
<TD><INPUT TYPE=”TEXT” NAME=”EMAIL” ID=”email1″ EDPX=”REQEML” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)”></TD>
</TR>
<TR>
<TD>Email 2</TD>
<TD><INPUT TYPE=”TEXT” NAME=”EMAIL2″ ID=”email2″ EDPX=”OPTEML” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)””></TD>
</TR>
<TR>
<TD>SS Number</TD>
<TD><INPUT TYPE=”TEXT” NAME=”SSN” ID=”SSN” EDPX=”OPTSSN” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)””></TD>
</TR>

<TR>
<TD>Zip Code</TD>
<TD><INPUT TYPE=”TEXT” NAME=”zip” ID=”zip” EDPX=”REQOPTZIP” onfocus =”focusWork(this,event)” onblur=”focusWork(this,event)””></TD>
</TR>

<TR>
<TD><INPUT TYPE=”SUBMIT” VALUE=”Submit Form” ID=”BUTTON2″ onClick=”return validateForm()”></TD>
<TD><INPUT TYPE=”RESET” VALUE=”Reset”></TD>
</TR>
</TABLE>

</FORM>

</BODY>
</HTML>

Domains that are Works in Progress

http://zoolander.us
http://wreward.com
http://wpfl.info
http://wmaps.com
http://wgfl.info
http://webkinzfordummies.com
http://wdude.com
http://wdonor.com
http://vegasdir.com
http://ukjobs.us

Samples and Snipets to make a programmer’s day a little easier.


http://traveler-id.com
http://tifl.info
http://swimid.com
http://skater-id.com
http://sillytag.com
http://sillysticker.com
http://sillylogo.com
http://sifl.info
http://send-msg.com
http://sbfl.info
http://sabfl.com
http://rpbfl.info
http://recoveryid.us
http://recoveryid.org
http://recoveryid.net
http://recoveryid.mobi
http://realgroups.com
http://raffle-id.com
http://ppfl.info
http://pofl.info
http://pifl.info
http://pcfl.mobi
http://pcfl.info
http://pbfl.info
http://passportemail.com
http://owzd.com
http://orldir.com
http://opfl.info
http://oceanfrontsites.com
http://oceanfrontdeal.com
http://obfl.info
http://nsbfl.info
http://nbfl.info
http://myseacolony.com
http://mbfl.info

Home


http://maintheory.com
http://lwqb.com
http://lwfl.info
http://lunchbyte.com

Home Dark


http://lost-24.net
http://lost-24.com
http://londonjobs.us
http://lkfl.info
http://lansaonline.com
http://lansa.mobi
http://key-it-in.com
http://kbfl.info
http://jbfl.info
http://jaxdir.com
http://iwgb.com
http://itumble.com
http://iretard.com
http://imagekid.com
http://ilost.us
http://hhfl.info
http://hcfl.info
http://golfer-id.com
http://gcsfl.com
http://fwbfl.info
http://fpfl.info
http://floridaoceanfronthomes.com
http://flaglerjobs.com
http://flagler.tv
http://e3l.net
http://devscript.com
http://customer-id.com
http://crackerday.com
http://cityread.com

Contact


http://bloodygoodbloke.com
http://biker-id.com
http://bat-id.com
http://apple-id.com
http://ambazamba.com
http://abfl.info
http://4jl.com
http://4gl.biz
http://12i.us

I-95 Exits Old to New Numbering

Old Number / New Number / Intersecting Roadway
South 1 1A Rickenbacker Causeway
North & South 2 1B SW 8th St./SW 7th St.
North & South 3 2A US 1
North 4 2B NW 2nd St.
South 3A 2C Miami Ave.
North & South 5 2D I-395
North & South 6 3A SR 836 West
South 5A 3B NW 8th St.
South 7 4 I-195 and SR 112
North 7 4A I-195
North 7 4B I-195 and SR 112
North & South 8 6A SR 944 (NW 62nd St./NW 54th St.)
South 9A 6B NW 69th St.
North & South 9 7 SR 934 (NW 79th St./NW 81st St.)
North & South 10 8A NW 95th St.
North & South 11 8B SR 932 (NW 103rd St.)
North 12 9 SR 924 (NW 119th St.)
North & South 13 10A NW 125th St.
North & South 14 10B SR 916 (Opa Locka Blvd.)
North 15 11 NW 151st St.
North 16 12A SR 826 West/Florida’s Turnpike
North 17 12B SR 826 East
North 18 12C US 441
South 18 12 US 441 (SR 826/Florida’s Turnpike/ SR 9)
North & South 19 14 SR 860 (Miami Gardens Dr.)
North & South 20 16 Ives Dairy Rd.
North & South 21 18 SR 858 (Hallandale Beach Blvd.)
North & South 22 19 SR 824 (Pembroke Rd.)
North & South 23 20 SR 820 (Hollywood Blvd.)
North & South 24 21 SR 822 (Sheridan St.)
North & South 25 22 SR 848 (Stirling Rd.)
North & South 26 23 SR 818 (Griffin Rd.)
North 26A 24 I-595 West
North 26B 24 I-595 East
North & South 27 25 SR 84 (SW 24th St.)
South 26C 26 I-595 East
South 26D 26 I-595 West
North & South 28 26 SR 736 (Davie Blvd.)
North & South 29 27 SR 842 (Broward Blvd.)
South 30 29 SR 838 (Sunrise Blvd.)
North 30A 29A SR 838 (Sunrise Blvd.) East
North 30B 29B SR 838 (Sunrise Blvd.) West
South 31 31 SR 816 (Oakland Park Blvd.)
North 31A 31A SR 816 (Oakland Park Blvd.) East
North 31B 31B SR 816 (Oakland Park Blvd.) West
North & South 32 32 SR 870 (Commercial Blvd.)
South 33 33 SR 840 (Cypress Creek Rd.)
North 33A 33A SR 840 (Cypress Creek Rd.) East
North 33B 33B SR 840 (Cypress Creek Rd.) West
North 34 36 SR 814 (Atlantic Blvd.)
South 34A 36A SR 814 (Atlantic Blvd.) East
South 34B 36B SR 814 (Atlantic Blvd.) West
North 35 38 Copans Rd.
South 35A 38A Copans Rd. East
South 35B 38B Copans Rd. West
North & South 36 39 SR 834 (Sample Rd.)
North & South 36C 41 SR 869 (SW 10th St.)
North 37 42A SR 810 (Hillsboro Blvd.) East
North & South 37B 42B SR 810 (Hillsboro Blvd.) West
North & South 38 44 CR 798 (Palmetto Park Rd.)
North & South 39 45 SR 808 (Glades Rd.)
South 40 48 SR 794 (Yamato Rd.)
North 40A 48A SR 794 (Yamato Rd.) East
North 40B 48B SR 794 (Yamato Rd.) West
North & South 40C 50 Congress Ave.
North & South 41 51 CR 782 (Linton Blvd.)
North 42 52 SR 806 (Atlantic Ave.)
South 42A 52A SR 806 (Atlantic Ave.) East
South 42B 52B SR 806 (Atlantic Ave.) West
North & South 43 56 Woolbright Rd.
North & South 44 57 SR 804 (Boynton Beach Blvd.)
North & South 44C 59 Gateway Blvd./NW 22nd Ave.
North & South 45 60 Hypoluxo Rd.
North & South 46 61 CR 812 (Lantana Rd.)
North & South 47 63 6th Ave. South
North & South 48 64 10th Ave. North
North & South 49 66 SR 882 (Forest Hill Blvd.)
North & South 50 68 US 98 (Southern Blvd.)
North & South 51 69 Belvedere Rd.
North & South 52A 70A SR 704 (Okeechobee Blvd.) East
North & South 52B 70B SR 704 (Okeechobee Blvd.) West
North & South 53 71 Palm Beach Lakes Blvd.
North & South 54 74 CR 702 (45th St.)
North & South 55 76 SR 708 (Blue Heron Blvd.)
North & South 56 77 CR 850 (Northlake Blvd.)

North
57A 79A SR 786 (PGA Blvd.) East

North
57B 79B SR 786 (PGA Blvd.) West
South 57 79AB SR 786 (PGA Blvd.)
South 57C 79C Military Trail South
North & South 58 83 Donald Ross Rd.
North & South 59A 87A SR 706 (Indiantown Rd.) East
North & South 59B 87B SR 706 (Indiantown Rd.) West
North & South 60 96 CR 708
North & South 61 101 SR 76 (Kanner Hwy.)
North & South 61C 102 CR 713 (High Meadows Rd.)
North & South 62 110 SR 714 (Martin Hwy.)
North & South 63 118 Gatlin Blvd.
North & South 63C 121 St. Lucie West Blvd.
North & South 64 126 CR 712 (Midway Rd.)
North & South 65 129 SR 70 (Okeechobee Rd.)
North & South 66A 131A SR 68 (Orange Ave.) East
North & South 66B 131B SR 68 (Orange Ave.) West
North & South 67 138 SR 614 (Indrio Rd.)
North & South 68 147 SR 60 (Osceola Blvd.)
North & South 69 156 CR 512 (Fellsmere Rd.)
North & South 70 173 SR 514
North & South 70A 176 CR 516 (Palm Bay Rd.)
North & South 71 180 US 192
North & South 72 183 SR 518
North & South 73 191 CR 509 (Wickham Rd.)
North & South 74 195 SR 519
North & South 75 201 SR 520
North & South 76 202 SR 524
North & South 77A 205 SR 528 (BeachLine Exwy.) East
North & South 77B 205 SR 528 (BeachLine Exwy.) West
North & South 77C 208 Port St. John Rd.
North & South 78 212 SR 407
North & South 79 215 SR 50
North & South 80 220 SR 406
North & South 81 223 SR 46
North & South 82 231 CR 5A
North & South 83 244 SR 442
North 84 249 SR 44
South 84A 249A SR 44 East
South 84B 249B SR 44 West
North & South 85 256 SR 421
North & South 86A 260A SR 400 East
North & South 86B 260B I-4 West
North 87 261 US 92
South 87A 261A US 92 East
South 87B 261B US 92 West
North & South 87C 265 LPGA Blvd.
North & South 88 268 SR 40
North & South 89 273 US 1
North & South 90 278 Old Dixie Hwy.
North & South 91 284 SR 100
North & South 91C 289 Palm Coast Pkwy.
North & South 92 298 US 1
North & South 93 305 SR 206
North & South 94 311 SR 207
North & South 95 318 SR 16
North & South 95A 323 International Golf Pkwy.
North & South 96 329 CR 210
North & South – 335 Old St Augustine Rd.
North & South 97 337 I-295 North
North & South 98 339 US 1 (Phillips Hwy.)
North 99 340 SR 115 (Southside Blvd.)
North & South 100 341 SR 152 (Baymeadows Rd.)
North & South 101 344 SR 202 (J. Turner Butler Blvd.)
North 102 345 Bowden Rd. to SR 109/University Blvd.
South 103A 346A SR 109 (University Blvd.) East
South 103B 346B SR 109 (University Blvd.) West
North & South 104 347 Alt. US 1 (SR 126/Emerson St.)
South 105 348 US 1 (Phillips Hwy.)
South 106 349 US 90 East
North 107 350A US 1 (Prudential Dr.)
South 108 350B SR 13 (San Marco Blvd.)
North 109 351A Park St.
North 111 351B I-10 West
South 112 351C Margaret St.
South 113 351D Stockton St.
North 114 352A Myrtle Ave.
North 114A 352B Forsyth St.
North 115 352C Monroe St.
North & South 116 353A Church St./Myrtle Ave./Forsyth St.
North & South 117 353B US 90 Alt. (Union St.)
North & South 118 353C US 23 (Kings Rd.)
North & South 119 353D SR 114 (8th St.)
North & South 120A 354A US 1 South/MLK Jr. Pkwy. East
North & South 120B 354B US 1 North/MLK Jr. Pkwy. West
North & South 121 355 SR 122 (Golfair Blvd.)
South 122 356 SR 117 (Norwood Ave.)/SR 115 (Lem Turner Rd.)
North 122A 356A SR 117 (Norwood Ave.)
North 122B 356B SR 115 (Lem Turner Rd.)
North & South 123 357 SR 111 (Edgewood Ave.)
North & South 124A 358A SR 105 (Zoo Pkwy/Heckscher Dr.)
North & South 124B 358B Broward Rd.
North & South 125 360 SR 104 (Dunn Ave., Busch Dr.)
North & South 126A 362A SR 9A
North & South 126B 362B I-295
South 127 363 Duval Rd.
(Jacksonville International Airport)
North 127A 363A Duval Rd. East
North 127B 363B Duval Rd. West
(Jacksonville International Airport)
North & South 128 366 Pecan Park Rd.
North & South 129 373 SR 200/SR A1A
North & South 130 380 US 17

A Library is FULL?

Object QRQ140223 in RITA type *DTAQ not found.
Cannot add new objects to library RITA.
Operation failed for QRQ140223 in RITA type *DTAQ.
Object QRQ140223 in library RITA not found.
Function check. CPF9801 unmonitored by CCR0100 at statement 56500,
instruction X’0190′.

We had 1 million data ques in a lib, I guess there is a limit.

Message ID . . . . . . : CPD2120 Severity . . . . . . . : 40
Message type . . . . . : Diagnostic
Date sent . . . . . . : 03/02/06 Time sent . . . . . . : 14:33:07

Message . . . . : Cannot add new objects to library RITA.
Cause . . . . . : The object information repository (OIR) of the library is
full and cannot be extended to contain information for new objects. Objects
currently in the library may be changed, but no new objects can be added to
the library until recovery action is taken.
For System/36 environment libraries, unused OIR entries can accumulate in
the library if disk caching is used. If enough of these unused OIR entries
accumulate for a library, users may be prevented from adding new objects to
the library.
Recovery . . . :
For System/36 environment libraries, the QEXCLNCI program in library QSSP
can be called by a user with QSECOFR authority to remove the unused OIR

entries. The program is called with a single parameter which is a library
name. The QEXCLNCI program attempts to remove the unused entries from the
OIR of that library. To reduce conflicts with other system activity, this
function of the QEXCLNCI program should be performed during times of low
system use.
Either delete some objects from the library, or create a new library
(CRTLIB command) and then move some objects from library RITA (MOVOBJ
command) to the new library. Then try the request again.

SQL to show Deposits by Client in Rita

SELECT BATCH_SEQ_NUM , CLIENT_ID ,sum(int( TRANS_AMOUNT )) FROM
ritadb30/request WHERE STATUS_CODE = 2 and CLIENT_ID = ‘100300001′
and command = ‘COMPLETION’ GROUP BY BATCH_SEQ_NUM, CLIENT_ID ORDER
BY BATCH_SEQ_NUM desc
Then subtract
SELECT BATCH_SEQ_NUM , CLIENT_ID ,sum(int( TRANS_AMOUNT )) FROM
ritadb30/request WHERE STATUS_CODE = 2 and CLIENT_ID = ‘100300001′
and command = ‘CREDIT‘ GROUP BY BATCH_SEQ_NUM, CLIENT_ID ORDER
BY BATCH_SEQ_NUM desc

Helpful SQL Commands for RiTA

Wipe out data in TEST environment

UPDATE RITADB30/REQUEST SET BATCH_SEQ_NUM = -10002, STATUS_CODE = 7
WHERE CLIENT_ID = ‘100010001′

Batch Sequence

select * from ritadb30/merch_term_btch where client_id = ‘100010001′

UPDATE RITADB30/MERCH_TERM_BTCH SET BATCH_SEQ_NUM = 20 WHERE
CLIENT_ID = ‘100010001′