LA7SMB ;DALOI/JMC - Shipping Manifest Build ;11/16/11 13:08
Source file <LA7SMB.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| EN | ;
|
|
| DQ | ; Taskman entry point
; Build list of tests and criteria for manifest. |
|
| SMONLY | ; Start a shipping manifest only, no building
|
|
| SCAN | ; Scan accession for tests to build
|
|
| CKTEST(LA7AA,LA7AD,LA7AN,LA760) | ; Check other tests on accession if test is part of another panel that
; has been flagged for shipping. ; Call with LA7AA = ien of accession area. ; LA7AD = accession date ; LA7AN = accession number ; LA760 = ien of lab test ; Returns LA7FLAG = 0 (part of another panel) ; = 1 (not part of another panel) |
|
| UNWIND(LA760) | ; Unwind profile - set tests into global ^TMP("LA7TREE",$J).
; Initialize variable LA7PCNT=0 before calling. ; Kill ^TMP("LA7TREE",$J) before calling. |
|
| LOCK68 | ; Lock entry in file 68
; Called from above, LA7SM |
|
| UNLOCK68 | ; Unlock entry in file 68
; Called from above, LA7SM |
|
| CLEANUP | ; Cleanup variables
|
| Name | Line Occurrences |
|---|---|
| Function Call: WRITE |
|
| FileNo | Call Tags |
|---|---|
| ^LAB(60 - [#60] | GET1^DIQ |