help with BE (business ent) it no longer works

Posted by OctavioOlguin on 24-Nov-2015 12:01

used to have:

USING procs.ventas.dsCasoDetalle FROM PROPATH.
{procs\ventas\inc\dscasoDetalle.i}


DEFINE INPUT  PARAMETER pControl AS DECIMAL NO-UNDO.
DEFINE OUTPUT PARAMETER DATASET  FOR dsCasoPaqDetalle.

DEFINE VARIABLE myCaso AS dsCasoDetalle NO-UNDO.


myCaso = NEW dsCasoDetalle().

myCaso:ReaddsCasoDetalle('control# = ' + string(pControl) , OUTPUT DATASET dsCasoPaqDetalle).

DELETE OBJECT myCaso.

and get on dataset some records to comply with control# = 50.3453  for instance...

but today cleaned Project and updated. and can't get to work that readdsCasoDetalle call.

I put a for each ttCasoPaqDetalle.  message tt...fields.  end.

after the call and the dataset came empty.

thiis is dscasoDetalle.i, I wonder if the primary key having  fecha as part of pk, has something related to this. (I guess it is what changed from previous verions,  but I'm not sure about it)

DEFINE TEMP-TABLE ttCasoPaqDetalle BEFORE-TABLE bttCasoPaqDetalle
    FIELD Control#    AS DECIMAL   INITIAL "0"
    FIELD Fecha       AS DATETIME
    FIELD Usuario     AS CHARACTER
    FIELD Observacion AS CHARACTER
    INDEX ControlFecha IS PRIMARY UNIQUE Control# ASCENDING Fecha ASCENDING . 


DEFINE DATASET dsCasoPaqDetalle FOR ttCasoPaqDetalle.

...

Any help would be appreciated.  Thanks.

Posted by OctavioOlguin on 24-Nov-2015 17:03

Got it!!!

some schema upgrade turned the decimal 5 mantissa to a 2 decimal places, losting all info...

well you sometimes win Little and other, looses big...

All Replies

Posted by OctavioOlguin on 24-Nov-2015 16:55

please...

Posted by OctavioOlguin on 24-Nov-2015 17:03

Got it!!!

some schema upgrade turned the decimal 5 mantissa to a 2 decimal places, losting all info...

well you sometimes win Little and other, looses big...

This thread is closed