DGRRPSA2.m

DGRRPSA2 ; ALB/SGG - DG R&R PatientServices GET data - return XML ; 09/30/03

 ;;5.3;Registration;**557,1015**;Aug 13, 1993;Build 21

 ;

 ;

RTNLIST ;

 ;

 ; DGRRPSAA  DGRRPSAC  DGRRPSAD  DGRRPSAM  DGRRPSAT  DGRRPSD1  DGRRPSD2  DGRRPSD3

 ; DGRRPSEE  DGRRPSGT  DGRRPSIC  DGRRPSID  DGRRPSIN  DGRRPSKN  DGRRPSXX

 ;

 ;

 ; PRIMARY PROCESS ROUTINE:

 ; DGRRPSGT  -  DGRRPSGT receives a request for patient info through vista link

 ;              This routine then call out to the individual dataset get routines

 ;              The final XML to be returned is then built in this routine

 ;              

 ; DOCUMENTATION:

 ; DGRRPSA1  -

 ; DGRRPSA2  -

 ; 

 ; INDIVIDUAL DATASET GETTERS:

 ; 

 ; DGRRPSAC  - PS Address CONFIDENTIAL DATA SET

 ; DGRRPSAM  - PS Address MAIN DATA SET

 ; DGRRPSAT  - PS Address TEMPORARY DATA SET

 ; 

 ; DGRRPSD1  - DEMOGRAPHIC DATA SET 1

 ; DGRRPSD2  - DEMOGRAPHIC DATA SET 2

 ; DGRRPSD3  - DEMOGRAPHIC DATA SET 3

 ; 

 ; DGRRPSAD  - PS ADT DATA SET

 ; DGRRPSEE  - ENROLLMENT AND ELIGABILITY DATA SET

 ; DGRRPSIC  - INCOMPETENT DATA SET

 ; DGRRPSID  - IDENTIFICATION DATA SET

 ; DGRRPSIN  - INSTITUTION DATA SET

 ; DGRRPSKN  - Next of Kin DATA SET

 ; 

 ; DEVELOPER TEST INFO:

 ; DGRRPSXX  -

 ;

 QUIT

DGRRPSA2  ; ALB/SGG - DG R&R PatientServices GET data - return XML ; 09/30/03

 +1       ;;5.3;Registration;**557,1015**;Aug 13, 1993;Build 21

 +2       ;

 +3       ;

RTNLIST   ;

 +1       ;

 +2       ; DGRRPSAA  DGRRPSAC  DGRRPSAD  DGRRPSAM  DGRRPSAT  DGRRPSD1  DGRRPSD2  DGRRPSD3

 +3       ; DGRRPSEE  DGRRPSGT  DGRRPSIC  DGRRPSID  DGRRPSIN  DGRRPSKN  DGRRPSXX

 +4       ;

 +5       ;

 +6       ; PRIMARY PROCESS ROUTINE:

 +7       ; DGRRPSGT  -  DGRRPSGT receives a request for patient info through vista link

 +8       ;              This routine then call out to the individual dataset get routines

 +9       ;              The final XML to be returned is then built in this routine

 +10      ;              

 +11      ; DOCUMENTATION:

 +12      ; DGRRPSA1  -

 +13      ; DGRRPSA2  -

 +14      ; 

 +15      ; INDIVIDUAL DATASET GETTERS:

 +16      ; 

 +17      ; DGRRPSAC  - PS Address CONFIDENTIAL DATA SET

 +18      ; DGRRPSAM  - PS Address MAIN DATA SET

 +19      ; DGRRPSAT  - PS Address TEMPORARY DATA SET

 +20      ; 

 +21      ; DGRRPSD1  - DEMOGRAPHIC DATA SET 1

 +22      ; DGRRPSD2  - DEMOGRAPHIC DATA SET 2

 +23      ; DGRRPSD3  - DEMOGRAPHIC DATA SET 3

 +24      ; 

 +25      ; DGRRPSAD  - PS ADT DATA SET

 +26      ; DGRRPSEE  - ENROLLMENT AND ELIGABILITY DATA SET

 +27      ; DGRRPSIC  - INCOMPETENT DATA SET

 +28      ; DGRRPSID  - IDENTIFICATION DATA SET

 +29      ; DGRRPSIN  - INSTITUTION DATA SET

 +30      ; DGRRPSKN  - Next of Kin DATA SET

 +31      ; 

 +32      ; DEVELOPER TEST INFO:

 +33      ; DGRRPSXX  -

 +34      ;

 +35       QUIT