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 |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: IBDFRPC5

Package: Automated Information Collection System

Routine: IBDFRPC5


Information

IBDFRPC5 ;ALB/AAS - AICS Pass data to PCE, Broker Call ; 24-FEB-96

Source Information

Source file <IBDFRPC5.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Automated Information Collection System 2 PAUSE^IBDFDE  FINDALL^IBDFRPC6  
PCE Patient Care Encounter 1 ($$GETENC,ENCEVENT)^PXAPI  
Registration 1 SDA^VADPT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Automated Information Collection System 1 IBDFRPC6  

Entry Points

Name Comments DBIA/ICR reference
TESTA ;
TESTW ;
APPTLST(RESULT,IBDF) ; -- return past appointment list, called by rpc
GETDATA(RESULT,IBDATA,ENCTRS) ; -- return all data for an encounter date time
WRITE ; -- called by DIR as executable help from IBDFDE
GETALLQ
TEST ;
GETQ
GETALL(RESULT,IBDATA) ; -- called by RPC and by write
; -- get all encounter data
; -- input Result (called by reference)
; IBDATA (called by reference)
; IBDATA("CLINIC") := pointer to hospital location file (44)
; IBDATA("DFN") := pointer to Patient file (2)
; IBDATA("APPT") := date/time of encounter in FM format
; IBDATA("UNFORMAT") := (optional, default :=0) return piece
; as displayable
; -- output Results Array
; A sequential array of all data found for encounters for
; patient/clinic/appt
; if ibdata(unformat) is false then data is preformatted
; suitable for display to a crt.
; if ibdata(unformat) is true then a record as follows:
; P1 := data qualifier (ie primary or secondary)
; P2 := type of data
; p3 := Narrative or Description (Textual name)
; P4 := value (code or date/time)
; P5 := source of data (aics, pce, scheduling)
; P6 := Quantity (cpt codes only)
; The next 4 pieces only set if answered
; P7 := sc (null, 1 or 0) encounter node only
; P8 := ao (null, 1 or 0) encounter node only
; P9 := ir (null, 1 or 0) encounter node only
; P10 := ec (null, 1 or 0) encounter node only

External References

Name Field # of Occurrence
PAUSE^IBDFDE WRITE+6
FINDALL^IBDFRPC6 GETALL+31
$$GETENC^PXAPI GETDATA+9
ENCEVENT^PXAPI GETDATA+15
SDA^VADPT APPTLST+10

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Retrieving Encounter Data from PCE..."
  • Line Location: WRITE+2
Function Call: WRITE
  • Prompt: !
  • Line Location: WRITE+4
Function Call: WRITE
  • Prompt: !,RESULT(I)
  • Line Location: WRITE+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^SC("B" GETDATA+4
^TMP("PXKENC" GETDATA+3!
^UTILITY("VASD" APPTLST+3!, APPTLST+12, APPTLST+13, APPTLST+16!

Label References

Name Line Occurrences
APPTLST TESTA+3
GETALL WRITE+3, TEST+6
GETDATA GETALL+29
GETQ GETDATA+6, GETDATA+10, GETDATA+11
WRITE TESTW+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ALAN TEST+1!, TEST+6, TESTA+1!, TESTA+3
CNT GETALL+27~, GETALL+28*, WRITE+1~, WRITE+5*, WRITE+6*, APPTLST+1~, APPTLST+12*, APPTLST+13*
DFN APPTLST+1~, APPTLST+5*
DT APPTLST+6, APPTLST+7
ENCTRS GETALL+27~, GETALL+28*, GETALL+29, GETDATA~, GETDATA+9*, GETDATA+10, GETDATA+11, GETDATA+15
I WRITE+1~, WRITE+5*, WRITE+6*, APPTLST+1~, APPTLST+13*
IBDATA GETALL~, GETALL+29, GETDATA~
IBDATA("APPT" GETDATA+6, GETDATA+9
IBDATA("CLINIC" GETDATA+4*, GETDATA+6, GETDATA+9
IBDATA("DFN" GETDATA+6, GETDATA+9
IBDF WRITE+3, APPTLST~, TEST+1!, TEST+6, TESTW+1!, TESTW+6!, TESTA+1!, TESTA+3
IBDF("APPT" TEST+4*, TESTW+4*
IBDF("CLINIC" TEST+3*, TESTW+3*
IBDF("DFN" APPTLST+5, TEST+2*, TESTW+2*, TESTA+2*
IBDF("F" APPTLST+6
IBDF("T" APPTLST+7
IBDF("UNFORMAT" TEST+5*
IBDF("W" APPTLST+8
IBDI GETALL+27~
IBDJ GETDATA+2~, GETDATA+15*
IBDY GETDATA+2~, GETDATA+15*
IBQUIT WRITE+1~, WRITE+5*, WRITE+6
J APPTLST+1~
L GETALL+27~, GETALL+30*
RESULT GETALL~, GETALL+29, GETALL+31, GETDATA~, WRITE+1~, WRITE+3, APPTLST~
RESULT( WRITE+6, APPTLST+13*
RESULT(0 GETALL+31*, GETDATA+5*, GETDATA+6*, GETDATA+10*, GETDATA+11*, GETDATA+14*, GETDATA+17*, APPTLST+2*, APPTLST+15*
VAERR APPTLST+1~, APPTLST+15
VAROOT APPTLST+1~
VASD APPTLST+1~
VASD("F" APPTLST+6*
VASD("T" APPTLST+7*
VASD("W" APPTLST+8*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All