function is4cTestAndDie($dbConn2)
{
global $dieMail;
$selectIs4c = "SELECT CardNo, LastName from custdata LIMIT 5;";
$customers = $dbConn2->query("{$selectIs4c}");
if ($dbConn2->errno) {
$message = sprintf("Select failed: %s\n", $dbConn->error);
dieHere($message, $dieMail);
}
if (!$customers) {
$msg = sprintf("Failed on: %s", $selectIs4c);
dieHere("{$msg}", 0);
}
echo "IS4C Numbered\n";
while ($row = $dbConn2->fetch_row($customers)) {
$flds = getNameKeys($row);
$lineOut = implode("\t", $flds) . "\n";
echo $lineOut;
$vals = getNameValues($row);
$lineOut = implode("\t", $vals) . "\n";
echo $lineOut;
$lineOut = implode("\t", array($row[CardNo], $row[LastName])) . "\n";
echo $lineOut;
}
dieHere("IS4C OK, bailing ...", 0);
// is4cTestAndDie();
}
} else {
// Compose the update statement.
$updateMemberCards = "UPDATE memberCards SET\nupc = '{$memberCards['upc']}'\nWHERE card_no = {$memberCards['card_no']}\n;";
}
// memberCards, if anything to record.
}
/* stockpurchases
*/
// Local monitor
if ($uniqueCid % 10 == 0) {
//echo "Done: $uniqueCid members.\n";
1;
}
// Each unique Cid (member)
}
$vals = getNameValues($row);
$lineOut = implode("\t", $vals) . "\n";
$writeOK = fwrite($outer, $lineOut);
if (!$writeOK) {
//$dbConn->close();
dieHere("Could not write to {$outFile}\n");
}
$outCount++;
// each Civi $row
}
// Do the last Civi row.
if ($writeIS4C) {
//echo "To DML is4cOp >${is4cOp}< CardNo >$custdata[CardNo]<\n";
// Is the op for the just-finished member to be insert or update?
if (True || $is4cOp1 == "insert") {
// Insert the records for this Individual, Household or Organization.
