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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All
Print Page as PDF
Routine: LA7SMU

Package: Automated Lab Instruments

Routine: LA7SMU


Information

LA7SMU ;DALOI/JMC - Shipping Manifest Utility ; 26 Oct 2014 9:51 PM

Source Information

Source file <LA7SMU.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
VA FileMan 5 MIX^DIC1  (FILE,UPDATE)^DIE  LOCK^DILF  RECALL^DILFD  $$GET1^DIQ  
Automated Lab Instruments 2 (SEUP,STSUP)^LA7SMU  $$AD^LA7SUTL  
Kernel 1 ($$DT,$$FMTE,$$FMTHL7,$$NOW)^XLFDT  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 14

Package Total Caller Graph
Automated Lab Instruments 14 LA27  LA7SM  LA7SM1  LA7SM2  LA7SM2A  LA7SMA  LA7SMB  LA7SMB1  
LA7SMP  LA7SMU  LA7SMU1  LA7VHLU1  LA7VIN4A  LA7VORM1  

Entry Points

Name Comments DBIA/ICR reference
CHKSM(X) ; Shipping manifest status check
; Call with X = ien of file #62.9 LAB SHIPPING CONFIGURATION
; Returns -1 = error^reason
; 0 = no active shipping manifest exists
; >0 = ien of active shipping manifest in file #62.8, LAB SHIPPING MANIFEST
CSM(LA7SCFG) ; Creates a new shipping manifest
; Call with X = ien of file #62.9 LAB SHIPPING CONFIGURATION
; Returns -1 = error^reason
; 0 = no active shipping manifest exists
; >0 = ien of active shipping manifest in file #62.8, LAB SHIPPING MANIFEST
SMSUP(LA7SM,LA7ST,LA7EVNC) ; Shipping manifest status update.
; Call with LA7SM = ien of entry in file #62.8 LAB SHIPPING MAINFEST^.01 field
; LA7ST = status to update
; LA7EVNC = event code^event date/time (default=NOW)
STSUP(LA7SM,LA762801,LA7DATA) ; Shipping test status update
; Call with LA7SM = ien of shipping manifest (#62.8)
; LA762801 = ien of test entry on shipping manifest
; LA7DATA = data to be filed
SEUP(LA7ID,LA7EVN,LA7DATA) ; Shipping event update
; Call with LA7ID = shipping identifier (manifest invoice # or UID)
; LA7EVN = event type (1=shipping manifest/2=test)
; LA7DATA = data to be filed
ACCSUP(LA7UID,LA760,LA7DATA) ; Accession status update
; Call with LA7UID = UID of accession to update
; LA7DATA = value to update (pointer to file #62.8, LAB SHIPPING MANIFEST or "@" to delete
SELSM(LA7SCFG,LA7SCR) ; Select shipping manifest
; Call with LA7SCFG = ien of file #62.9 LAB SHIPPING CONFIGURATION
; LA7SCR = comma delimited list of status screen - only allow selection of manifests with matching status
; Returns LA7Y = pointer to shipping manifest or error
SMED(LA7SM,LA7EVC) ; Determine shipping manifest's event date
; Call with LA7SM = ien of entry in file #62.8 LAB SHIPPING MANIFEST
; LA7EVC = event type code
; Returns LA7Y = internal event date^external event date
EVNC(LA7EVC) ; Resolve an event code to it's pointer/text(.01) value
; Call with LA7EVC = Code to lookup, i.e. SM01, SM50
; Returns Y = ien of code in file #64.061, LAB ELECTRONIC CODES.
CHKTST(LA7SM,LA762801) ; Check and update if test is still valid.
; Call with LA7SM = ien of shipping manifest in file #62.8
; LA762801 = ien of entry on test multiple in file #62.8

External References

Name Field # of Occurrence
MIX^DIC1 SELSM+10
FILE^DIE STSUP+7, ACCSUP+16
UPDATE^DIE CSM+42, SMSUP+9, SEUP+18
LOCK^DILF CSM+30, SEUP+6
RECALL^DILFD CSM+43
$$GET1^DIQ CSM+18
SEUP^LA7SMU CHKTST+38
STSUP^LA7SMU CHKTST+35
$$AD^LA7SUTL ACCSUP+8
$$DT^XLFDT CSM+26
$$FMTE^XLFDT SMED+12
$$FMTHL7^XLFDT CSM+26
$$NOW^XLFDT CSM+45, CSM+48, SMSUP+10, SEUP+10, CHKTST+37

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DIC(4 - [#4] GET1^DIQ
^LAHM(62.8 - [#62.8] Classic Fileman Calls,  RECALL^DILFD

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^LAB(64.061 - [#64.061] EVNC+5, EVNC+6
^LAHM(62.8 - [#62.8] CHKSM+11, CHKSM+12, CSM+33, CSM+52, SMED+6, CHKTST+12, CHKTST+13
^LAHM(62.85 - [#62.85] SEUP+20, SMED+10, SMED+11, SMED+12
^LAHM(62.9 - [#62.9] CHKSM+9, CSM+12, CSM+14
^LRO(68 - [#68] ACCSUP+5, ACCSUP+7, ACCSUP+10, ACCSUP+11, ACCSUP+12, ACCSUP+13, CHKTST+15, CHKTST+19, CHKTST+21, CHKTST+27

Label References

Name Line Occurrences
$$EVNC SEUP+13, SMED+7
SEUP CSM+46, CSM+49, SMSUP+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
D SELSM+4~, SELSM+9*
DATA CSM+6~, CSM+45*, CSM+46, CSM+48*, CSM+49, SMSUP+5~, SMSUP+10*, SMSUP+11
DIC SELSM+4~, SELSM+5*
DIC("A" SELSM+5*
DIC("S" SELSM+6*, SELSM+8*
DIC("W" SELSM+7*
DIC(0 SELSM+5*
DT CSM+26*
DTOUT SELSM+4~
DUOUT SELSM+4~
DUZ CSM+43, SEUP+9
FDA CSM+6~, SEUP+4~, ACCSUP+4~
FDA(1 CSM+36*, CSM+37*, CSM+38*, CSM+39*, CSM+40*, CSM+41*
FDA(3 SEUP+8*, SEUP+9*, SEUP+10*, SEUP+11*, SEUP+14*, SEUP+15*
FDA(68 ACCSUP+15*
I CSM+6~, CSM+18*, SEUP+4~, SEUP+15*
LA760 ACCSUP~, ACCSUP+13, ACCSUP+14
LA762801 STSUP~, STSUP+5*, STSUP+6, CHKTST~, CHKTST+13, CHKTST+35
LA762801(0 CHKTST+13*, CHKTST+14, CHKTST+19, CHKTST+27, CHKTST+37
LA768 ACCSUP+4~, ACCSUP+14*, ACCSUP+15
LA7AA ACCSUP+4~, ACCSUP+6*, ACCSUP+7, ACCSUP+8, ACCSUP+10, ACCSUP+11, ACCSUP+12, ACCSUP+13, ACCSUP+14, CHKTST+10~
, CHKTST+16*, CHKTST+19, CHKTST+21, CHKTST+27
LA7AD ACCSUP+4~, ACCSUP+6*, ACCSUP+7*, ACCSUP+9*, ACCSUP+10*, ACCSUP+11, ACCSUP+12, ACCSUP+13, ACCSUP+14, CHKTST+10~
, CHKTST+16*, CHKTST+19, CHKTST+21, CHKTST+27
LA7AN ACCSUP+4~, ACCSUP+6*, ACCSUP+7, ACCSUP+11, ACCSUP+12, ACCSUP+13, ACCSUP+14, CHKTST+10~, CHKTST+16*, CHKTST+19
, CHKTST+21, CHKTST+27
LA7CAD ACCSUP+4~, ACCSUP+8*, ACCSUP+10
LA7CF CSM+6~, CSM+16*, CSM+18, CSM+25
LA7DATA STSUP~, STSUP+6, SEUP~, SEUP+12, SEUP+13, SEUP+15, ACCSUP~, ACCSUP+15, CHKTST+10~, CHKTST+24*
, CHKTST+30*, CHKTST+37*, CHKTST+38
LA7DIE CSM+6~, SMSUP+5~, STSUP+4~
LA7DT CSM+6~, CSM+26*, CSM+27
>> LA7EV SMED+7*, SMED+11
LA7EVC SMED~, SMED+7, SMED+8, EVNC~, EVNC+5
LA7EVN SEUP~, SEUP+11
LA7EVNC SMSUP~, SMSUP+10
LA7FDA SMSUP+5~, STSUP+4~
LA7FDA( STSUP+6*
LA7FDA(2 SMSUP+8*
LA7I SMED+4~, SMED+9*, SMED+10*, SMED+11, SMED+12
LA7ID SEUP~, SEUP+8
LA7IEN CSM+6~, SMSUP+5~, SEUP+4~
LA7IEN(1 CSM+43, CSM+53, SMSUP+7*
LA7SCFG CSM~, CSM+9, CSM+12, CSM+14, CSM+37, SELSM~
LA7SCFG(0 CSM+14*, CSM+16, CSM+39, CSM+40, CSM+41
LA7SCR SELSM~, SELSM+8
LA7SKIP CHKTST+10~, CHKTST+11*, CHKTST+19, CHKTST+23*, CHKTST+24*, CHKTST+27, CHKTST+29*, CHKTST+30*, CHKTST+33, CHKTST+39
LA7SM CSM+6~, CSM+21*, CSM+22*, CSM+23*, CSM+25*, CSM+27*, CSM+33, CSM+34*, CSM+36, CSM+46
, CSM+49, CSM+53, SMSUP~, SMSUP+7, SMSUP+8, SMSUP+11, STSUP~, STSUP+5, SMED~, SMED+5
, SMED+6, CHKTST~, CHKTST+12, CHKTST+13, CHKTST+35
LA7SM(0 SMED+6*, SMED+8, SMED+10, CHKTST+12*, CHKTST+23, CHKTST+29, CHKTST+37
LA7ST SMSUP~, SMSUP+8
LA7UID ACCSUP~, ACCSUP+5, ACCSUP+12, CHKTST+10~, CHKTST+14*, CHKTST+15, CHKTST+38
LA7X SMED+4~
LA7Y SELSM+4~, SELSM+11*, SELSM+12*, SELSM+13, SMED+4~, SMED+9*, SMED+10, SMED+12*, SMED+13*, SMED+14
U ACCSUP+7
X CHKSM~, CHKSM+7, CHKSM+9, CHKSM+11, CSM+6~, CSM+32*, CSM+33*, CSM+34, SEUP+4~, SEUP+13*
, SEUP+14, ACCSUP+4~, ACCSUP+5*, ACCSUP+6, SELSM+4~, EVNC+3~, EVNC+4*, EVNC+5*, EVNC+6, EVNC+7
, CHKTST+10~, CHKTST+15*, CHKTST+16
X(0 EVNC+6*, EVNC+7
X4 CSM+6~
X4( CSM+18*, CSM+23
X4(99 CSM+22
Y CHKSM+11*, CHKSM+12*, CHKSM+13, SELSM+4~, SELSM+11, SELSM+12, EVNC+3~, EVNC+4*, EVNC+5, EVNC+7*
, EVNC+8*, EVNC+9, CHKTST+10~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Local Variables  | All