MAGGTPT1 ;WOIFO/GEK/SG/NST/JSL- Delphi-Broker calls for patient lookup and information ; 05 Oct 2010 9:15 AM
Source file <MAGGTPT1.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FIND(MAGRY,ZY) | ;RPC [MAGG PAT FIND]
; Call to Do a lookup using FIND^DIC ; MAGRY is the Array to return. ; ZY is parameter sent by calling app (Delphi) ; NUM TO RETURN ^ TEXT TO MATCH ^ TYPE OF OUPUT FORMAT ^ SCREEN ($P 5-99) ; MAGRY(0)="0^Error message" ; or ; MAGRY(0)=Found 100 entries matching "" there are more |
|
| FINDERR(XI) | ;
|
|
| INFO(MAGRY,DATA) | ;RPC [MAGG PAT INFO] Call to Return patient info.
; Input parameters ; DATA: MAGDFN ^ NOLOG ^ ISICN ^ FLAGS ^ YYFORMAT ; MAGDFN -- Patient DFN ; NOLOG -- 0/1; if 1, then do NOT update the Session log ; ISICN -- 0/1 if 1, then this is an ICN, if 0 (default) this is a DFN ; Patch 41 ; FLAGS -- "D" Include Deleted images ; YYFORMAT - 0/1; if 1, return DOB as MM/DD/YYYY not MM/DD/YY (MAG*3.0*118). ; MAGRY is a string, we return the following : ; //$P 1 2 3 4 5 6 7 8 9 10 ; // status ^ DFN ^ name ^ sex ^ DOB ^ PID ^ S/C ^ TYPE ^ Veteran(y/n) ^ Patient Image Count ; //$P 11 12 13 14 15 16 ; ICN SITE Number ^ Production Account 1/0 ^ Not use ^ Age ^ SSN (MUSE) ^ ; VADM(1)=Patient's name ; VADM(5)=Patient's sex (M^MALE) ; VADM(3)=Patient's DOB (internal^external) ; VADM(2)=Patient's SSN (internal^external) ; VAEL(3)=Patient's Service Connected? (#.301) (1=yes) ; VAEL(4)=Patient's Veteran Y/N (#1901) (1=yes) ; VAEL(6)=Patient's Type (#391) (internal^external) |
|
| IMGCT(DFN,FLAGS) | ; RETURN TOTAL NUMBER OF IMAGES FOR A PATIENT;
; FLAGS D Include deleted images (file #2005.1) |
|
| BS5CHK(MAGRY,MAGDFN) | ;RPC [MAGG PAT BS5 CHECK]
; Call to check the BS5 cross ref ; and see if any similar patients exist. ; If yes, all matching patients will be listed and shown to the user. |
| RPC Name | Call Tags |
|---|---|
| MAGG PAT FIND | FIND |
| MAGG PAT INFO | INFO |
| MAGG PAT BS5 CHECK | BS5CHK |
