- Generated by
1.9.1
|
NCEPLIBS-w3emc
2.11.0
|
Sends fax,varian,afos,awips, maps & bulls. More...
Go to the source code of this file.
Functions/Subroutines | |
| subroutine | w3fq07 (LPARM, NUMBYT, OUTFIL, CARDFIL, KRTN) |
| Sets up the arguments for sub dbn_alert which posts transmission availability to various statfiles. More... | |
| subroutine w3fq07 | ( | character*(*) | LPARM, |
| NUMBYT, | |||
| integer | OUTFIL, | ||
| integer | CARDFIL, | ||
| KRTN | |||
| ) |
Sets up the arguments for sub dbn_alert which posts transmission availability to various statfiles.
The input key words for w3fq07() may be read in via the parm field or from a data card see remarks for examples.
| Date | Programmer | Comments |
|---|---|---|
| 1997-01-09 | Peter Henrichsen | Initial |
| [in] | LPARM | Character*1 100 byte array containing ascii flags and key words. |
| [in] | NUMBYT | Integer number of bytes of ascii data in lparm. |
| [in] | OUTFIL | Integer unit number of file to post to the telecommunications gateway computer system. |
| [in] | CARDFIL | Integer unit number of file to read to get data control card in lue of parm. this is only necessary when parm(5:5) = 'a'. |
| [out] | KRTN | See return conditions. Return conditions: KRTN = 0 good return, file posted for transmission KRTN = 1 good return, file not posted for transmission test flag was on ie k=test or there was an "n" the 1st byte of the input data card. KRTN = 2 bad return, posting not attempted, the "k" key was missing. KRTN = 3 bad return, posting not attempted, parm less than than 6 bytes. KRTN = 4 bad return, card reader empty. KRTN = 5 bad return, error return from sub dbn_alert. |
FTNNF001 - File that contains the data to send. where 'nn' can be any number from 01 to 99 except 5 or 6. This file must be assigned with u:nn.
FTXXF001 - Input cards, only necessary if lparm(3-6) ='card'. a sample data card is: m=ft24f001,k=afos (all on one card starting in col 1). If col 1 = 'n' then the data set is not posted to the monitior,ie., w3fq07() will return to calling program with out sending the product. (xx has default of 05. however this number can be any unit number you wish.
'KKKKKKKK' Is generally a keyword such as: 'FAXX', 'TRAN','AFOS','AWIP' but may be: any one of these type-keys.
| Type-keys | Functions |
|---|---|
| AFOS | Posts AFOS utf map file to CRAY OSO'S statusfile. |
| AWIP | Posts AWIPS map file to CRAY OSO'S statusfile. |
| FAXX | Posts nmc6bit map file to CRAY OSO'S statusfile. |
| GRIB | Posts wmo grib file to CRAY OSO'S statusfile. |
| TRAN | Posts wmo bulletin file to CRAY OSO'S statusfile. |
| XTRN | Posts xtrn file to CRAY OSO'S statusfile. |
| IG_DATA_ipsa1 | Sends data file to the intergraph ipsa1. |
| IG_DATA_ipsa2 | Sends data file to the intergraph ipsa2. |
| IG_DATA_lzr_srv1 | Sends data file to the intergraph lzr_srv1. |
| IG_PLTF_ipsa1 | Sends AFOS plot file to the intergraph ipsa1. |
| IG_PLTF_ipsa2 | Sends AFOS plot file to the intergraph ipsa2. |
| IG_PLTF_lzr_srv1 | Sends AFOS plot file to the intergraph lzr_srv1. |
| IG_6BIT_lzr_srv1 | Sends nmc6bit file to the intergraph lzr_srv1. |
| TPC_6BIT_nhc-hp13 | Sends nmc6bit file to nhc-hp13 at TPC. |
| OSO_IG_6BIT_lzr_srv1 | Posts nmc6bit file to CRAY OSO'S statusfile and then Sends nmc6bit file to the intergraph lzr_srv1. |
| OSO_TPC_6BIT_nhc-hp13 | Posts nmc6bit file to CRAY OSO'S statusfile and then Sends nmc6bit file to nhc-hp13 at TPC. |
Where outfil is the file number containg the data.
A sample: M=PETERS,K=FAXX where A ',' or A ' ' Terminates the key word. Where a comma or blank terminates the key word.
The M= is an optional key word. the 'M' key word is the model name if missing the "missing" is used other wise it may by any 24 byte ASCII string.
A sample: M=AVN,K=AFOS, where a comma or blank terminates the key word.
1.9.1