PSC Code Manual

fab/land-ship-loose.lsp [src]

Functions for ship loose landing fabs

New ship loose piece types should be added to LAND-SL--FAB-TYPES

Functions

Function signature Description
Public
(land-sl-make-fabs lands fab-type) Makes ship loose landing fabs of type FAB-TYPE for LANDS
Private
(land-sl--calc fab-type land-data) Calculates ship loose pieces for a landing
(land-sl--calc-dwg-no jobno stairno) Returns the next available ship loose drawing number
(land-sl--make-fab fab-type finish material hardware) Makes a ship loose landing fab of FAB-TYPE

(land-sl-make-fabs lands fab-type)

Makes ship loose landing fabs of type FAB-TYPE for LANDS

VARS:
(LANDS LIST (VL-EVERY 'DATA-LIST-P LANDS))
(FAB-TYPE STR (MEMBER FAB-TYPE LAND-SL--FAB-TYPES))

(land-sl--calc fab-type land-data)

Calculates ship loose pieces for a landing

Returns a list of lists whose car is the finish and cadr is a 2-element list. The elements
are datalists of material and hardware, respectively.

VARS:
(FAB-TYPE STR (MEMBER FAB-TYPE LAND-SL--FAB-TYPES))
(LAND-DATA LIST (DATA-LIST-P LAND-DATA))

(land-sl--calc-dwg-no jobno stairno)

Returns the next available ship loose drawing number

VARS:
(JOBNO STR)
(STAIRNO STR)

(land-sl--make-fab fab-type finish material hardware)

Makes a ship loose landing fab of FAB-TYPE

VARS:
(FAB-TYPE STR (MEMBER FAB-TYPE LAND-SL--FAB-TYPES))
(FINISH STR)
(MATERIAL LIST (VL-EVERY 'DATA-LIST-P MATERIAL))
(HARDWARE LIST (VL-EVERY 'DATA-LIST-P HARDWARE))