⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 accesslibrary.c

📁 该文件描述了话音拨号呼叫过程中对于数据库的查询控制
💻 C
📖 第 1 页 / 共 5 页
字号:
    ((yVDef_z_AccessLibrary_N0_ReadKeys *)PROC_DATA_PTR)->z_AccessLibrary_N01_KeyData =
      &(yVarP->z_AccessLibrary_NK_KeyData);
    ((yVDef_z_AccessLibrary_N0_ReadKeys *)PROC_DATA_PTR)->z_AccessLibrary_N0_ProcedureResult =
      &yVarP->xPrdCallRes1_z_AccessLibrary_G_ReadResultType;
    CALL_PROCEDURE(z_AccessLibrary_N0_ReadKeys,
      yPrdN_z_AccessLibrary_N0_ReadKeys, 0, 10)
    PROCEDURE_ALLOC_ERROR_END
    XAFTER_VALUE_RET_PRDCALL(10)

/*-----
* DECISION
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),1649(95,85),1,1)
------*/
#ifdef XCASEAFTERPRDLABELS
  case 10:
#endif
    yAssF_z_AccessLibrary_G_ReadResultType(yVarP->yDcn_z_AccessLibrary_G_ReadResultType,
      yVarP->xPrdCallRes1_z_AccessLibrary_G_ReadResultType, XASS_MR_ASS_FR);
#ifdef XTRACE
    xTraceDecision(&(yVarP->yDcn_z_AccessLibrary_G_ReadResultType),
      ySrtN_z_AccessLibrary_G_ReadResultType);
#ifdef XMSCE
    xMSCEDecision(&(yVarP->yDcn_z_AccessLibrary_G_ReadResultType),
      ySrtN_z_AccessLibrary_G_ReadResultType);
#endif
#endif
    if (yEqF_z_AccessLibrary_G_ReadResultType(yVarP->yDcn_z_AccessLibrary_G_ReadResultType,
          z_AccessLibrary_G1_SuccessFul)) {
      XBETWEEN_SYMBOLS(29, 1209)

/*-----
* OUTPUT Code
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),158(80,115),1,1)
------*/
#ifdef XCASELABELS
    case 29:
#endif
      ALLOC_SIGNAL_PAR(Code, ySigN_z_AccessLibrary_6_Code, xNotDefPId,
        yPDef_z_AccessLibrary_6_Code)
      SIGNAL_ALLOC_ERROR
      yAssF_z_AccessLibrary_F_KeyArrayType(((yPDef_z_AccessLibrary_6_Code *)OUTSIGNAL_DATA_PTR)->Param1,
        yVarP->z_AccessLibrary_NK_KeyData, XASS_MR_ASS_NF);
      SDL_2OUTPUT_NO_TO(xDefaultPrioSignal, (xIdNode *)0, Code,
        ySigN_z_AccessLibrary_6_Code, xNotDefPId,
        sizeof(yPDef_z_AccessLibrary_6_Code), "Code")
      SIGNAL_ALLOC_ERROR_END
      XBETWEEN_SYMBOLS(30, 1227)

/*-----
* OUTPUT Display
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),161(80,130),1,1)
------*/
#ifdef XCASELABELS
    case 30:
#endif
      ALLOC_SIGNAL_PAR(Display, ySigN_z_AccessLibrary_9_Display, xNotDefPId,
        yPDef_z_AccessLibrary_9_Display)
      SIGNAL_ALLOC_ERROR
      yAssF_SDL_Charstring(((yPDef_z_AccessLibrary_9_Display *)OUTSIGNAL_DATA_PTR)->Param1,
        yVarP->z_AccessLibrary_NC_PleaseWait, XASS_MR_ASS_NF);
      SDL_2OUTPUT_NO_TO(xDefaultPrioSignal, (xIdNode *)0, Display,
        ySigN_z_AccessLibrary_9_Display, xNotDefPId,
        sizeof(yPDef_z_AccessLibrary_9_Display), "Display")
      SIGNAL_ALLOC_ERROR_END
      XBETWEEN_SYMBOLS(31, 1245)

/*-----
* SET PanelTimer
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),1661(80,145),1,1)
------*/
#ifdef XCASELABELS
    case 31:
#endif
      SDL_SET_DUR(xPlus_SDL_Time(SDL_NOW, z_AccessLibrary_L_DISPLAYTIME),
        z_AccessLibrary_L_DISPLAYTIME, PanelTimer,
        ySigN_z_AccessLibrary_N6_PanelTimer, yTim_PanelTimer, "PanelTimer")
      XBETWEEN_SYMBOLS(32, 1257)

/*-----
* NEXTSTATE WaitOK
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),167(80,160),1)
------*/
#ifdef XCASELABELS
    case 32:
#endif
      XAT_LAST_SYMBOL
      SDL_NEXTSTATE(WaitOK, z_AccessLibrary_N3_WaitOK, "WaitOK")
    } else if (yEqF_z_AccessLibrary_G_ReadResultType(yVarP->yDcn_z_AccessLibrary_G_ReadResultType,
          z_AccessLibrary_G0_TimedOut)) {
      XBETWEEN_SYMBOLS(33, 1270)

/*-----
* OUTPUT Abort
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),1574(135,115),1,1)
------*/
#ifdef XCASELABELS
    case 33:
#endif
      ALLOC_SIGNAL(Abort, ySigN_z_AccessLibrary_7_Abort, xNotDefPId,
        XSIGNALHEADERTYPE)
      SIGNAL_ALLOC_ERROR
      SDL_2OUTPUT_NO_TO(xDefaultPrioSignal, (xIdNode *)0, Abort,
        ySigN_z_AccessLibrary_7_Abort, xNotDefPId, 0, "Abort")
      SIGNAL_ALLOC_ERROR_END
      XBETWEEN_SYMBOLS(34, 1285)

/*-----
* OUTPUT Display
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),1580(135,130),1,1)
------*/
#ifdef XCASELABELS
    case 34:
#endif
      ALLOC_SIGNAL_PAR(Display, ySigN_z_AccessLibrary_9_Display, xNotDefPId,
        yPDef_z_AccessLibrary_9_Display)
      SIGNAL_ALLOC_ERROR
      yAssF_SDL_Charstring(((yPDef_z_AccessLibrary_9_Display *)OUTSIGNAL_DATA_PTR)->Param1,
        yVarP->z_AccessLibrary_NB_Timeout, XASS_MR_ASS_NF);
      SDL_2OUTPUT_NO_TO(xDefaultPrioSignal, (xIdNode *)0, Display,
        ySigN_z_AccessLibrary_9_Display, xNotDefPId,
        sizeof(yPDef_z_AccessLibrary_9_Display), "Display")
      SIGNAL_ALLOC_ERROR_END
      XBETWEEN_SYMBOLS(35, 1303)

/*-----
* SET PanelTimer
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),1586(135,145),1,1)
------*/
#ifdef XCASELABELS
    case 35:
#endif
      SDL_SET_DUR(xPlus_SDL_Time(SDL_NOW, z_AccessLibrary_L_DISPLAYTIME),
        z_AccessLibrary_L_DISPLAYTIME, PanelTimer,
        ySigN_z_AccessLibrary_N6_PanelTimer, yTim_PanelTimer, "PanelTimer")
      XBETWEEN_SYMBOLS(36, 1315)

/*-----
* NEXTSTATE WaitDisplay
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(Start_Idle_WaitKeyStroke),1592(135,160),1)
------*/
#ifdef XCASELABELS
    case 36:
#endif
      XAT_LAST_SYMBOL
      SDL_NEXTSTATE(WaitDisplay, z_AccessLibrary_N5_WaitDisplay, "WaitDisplay")
    }
#ifdef XEDECISION
    else {
      xErrorDecision(xWriteSort(&yVarP->yDcn_z_AccessLibrary_G_ReadResultType,
        ySrtN_z_AccessLibrary_G_ReadResultType));
      return;
    }
#endif

/*-----
* INPUT DisplayOK
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1397(40,35),1)
------*/
  case 3:
    XDEBUG_LABEL(WaitOK_DisplayOK)
    XAT_FIRST_SYMBOL(3)
    XOS_TRACE_INPUT("DisplayOK")
    XBETWEEN_SYMBOLS(37, 1343)

/*-----
* RESET PanelTimer
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1694(40,50),1,1)
------*/
#ifdef XCASELABELS
  case 37:
#endif
    SDL_RESET(PanelTimer, ySigN_z_AccessLibrary_N6_PanelTimer, yTim_PanelTimer,
      "PanelTimer")
    XBETWEEN_SYMBOLS(38, 1354)

/*-----
* OUTPUT Display
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1700(40,65),1,1)
------*/
#ifdef XCASELABELS
  case 38:
#endif
    ALLOC_SIGNAL_PAR(Display, ySigN_z_AccessLibrary_9_Display, xNotDefPId,
      yPDef_z_AccessLibrary_9_Display)
    SIGNAL_ALLOC_ERROR
    yAssF_SDL_Charstring(((yPDef_z_AccessLibrary_9_Display *)OUTSIGNAL_DATA_PTR)->Param1,
      yVarP->z_AccessLibrary_NH_SelectDoor, XASS_MR_ASS_NF);
    SDL_2OUTPUT_NO_TO(xDefaultPrioSignal, (xIdNode *)0, Display,
      ySigN_z_AccessLibrary_9_Display, xNotDefPId,
      sizeof(yPDef_z_AccessLibrary_9_Display), "Display")
    SIGNAL_ALLOC_ERROR_END
    XBETWEEN_SYMBOLS(39, 1372)

/*-----
* CALL ReadKeys  (from EXPRESSION in next symbol)
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1706(30,80),1,1)
------*/
#ifdef XCASELABELS
  case 39:
#endif
    ALLOC_PROCEDURE(z_AccessLibrary_N0_ReadKeys,
      yPrdN_z_AccessLibrary_N0_ReadKeys,
      sizeof(yVDef_z_AccessLibrary_N0_ReadKeys))
    PROCEDURE_ALLOC_ERROR
    yAssF_SDL_Natural(((yVDef_z_AccessLibrary_N0_ReadKeys *)PROC_DATA_PTR)->z_AccessLibrary_N00_NumberKeys,
      yTstA_SDL_Natural(SDL_INTEGER_LIT(1)), XASS_MR_ASS_NF);
    ((yVDef_z_AccessLibrary_N0_ReadKeys *)PROC_DATA_PTR)->z_AccessLibrary_N01_KeyData =
      &(yVarP->z_AccessLibrary_NK_KeyData);
    ((yVDef_z_AccessLibrary_N0_ReadKeys *)PROC_DATA_PTR)->z_AccessLibrary_N0_ProcedureResult =
      &yVarP->xPrdCallRes1_z_AccessLibrary_G_ReadResultType;
    CALL_PROCEDURE(z_AccessLibrary_N0_ReadKeys,
      yPrdN_z_AccessLibrary_N0_ReadKeys, 0, 11)
    PROCEDURE_ALLOC_ERROR_END
    XAFTER_VALUE_RET_PRDCALL(11)

/*-----
* DECISION
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1706(30,80),1,1)
------*/
#ifdef XCASEAFTERPRDLABELS
  case 11:
#endif
    yAssF_z_AccessLibrary_G_ReadResultType(yVarP->yDcn_z_AccessLibrary_G_ReadResultType,
      yVarP->xPrdCallRes1_z_AccessLibrary_G_ReadResultType, XASS_MR_ASS_FR);
#ifdef XTRACE
    xTraceDecision(&(yVarP->yDcn_z_AccessLibrary_G_ReadResultType),
      ySrtN_z_AccessLibrary_G_ReadResultType);
#ifdef XMSCE
    xMSCEDecision(&(yVarP->yDcn_z_AccessLibrary_G_ReadResultType),
      ySrtN_z_AccessLibrary_G_ReadResultType);
#endif
#endif
    if (yEqF_z_AccessLibrary_G_ReadResultType(yVarP->yDcn_z_AccessLibrary_G_ReadResultType,
          z_AccessLibrary_G1_SuccessFul)) {
      XBETWEEN_SYMBOLS(40, 1415)

/*-----
* ASSIGNMENT DoorNo := ...
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1757(55,105),1,1)
------*/
#ifdef XCASELABELS
    case 40:
#endif
      yAssF_SDL_Integer(yVarP->z_AccessLibrary_NL_DoorNo,
        xMinus_SDL_Integer(xNum_SDL_Character(yVarP->
        z_AccessLibrary_NK_KeyData.A[yTstI_z_AccessLibrary_I_KeyIndexType
        (SDL_INTEGER_LIT(1)) - SDL_INTEGER_LIT(1)]), xNum_SDL_Character('0')),
        XASS_MR_ASS_FR);
#ifdef XTRACE
      xTraceAssign("DoorNo := ", &(yVarP->z_AccessLibrary_NL_DoorNo),
        xSrtN_SDL_Integer);
#endif
#ifdef XMSCE
      xMSCEAssign("DoorNo := ", &(yVarP->z_AccessLibrary_NL_DoorNo),
        xSrtN_SDL_Integer);
#endif
      XBETWEEN_SYMBOLS(41, 1437)

/*-----
* DECISION
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1745(60,125),1,1)
------*/
#ifdef XCASELABELS
    case 41:
#endif
      yAssF_SDL_Integer(yDcn_SDL_Integer, yVarP->z_AccessLibrary_NL_DoorNo,
        XASS_MR_ASS_FR);
#ifdef XTRACE
      xTraceDecision(&(yDcn_SDL_Integer), xSrtN_SDL_Integer);
#ifdef XMSCE
      xMSCEDecision(&(yDcn_SDL_Integer), xSrtN_SDL_Integer);
#endif
#endif
      if ((xLE_SDL_Integer(SDL_INTEGER_LIT(1), yDcn_SDL_Integer) &&
            xLE_SDL_Integer(yDcn_SDL_Integer, SDL_INTEGER_LIT(4)))) {
        XBETWEEN_SYMBOLS(42, 1456)

/*-----
* OUTPUT SelectedDoor
* #SDTREF(SDL,D:\TelelogicTau36\examples\courseenv\simccode\ACCESS\PanelController.spt(WaitOK),1751(45,140),1,1)
------*/
#ifdef XCASELABELS
      case 42:
#endif
        ALLOC_SIGNAL_PAR(SelectedDoor, ySigN_z_AccessLibrary_8_SelectedDoor,
          xNotDefPId, yPDef_z_AccessLibrary_8_SelectedDoor)
        SIGNAL_ALLOC_ERROR
        yAssF_z_AccessLibrary_H_DoorNoType(((yPDef_z_AccessLibrary_8_SelectedDoor *)OUTSIGNAL_DATA_PTR)->Param1,
          yTstA_z_AccessLibrary_H_DoorNoType(yVarP->z_AccessLibrary_NL_DoorNo),
          XASS_MR_ASS_NF);
        SDL_2OUTPUT_NO_TO(xDefaultPrioSignal, (xIdNode *)0, SelectedDoor,
          ySigN_z_AccessLibrary_8_SelectedDoor, xNotDefPId,
          sizeof(yPDef_z_AccessLibrary_8_SelectedDoor), "SelectedDoor")
        SIGNAL_ALLOC_ERROR_END
        X

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -