RAHLO1 ;HIRMFO/GJC/BNT - File rpt (data from bridge program) ; Nov 13, 2024@10:39:22
Source file <RAHLO1.m>
| Package | Total | Call Graph |
|---|---|---|
| Radiology Nuclear Medicine | 10 | $$STUB^RAEDCN1 (ADENDUM,SECDX)^RAHLO2 (TASK,UPMEM,VOICE)^RAHLO4 GENACK^RAHLTCPB ($$NEWIEN,LOCKR)^RAHLTCPU UNVER^RARTE1 PTR^RARTE2 UPSTAT^RAUTL0 UP1^RAUTL1 EN2^RAUTL20 |
| Kernel | 2 | $$NOW^XLFDT EN^XUSHSHP |
| VA FileMan | 2 | (FILE,UPDATE)^DIE IX^DIK |
| Womens Health | 1 | CREATE^WVRALINK |
| action | A | extended action | Ea | event driver | Ed | subscriber | Su | protocol | O | limited protocol | LP | run routine | RR | broker | B | edit | E | server | Se | P | screenman | SM | inquire | I |
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| FILE | ;Create entry in file 74 & file data (remember: U = "^")
|
|
| NEW1 | ; The variable RARPT is set to zero in RAHLO. NEWIEN^RAHLTCPU() will
; return a record number in RARPT to used for filing a new report. Use ; UPDATE^DIE to create a report with the record number returned in RARPT. |
|
| LOCK1 | ;jump here if we intend to amend an existing report
|
|
| UPACT | ;Update the Activity Log (74.01) w/DBS call
|
|
| PACS | ;If there are subscribers to RA RPT xxx events broadcast ORU mesages to those subscribers
|
|
| KVAR |
| Name | Field # of Occurrence |
|---|---|
| FILE^DIE | LOCK1+17, LOCK1+62 |
| UPDATE^DIE | NEW1+9, UPACT+5 |
| IX^DIK | UPACT+9 |
| $$STUB^RAEDCN1 | FILE+19 |
| ADENDUM^RAHLO2 | LOCK1+86 |
| SECDX^RAHLO2 | LOCK1+113 |
| TASK^RAHLO4 | PACS+3 |
| UPMEM^RAHLO4 | LOCK1+113 |
| VOICE^RAHLO4 | PACS+3 |
| GENACK^RAHLTCPB | UPACT+24 |
| $$NEWIEN^RAHLTCPU | NEW1+3 |
| LOCKR^RAHLTCPU | FILE+25 |
| UNVER^RARTE1 | FILE+22 |
| PTR^RARTE2 | LOCK1+27 |
| UPSTAT^RAUTL0 | UPACT+19 |
| UP1^RAUTL1 | UPACT+20 |
| EN2^RAUTL20 | FILE+11 |
| CREATE^WVRALINK | LOCK1+105 |
| $$NOW^XLFDT | FILE+9, UPACT+2 |
| EN^XUSHSHP | LOCK1+1 |
| FileNo | Call Tags |
|---|---|
| ^RARPT - [#74] | Classic Fileman Calls |
| Name | Line Occurrences (* Changed, ! Killed) |
|---|---|
| ^RA(78.3 - [#78.3] | LOCK1+44, LOCK1+73 |
| ^RADPT - [#70] | LOCK1+56, LOCK1+111, UPACT+18 |
| ^RARPT - [#74] | FILE+13, FILE+20, FILE+21, FILE+27!, LOCK1+77*, LOCK1+78*, LOCK1+82*, LOCK1+83*, LOCK1+93, LOCK1+99* , LOCK1+100*, LOCK1+102*, LOCK1+105, UPACT+18, PACS+3 |
| ^TMP("DIERR" | UPACT+5! |
| ^TMP("RARPT-REC" | FILE+24, LOCK1+16, LOCK1+48, LOCK1+49, LOCK1+77, LOCK1+82, LOCK1+86, LOCK1+92, LOCK1+95, LOCK1+97 , LOCK1+98 |
| ^VA(200 - [#200] | LOCK1+52, LOCK1+53, LOCK1+57 |
| >> | Not killed explicitly |
| * | Changed |
| ! | Killed |
| ~ | Newed |
| Name | Field # of Occurrence |
|---|---|
| DA | UPACT+9*! |
| DIERR | UPACT+5! |
| DIK | UPACT+9*! |
| >> I | LOCK1+77*, LOCK1+82*, LOCK1+95*, LOCK1+97, LOCK1+98 |
| >> J | LOCK1+77*, LOCK1+78, LOCK1+82*, LOCK1+83 |
| RA12 | LOCK1+109~, LOCK1+111* |
| RA13 | LOCK1+109~, LOCK1+111* |
| RA15 | LOCK1+109~, LOCK1+111* |
| RA7 | LOCK1+108~, LOCK1+110*, LOCK1+113* |
| RAAB | LOCK1+44*, LOCK1+73*, KVAR! |
| RACNI | FILE+17~, LOCK1+37, LOCK1+56, LOCK1+105, LOCK1+110, LOCK1+111, LOCK1+113*, LOCK1+114* |
| RACNISAV | LOCK1+108~, LOCK1+110*, LOCK1+113, LOCK1+114 |
| >> RACNT | LOCK1+93*, LOCK1+94, LOCK1+96*, LOCK1+99*, LOCK1+100, LOCK1+102 |
| RADATE | FILE+17~, LOCK1+9, LOCK1+78, LOCK1+83, LOCK1+102 |
| RADATIME | FILE+9~*, LOCK1+7, LOCK1+8 |
| >> RADENDUM | FILE+20, LOCK1+51, LOCK1+58, LOCK1+76, LOCK1+81, LOCK1+86 |
| RADFN | FILE+17~, NEW1+6, LOCK1+37, LOCK1+56, LOCK1+105, LOCK1+111, UPACT+18 |
| RADTI | FILE+17~, NEW1+8, LOCK1+37, LOCK1+56, LOCK1+105, LOCK1+111, UPACT+18 |
| >> RADUZ | FILE+24* |
| >> RADX | LOCK1+42, LOCK1+43, LOCK1+44 |
| RAEDIT | FILE+19*, LOCK1+7, UPACT+3, KVAR! |
| >> RAERR | FILE+13, FILE+25, FILE+27, NEW1+10*, LOCK1+19*, LOCK1+65*, UPACT+24 |
| >> RAERR("DIERR" | NEW1+10, LOCK1+18, LOCK1+63, LOCK1+64 |
| RAESIG | LOCK1+1*, LOCK1+13, KVAR! |
| RAFDA | FILE+5~, NEW1+9!, LOCK1+2!, LOCK1+37!, LOCK1+66!, UPACT+1!, UPACT+5! |
| RAFDA( | LOCK1+43*, LOCK1+52*, LOCK1+53*, LOCK1+58*, LOCK1+61*, UPACT+2*, UPACT+3*, UPACT+4* |
| RAFDA(74 | NEW1+6*, NEW1+8*, LOCK1+3*, LOCK1+7*, LOCK1+8*, LOCK1+9*, LOCK1+10*, LOCK1+11*, LOCK1+12*, LOCK1+13* , LOCK1+14*, LOCK1+16* |
| RAFIELD | LOCK1+64~* |
| RAHIST | KVAR! |
| >> RAHSTNDE | LOCK1+93*, LOCK1+99 |
| RAIENS | FILE+5~, NEW1+9!, LOCK1+2!*, LOCK1+3, LOCK1+7, LOCK1+8, LOCK1+9, LOCK1+10, LOCK1+11, LOCK1+12 , LOCK1+13, LOCK1+14, LOCK1+16, LOCK1+37!*, LOCK1+43, LOCK1+52, LOCK1+53, LOCK1+58, LOCK1+61, LOCK1+66! , UPACT+1!*, UPACT+2, UPACT+3, UPACT+4, UPACT+5! |
| RAIENS(1 | NEW1+6* |
| >> RALN | LOCK1+97*, LOCK1+98*, LOCK1+100 |
| RALONGCN | FILE+17~, NEW1+6, NEW1+8, LOCK1+26 |
| >> RAMDV | UPACT+16 |
| RAMEMARR | FILE+10~, FILE+11 |
| RAMEMARR( | LOCK1+113 |
| >> RANEW | LOCK1+94*, LOCK1+98 |
| >> RAOPT("REPROC" | UPACT+24 |
| RAPRTSET | FILE+10~, LOCK1+25, LOCK1+106 |
| RAQUEUED | UPACT+9*, KVAR! |
| RAQUIET | FILE+8~* |
| RARELTEL | LOCK1+33*, LOCK1+42, LOCK1+47! |
| >> RARPT | FILE+13*, FILE+19, FILE+20, FILE+21, FILE+22, FILE+23*, FILE+27, NEW1+3*, NEW1+6, LOCK1+1 , LOCK1+2, LOCK1+61, LOCK1+65, LOCK1+77, LOCK1+78, LOCK1+82, LOCK1+83, LOCK1+93, LOCK1+99, LOCK1+100 , LOCK1+102, LOCK1+105, UPACT+1, UPACT+9, UPACT+18, PACS+3 |
| RARPTN | LOCK1+26~* |
| RARPTSTS | FILE+17~, LOCK1+3, LOCK1+8, LOCK1+10, LOCK1+13, LOCK1+16, LOCK1+33, UPACT+3, UPACT+19, UPACT+20 |
| RASAV | FILE+13*!, FILE+23 |
| >> RASECDX | LOCK1+70, LOCK1+113 |
| >> RASECDX( | LOCK1+72 |
| RASSN | FILE+17~ |
| >> RASUB | FILE+24, LOCK1+16, LOCK1+48, LOCK1+49, LOCK1+77, LOCK1+82, LOCK1+86, LOCK1+92, LOCK1+95, LOCK1+97 , LOCK1+98 |
| >> RATELE | LOCK1+33 |
| >> RATELENM | LOCK1+11 |
| >> RATELEPI | LOCK1+12 |
| >> RATRANSC | LOCK1+14, UPACT+4 |
| RAVERF | FILE+17~, LOCK1+1, LOCK1+8, LOCK1+10, LOCK1+14, LOCK1+16, LOCK1+57, LOCK1+58, UPACT+4 |
| RAX | LOCK1+71~*, LOCK1+72*, LOCK1+73 |
| RAXIT | LOCK1+27~ |
| RAZ7003 | LOCK1+56*, LOCK1+66! |
| RAZPCE | LOCK1+57*, LOCK1+58, LOCK1+66! |
| RAZRES | LOCK1+48*, LOCK1+51, LOCK1+52, LOCK1+66! |
| RAZSTF | LOCK1+49*, LOCK1+51, LOCK1+53, LOCK1+66! |
| U | FILE+20, LOCK1+44, LOCK1+73, LOCK1+78, LOCK1+83, LOCK1+102, LOCK1+105, LOCK1+111, PACS+3 |
| >> X | LOCK1+1* |
| >> X1 | LOCK1+1* |
| >> X2 | LOCK1+1* |
| ZTQUEUED | FILE+7~* |
| Name | Field # of Occurrence |
|---|---|
| $T(CREATE^WVRALINK | LOCK1+105 |
