DATA-INTO and ALWBLANKNUM
Posted: Tue Sep 27, 2022 2:56 pm
I have a process that has been working for a while but the provider has suddenly decided (in some instances) to show resulting numeric fields that are zero as "". For example:
"netTotalCreditDollars": ""
When before it was "netTotalCreditDollars": 0
They have done this in the past and corrected the issue but I have this control spec in my program:
ctl-opt dftactgrp(*no) EXPROPTS(*ALWBLANKNUM);
I thought that would have handled it. Is that not the case? Here are my control specs:
And here is my data-structure:
This is the JSON that is getting the error:
If they have a value they are represented correctly:
Am I missing something on the *ALWBLANKNUM value or somewhere else?
Thanks!!!!
"netTotalCreditDollars": ""
When before it was "netTotalCreditDollars": 0
They have done this in the past and corrected the issue but I have this control spec in my program:
ctl-opt dftactgrp(*no) EXPROPTS(*ALWBLANKNUM);
I thought that would have handled it. Is that not the case? Here are my control specs:
Code: Select all
ctl-opt dftactgrp(*no) EXPROPTS(*ALWBLANKNUM);
ctl-opt bnddir('QC2LE':'YAJL');
Code: Select all
dcl-ds CLAIMPROCESSEDRECORD dim(100);
TRACKINGNUMBER varchar(10) inz('');
REPAIRORDERNUMBER varchar(8) inz('');
PRODUCTSERIALNUMBER varchar(20) inz('');
CLAIMNUMBER varchar(20) inz('');
MODELNUMBER varchar(15) inz('');
REPAIRORDEROPENDATE varchar(10) inz('');
DELIVERYDATE varchar(10) inz('');
PRIMARYFAILEDPARTNAME varchar(25) inz('');
PRIMARYFAILEDPARTNUMBER varchar(20) inz('');
CLAIMSTATUSCODE varchar(3) inz('');
CLAIMSTATUSCODEDESCRIPTION varchar(20) inz('');
CLAIMTYPE varchar(2) inz('');
EXCHANGERATE varchar(10) inz('');
PREVIOUSCREDITAMOUNT packed(10:2) inz(0);
PARTCREDITTOTAL packed(9:2) inz(0);
PARTMARKUPTOTAL packed(9:2) inz(0);
LABORCREDITTOTAL packed(10:2) inz(0);
NETITEMCREDITTOTAL packed(9:2) inz(0);
NETTOTALCREDITDOLLARS packed(9: 2) inz(0);
REQUESTEDTOTALDOLLARS packed(9: 2) inz(0);
DIFFERENCETOTALDOLLARS packed(9: 2) inz(0);
DOCUMENTNUMBER varchar(20) inz('');
Code: Select all
"trackingNumber": "M023444489",
"repairOrderNumber": "R336205A",
"productSerialNumber": "6511747863",
"claimNumber": "AT0520867",
"modelNumber": "3414RHS",
"repairOrderOpenDate": "2022-07-26",
"deliveryDate": "2021-03-04",
"primaryFailedPartName": "ECU Recalibration",
"primaryFailedPartNumber": "400",
"claimStatusCode": "50",
"claimStatusCodeDescription": "Denied",
"claimType": "01",
"exchangeRate": "1.0",
"previousCreditAmount": 0,
"partCreditTotal": 0,
"partMarkupTotal": 0,
"laborCreditTotal": 313.75,
"netItemCreditTotal": 36,
"netTotalCreditDollars": "",
"requestedTotalDollars": 450.15,
"differenceTotalDollars": "",
"documentNumber": "",
Code: Select all
"trackingNumber": "M023445044",
"repairOrderNumber": "345661",
"productSerialNumber": "6610550609",
"claimNumber": "AT0526774",
"modelNumber": "4500RDS_P",
"repairOrderOpenDate": "2022-09-09",
"deliveryDate": "2019-06-25",
"primaryFailedPartName": "BODY-VALVE, MAIN, 6SPD",
"primaryFailedPartNumber": "29557154",
"claimStatusCode": "40",
"claimStatusCodeDescription": "Approved",
"claimType": "04",
"exchangeRate": "1.0",
"previousCreditAmount": 0,
"partCreditTotal": 260.75,
"partMarkupTotal": 52.14,
"laborCreditTotal": 715.35,
"netItemCreditTotal": 46.24,
"netTotalCreditDollars": 1074.48,
"requestedTotalDollars": 1074.49,
"differenceTotalDollars": 0.01,
"documentNumber": "9900197704",
Thanks!!!!