Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All
Print Page as PDF
Routine: LA7SUTL

Package: Automated Lab Instruments

Routine: LA7SUTL


Information

LA7SUTL ;DALISC/JMC - Shipping Utility ;5/5/97 14:44

Source Information

Source file <LA7SUTL.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
Kernel 1 ($$DT,$$FMDIFF)^XLFDT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 5

Package Total Caller Graph
Automated Lab Instruments 4 LA7SM  LA7SMB  LA7SMP0  LA7SMU  
IHS Changes To Lab 1 BLRAG09  

Entry Points

Name Comments DBIA/ICR reference
F ;FREE TEXT
TEST(IEN) ;USED FOR THE CATALOG
JULIAN(LA7DT) ; Calculate julian date based on date passed
; Call with X = VA FileMan date.
; Returns Y = julian date justified to 3 digits.
SSCFG(SCR) ; Select shipping configuration
; Call with X = 0 no screen
; = 1 active collecting facilty screen
; = 2 active host facility screen
; Returns Y = 0 (unsuccessful) or ien of entry in file #62.9 ^ .01 field name
N ;NUMERIC
S ;SET OF CODES
EXIT ;EXIT
AD(LA7AA) ; Determine current accession date for a given accession area.
; Call with LA7AA = ien of entry in file ACCESSION #68.
; Returns LA7AD = accession date in VA FileMan format
; 0^error message if not valid pointer

External References

Name Field # of Occurrence
^DIR SSCFG+9
$$DT^XLFDT AD+7
$$FMDIFF^XLFDT JULIAN+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(60 - [#60] TEST+2, TEST+3, TEST+4
^LRO(68 - [#68] AD+8

Label References

Name Line Occurrences
@( TEST+6
EXIT TEST+2, TEST+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
DIR SSCFG+6~
DIR("A" SSCFG+7*
DIR("S" SSCFG+8*
DIR(0 SSCFG+7*
DIRUT SSCFG+6~
DT AD+7*, AD+9
DTOUT SSCFG+6~
DUOUT SSCFG+6~
IEN TEST~, TEST+2, TEST+3, TEST+4
LA7AA AD~, AD+5*, AD+6, AD+8
LA7AD AD+4~, AD+9*, AD+10*, AD+11
LA7DT JULIAN~, JULIAN+4
LA7JUL JULIAN+3~, JULIAN+4*, JULIAN+5*, JULIAN+6*, JULIAN+7
LADATA TEST+4*, TEST+5, EXIT+1!, S+2
LADES EXIT+1!, S+4*, S+5
LAFLD TEST+4*, EXIT+1!, F+2, N+2
LAI EXIT+1!, S+4*
LANUM EXIT+1!, S+2*, S+3, S+4
LASET EXIT+1!, S+2*, S+4
LATYP TEST+5*, TEST+6, EXIT+1!
OUT TEST+1!, EXIT+2*, EXIT+3, F+1*, F+2*, N+1*, N+2*, S+1*, S+5*
SCR SSCFG~, SSCFG+8
U AD+8, TEST+3, TEST+4, TEST+5, F+2, N+2, S+2
X SSCFG+6~, AD+4~, AD+8*, AD+9
Y SSCFG+6~, SSCFG+10*, SSCFG+11

Marked Items

Name Field # of Occurrence
$T(@LATYP TEST+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Local Variables |  Marked Items |  All