RARTRPV1 ;HISC/FPT - Resident Pre-Verify Report ;11/16/98 15:02
Source file <RARTRPV1.m>
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 |
Package | Total | Caller Graph |
---|---|---|
Radiology Nuclear Medicine | 1 | RARTRPV |
Name | Comments | DBIA/ICR reference |
---|---|---|
EDTRPT | ; edit report text and pre-verify
|
|
NOEDIT | ; pre-verify a report only, no report text edit
|
|
NEXT | ; copy dx & phys, then return to RARTRPV and get next report
; rpt exists & locked, thus no need to lock at "DT" level because users ; can only use 'report entry/edit' option to enter dx's for printsets |
|
PDX | ; primary diagnostic code
|
|
SDX | ; secondary diagnostic code
|
|
PSTAFF | ; primary staff
|
|
SSTAFF | ; secondary staff
|
Name | Field # of Occurrence |
---|---|
^DIE | EDTRPT+4, NOEDIT+2, PDX+4, SDX+6, PSTAFF+4, SSTAFF+6 |
ELOC^RABWRTE | NOEDIT+10 |
RPT^RAHLRPC | NEXT+10 |
COPY^RARTE2 | NEXT+6, NEXT+7 |
Q^RARTR | NEXT+17 |
GETRPT^RARTRPV | NEXT+20 |
RESTORE^RARTVER2 | NEXT+17 |
SAVE^RARTVER2 | NEXT+13 |
$$LOCK^RAUTL12 | PDX+3, SDX+5, PSTAFF+3, SSTAFF+5 |
UNLOCK^RAUTL12 | PDX+4, SDX+6, PSTAFF+4, SSTAFF+6 |
EN2^RAUTL20 | NEXT+4 |
FileNo | Call Tags |
---|---|
^RARPT - [#74] | Classic Fileman Calls |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^RADPT - [#70] | NOEDIT+6, NOEDIT+9 |
^RARPT - [#74] | EDTRPT+1, EDTRPT+2, NEXT+10 |
^TMP($J | NEXT+11! |
Name | Field # of Occurrence |
---|---|
^("T" | EDTRPT+2* |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
>> %ZIS("B" | NEXT+16*!, NEXT+18! |
DA | EDTRPT+3*, NOEDIT+1*, PDX+1*, PDX+3, PDX+4!, SDX+4*, SDX+5, SDX+6!, PSTAFF+1*, PSTAFF+3 , PSTAFF+4!, SSTAFF+4*, SSTAFF+5, SSTAFF+6! |
DA(1 | PDX+1*, PDX+2, SDX+4*, PSTAFF+1*, PSTAFF+2, SSTAFF+4* |
DA(2 | PDX+1*, PDX+2, PSTAFF+1*, PSTAFF+2 |
DE | EDTRPT+4!, NOEDIT+2!, PDX+4!, SDX+6!, PSTAFF+4!, SSTAFF+6! |
DIE | EDTRPT+3*, NOEDIT+1*, NOEDIT+2!, PDX+2*, PDX+3, PDX+4!, SDX+4*, SDX+5, SDX+6!, PSTAFF+2* , PSTAFF+3, PSTAFF+4!, SSTAFF+4*, SSTAFF+5, SSTAFF+6! |
DIE("NO^" | NOEDIT+1* |
DQ | EDTRPT+4!, NOEDIT+2!, PDX+4!, SDX+6!, PSTAFF+4!, SSTAFF+6! |
DR | EDTRPT+3*, EDTRPT+4!, NOEDIT+1*, NOEDIT+2!, PDX+2*, PDX+4!, SDX+1*, SDX+6!, PSTAFF+2*, PSTAFF+4! , SSTAFF+1*, SSTAFF+6! |
DR(2 | SDX+2*, SSTAFF+2* |
DR(3 | SDX+3*, SSTAFF+3* |
>> DTOUT | NOEDIT+4, NOEDIT+5, NOEDIT+7, NOEDIT+8, NEXT+11, NEXT+12 |
>> DUOUT | EDTRPT+5*, NOEDIT+3*, NOEDIT+4, NOEDIT+5, NOEDIT+7, NOEDIT+8 |
>> RACN | SDX+1, SSTAFF+1 |
>> RACNI | NOEDIT+6, NOEDIT+9, PDX+1, PSTAFF+1 |
>> RACT | EDTRPT+1* |
>> RADFN | NOEDIT+6, NOEDIT+9, PDX+1, SDX+4, PSTAFF+1, SSTAFF+4 |
>> RADRS | NEXT+6*, NEXT+7* |
>> RADTI | NOEDIT+6, NOEDIT+9, PDX+1, SDX+4, PSTAFF+1, SSTAFF+4 |
RAMEMARR | NEXT+3~, NEXT+4 |
>> RAMLC | NEXT+16 |
RAPRTSET | NEXT+3~, NEXT+5 |
>> RARDX | NEXT+12 |
>> RARPT | EDTRPT+1, EDTRPT+2, EDTRPT+3, NOEDIT+1, NEXT+10 |
RAXIT | NOEDIT+5, NOEDIT+7, NOEDIT+8, NEXT+5*, NEXT+9!, PDX+3*, PDX+4, SDX+5*, SDX+6, PSTAFF+3* , PSTAFF+4, SSTAFF+5*, SSTAFF+6 |
U | NOEDIT+6, NOEDIT+9, NEXT+10 |
>> Y | EDTRPT+5, NOEDIT+3 |