NAMEXWB BROKER EXAMPLE
DESCRIPTIONThis option is the RPC Boroker Example appliation context. RPC BrokerExample exists as a teaching tool for someone learning to program usingVA Remote Procedure Broker. The entire application consists of this option,XWBEXMPL routine and Remote procedures: XWB EXAMPLE ECHO STRING XWB EXAMPLE GET LIST XWB EXAMPLE SORT NUMBERS XWB EXAMPLE WPTEXT XWB GET VARIABLE VALUE XWB EXAMPLE TRAP PARAMS Delphi Object Pascal source files: BrokerExample.DPR BrokerExampleFrm.DFM BrokerExampleFrm.PAS BrokerExampleAboutFrm.DFM BrokerExampleAboutFrm.PAS Standard VistA infrastructure including Kernel, ToolKit, FileMan and RPCBroker, is required of course.
CREATORUSER,ONE
MENU TEXTRPC BROKER PROGRAMMING EXAMPLE
TIMESTAMP OF PRIMARY MENU59304,21399
TYPEBroker (Client/Server)
UPPERCASE MENU TEXTRPC BROKER PROGRAMMING EXAMPLE
FDA(19.05,"1,7903,","RPC")="XWB EXAMPLE ECHO STRING"
FDA(19.05,"1,7903,","RPCKEY")=""
FDA(19.05,"1,7903,","RULES")=""
FDA(19.05,"2,7903,","RPC")="XWB EXAMPLE GET LIST"
FDA(19.05,"2,7903,","RPCKEY")=""
FDA(19.05,"2,7903,","RULES")=""
FDA(19.05,"3,7903,","RPC")="XWB EXAMPLE SORT NUMBERS"
FDA(19.05,"3,7903,","RPCKEY")=""
FDA(19.05,"3,7903,","RULES")=""
FDA(19.05,"4,7903,","RPC")="XWB EXAMPLE WPTEXT"
FDA(19.05,"4,7903,","RPCKEY")=""
FDA(19.05,"4,7903,","RULES")=""
FDA(19.05,"5,7903,","RPC")="XWB GET VARIABLE VALUE"
FDA(19.05,"5,7903,","RPCKEY")=""
FDA(19.05,"5,7903,","RULES")=""
FDA(19.05,"6,7903,","RPC")="XWB EXAMPLE TRAP PARAMS"
FDA(19.05,"6,7903,","RPCKEY")=""
FDA(19.05,"6,7903,","RULES")=""
FDA(19.05,"7,7903,","RPC")="XWB EXAMPLE GLOBAL SORT"
FDA(19.05,"7,7903,","RPCKEY")=""
FDA(19.05,"7,7903,","RULES")=""
FDA(19.05,"8,7903,","RPC")="XWB EXAMPLE BIG TEXT"
FDA(19.05,"8,7903,","RPCKEY")=""
FDA(19.05,"8,7903,","RULES")=""