DEBUG^XWBTCPM
From VistApedia
To DEBUG a CPRS call from a terminal instead of RPC BROKER running in background First create your CPRSCHART.EXE shortcut to have P=1234 something like: CPRSChart.exe SERVER=192.168.1.1 SHOWRPCS PORT=1234 Second from inside MUMPS at a programmer command line: MUMPS>D DEBUG^XWBTCPM Before running this entry point set your debugger to stop at the place you want to debug. Some spots to use: 'SERV+1^XWBTCPM', 'MAIN+1^XWBTCPM' or 'CAPI+1^XWBPRS.' or location of your choice. IP Socket to Listen on: 1234 rd: [XWB] rd: 1030 rd: 4 rd: rd: TCPConnect CMD: TCPConnect CMD: TCPConnect rd: 5 rd: 0 rd: 012 rd: 192.1.1.127 rd: f rd: 0 rd: 001 rd: 0 rd: f rd: 0 rd: 017 rd: LAPTOP.WORLDVISTA.ORG rd: f rd: wrt (9): accept accept accept rd: [ rd: XWB] rd: 1130 rd: 2 rd: rd: 0 rd: rd: XUS SIGNON SETUP RPC: XUS SIGNON SETUP RPC: XUS SIGNON SETUP rd: 5 rd: 0 rd: 048 rd: 2-394203940231())(_)#%*!@#)(#_02934AJFOWAWPLSIER rd: f rd: Call: SETUP^XUSRB(.XWBY,XWB(5,"P",0)) wrt (65): LAPTOP EHR EHR /dev/pts/3 3 0 TEST.WORLDVISTA.ORG 1 rd: [ rd: XWB] rd: 1130 rd: 2 rd: rd: 0 rd: rd: XUS INTRO MSG RPC: XUS INTRO MSG RPC: XUS INTRO MSG rd: 5 rd: 4 rd: f rd: Call: INTRO^XUSRB(.XWBY) wrt (174): TESTING ENVIRONMENT WorldVistA EHR /VOE 1.0 rd: [ rd: XWB] rd: 1030 rd: 4 rd: rd: #BYE# CMD: #BYE# CMD: #BYE# rd: wrt (8): #BYE# BYE CMD BYE CMD Exit: #BYE# Exit: #BYE# Done