FiveTech Software tech support forums

by **reinaldocrespo** » Sun Aug 04, 2013 4:09 pm

Hi.

My users keep logging a recurrent error -albeit it is not possible to consistently reproduce the error. The error text will always point to xbrowse line 6825:

Code: Select all Expand view: Errordescription PathLabs by Structured Systems Corp. ----------------------------------------- App-Path : C:\mp10\PathLabs10.exe Version Info : (Mon 06/10/2013 18:58:58.68) from SVN 213M Filesize : 5,018,112 bytes Max. files : 0 Time from start: 2 hours 7 mins 8 secs Occurance : 08/02/2013, 11:23:16 Computername : HPPRO03-HP User : debora.garcia detailled error description --------------------------- Error BASE/1005 Class: 'NIL' has no property: VALUE Parameter : [ 1] = U [ 2] = C PteName Stack-List ---------- called by _VALUE(0) called by TXBROWSE:TOEXCEL(6825) called by (b)CUSTOMSEARCHES:CONTEXTMENU(220) called by TMENU:ACTIVATE(494) called by TXBROWSE:RBUTTONDOWN(3637)

Here is another logged error on the same line:

Code: Select all Expand view: Errordescription PathLabs by Structured Systems Corp. ----------------------------------------- App-Path : C:\Mp10\PathLabs10.Exe Version Info : (Mon 06/10/2013 18:58:58.68) from SVN 213M Filesize : 5,018,112 bytes Max. files : 0 Time from start: 0 hours 30 mins 14 secs Occurance : 08/02/2013, 07:52:11 Computername : THINK-03 User : vanessa.santiago detailled error description --------------------------- Error BASE/1005 Class: 'NIL' has no property: VALUE Parameter : [ 1] = U [ 2] = C PathNo Stack-List ---------- called by _VALUE(0) called by TXBROWSE:TOEXCEL(6825) called by (b)CUSTOMSEARCHES:CONTEXTMENU(220) called by TMENU:ACTIVATE(494)

Here is the code for line 6825 on my xbrowse:

Code: Select all Expand view: oSheet:Cells( nRow, nCol ):Value := oCol:cHeader

Here is the context to line 6825:

Code: Select all Expand view: for nXCol := 1 TO Len( aCols ) oCol := aCols[ nXCol ] nCol ++ oSheet:Cells( nRow, nCol ):Value := oCol:cHeader //<<== Line 6825 cType := oCol:cDataType if ::nDataType != DATATYPE_ARRAY DO CASE CASE Empty( cType ) // no action CASE cType == 'N' cFormat := Clp2xlNumPic( oCol:cEditPicture ) oSheet:Columns( nCol ):NumberFormat := cFormat oSheet:Columns( nCol ):HorizontalAlignment := - 4152 //xlRight CASE cType == 'D'

Perhaps this is a problem that has already been solved?

Thank you for any help.

Reinaldo.

by **nageswaragunupudi** » Sun Aug 04, 2013 4:37 pm

The error's meaning is that
oSheet:Cells( nRow, nCol ) is NIL, where as it should be a range object.

If for some reason oSheet itself is not a valid worksheet object we should get error that oSheet does not have method Cells. Though I am not sure xharbour can be so precise about reporting this kind of error.

Next possibility is that either nRow or nCol is out of acceptable range.
Definitely both nRow and nCol are > 0.
Could it be possible that nRow has exceeded the number of rows acceptable in the version of Excel?

Can you contribute anything to this line of thinking?

Looking at the xbrowse code, I do not think there is any logical error there.

by **reinaldocrespo** » Sun Aug 04, 2013 5:13 pm

Mr. Rao;

Hi.

I think it is quite possible for nRow to be a out of range. I don't think nCol is the problem, though. nRow could be any number, I have no idea as this xbrowse is an ADS returning cursor executed from SQL that is created as a result of filters set by the user. I will try to learn from users how to reproduce the error consistently.

How can we learn what is the acceptable range for nRow? Perhaps, :ToExcel() should check for this condition before stepping into run-time error generating territory?

Thank you for your help.

Reinaldo.

by **nageswaragunupudi** » Sun Aug 04, 2013 5:16 pm

If you see the full error log you may notice the value of nRow. Can you do that now?

Size limit in recent versions is a little more than 1 million rows. I need to find out the limit for earlier versions. At this moment I also do not know if we can go upto 1 million rows through OLE.
Also let us know their excel version

by **reinaldocrespo** » Sun Aug 04, 2013 5:32 pm

I don't think nRow would reach 1M. I don't think it is possible for this particular installation to be above 300k. I will find from the user their Excel version tomorrow, for now, here is a complete error log. Thank you for helping:

Code: Select all Expand view: Errordescription PathLabs by Structured Systems Corp. ----------------------------------------- App-Path : C:\Mp10\PathLabs10.Exe Version Info : (Mon 06/10/2013 18:58:58.68) from SVN 213M Filesize : 5,018,112 bytes Max. files : 0 Time from start: 0 hours 30 mins 14 secs Occurance : 08/02/2013, 07:52:11 Computername : THINK-03 User : vanessa.santiago detailled error description --------------------------- Error BASE/1005 Class: 'NIL' has no property: VALUE Parameter : [ 1] = U [ 2] = C PathNo Stack-List ---------- called by _VALUE(0) called by TXBROWSE:TOEXCEL(6825) called by (b)CUSTOMSEARCHES:CONTEXTMENU(220) called by TMENU:ACTIVATE(494) called by TXBROWSE:RBUTTONDOWN(3637) called by TWINDOW:HANDLEEVENT(0) called by TCONTROL:HANDLEEVENT(1499) called by TXBROWSE:HANDLEEVENT(11628) called by _FWH(3160) called by WINRUN(0) called by TWINDOW:ACTIVATE(989) called by TAPPLICATION:ACTIVATE(260) called by MAIN(76) CPU type: Pentium(R) Dual-Core CPU E6600 @ 3.06GHz 3066 Mhz Hardware memory: 3552 MB ( available: 2426 MB ) Free System resources: 90 % GDI resources: 90 % User resources: 90 % Compiler version: xHarbour build 1.2.1 Intl. (SimpLex) (Rev. 6741) FiveWin Version: FWHX 11.11 Windows version: 6.1, Build 7601 Service Pack 1 running tasks: 0 --------------- 1 , 2 , C:\Program Files (x86)\Norton Internet Security\Engine\19.1.0.28\ccSvcHst.exe 3 JavaUpdate SysTray Icon, C:\Program Files (x86)\Common Files\Java\Java Update\jucheck.exe 4 PathLabs by Structured Systems Corp., C:\Mp10\PathLabs10.Exe 5 SR0XPCFAX-RECEIVER_CLASS3, C:\Windows\System32\spool\drivers\x64\3\SR0XRCV.exe 6 ScheduledTask, C:\Program Files (x86)\ThinkPad\Utilities\SCHTASK.EXE 7 Select destination and press ENTER or choose Paste, C:\Program Files (x86)\Microsoft Office\Office12\EXCEL.EXE 8 {A7E495BF-9589-4a6e-8479-DDA2D8D3C05F}, C:\Program Files (x86)\Google\GoogleToolbarNotifier\GoogleToolbarNotifier.exe Varlist ------- Name Type Value ------------------------------- _VALUE Param 1: C "PathNo" Local 1: A Len: 1 Local 2: U Local 3: U TXBROWSE:TOEXCEL Local 1: U Local 2: U Local 3: A Len: 15 Local 4: O Class: TXBROWSE Local 5: O Class: TOLEAUTO Local 6: U Local 7: U Local 8: U Local 9: N 2 Local 10: N 2 Local 11: O Class: TXBRWCOLUMN Local 12: C "C" Local 13: U Local 14: U Local 15: U Local 16: N 1 Local 17: N 1 Local 18: N 1 Local 19: U Local 20: U Local 21: U Local 22: U Local 23: U Local 24: A Len: 0 Local 25: L .F. Local 26: A Len: 15 Local 27: L .T. (b)CUSTOMSEARCHES:CONTEXTMENU Param 1: O Class: TMENUITEM TMENU:ACTIVATE Param 1: N 46 Param 2: N 57 Param 3: O Class: TXBROWSE Local 1: L .T. Local 2: N 0 Local 3: O Class: TMENU Local 4: A Len: 2 TXBROWSE:RBUTTONDOWN Param 1: N 34 Param 2: N 105 Param 3: N 2 Local 1: O Class: TXBROWSE Local 2: O Class: TXBRWCOLUMN Local 3: N 2 Local 4: N 1 Local 5: B {|| ... } TWINDOW:HANDLEEVENT Param 1: N 516 Param 2: N 2 Param 3: N 2228329 TCONTROL:HANDLEEVENT Param 1: N 516 Param 2: N 2 Param 3: N 2228329 Local 1: O Class: TXBROWSE Local 2: U TXBROWSE:HANDLEEVENT Param 1: N 516 Param 2: N 2 Param 3: N 2228329 Local 1: O Class: TXBROWSE _FWH Param 1: N 2228329 Param 2: N 516 Param 3: N 2 Param 4: N 2228329 Param 5: N 297 Local 1: O Class: TXBROWSE WINRUN Param 1: N 197662 TWINDOW:ACTIVATE Param 1: C "MAXIMIZED" Param 2: U Param 3: U Param 4: U Param 5: B {|| ... } Param 6: B {|| ... } Param 7: U Param 8: B {|| ... } Param 9: U Param 10: U Param 11: U Param 12: U Param 13: U Param 14: U Param 15: U Param 16: U Param 17: B {|| ... } Param 18: B {|| ... } Param 19: U Local 1: O Class: TWINDOW Local 2: U Local 3: U TAPPLICATION:ACTIVATE Local 1: O Class: TAPPLICATION Local 2: O Class: TAPPLICATION Local 3: U MAIN Local 1: U Local 2: U Local 3: N 1 Local 4: O Class: TLOGIN Local 5: N 0 Local 6: L .T. Local 7: A Len: 0 RDD --- ADS ADT ADSCDX ADSNTX DBF DBFFPT DBFBLOB DBFNTX Open dbf¥s ---------- 1: AUDITLOG0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 47 ***** .F. .F. Index files TagName => account;date;time ACCOUNT TableKey TABLEKEY record;date;time RECORD date;time CREATION table TABLE Changes CHANGES Relations --------- 2: CASEFORM0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 11 .F. .F. Index files TagName => id ID Relations --------- 3: COPYTO000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 73 3107 .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 4: CLOSED000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .T. .T. Index files TagName => Thru THRU Relations --------- 5: DIAG00000 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO TEXT DIAGFTS Relations --------- 6: DIAGFILE0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 17 1406 .F. .F. Index files TagName => ICD_9 ICD_9 VALID;ICD_9 VALID DIAGNOSIS DIAGNOSIS DIAGNOSIS DIAGNOSISFTS Relations --------- 7: DOCTORS00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2077 2607 .F. .F. Index files TagName => ID ID LAST;FIRST LAST EMAIL EMAIL ACTIVE;LAST;FIRST ACTIVE NPI NPI CITY CITY ROUTE ROUTE SPECIALTY;LAST;FIRST SPECIALTY Relations --------- 8: FORMS0000 RddName: ADSNTX ============================== RecNo RecCount BOF EOF 1 84 .F. .F. Index files TagName str(form_num) forms Relations --------- 9: GROSS0000 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO TEXT GROSSFTS Relations --------- 10: HOSPITAL0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 29 94 .F. .F. Index files TagName => NAME NAME Relations --------- 11: ICD4CPTS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .T. .T. Index files TagName => CPT CPT Relations --------- 12: MACROS000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 147 987 .F. .F. Index files TagName => Id ID Descript DESCRIPT Relations --------- 13: MEDSYS000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 1 .F. .F. Index files TagName Relations --------- 14: MICRO0000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 7 7135 .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 15: PATIENTS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 43125 ***** .F. .F. Index files TagName => RECNO RECNO SSN SSN LAST LAST NAME NAME trim(LAST) + " "+ NAME FULLNAME BIRTHDAY BIRTHDAY LAST LASTFTS NAME NAMEFTS SSN SSNFTS MEDPLAN MEDPLAN CITY CITY Creation CREATION Relations --------- 16: PRCLINES0 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => ClaimKey CLAIMKEY Relations --------- 17: PROCFILE0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 3054 5291 .F. .F. Index files TagName CODE1;CPT_4 CODE1 CPT_4;CODE1 CPT_4 DESC DESC => CODE1;CPT_4;EFF_DATE UNIQUE STAND_CODE;CODE1 STAND_CODE Relations --------- 18: PLANFILE0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 790 839 .F. .F. Index files TagName => Name NAME Ins_id INS_ID Relations --------- 19: PAYFILE00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 14974 ***** .F. .F. Index files TagName => ClaimKey CLAIMKEY SERV_DATE SERV_DATE RECNO RECNO INSURANCE INSURANCE LAST_EDIT LAST_EDIT PAY_DATE PAY_DATE CREATION CREATION ADM_NUM ADM_NUM RECIPT_NUM RECIPT_NUM PPControlNum PPCONTROLNUM Relations --------- 20: PTEPYMTS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 2 .F. .F. Index files TagName => ClaimKey CLAIMKEY adm_num;Seq_no ADM_NUM date DATE InputDate INPUTDATE Seq_no SEQ_NO Relations --------- 21: PAY_ITEM0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2 4 .F. .F. Index files TagName => cost_ctr;code CODE Relations --------- 22: PMTRSNS00 RddName: ADSNTX ============================== RecNo RecCount BOF EOF 1 0 .T. .T. Index files TagName Relations --------- 23: PATHLGS00 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO RECNO RECNO S_DATE S_DATE SGN_DATE SGN_DATE REFER_ID REF_ID PATH_CASE PATH_CASE FACILITY FACILITY PTHLGST PTHLGST REFERRING REFERRING R_DATE R_DATE TRIM( LAST )+" "+ NAME NAME Relations --------- 24: PTH_CPTS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 25: PTH_ICDS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 26: REFLABS00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 3 .F. .F. Index files TagName => NAME NAME Relations --------- 27: PTHLGSTS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 13 27 .F. .F. Index files TagName => ID ID Relations --------- 28: SERVICE00 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => claimkey CLAIMKEY recno RECNO serv_date SERV_DATE LAST_EDIT LAST_EDIT CREATION;isClosed CREATION insurance INSURANCE claim CLAIM LastActivity LASTACTIVITY LastStatus LASTSTATUS adm_num ADM_NUM Relations --------- 29: PREDIAG00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2324 2304 .F. .T. Index files TagName => PATHNO PATHNO Relations --------- 30: SLD_REVI0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 4 523 .F. .F. Index files TagName => pathno PATHNO Relations --------- 31: COMMENTS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 24 118 .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 32: REASON000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 12 20 .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 33: CLINICAL0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 17 26157 .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 34: PTH_SPCS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 35: PRINTERS0 RddName: ADSNTX ============================== RecNo RecCount BOF EOF 1 4 .F. .F. Index files TagName Relations --------- 36: PTHCLSS00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 3 35 .F. .F. Index files TagName => Desc DESC Clss_id CLSS_ID Relations --------- 37: PTHREPS00 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => pathno PATHNO timestamp TIMESTAMP Relations --------- 38: SPECIMNS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 261 274 .F. .F. Index files TagName => Desc DESC Relations --------- 39: POSTDIAG0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .T. .T. Index files TagName => PATHNO PATHNO Relations --------- 40: INTCMMNT0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .T. .T. Index files TagName => PATHNO PATHNO Relations --------- 41: SCRIBES00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 6 10 .F. .F. Index files TagName => ID ID Relations --------- 42: PLMAIL000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 68010 78762 .F. .F. Index files TagName => pathno PATHNO DateTime_Sent DATETIME_SENT Queue QUEUE Creation CREATION Send_To SEND_TO Relations --------- 43: PATHTYPE0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 29 21 .F. .T. Index files TagName PreFix PREFIX => Type_Desc TYPE_DESC Relations --------- 44: VOICE0000 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .F. .T. Index files TagName => Account ACCOUNT Relations --------- 45: ZIPCODE00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 606 612 .F. .F. Index files TagName City CITY => Code CODE Relations --------- 46: FASTREPO0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 34 50 .F. .F. Index files TagName => reportname REPORTNAME Relations --------- 47: PTH_REPS0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2 35472 .F. .F. Index files TagName => PATHNO PATHNO creation CREATION Relations --------- 48: SEQUENCE0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 3 3 .F. .F. Index files TagName => Field FIELD Relations --------- 49: IMGTYPES0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 12 14 .F. .F. Index files TagName => IMGTYPE IMGTYPE Relations --------- 50: TEL_DIR00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2001 4062 .F. .F. Index files TagName => id;file;Label ID file;id FILE Label;num LABEL num NUM Relations --------- 51: DOCTORDO0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 14 .F. .F. Index files TagName => Id ID Relations --------- 52: PTH_SLID0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .T. .T. Index files TagName => pathno PATHNO Relations --------- 53: IMAGES000 RddName: ADSCDX ============================== RecNo RecCount BOF EOF 3688 6918 .F. .F. Index files TagName => crecno+adm_num RECNO adm_num+crecno ADM_NUM Relations --------- 54: NOTES0000 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .T. Index files TagName mrecno MRECNO adm_num ADM_NUM file FILE area AREA ForeignKey;file FKEY => mrecno;file MRECNOFILE adm_num;file ADM_NUMFILE seq_no SEQ_NO Relations --------- 55: IMAGES001 RddName: ADSCDX ============================== RecNo RecCount BOF EOF 6919 6918 .F. .T. Index files TagName => crecno+adm_num RECNO adm_num+crecno ADM_NUM Relations --------- 56: PATIENTS1 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName RECNO RECNO SSN SSN LAST LAST NAME NAME => trim(LAST) + " "+ NAME FULLNAME BIRTHDAY BIRTHDAY LAST LASTFTS NAME NAMEFTS SSN SSNFTS MEDPLAN MEDPLAN CITY CITY Creation CREATION Relations --------- 1: TO recno;'patients' INTO NOTES0000 2: TO recno INTO IMAGES001 57: GROSS0001 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO TEXT GROSSFTS Relations --------- 58: DIAG00001 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO TEXT DIAGFTS Relations --------- 59: NOTES0001 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .T. Index files TagName mrecno MRECNO adm_num ADM_NUM file FILE area AREA ForeignKey;file FKEY mrecno;file MRECNOFILE => adm_num;file ADM_NUMFILE seq_no SEQ_NO Relations --------- 60: IMAGES002 RddName: ADSCDX ============================== RecNo RecCount BOF EOF 4129 6918 .F. .F. Index files TagName crecno+adm_num RECNO => adm_num+crecno ADM_NUM Relations --------- 61: PATHLGS01 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO RECNO RECNO S_DATE S_DATE SGN_DATE SGN_DATE REFER_ID REF_ID PATH_CASE PATH_CASE FACILITY FACILITY PTHLGST PTHLGST REFERRING REFERRING R_DATE R_DATE TRIM( LAST )+" "+ NAME NAME Relations --------- 1: TO PathNo INTO PLMAIL001 2: TO PathNo INTO GROSS0001 3: TO PathNo INTO PREDIAG00 4: TO PathNo INTO DIAG00001 5: TO PathNo INTO VOICE0000 6: TO PADR( ALLTRIM( PathNo ), 13 );'pathlgs' INTO NOTES0001 7: TO PathNo INTO IMAGES002 8: TO PathNo INTO SERVICET0 62: SERVICET0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 14 3478 .F. .F. Index files TagName Serviceticket SERVICETICKET isClosed;creation STATUS Doctor DOCTOR ReferenceLab REFERENCELAB => PathNo PATHNO Person PERSON operator OPERATOR Deficiency DEFICIENCY Doctor;isClosed DOCTORSTATUS ReqstType REQSTTYPE creation CREATION Text TEXT Relations --------- 63: PLMAIL001 RddName: ADSADT ============================== RecNo RecCount BOF EOF 78748 78762 .F. .T. Index files TagName => pathno PATHNO DateTime_Sent DATETIME_SENT Queue QUEUE Creation CREATION Send_To SEND_TO Relations --------- 64: DOCTORDO1 RddName: ADSADT ============================== RecNo RecCount BOF EOF 15 14 .F. .T. Index files TagName => Id ID Relations --------- 65: DOCTORS01 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2077 2607 .F. .F. Index files TagName => ID ID LAST;FIRST LAST EMAIL EMAIL ACTIVE;LAST;FIRST ACTIVE NPI NPI CITY CITY ROUTE ROUTE SPECIALTY;LAST;FIRST SPECIALTY Relations --------- 1: TO id INTO DOCTORDO1 2: TO padr( id, 15 );'doctors' INTO NOTES0002 3: TO id;FALSE INTO SERVICET1 66: IMGTYPES1 RddName: ADSADT ============================== RecNo RecCount BOF EOF 12 14 .F. .F. Index files TagName => IMGTYPE IMGTYPE Relations --------- 67: NOTES0002 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .T. Index files TagName mrecno MRECNO adm_num ADM_NUM file FILE area AREA => ForeignKey;file FKEY mrecno;file MRECNOFILE adm_num;file ADM_NUMFILE seq_no SEQ_NO Relations --------- 68: SERVICET1 RddName: ADSADT ============================== RecNo RecCount BOF EOF 3420 3478 .F. .F. Index files TagName Serviceticket SERVICETICKET isClosed;creation STATUS Doctor DOCTOR ReferenceLab REFERENCELAB PathNo PATHNO Person PERSON operator OPERATOR Deficiency DEFICIENCY => Doctor;isClosed DOCTORSTATUS ReqstType REQSTTYPE creation CREATION Text TEXT Relations --------- 69: SERVICET2 RddName: ADSADT ============================== RecNo RecCount BOF EOF 3478 3478 .F. .F. Index files TagName Serviceticket SERVICETICKET isClosed;creation STATUS Doctor DOCTOR ReferenceLab REFERENCELAB PathNo PATHNO Person PERSON operator OPERATOR Deficiency DEFICIENCY Doctor;isClosed DOCTORSTATUS ReqstType REQSTTYPE => creation CREATION Text TEXT Relations --------- 1: TO padr( serviceTicket, 15 );'servicetickets' INTO NOTES0003 2: TO serviceticket INTO SERVTICK0 3: TO serviceticket INTO SERVICET3 70: DOCTORS02 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2077 2607 .F. .F. Index files TagName => ID ID LAST;FIRST LAST EMAIL EMAIL ACTIVE;LAST;FIRST ACTIVE NPI NPI CITY CITY ROUTE ROUTE SPECIALTY;LAST;FIRST SPECIALTY Relations --------- 71: PATHLGS02 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO RECNO RECNO S_DATE S_DATE SGN_DATE SGN_DATE REFER_ID REF_ID PATH_CASE PATH_CASE FACILITY FACILITY PTHLGST PTHLGST REFERRING REFERRING R_DATE R_DATE TRIM( LAST )+" "+ NAME NAME Relations --------- 72: PATIENTS2 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => RECNO RECNO SSN SSN LAST LAST NAME NAME trim(LAST) + " "+ NAME FULLNAME BIRTHDAY BIRTHDAY LAST LASTFTS NAME NAMEFTS SSN SSNFTS MEDPLAN MEDPLAN CITY CITY Creation CREATION Relations --------- 73: NOTES0003 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .T. Index files TagName mrecno MRECNO adm_num ADM_NUM file FILE area AREA => ForeignKey;file FKEY mrecno;file MRECNOFILE adm_num;file ADM_NUMFILE seq_no SEQ_NO Relations --------- 74: SERVTICK0 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 0 .F. .T. Index files TagName => serviceticket SERVICETICKET Relations --------- 75: SERVICET3 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2044 2043 .F. .T. Index files TagName => serviceticket SERVICETICKET creation CREATION Memo MEMO Relations --------- 76: REFLABS01 RddName: ADSADT ============================== RecNo RecCount BOF EOF 1 3 .F. .F. Index files TagName => NAME NAME Relations --------- 77: HOSPITAL1 RddName: ADSADT ============================== RecNo RecCount BOF EOF 70 94 .F. .F. Index files TagName => NAME NAME Relations --------- 78: DOCTORS03 RddName: ADSADT ============================== RecNo RecCount BOF EOF 672 2607 .F. .F. Index files TagName ID ID => LAST;FIRST LAST EMAIL EMAIL ACTIVE;LAST;FIRST ACTIVE NPI NPI CITY CITY ROUTE ROUTE SPECIALTY;LAST;FIRST SPECIALTY Relations --------- 79: SPECIMNS1 RddName: ADSADT ============================== RecNo RecCount BOF EOF 261 274 .F. .F. Index files TagName => Desc DESC Relations --------- 80: PTHCLSS01 RddName: ADSADT ============================== RecNo RecCount BOF EOF 29 35 .F. .F. Index files TagName => Desc DESC Clss_id CLSS_ID Relations --------- 81: PTHLGSTS1 RddName: ADSADT ============================== RecNo RecCount BOF EOF 13 27 .F. .F. Index files TagName => ID ID Relations --------- 82: COPYTO001 RddName: ADSADT ============================== RecNo RecCount BOF EOF 73 3107 .F. .F. Index files TagName => PATHNO PATHNO Relations --------- 83: DOCTORS04 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2077 2607 .F. .F. Index files TagName => ID ID LAST;FIRST LAST EMAIL EMAIL ACTIVE;LAST;FIRST ACTIVE NPI NPI CITY CITY ROUTE ROUTE SPECIALTY;LAST;FIRST SPECIALTY Relations --------- 84: PATHLGS03 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO RECNO RECNO S_DATE S_DATE SGN_DATE SGN_DATE REFER_ID REF_ID PATH_CASE PATH_CASE FACILITY FACILITY PTHLGST PTHLGST REFERRING REFERRING R_DATE R_DATE TRIM( LAST )+" "+ NAME NAME Relations --------- 85: SQLAREA00 RddName: ADSADT ============================== RecNo RecCount BOF EOF 2 1 .F. .T. Index files TagName Relations --------- 86: DIAG00002 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO TEXT DIAGFTS Relations --------- 87: GROSS0002 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO TEXT GROSSFTS Relations --------- 88: NOTES0004 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .T. Index files TagName mrecno MRECNO adm_num ADM_NUM file FILE area AREA ForeignKey;file FKEY mrecno;file MRECNOFILE => adm_num;file ADM_NUMFILE seq_no SEQ_NO Relations --------- 89: IMAGES003 RddName: ADSCDX ============================== RecNo RecCount BOF EOF 6919 6918 .F. .T. Index files TagName crecno+adm_num RECNO => adm_num+crecno ADM_NUM Relations --------- 90: SERVICET4 RddName: ADSADT ============================== RecNo RecCount BOF EOF 3479 3478 .F. .T. Index files TagName Serviceticket SERVICETICKET isClosed;creation STATUS Doctor DOCTOR ReferenceLab REFERENCELAB => PathNo PATHNO Person PERSON operator OPERATOR Deficiency DEFICIENCY Doctor;isClosed DOCTORSTATUS ReqstType REQSTTYPE creation CREATION Text TEXT Relations --------- 91: PATHLGS04 RddName: ADSADT ============================== RecNo RecCount BOF EOF ***** ***** .F. .F. Index files TagName => PATHNO PATHNO RECNO RECNO S_DATE S_DATE SGN_DATE SGN_DATE REFER_ID REF_ID PATH_CASE PATH_CASE FACILITY FACILITY PTHLGST PTHLGST REFERRING REFERRING R_DATE R_DATE TRIM( LAST )+" "+ NAME NAME Relations --------- 1: TO PathNo;'pathlgs' INTO DIAG00002 2: TO PathNo;'pathlgs' INTO GROSS0002 3: TO PathNo;'pathlgs' INTO NOTES0004 4: TO PathNo INTO IMAGES003 5: TO PathNo INTO SERVICET4 internal classes ---------------- 1 ERROR 2 HASHENTRY 3 HBCLASS 4 HBOBJECT 5 TMUTEX 6 TLOGIN 7 TWINDOW 8 TDIALOG 9 TBRUSH 10 TCONTROL 11 TBITMAP 12 TIMAGE 13 TSBUTTON 14 TGET 15 GET 16 TCLIPGET 17 TFONT 18 TRECT 19 TINI 20 TADSQUERY 21 TAPPLICATION 22 TUSER 23 FRREPORTMANAGER 24 FRPRINTOPTIONS 25 FRPREVIEWOPTIONS 26 FRENGINEOPTIONS 27 FRREPORTOPTIONS 28 TICON 29 TMENU 30 TMENUITEM 31 TMSGBAR 32 TMSGITEM 33 TSAY 34 TMETEREX 35 TMYMETEREX 36 TBUTTON 37 TBUTTONBMP 38 TTIMER 39 TPROCESS 40 TXDBF 41 TRIBBONBAR 42 TRPANEL 43 OPCIONES 44 PRESENTATION 45 TRBGROUP 46 TRBTN 47 PATIENTS 48 TBTNBMP 49 TMULTIGET 50 TXBROWSE 51 TXBRWCOLUMN 52 TSCROLLBAR 53 PATHOLOGIES 54 REFERRINGS 55 TICKETS 56 CUSTOMSEARCHES 57 TFOLDEREX 58 TCHECKBOX 59 TCOMBOBOX 60 TGROUP 61 TRNDGROUP 62 TXMLDOCUMENT 63 TXMLNODE 64 TXMLITERATOR 65 TCALENDAR 66 TSTRUCT 67 TREG32 68 TTASKPANEL 69 TTHEMEMANAGER 70 TTASKPANELGROUP 71 TTASKITEM 72 TMTASKPANEL 73 TMTASKLIST 74 TOLEAUTO 75 TSMTP 76 TSOCKET Memory Analysis =============== 378 Static variables Dynamic memory consume: Actual Value: 0 bytes Highest Value: 0 bytes

by **nageswaragunupudi** » Sun Aug 04, 2013 5:50 pm

Please see local 6 and 7
They are oBook and oSheet
The values are still NIL.
That means failure started at the line
oBook := oExcel:WorkBooks:Add()

I do not know why we did not get error here

For the time being can you please insert these traces in the ToExcel method in your copy of xbrowse and link? We may see why this is happening later.

oBook := oExcel:WorkBooks:Add()
if oBook == nil
? "Excel Error:Create Book"
return nil
endif

by **reinaldocrespo** » Sun Aug 04, 2013 6:22 pm

Mr. Rao;

Ok. I like the idea. I will place a check for oBook == Nil to avoid the run time error. I will keep you posted as to the results.

Thank you,

Reinaldo

FiveTech Software tech support forums

TxBrowse:ToExcel()

TxBrowse:ToExcel()

Re: TxBrowse:ToExcel()

Re: TxBrowse:ToExcel()

Re: TxBrowse:ToExcel()

Re: TxBrowse:ToExcel()

Re: TxBrowse:ToExcel()

Re: TxBrowse:ToExcel()

Who is online