Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: PSSFDBDI

Package: Pharmacy Data Management

Routine: PSSFDBDI


Information

PSSFDBDI ;BIR/LE - Sends XML Request to PEPS via HWSC for Dose Information ;01/23/12

Source Information

Source file <PSSFDBDI.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
M XML Parser 2 ($$ATTRIB,$$CHILD,$$NAME,$$VALUE,DELETE)^MXMLDOM  $$XMLHDR^MXMLUTL  
Pharmacy Data Management 2 $$CHKSTAT^PSSDSFDB  ($$ATRIBUTE,$$GETTEXT)^PSSHRCOM  
Web Services Client 1 ($$GETREST,$$POST)^XOBWLIB  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Pharmacy Data Management 1 PSSDRDOS  

Entry Points

Name Comments DBIA/ICR reference
SETXREFS(PSSOUT2) ; set "A","B","C", zero node cross references & values
RETRY ;Retry line tag
PARSDORG(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2,PSSDR) ; parse doseRange element
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp
; @PSSDR = array used for finding element with ^tmp node locations
READDOIN(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2) ; read dosingInfo attributes
; @DOCHAND = Handle to XML Document
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp
READDODN(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2) ; read dispensableDrugName element
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp
PARSDOMM(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2,PSSMM) ; parse minMaxResults element ; not implemented as of PSS*1*201
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp
; @PSSMM = array used for finding element with ^tmp node locations
PARSXML(DOCHAND,PSSGCN,PSSOUT) ; read result
; @DOCHAND = Handle to XML Document
; @PSSOUT = output array
PARSDONN(DOCHAND,PSSGCN,NODE,PSSOUT) ; parse neonatalDoseRanges element ; not implemented as of PSS*1*201
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
PARSDORC(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2,PSSDR) ; parse doseRange child element
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp
; @PSSDR = array used for finding element with ^tmp node locations
EN(PSSGCN,PSSOUT) ;get dosing information based on GCNSEQNO
; input: PSSGCN - GCCNSEQNO from file 50.68
FILE ;file structure for the temp file for each data field imported from FDB
POST(XML,PSSGCN,PSSOUT) ; post the XML request to PEPS server and return the routes
; input: XML request
; output: PSSOUT - array containing the list of route names for the given drug.
READDORG(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2,PSSDR) ; read doseRange attributes
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp
; @PSSDR = array used for finding element with ^tmp node locations
BLDXML(GCNSEQ) ; build and return the XML request with drug information for given GCN sequence number
; input: drug IEN from drug file (#50)
; output: returns the XML request for given GCN sequence number
; Example: where 22211 is the GCN Sequence number passed by reference at line tag EN above.
; PSSXML="<?xml version=""1.0"" encoding=""utf-8"" ?><dosingInfoRequest xmlns:xsi=""http://www.w3.org/2001/XMLSchema-instance""
; xsi:schemaLocation=""gov/va/med/pharmacy/peps/external/common/preencapsulation/vo/dosing/info/request dosingInfoSchemaInput.xsd""
; xmlns=""gov/va/med/pharmacy/peps/external/common/preencapsulation/vo/dosing/info/request"">
; <dosingInfo gcnSeqNo=""22211"" fdbdx=""999"" />
; </dosingInfoRequest>"
GETFILE(PSSDR,PSSMM) ;
PARSDOIN(DOCHAND,PSSGCN,NODE,PSSOUT) ; parse dosingInfo element
; @DOCHAND = Handle to XML Document
; @NODE = Document node
; @PSSOUT = output array
READDODD(DOCHAND,PSSGCN,NODE,PSSOUT,PSSOUT2) ; read dispensableDrugDescription element
; @DOCHAND = Handle to XML Document
; @PSSGCN = GCN passed in to API
; @NODE = Document node
; @PSSOUT = output array
; @PSSOUT2 = output array for building ^tmp

External References

Name Field # of Occurrence
$$ATTRIB^MXMLDOM READDOIN+7, READDORG+9
$$CHILD^MXMLDOM PARSXML+5, PARSDOIN+8, PARSDORG+9, PARSDORC+9, PARSDOMM+10, PARSDONN+8
$$NAME^MXMLDOM PARSXML+3, PARSXML+6, PARSDOIN+9, PARSDORG+10, PARSDORC+10, PARSDOMM+11, PARSDONN+9
$$VALUE^MXMLDOM READDOIN+9, READDOIN+12, READDORG+15
DELETE^MXMLDOM POST+43
$$XMLHDR^MXMLUTL BLDXML+14
$$CHKSTAT^PSSDSFDB EN+11
$$ATRIBUTE^PSSHRCOM BLDXML+21, BLDXML+22, BLDXML+23, BLDXML+26
$$GETTEXT^PSSHRCOM PARSDORC+17, READDODN+7, READDODD+7
$$GETREST^XOBWLIB POST+17
$$POST^XOBWLIB POST+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^TMP( POST+18!, POST+22!, POST+26!
^TMP($J EN+8!, POST+8!, POST+41!, POST+44!, PARSDOIN+16*

Label References

Name Line Occurrences
$$BLDXML EN+13
GETFILE PARSDOIN+5
PARSDOIN PARSXML+7
PARSDORC PARSDORG+14
PARSDORG PARSDOIN+10
PARSXML POST+38
POST RETRY+1
PSS POST+21
READDODD PARSDOIN+14
READDODN PARSDOIN+13
READDOIN PARSDOIN+6
READDORG PARSDORG+13
RETRY RETRY+2
SETXREFS PARSDOIN+15

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ANODE READDORG+10~, READDORG+11*, READDORG+12, READDORG+15, PARSDORC+12~, PARSDORC+13*, PARSDORC+14, PARSDORC+17
APIECE READDORG+10~, READDORG+13*, READDORG+14, READDORG+15, PARSDORC+12~, PARSDORC+15*, PARSDORC+16, PARSDORC+17
BASE EN+10~, EN+12*
DOCHAND POST+38, POST+43, PARSXML~, PARSXML+3, PARSXML+5, PARSXML+6, PARSXML+7, PARSDOIN~, PARSDOIN+6, PARSDOIN+8
, PARSDOIN+9, PARSDOIN+10, PARSDOIN+13, PARSDOIN+14, READDOIN~, READDOIN+7, READDOIN+9, READDOIN+12, PARSDORG~, PARSDORG+9
, PARSDORG+10, PARSDORG+13, PARSDORG+14, READDORG~, READDORG+9, READDORG+15, PARSDORC~, PARSDORC+9, PARSDORC+10, PARSDORC+17
, PARSDOMM~, PARSDOMM+10, PARSDOMM+11, PARSDONN~, PARSDONN+8, PARSDONN+9, READDODN~, READDODN+7, READDODD~, READDODD+7
DOSETAG BLDXML+10~, BLDXML+25*, BLDXML+26
DRUGTAG BLDXML+10~
ENDTAG BLDXML+10~, BLDXML+25*, BLDXML+26
FDBDX BLDXML+10~, BLDXML+25*, BLDXML+26
FIRST SETXREFS+1~, SETXREFS+2*, SETXREFS+5, SETXREFS+7*
FLD1 SETXREFS+13~, SETXREFS+14*, SETXREFS+17, SETXREFS+18
FLD2 SETXREFS+1~
FLD3 SETXREFS+1~, SETXREFS+14*, SETXREFS+17, SETXREFS+18
FLD7 SETXREFS+1~, SETXREFS+14*, SETXREFS+17, SETXREFS+18
FLD8 SETXREFS+1~, SETXREFS+14*, SETXREFS+17, SETXREFS+18
FLDS SETXREFS+13~, SETXREFS+14*, SETXREFS+15*, SETXREFS+16
>> FTYPE SETXREFS+2*, SETXREFS+8*, SETXREFS+9, SETXREFS+10, SETXREFS+11, SETXREFS+12, SETXREFS+15
GCNSEQ EN+10~, EN+12*, EN+13, BLDXML~, BLDXML+26, SETXREFS+2*, SETXREFS+4*, SETXREFS+5, SETXREFS+6, SETXREFS+8
, SETXREFS+9, SETXREFS+10, SETXREFS+11, SETXREFS+15
I SETXREFS+16*, GETFILE+1~, GETFILE+2*
NODE PARSDOIN~, PARSDOIN+6, PARSDOIN+8, READDOIN~, READDOIN+7, READDOIN+9, READDOIN+12, PARSDORG~, PARSDORG+9, READDORG~
, READDORG+9, READDORG+15, PARSDORC~, PARSDORC+9, PARSDOMM~, PARSDOMM+10, PARSDONN~, PARSDONN+8, READDODN~, READDODN+7
, READDODD~, READDODD+7
PSS POST+4~, PARSDOIN+4~, READDOIN+5~, PARSDORG+7~, READDORG+7~, PARSDORC+7~, PARSDOMM+8~, PARSDONN+6~, READDODN+6~, READDODD+6~
PSS("attr" READDOIN+6*, READDOIN+7*, READDOIN+8, READDOIN+9, READDOIN+11, READDOIN+12, READDORG+8*, READDORG+9*, READDORG+11, READDORG+13
, READDORG+15
PSS("child" PARSXML+4*, PARSXML+5*, PARSXML+6, PARSXML+7, PARSDOIN+7*, PARSDOIN+8*, PARSDOIN+9, PARSDOIN+10, PARSDOIN+13, PARSDOIN+14
, PARSDORG+8*, PARSDORG+9*, PARSDORG+10, PARSDORG+13, PARSDORG+14, PARSDORC+8*, PARSDORC+9*, PARSDORC+10, PARSDORC+17, PARSDOMM+9*
, PARSDOMM+10*, PARSDOMM+11, PARSDONN+7*, PARSDONN+8*, PARSDONN+9
PSS("childName" PARSXML+6*, PARSXML+7, PARSDOIN+9*, PARSDOIN+10, PARSDOIN+13, PARSDOIN+14, PARSDORG+10*, PARSDORG+12, PARSDORC+10*, PARSDORC+11
, PARSDORC+13, PARSDORC+15, PARSDOMM+11*, PARSDONN+9*
PSS("childText" READDODN+7*, READDODN+8, READDODN+9, READDODD+7*, READDODD+8, READDODD+9
PSS("fdbdx" READDOIN+9*, READDOIN+10
PSS("gcnSeqNo" READDOIN+12*, READDOIN+13
PSS("parameterName" POST+13*, POST+21
PSS("parameterValue" POST+14*, POST+21
PSS("path" POST+12*, POST+25
PSS("postResult" POST+25*, POST+29, POST+35
PSS("restObject" POST+17*, POST+25
PSS("result" POST+31*, POST+45
PSS("rootName" PARSXML+3*
PSS("server" POST+10*, POST+17
PSS("webserviceName" POST+11*, POST+17
PSSDR PARSDOIN+4~, PARSDOIN+5, PARSDOIN+10, PARSDORG~, PARSDORG+13, PARSDORG+14, READDORG~, PARSDORC~, GETFILE~
PSSDR( READDORG+9, READDORG+11, READDORG+13, PARSDORC+11, PARSDORC+13, PARSDORC+15, GETFILE+4*
PSSDR(0 PARSDORG+11*, READDORG+15, PARSDORC+17
PSSERR POST+4~, POST+25
PSSFDBDI POST+4~*
PSSFDBDN EN+10~, EN+11*
PSSFDBDX EN+10~
PSSFILE GETFILE+1~, GETFILE+2*, GETFILE+3
PSSFLD GETFILE+1~, GETFILE+3*, GETFILE+4, GETFILE+5
PSSGCN EN~, EN+9, EN+12, RETRY+1, POST~, POST+38, PARSXML~, PARSXML+7, PARSDOIN~, PARSDOIN+6
, PARSDOIN+10, PARSDOIN+13, PARSDOIN+14, READDOIN~, READDOIN+10, READDOIN+13, READDOIN+14, PARSDORG~, PARSDORG+13, PARSDORG+14
, READDORG~, READDORG+15, PARSDORC~, PARSDORC+17, PARSDOMM~, PARSDONN~, READDODN~, READDODN+9, READDODD~, READDODD+9
PSSMM PARSDOIN+4~, PARSDOIN+5, PARSDOMM~, GETFILE~
PSSMM( GETFILE+5*
PSSNODE GETFILE+1~, GETFILE+3*, GETFILE+4, GETFILE+5
PSSOUT EN~, EN+9*, RETRY+1, RETRY+2!, POST~, POST+18, POST+22, POST+26, POST+38, PARSXML~
, PARSXML+7, PARSDOIN~, PARSDOIN+6, PARSDOIN+10, PARSDOIN+13, PARSDOIN+14, READDOIN~, PARSDORG~, PARSDORG+13, PARSDORG+14
, READDORG~, PARSDORC~, PARSDOMM~, PARSDONN~, READDODN~, READDODD~
PSSOUT(0 EN+9*, EN+11*, RETRY+2, POST+18*, POST+22*, POST+26*, POST+30*, POST+37*, POST+40*, POST+41*
PSSOUT2 PARSDOIN+4~, PARSDOIN+6, PARSDOIN+10, PARSDOIN+13, PARSDOIN+14, PARSDOIN+15, PARSDOIN+16, READDOIN~, PARSDORG~, PARSDORG+13
, PARSDORG+14, READDORG~, PARSDORC~, PARSDOMM~, READDODN~, READDODD~, SETXREFS~, SETXREFS+3, SETXREFS+20*
PSSOUT2( READDOIN+10*, READDOIN+13*, READDOIN+14*, READDORG+15*, PARSDORC+17*, READDODN+9*, READDODD+9*, SETXREFS+4, SETXREFS+5, SETXREFS+6
, SETXREFS+8, SETXREFS+9, SETXREFS+10, SETXREFS+11, SETXREFS+15
PSSPIECE GETFILE+1~, GETFILE+3*, GETFILE+4, GETFILE+5
PSSRETR2 EN+10~, RETRY+2*
PSSSORT SETXREFS+1~, SETXREFS+3*, SETXREFS+20
PSSSORT("A" SETXREFS+17*
PSSSORT("B" SETXREFS+6*
PSSSORT("C" SETXREFS+18*
PSSSORT(0 SETXREFS+19*
PSSTYPE GETFILE+1~, GETFILE+3*, GETFILE+4, GETFILE+5
PSSXML EN+10~, EN+13*, RETRY+1, BLDXML+11*, BLDXML+14*, BLDXML+24*, BLDXML+26*, BLDXML+27*, BLDXML+28
SCHEMA BLDXML+10~, BLDXML+17*, BLDXML+22
>> SEQ SETXREFS+2*, SETXREFS+9*, SETXREFS+10, SETXREFS+11, SETXREFS+15, SETXREFS+17, SETXREFS+18
>> SEQ2 SETXREFS+2*, SETXREFS+10*, SETXREFS+11, SETXREFS+12, SETXREFS+15
>> SEQ3 SETXREFS+2*, SETXREFS+11*, SETXREFS+15
>> SEQ4 SETXREFS+2*
SPACE BLDXML+10~, BLDXML+11*, BLDXML+16*, BLDXML+20, BLDXML+21, BLDXML+22, BLDXML+23, BLDXML+26
SUBXML BLDXML+10~, BLDXML+20*, BLDXML+21*, BLDXML+22*, BLDXML+23*, BLDXML+24
TAG BLDXML+10~, BLDXML+19*, BLDXML+20, BLDXML+27
>> TYP2 SETXREFS+2*
>> TYP3 SETXREFS+2*
U POST+30, READDOIN+10, READDOIN+13, READDOIN+14, READDORG+11, READDORG+13, READDORG+15, PARSDORC+13, PARSDORC+15, PARSDORC+17
, READDODN+9, READDODD+9
XML POST~, POST+14
XMLNS BLDXML+10~, BLDXML+18*, BLDXML+23

Marked Items

Name Field # of Occurrence
$T( EN+12
$T(FILE+I GETFILE+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All