כיצד לדעת מה השגיאה BPM

פורומים אפיון ופיתוח פריוריטי כיצד לדעת מה השגיאה BPM

  • הנושא הזה ריק.
  • Post
    אלמוני
    אורח
    בס"ד

    שלום רב ,

    קבלתי שגיאה ב BPM כיצד אני יכול להבין מה הבעיה הרצתי בסביבה עם debug
    אך מקבל מלל לא ברור למשל ωγη

    הLOG הוא :

    Query List =
    /*1*/ LINK ALL MYBS_MYDOCSTATS TO 'C:\priority\tmp/p0338400032';

    Execute Query =
    1.LINK
    Return value = 2

    Query List =
    /*1*/ SELECT 'X' FROM MYBS_MYDOCSTATS WHERE INITSTATFLAG = 'Y' AND
    MYDOCSTAT = (SELECT ORIGSTATUSID FROM DOCSTATUSES WHERE
    DOCSTATUS = :DOCSTATUS);

    Execute Query =
    1.SELECT
    Return value = 1

    Query List =
    /*1*/ INSERT INTO GENERALLOAD(
    CHAR1, CHAR2, CHAR3, CHAR4, CHAR5, CHAR6, CHAR7, CHAR8,
    CHAR9, CHAR10, CHAR11, CHAR12, CHAR13, CHAR14, CHAR15,
    CHAR16, CHAR17, CHAR18, CHAR19, CHAR20, CHAR21, CHAR22,
    CHAR23, CHAR24, CHAR25, TEXT1, TEXT2, TEXT3, TEXT4, TEXT5,
    TEXT6, TEXT7, TEXT8, TEXT9, TEXT10, TEXT11, TEXT12, TEXT13,
    TEXT14, TEXT15, TEXT16, TEXT17, TEXT18,LINE, RECORDTYPE)
    VALUES(
    :INTERFACE.CHAR1, :INTERFACE.CHAR2, :INTERFACE.CHAR3,
    :INTERFACE.CHAR4, :INTERFACE.CHAR5, :INTERFACE.CHAR6, :INTERFACE.CHAR7,
    :INTERFACE.CHAR8, :INTERFACE.CHAR9, :INTERFACE.CHAR10,
    :INTERFACE.CHAR11, :INTERFACE.CHAR12, :INTERFACE.CHAR13,
    :INTERFACE.CHAR14, :INTERFACE.CHAR15, :INTERFACE.CHAR16,
    :INTERFACE.CHAR17, :INTERFACE.CHAR18, :INTERFACE.CHAR19,
    :INTERFACE.CHAR20, :INTERFACE.CHAR21, :INTERFACE.CHAR22,
    :INTERFACE.CHAR23, :INTERFACE.CHAR24, :INTERFACE.CHAR25,
    :INTERFACE.TEXT1, :INTERFACE.TEXT2, :INTERFACE.TEXT3, :INTERFACE.TEXT4,
    :INTERFACE.TEXT5, :INTERFACE.TEXT6, :INTERFACE.TEXT7, :INTERFACE.TEXT8,
    :INTERFACE.TEXT9, :INTERFACE.TEXT10, :INTERFACE.TEXT11,
    :INTERFACE.TEXT12, :INTERFACE.TEXT13, :INTERFACE.TEXT14,
    :INTERFACE.TEXT15, :INTERFACE.TEXT16, :INTERFACE.TEXT17,
    :INTERFACE.TEXT18,1, '1');

    Execute Query =
    1.INSERT_VALUE
    Return value = 1

    Query List =
    /*1*/ UNLINK MYBS_MYDOCSTATS;

    Execute Query =
    1.UNLINK
    Return value = 1

    Query List =
    /*1*/ LINK GENERALLOAD INTERF TO 'C:\priority\tmp/p0338400156';

    Execute Query =
    1.LINK
    Return value = 1

    Query List =
    /*1*/ DECLARE INTER CURSOR FOR SELECT
    CHAR1, CHAR10, CHAR11, CHAR12, CHAR13, CHAR14, CHAR15,
    CHAR16, CHAR17, CHAR18, CHAR19, CHAR2, CHAR20, CHAR21,
    CHAR22, CHAR23, CHAR24, CHAR25, CHAR3, CHAR4, CHAR5, CHAR6,
    CHAR7, CHAR8, CHAR9, DATE1, DATE2, DATE3, DATE4, INT1,
    INT10, INT11, INT12, INT13, INT14, INT15, INT2, INT3, INT4,
    INT5, INT6, INT7, INT8, INT9, KEY1, KEY2, KEY3, KEY4, LINE,
    LOADED, REAL1, REAL10, REAL11, REAL2, REAL3, REAL4, REAL5,
    REAL6, REAL7, REAL8, REAL9, RECORDTYPE, TEXT, TEXT1, TEXT10,
    TEXT11, TEXT12, TEXT13, TEXT14, TEXT15, TEXT16, TEXT17,
    TEXT18, TEXT2, TEXT3, TEXT4, TEXT5, TEXT6, TEXT7, TEXT8,
    TEXT9 FROM GENERALLOAD INTERF WHERE LINE <> 0 ORDER BY
    LINE;

    Execute Query =
    1.DECLARE
    Return value = 1

    Query List =
    /*1*/ OPEN INTER;

    Execute Query =
    1.OPEN
    Return value = 1

    Query List =
    /*1*/ LINK MYBS_MYDOCSTATS TO 'C:\priority\tmp/p0338400032';

    Execute Query =
    1.LINK
    Return value = 1

    Query List =
    /*1*/ LINK DOCSTATUSES TO 'C:\priority\tmp/p0338400033';

    Execute Query =
    1.LINK
    Return value = 1

    Query List =
    /*1*/ :TABFORM = 98806;
    /*2*/ #line 1 MYBS_MYDOCSTATS/PRE-FORM
    :statustype = 'PRIV_MYBPM';
    /*3*/ /* where 'PRIV_MYBPM' = STATUSTYPE */
    :KEYSTROKES = '*{Exit}';

    Execute Query =
    1.ASSIGN
    Return value = 1
    :TABFORM = 98806;

    2.ASSIGN
    Return value = 1
    :statustype = 'PRIV_MYBPM';

    3.ASSIGN
    Return value = 1
    :KEYSTROKES = '*{Exit}';

    Query List =
    /*1*/ FETCH INTER INTO :INTERFACE.CHAR1, :INTERFACE.CHAR10, :INTERFACE.CHAR11,
    :INTERFACE.CHAR12, :INTERFACE.CHAR13, :INTERFACE.CHAR14,
    :INTERFACE.CHAR15, :INTERFACE.CHAR16, :INTERFACE.CHAR17,
    :INTERFACE.CHAR18, :INTERFACE.CHAR19, :INTERFACE.CHAR2,
    :INTERFACE.CHAR20, :INTERFACE.CHAR21, :INTERFACE.CHAR22,
    :INTERFACE.CHAR23, :INTERFACE.CHAR24, :INTERFACE.CHAR25,
    :INTERFACE.CHAR3, :INTERFACE.CHAR4, :INTERFACE.CHAR5, :INTERFACE.CHAR6,
    :INTERFACE.CHAR7, :INTERFACE.CHAR8, :INTERFACE.CHAR9, :INTERFACE.DATE1,
    :INTERFACE.DATE2, :INTERFACE.DATE3, :INTERFACE.DATE4, :INTERFACE.INT1,
    :INTERFACE.INT10, :INTERFACE.INT11, :INTERFACE.INT12, :INTERFACE.INT13,
    :INTERFACE.INT14, :INTERFACE.INT15, :INTERFACE.INT2, :INTERFACE.INT3,
    :INTERFACE.INT4, :INTERFACE.INT5, :INTERFACE.INT6, :INTERFACE.INT7,
    :INTERFACE.INT8, :INTERFACE.INT9, :INTERFACE.KEY1, :INTERFACE.KEY2,
    :INTERFACE.KEY3, :INTERFACE.KEY4, :INTERFACE.LINE, :INTERFACE.LOADED,
    :INTERFACE.REAL1, :INTERFACE.REAL10, :INTERFACE.REAL11,
    :INTERFACE.REAL2, :INTERFACE.REAL3, :INTERFACE.REAL4, :INTERFACE.REAL5,
    :INTERFACE.REAL6, :INTERFACE.REAL7, :INTERFACE.REAL8, :INTERFACE.REAL9,
    :INTERFACE.RECORDTYPE, :INTERFACE.TEXT, :INTERFACE.TEXT1,
    :INTERFACE.TEXT10, :INTERFACE.TEXT11, :INTERFACE.TEXT12,
    :INTERFACE.TEXT13, :INTERFACE.TEXT14, :INTERFACE.TEXT15,
    :INTERFACE.TEXT16, :INTERFACE.TEXT17, :INTERFACE.TEXT18,
    :INTERFACE.TEXT2, :INTERFACE.TEXT3, :INTERFACE.TEXT4, :INTERFACE.TEXT5,
    :INTERFACE.TEXT6, :INTERFACE.TEXT7, :INTERFACE.TEXT8, :INTERFACE.TEXT9;

    Execute Query =
    1.FETCH
    Return value = 1
    :INTERFACE.CHAR1 = 0;
    :INTERFACE.CHAR10 = 0;
    :INTERFACE.CHAR11 = 0;
    :INTERFACE.CHAR12 = 0;
    :INTERFACE.CHAR13 = 0;
    :INTERFACE.CHAR14 = 0;
    :INTERFACE.CHAR15 = 0;
    :INTERFACE.CHAR16 = 0;
    :INTERFACE.CHAR17 = 0;
    :INTERFACE.CHAR18 = 0;
    :INTERFACE.CHAR19 = 0;
    :INTERFACE.CHAR2 = 89;
    :INTERFACE.CHAR20 = 0;
    :INTERFACE.CHAR21 = 0;
    :INTERFACE.CHAR22 = 0;
    :INTERFACE.CHAR23 = 0;
    :INTERFACE.CHAR24 = 0;
    :INTERFACE.CHAR25 = 0;
    :INTERFACE.CHAR3 = 0;
    :INTERFACE.CHAR4 = 0;
    :INTERFACE.CHAR5 = 0;
    :INTERFACE.CHAR6 = 0;
    :INTERFACE.CHAR7 = 0;
    :INTERFACE.CHAR8 = 0;
    :INTERFACE.CHAR9 = 0;
    :INTERFACE.DATE1 = 01/01/88;
    :INTERFACE.DATE2 = 01/01/88;
    :INTERFACE.DATE3 = 01/01/88;
    :INTERFACE.DATE4 = 01/01/88;
    :INTERFACE.INT1 = 0;
    :INTERFACE.INT10 = 0;
    :INTERFACE.INT11 = 0;
    :INTERFACE.INT12 = 0;
    :INTERFACE.INT13 = 0;
    :INTERFACE.INT14 = 0;
    :INTERFACE.INT15 = 0;
    :INTERFACE.INT2 = 0;
    :INTERFACE.INT3 = 0;
    :INTERFACE.INT4 = 0;
    :INTERFACE.INT5 = 0;
    :INTERFACE.INT6 = 0;
    :INTERFACE.INT7 = 0;
    :INTERFACE.INT8 = 0;
    :INTERFACE.INT9 = 0;
    :INTERFACE.KEY1 = ";
    :INTERFACE.KEY2 = ";
    :INTERFACE.KEY3 = ";
    :INTERFACE.KEY4 = ";
    :INTERFACE.LINE = 1;
    :INTERFACE.LOADED = 0;
    :INTERFACE.REAL1 = 0.000000;
    :INTERFACE.REAL10 = 0.000000;
    :INTERFACE.REAL11 = 0.000000;
    :INTERFACE.REAL2 = 0.000000;
    :INTERFACE.REAL3 = 0.000000;
    :INTERFACE.REAL4 = 0.000000;
    :INTERFACE.REAL5 = 0.000000;
    :INTERFACE.REAL6 = 0.000000;
    :INTERFACE.REAL7 = 0.000000;
    :INTERFACE.REAL8 = 0.000000;
    :INTERFACE.REAL9 = 0.000000;
    :INTERFACE.RECORDTYPE = '1';
    :INTERFACE.TEXT = ";
    :INTERFACE.TEXT1 = 'ωγη';
    :INTERFACE.TEXT10 = ";
    :INTERFACE.TEXT11 = ";
    :INTERFACE.TEXT12 = ";
    :INTERFACE.TEXT13 = ";
    :INTERFACE.TEXT14 = ";
    :INTERFACE.TEXT15 = ";
    :INTERFACE.TEXT16 = ";
    :INTERFACE.TEXT17 = ";
    :INTERFACE.TEXT18 = ";
    :INTERFACE.TEXT2 = ";
    :INTERFACE.TEXT3 = ";
    :INTERFACE.TEXT4 = ";
    :INTERFACE.TEXT5 = ";
    :INTERFACE.TEXT6 = ";
    :INTERFACE.TEXT7 = ";
    :INTERFACE.TEXT8 = ";
    :INTERFACE.TEXT9 = ";

    Query List =
    /*1*/ #line 1 MYBS_MYDOCSTATS/STATDES/POST-FIELD
    SET TRANSACTION ;
    /*2*/ GOTO 9 WHERE :NEXTPATTERNFLAG = 1;
    /*3*/ GOTO 9 WHERE " = :MYBS_MYDOCSTATS.STATDES ;
    /*4*/ GOTO 9 WHERE :MYBS_MYDOCSTATS.STATDES = :MYBS_MYDOCSTATS1.STATDES
    ;
    /*5*/ SELECT INITSTATFLAG, CHANGEFLAG, CANCELFLAG, FINALFLAG, MYDOCSTAT,
    SORT
    INTO :MYBS_MYDOCSTATS.INITSTATFLAG, :MYBS_MYDOCSTATS.CHANGEFLAG,
    :MYBS_MYDOCSTATS.CANCELFLAG, :MYBS_MYDOCSTATS.FINALFLAG,
    :MYBS_MYDOCSTATS.MYDOCSTAT, :MYBS_MYDOCSTATS.SORT
    FROM MYBS_MYDOCSTATS
    WHERE STATDES = :MYBS_MYDOCSTATS.STATDES ;
    /*6*/ LABEL 9 ;
    /*7*/ COMMIT;

    Execute Query =
    1.TRANSACTION
    Return value = 1

    2.GOTO
    :NEXTPATTERNFLAG = 0;
    Return value = 0

    3.GOTO
    :MYBS_MYDOCSTATS.STATDES = 'ωγη';
    Return value = 0

    4.GOTO
    :MYBS_MYDOCSTATS.STATDES = 'ωγη';
    :MYBS_MYDOCSTATS1.STATDES = ";
    Return value = 0

    5.SELECT_INTO
    Return value = 0

    6.LABEL
    Return value = 1

    7.COMMIT
    Return value = 1

    Query List =
    /*1*/ DECLARE FILL_ALLALERTS CURSOR FOR SELECT TYPE, MAILTYPE,
    ACTIVE, RECIPUSER, RECIPGROUP, RECIPEMAIL, RECIPFORM,
    RECIPNAME, RECIPDOFORM, RECIPDONAME, ALLUSERS, MYSELF,
    INGROUP, ONEUSER, ONEGROUP, VALIDUSER, VALIDGROUP, FROMSTATUS,
    TOSTATUS, PROCEXEC, PROGFORMAT,PDFATTACHMENT, TIMEVALUE,
    TIMEUNIT,TIMESTATUS,TIMEFORM,TIMENAME, DNAME, FORMALERTS.ALERT,
    FORUSER, LINE, USER, SUBJECT,ENGSUBJECT FROM FORMALERTS WHERE
    FORMALERTS.FORM = :_VALERTFORM AND FORUSER = (SELECT SECONDKEY
    FROM STACK23 ALLUSERS WHERE FIRSTKEY = SQL.USER) AND ACTIVE
    = (1 = 2 ? ACTIVE : 'Y') AND TIMEVALUE = (1 = 1 ? 0 :
    TIMEVALUE) AND TIMEVALUE <> (1 = 0 ? 0 : -99997) AND (FORMALERTS.DNAME
    IN (SQL.ENV, ")) ORDER BY LINE;

    Execute Query =
    1.DECLARE
    Return value = 1

    Query List =
    /*1*/ OPEN FILL_ALLALERTS;

    Execute Query =
    1.OPEN
    Return value = 0

    Query List =
    /*1*/ SELECT 'X' FROM MYBS_MYDOCSTATS WHERE MYBS_MYDOCSTATS.STATDES
    = :MYBS_MYDOCSTATS.STATDES AND MYBS_MYDOCSTATS.STATDES
    <> " ;

    Execute Query =
    1.SELECT
    Return value = 0

    Query List =
    /*1*/ #line 1 MYBS_MYDOCSTATS/CANCELFLAG/CHECK-FIELD
    GOTO 1 WHERE :MYBS_MYDOCSTATS.CANCELFLAG = '\0';
    /*2*/ :TABFORM = 1046;
    /*3*/ #line 1 MYBS_MYDOCSTATS/CANCELFLAG/CHECK-FIELD
    ERRMSG 1 WHERE :$.CANCELFLAG NOT IN ('Y','N','y','n','\0');
    /*4*/ :TABFORM = 1046;
    /*5*/ #line 1 TRIGGERS/POST-BOOLEAN
    :$.CANCELFLAG = (:$.CANCELFLAG IN ('Y','y') ? 'Y' : (:$.CANCELFLAG
    IN ('N','n') ? 'N' : '\0'));
    /*6*/ :TABFORM = 1046;
    /*7*/ #line 3 MYBS_MYDOCSTATS/CANCELFLAG/CHECK-FIELD
    LABEL 1;

    Execute Query =
    1.GOTO
    :MYBS_MYDOCSTATS.CANCELFLAG = 89;
    Return value = 0

    2.ASSIGN
    Return value = 1
    :TABFORM = 1046;

    3.ERRMSG
    :$.CANCELFLAG = 89;
    Return value = 0

    4.ASSIGN
    Return value = 1
    :TABFORM = 1046;

    5.ASSIGN
    :$.CANCELFLAG = 89;
    Return value = 1

    6.ASSIGN
    Return value = 1
    :TABFORM = 1046;

    7.LABEL
    Return value = 1

    Query List =
    /*1*/ #line 1 MYBS_MYDOCSTATS/CANCELFLAG/POST-FIELD
    SET TRANSACTION ;
    /*2*/ :TABFORM = 1046;
    /*3*/ #line 1 MYBS_MYDOCSTATS/CANCELFLAG/POST-FIELD
    :$.CANCELFLAG = (:$.CANCELFLAG IN ('Y','y') ? 'Y' : (:$.CANCELFLAG
    IN ('N','n') ? 'N' : '\0'));
    /*4*/ COMMIT;

    Execute Query =
    1.TRANSACTION
    Return value = 1

    2.ASSIGN
    Return value = 1
    :TABFORM = 1046;

    3.ASSIGN
    :$.CANCELFLAG = 89;
    Return value = 1

    4.COMMIT
    Return value = 1

    Query List =
    /*1*/ :TABFORM = 98806;
    /*2*/ #line 1 MYBS_MYDOCSTATS/PRE-INSERT
    ERRMSG 17 WHERE :FORM_INTERFACE <> 1;
    /*3*/ #line 1 MYBS_MYDOCSTATS/INSERT
    SET TRANSACTION;
    /*4*/ INSERT INTO MYBS_MYDOCSTATS ( STATDES, INITSTATFLAG, CHANGEFLAG,
    CANCELFLAG, FINALFLAG, MYDOCSTAT, SORT)
    VALUES ( :MYBS_MYDOCSTATS.STATDES, :MYBS_MYDOCSTATS.INITSTATFLAG,
    :MYBS_MYDOCSTATS.CHANGEFLAG, :MYBS_MYDOCSTATS.CANCELFLAG,
    :MYBS_MYDOCSTATS.FINALFLAG, :MYBS_MYDOCSTATS.MYDOCSTAT,
    :MYBS_MYDOCSTATS.SORT);
    /*5*/ SELECT 189 INTO :SCREENMSG FROM DUMMY WHERE :RETVAL = 0;
    /*6*/ SELECT MYDOCSTAT
    INTO :MYBS_MYDOCSTATS.MYDOCSTAT
    FROM MYBS_MYDOCSTATS
    WHERE STATDES = :MYBS_MYDOCSTATS.STATDES ;
    /*7*/ :TABFORM = 98806;
    /*8*/ #line 1 MYBS_MYDOCSTATS/POST-INSERT
    INSERT INTO DOCSTATUSES(TYPE,ORIGSTATUSID)
    VALUES(:$.STATUSTYPE, :$.MYDOCSTAT);
    /*9*/ UPDATE DOCSTATUSES SET STATDES = :$.STATDES,
    ESTATDES = :$.ESTATDES , SORT = :$.SORT,
    COLOR = :$.COLOR, INACTIVE = :$.INACTIVE,
    DOCOPENED = :$.DOCOPENED
    WHERE TYPE = :$.STATUSTYPE AND ORIGSTATUSID = :$.MYDOCSTAT;
    /*10*/ :NEXTPATTERNFLAG = 0;
    /*11*/ COMMIT;

    Execute Query =
    1.ASSIGN
    Return value = 1
    :TABFORM = 98806;

    2.ERRMSG
    :FORM_INTERFACE = 1;
    Return value = 0

    3.TRANSACTION
    Return value = 1

    4.INSERT_VALUE
    :MYBS_MYDOCSTATS.MYDOCSTAT = 0;
    Return value = 1

    5.SELECT_INTO
    :RETVAL = 1;
    Return value = 0

    6.SELECT_INTO
    Return value = 1
    :MYBS_MYDOCSTATS.MYDOCSTAT = 12;

    7.ASSIGN
    Return value = 1
    :TABFORM = 98806;

    8.INSERT_VALUE
    Return value = 0

    9.UPDATE
    Return value = -1

    10.ASSIGN
    Return value = 1
    :NEXTPATTERNFLAG = 0;

    11.COMMIT
    Return value = 1

    Query List =
    /*1*/ /* Refresh MYBS_MYDOCSTATS */
    SELECT MYBS_MYDOCSTATS.STATDES, MYBS_MYDOCSTATS.INITSTATFLAG,
    MYBS_MYDOCSTATS.CHANGEFLAG, MYBS_MYDOCSTATS.CANCELFLAG,
    MYBS_MYDOCSTATS.FINALFLAG, DOCSTATUSES.DOCOPENED, DOCSTATUSES.INACTIVE,
    DOCSTATUSES.ESTATDES, DOCSTATUSES.SORT, DOCSTATUSES.DOCSTATUS,
    DOCSTATUSES.TYPE, MYBS_MYDOCSTATS.MYDOCSTAT, MYBS_MYDOCSTATS.SORT,
    DOCSTATUSES.COLOR, HTMLCOLORS.COLORNAME

    INTO :MYBS_MYDOCSTATS.STATDES, :MYBS_MYDOCSTATS.INITSTATFLAG,
    :MYBS_MYDOCSTATS.CHANGEFLAG, :MYBS_MYDOCSTATS.CANCELFLAG,
    :MYBS_MYDOCSTATS.FINALFLAG, :MYBS_MYDOCSTATS.DOCOPENED,
    :MYBS_MYDOCSTATS.INACTIVE, :MYBS_MYDOCSTATS.ESTATDES, :MYBS_MYDOCSTATS.DOCSTATUSSORT,
    :MYBS_MYDOCSTATS.DOCSTATUS, :MYBS_MYDOCSTATS.STATUSTYPE,
    :MYBS_MYDOCSTATS.MYDOCSTAT, :MYBS_MYDOCSTATS.SORT, :MYBS_MYDOCSTATS.COLOR,
    :MYBS_MYDOCSTATS.VCOLORNAME FROM HTMLCOLORS , DOCSTATUSES
    ?, MYBS_MYDOCSTATS
    WHERE (DOCSTATUSES.TYPE ='PRIV_MYBPM') AND MYBS_MYDOCSTATS.MYDOCSTAT
    = DOCSTATUSES.ORIGSTATUSID AND DOCSTATUSES.COLOR = HTMLCOLORS.COLOR
    AND MYBS_MYDOCSTATS.MYDOCSTAT = :MYBS_MYDOCSTATS.MYDOCSTAT
    ;

    Execute Query =
    1.SELECT_INTO
    Return value = 1
    :MYBS_MYDOCSTATS.STATDES = 'ωγη';
    :MYBS_MYDOCSTATS.INITSTATFLAG = 0;
    :MYBS_MYDOCSTATS.CHANGEFLAG = 0;
    :MYBS_MYDOCSTATS.CANCELFLAG = 89;
    :MYBS_MYDOCSTATS.FINALFLAG = 0;
    :MYBS_MYDOCSTATS.DOCOPENED = 0;
    :MYBS_MYDOCSTATS.INACTIVE = 0;
    :MYBS_MYDOCSTATS.ESTATDES = ";
    :MYBS_MYDOCSTATS.DOCSTATUSSORT = 0;
    :MYBS_MYDOCSTATS.DOCSTATUS = 0;
    :MYBS_MYDOCSTATS.STATUSTYPE = ";
    :MYBS_MYDOCSTATS.MYDOCSTAT = 12;
    :MYBS_MYDOCSTATS.SORT = 0;
    :MYBS_MYDOCSTATS.COLOR = 0;
    :MYBS_MYDOCSTATS.VCOLORNAME = ";

    Query List =
    /*1*/ FETCH INTER INTO :INTERFACE.CHAR1, :INTERFACE.CHAR10, :INTERFACE.CHAR11,
    :INTERFACE.CHAR12, :INTERFACE.CHAR13, :INTERFACE.CHAR14,
    :INTERFACE.CHAR15, :INTERFACE.CHAR16, :INTERFACE.CHAR17,
    :INTERFACE.CHAR18, :INTERFACE.CHAR19, :INTERFACE.CHAR2,
    :INTERFACE.CHAR20, :INTERFACE.CHAR21, :INTERFACE.CHAR22,
    :INTERFACE.CHAR23, :INTERFACE.CHAR24, :INTERFACE.CHAR25,
    :INTERFACE.CHAR3, :INTERFACE.CHAR4, :INTERFACE.CHAR5, :INTERFACE.CHAR6,
    :INTERFACE.CHAR7, :INTERFACE.CHAR8, :INTERFACE.CHAR9, :INTERFACE.DATE1,
    :INTERFACE.DATE2, :INTERFACE.DATE3, :INTERFACE.DATE4, :INTERFACE.INT1,
    :INTERFACE.INT10, :INTERFACE.INT11, :INTERFACE.INT12, :INTERFACE.INT13,
    :INTERFACE.INT14, :INTERFACE.INT15, :INTERFACE.INT2, :INTERFACE.INT3,
    :INTERFACE.INT4, :INTERFACE.INT5, :INTERFACE.INT6, :INTERFACE.INT7,
    :INTERFACE.INT8, :INTERFACE.INT9, :INTERFACE.KEY1, :INTERFACE.KEY2,
    :INTERFACE.KEY3, :INTERFACE.KEY4, :INTERFACE.LINE, :INTERFACE.LOADED,
    :INTERFACE.REAL1, :INTERFACE.REAL10, :INTERFACE.REAL11,
    :INTERFACE.REAL2, :INTERFACE.REAL3, :INTERFACE.REAL4, :INTERFACE.REAL5,
    :INTERFACE.REAL6, :INTERFACE.REAL7, :INTERFACE.REAL8, :INTERFACE.REAL9,
    :INTERFACE.RECORDTYPE, :INTERFACE.TEXT, :INTERFACE.TEXT1,
    :INTERFACE.TEXT10, :INTERFACE.TEXT11, :INTERFACE.TEXT12,
    :INTERFACE.TEXT13, :INTERFACE.TEXT14, :INTERFACE.TEXT15,
    :INTERFACE.TEXT16, :INTERFACE.TEXT17, :INTERFACE.TEXT18,
    :INTERFACE.TEXT2, :INTERFACE.TEXT3, :INTERFACE.TEXT4, :INTERFACE.TEXT5,
    :INTERFACE.TEXT6, :INTERFACE.TEXT7, :INTERFACE.TEXT8, :INTERFACE.TEXT9;

    Execute Query =
    1.FETCH
    Return value = 0

    Query List =
    /*1*/ CLOSE INTER;

    Execute Query =
    1.CLOSE
    Return value = 1

    Query List =
    /*1*/ LINK GENERALLOAD LOAD_REC_A;

    Execute Query =
    1.LINK
    Return value = 2

    Query List =
    /*1*/ LINK GENERALLOAD LOAD_REC_B;

    Execute Query =
    1.LINK
    Return value = 2

    Query List =
    /*1*/ INSERT INTO GENERALLOAD LOAD_REC_B (LINE,LOADED,KEY1,KEY2,KEY3,
    KEY4)
    VALUES(:VINTERFLINE, 'Y' ,:VKEYBUF1,:VKEYBUF2,:VKEYBUF3,
    :VKEYBUF4);

    Execute Query =
    1.INSERT_VALUE
    :VINTERFLINE = 1;
    :VKEYBUF1 = '12';
    :VKEYBUF2 = ";
    :VKEYBUF3 = ";
    :VKEYBUF4 = ";
    Return value = 1

    Query List =
    /*1*/ INSERT INTO GENERALLOAD LOAD_REC_A (TEXT9, TEXT8, TEXT7, TEXT6,
    TEXT5, TEXT4, TEXT3, TEXT2, TEXT18, TEXT17, TEXT16, TEXT15,
    TEXT14, TEXT13, TEXT12, TEXT11, TEXT10, TEXT1, TEXT, RECORDTYPE,
    REAL9, REAL8, REAL7, REAL6, REAL5, REAL4, REAL3, REAL2,
    REAL11, REAL10, REAL1, LOADED, LINE, KEY4, KEY3, KEY2,
    KEY1, INT9, INT8, INT7, INT6, INT5, INT4, INT3, INT2, INT15,
    INT14, INT13, INT12, INT11, INT10, INT1, DATE4, DATE3,
    DATE2, DATE1, CHAR9, CHAR8, CHAR7, CHAR6, CHAR5, CHAR4,
    CHAR3, CHAR25, CHAR24, CHAR23, CHAR22, CHAR21, CHAR20,
    CHAR2, CHAR19, CHAR18, CHAR17, CHAR16, CHAR15, CHAR14,
    CHAR13, CHAR12, CHAR11, CHAR10, CHAR1)
    SELECT INTERF.TEXT9, INTERF.TEXT8, INTERF.TEXT7, INTERF.TEXT6,
    INTERF.TEXT5, INTERF.TEXT4, INTERF.TEXT3, INTERF.TEXT2,
    INTERF.TEXT18, INTERF.TEXT17, INTERF.TEXT16, INTERF.TEXT15,
    INTERF.TEXT14, INTERF.TEXT13, INTERF.TEXT12, INTERF.TEXT11,
    INTERF.TEXT10, INTERF.TEXT1, INTERF.TEXT, INTERF.RECORDTYPE,
    INTERF.REAL9, INTERF.REAL8, INTERF.REAL7, INTERF.REAL6,
    INTERF.REAL5, INTERF.REAL4, INTERF.REAL3, INTERF.REAL2,
    INTERF.REAL11, INTERF.REAL10, INTERF.REAL1, (INTERF.LOADED
    = 'Y' ? 'Y' : LOAD_REC_B.LOADED), (LOAD_REC_B.LINE <> 0
    ? LOAD_REC_B.LINE : INTERF.LINE), (INTERF.KEY4 <> " ?
    INTERF.KEY4 : LOAD_REC_B.KEY4), (INTERF.KEY3 <> " ? INTERF.KEY3
    : LOAD_REC_B.KEY3), (INTERF.KEY2 <> " ? INTERF.KEY2 :
    LOAD_REC_B.KEY2), (INTERF.KEY1 <> " ? INTERF.KEY1 : LOAD_REC_B.KEY1),
    INTERF.INT9, INTERF.INT8, INTERF.INT7, INTERF.INT6, INTERF.INT5,
    INTERF.INT4, INTERF.INT3, INTERF.INT2, INTERF.INT15, INTERF.INT14,
    INTERF.INT13, INTERF.INT12, INTERF.INT11, INTERF.INT10,
    INTERF.INT1, INTERF.DATE4, INTERF.DATE3, INTERF.DATE2,
    INTERF.DATE1, INTERF.CHAR9, INTERF.CHAR8, INTERF.CHAR7,
    INTERF.CHAR6, INTERF.CHAR5, INTERF.CHAR4, INTERF.CHAR3,
    INTERF.CHAR25, INTERF.CHAR24, INTERF.CHAR23, INTERF.CHAR22,
    INTERF.CHAR21, INTERF.CHAR20, INTERF.CHAR2, INTERF.CHAR19,
    INTERF.CHAR18, INTERF.CHAR17, INTERF.CHAR16, INTERF.CHAR15,
    INTERF.CHAR14, INTERF.CHAR13, INTERF.CHAR12, INTERF.CHAR11,
    INTERF.CHAR10, INTERF.CHAR1
    FROM GENERALLOAD INTERF, GENERALLOAD LOAD_REC_B ?
    WHERE LOAD_REC_B.LINE = INTERF.LINE;

    Execute Query =
    1.INSERT
    Return value = 1

    Query List =
    /*1*/ DELETE FROM GENERALLOAD INTERF;

    Execute Query =
    1.DELETE
    Return value = 1

    Query List =
    /*1*/ INSERT INTO GENERALLOAD INTERF SELECT * FROM GENERALLOAD LOAD_REC_A;

    Execute Query =
    1.INSERT
    Return value = 1

    Query List =
    /*1*/ UNLINK GENERALLOAD INTERF

    Query List =
    /*1*/ UNLINK MYBS_MYDOCSTATS;

    Execute Query =
    1.UNLINK
    Return value = 1

    Query List =
    /*1*/ UNLINK DOCSTATUSES;

    Execute Query =
    1.UNLINK
    Return value = 1

    Query List =
    /*1*/ UNLINK GENERALLOAD INTERF;

    Execute Query =
    1.UNLINK
    Return value = 1

    Query List =
    /*1*/ LINK MYBS_MYDOCSTATS TO 'C:\priority\tmp/p0338400032';

    Execute Query =
    1.LINK
    Return value = 1

  • יש להתחבר למערכת על מנת להגיב.