VAQPSE01 ;ALB/JRP,JFP - EXPORTED PDX ROUTINE;9-FEB-94
Source file <VAQPSE01.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| GMTSPDX | ; SLC/JER,SBW - PDX Health Summary Driver ;12/29/93 16:41
|
|
| GET(TRAN,DFN,SEGPTR,ROOT,GMTSLCNT,GMTSDLM,GMTSNDM) | ; Get HS for PDX
; Data retrieved from HS is return in ROOT parmeter reference passing. ; Function returns 2 piece variable delimited with "^". ; Piece 1 = tot line cnt of data extract to ROOT. ; Piece 2 = contains entry line cnt (GMTSLCNT) + Piece 1 ; Note: Currently Data begins with GMTSLCNT + 1 and ; Piece 2 is last node # of ROOT ; : If TRAN is passed ; The patient pointer of the transaction will be used ; Encryption will be based on the transaction ; If DFN is passed ; Encryption will be based on the site parameter ; : Pointer to transaction takes precedence over DFN ... if ; TRAN>0 the DFN will be based on the transaction |
|
| GETX | ||
| ONECOMP(DFN,SEGPTR,GMTSDLM,GMTSNDM) | ; Print a single HS component to IO
|
|
| XFER(SPLDAT,ROOT,GMTSDOC,GMTSLCNT) | ; Transfer text from SPOOL DOC to ROOT
|
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^DPT - [#2] | GET+21 |
| ^GMT(142.1 - [#142.1] | GET+36 |
| ^GMT(142.99 - [#142.99] | GET+29 |
| ^VAT(394.61 - [#394.61] | GET+19, GET+20 |
| ^VAT(394.71 - [#394.71] | GET+32 |
| ^XMB(3.51 - [#3.51] | GET+51, GET+52 |
| ^XMBS(3.519 - [#3.519] | XFER+2, XFER+3 |
| Name | Line Occurrences |
|---|---|
| $$XFER | GET+54 |
| GETX | GET+30, GET+33, GET+37, GET+45 |
| ONECOMP | GET+46 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| % | GET+28~ |
| %X | GET+28~ |
| %XX | GET+28~ |
| %Y | GET+28~ |
| %YY | GET+28~ |
| %Z4 | GET+28~ |
| %ZDA | GET+28~ |
| %ZS | GET+28~ |
| %ZY | GET+28~ |
| C | GET+25~ |
| D0 | GET+25~ |
| DA | GET+25~ |
| DFN | GET~, GET+17*, GET+18, GET+20*, GET+21, GET+44, GET+46, ONECOMP~ |
| DI | GET+25~ |
| DIC | GET+25~ |
| DIE | GET+25~ |
| DQ | GET+25~ |
| DR | GET+25~ |
| DUZ | GET+29*, GETX* |
| GMTS | GET+25~ |
| GMTS1 | GET+25~ |
| GMTS2 | GET+25~ |
| GMTSAGE | GET+25~ |
| GMTSDLM | GET~, GET+46, ONECOMP~, ONECOMP+3 |
| GMTSDOB | GET+25~ |
| GMTSDOC | GET+49~, GET+52*, GET+53, GET+54, XFER~, XFER+10 |
| GMTSDTM | GET+25~ |
| GMTSDUZ | GET+26~, GET+29*, GETX |
| GMTSEG | ONECOMP+1~ |
| GMTSEG(1 | ONECOMP+3* |
| GMTSEGC | ONECOMP+1~, ONECOMP+4* |
| GMTSEGI | ONECOMP+1~ |
| GMTSEGI( | ONECOMP+4* |
| GMTSI | XFER+1~*, XFER+2*, XFER+3 |
| GMTSL | XFER+1~*, XFER+6, XFER+8*, XFER+10, XFER+11*, XFER+12*, XFER+13 |
| GMTSLCNT | GET~, GET+54, GET+59, XFER~, XFER+8*, XFER+13 |
| GMTSLO | GET+26~ |
| GMTSLPG | GET+26~ |
| GMTSNDM | GET~, GET+46, ONECOMP~, ONECOMP+3 |
| GMTSPNM | GET+26~ |
| GMTSPRT | XFER+1~*, XFER+7*, XFER+8, XFER+9* |
| GMTSRB | GET+26~ |
| GMTSREC | XFER+1~, XFER+2, XFER+3*, XFER+6, XFER+7, XFER+8, XFER+9 |
| GMTSSN | GET+26~ |
| GMTSSPL | GET+26~, GET+29*, GET+30, GET+44 |
| GMTSTITL | ONECOMP+1~, ONECOMP+2* |
| GMTSWARD | GET+26~ |
| GMTSX | XFER+1~ |
| GMTSY | GET+26~, GET+30*, GET+33*, GET+39*, GET+40*, GET+41*, GET+42*, GET+45*, GET+53*, GET+54* , GET+59, GET+60*, GETX+1 |
| IO("SPOOL" | GET+47 |
| >> IOP | GET+44* |
| POP | GET+28~, GET+45 |
| ROOT | GET~, GET+54, GET+59, XFER~, XFER+8, XFER+11 |
| SEGPTR | GET~, GET+32, GET+34*, GET+36, GET+46, ONECOMP~, ONECOMP+3, ONECOMP+4 |
| SEX | GET+27~ |
| SPLDAT | XFER~, XFER+2, XFER+3 |
| SPLDOC | GET+27~, GET+47*, GET+48, GET+51, GET+52, GET+55 |
| SPLPTR | GET+49~, GET+52*, GET+53, GET+54, GET+55 |
| SPLSTAT | GET+49~, GET+51* |
| TRAN | GET~, GET+16*, GET+18, GET+19, GET+20, GET+57, GET+58, GET+59 |
| U | GET+29, GET+51, GET+52, GET+53, ONECOMP+3, XFER+10, XFER+13 |
| VADM | GET+27~ |
| VAERR | GET+27~ |
| VAIN | GET+27~ |
| X | GET+27~, GET+32*, GET+33, GET+34, GET+36*, GET+37, GET+39, GET+42, GET+57*, GET+58* , GET+59* |
| Y | GET+27~ |
| ZISIOST | GET+27~ |
