Item Notes and Inventory

ssolberg

VIP Member
I've been "importing" (custom RPG) inventory part numbers into JDE for quite a few years now (no problems) but recently, one of our vendors wants us to "import" a bunch of "parts notes" into JDE as well. The obvious place is the F14 Notes area from the Item Master screen (which already has lots of notes our own users have been putting in) but I'm having a bit of trouble understanding where all that data really is living.

So my question is two-fold; 1)Does JDE happen to have any sort of Z-file for this sort of thing? (not likely) I've got an Excel sheet I can get into a big flat file that has all the lookup info for JDE to put the info on the correct part. 2)Had anyone done this one before already and have some information to pass on.

I really don't want to write yet more custom stuff but will if have to. Where does that data "live". So far I've tracked down stuff F4016, F0016, F00163 but a bit unclear how they all "go together". Am I missing any files? How does it assign the "serial number" (SERK) which seems to be something really important.
 
You have to do custom code in order to use the "Generic Text".
It is not very fun to work with.

Here is some code that I use to get the next Serial Number..
*****************************************************************
*
* SUBROUTINE S001 - Generate New Serial Number
* ---------------------------------------------
C S001 BEGSR
* ---- -----
* Find Highest Values in F00163 and F00164 files.
C *HIVAL SETGTI00163A
C READPI00163A 9983
C *HIVAL SETGTI00164A
C READPI00164A 9983
C C6SERK IFGT C5SERK
C Z-ADDC6SERK C5SERK
C END
*
C SETON 8182
C *IN81 DOWEQ'1'
C *IN81 DOWEQ'1'
C C5SERK OREQ 0
C ADD 1 C5SERK
C C5SERK SETLLI00163A 81
C END
C C5SERK SUB 1 C6SERK
C *IN82 DOWEQ'1'
C ADD 1 C6SERK
C C6SERK SETLLI00164A 82
C END
C MOVELC6SERK $#SERK 150 New Serial #
*
*
C END001 ENDSR

There is also a "Key" that you need to figure out for the text.
As an example, here is couple of data structures that I use for Routing Text.

IDSCKY2 DS
I 1 8 $2KIT Short Item number
I 9 20 $2MMCU Branch
I 21 23 $2TBM Type BOM
I 24 43 $2OPSQ Op Seq
I 44 57 FILL3 Filler
I 58 63 $2DTE Effective Date
I 64 120 FILL4 Filler

And the code...
* SUBROUTINE S002 - Write New F00164 Record
* ------------------------------------------
C S002 BEGSR
* ---- -----
*
C CLEARI00164
C CLEARDSCKY2
C MOVEL'*P3003' C6WAPP
C MOVELIMITM $2KIT
C MOVELB51 $2MMCU
C MOVEL'M ' $2TBM
* for SL Parts use OPSQ 10.00
*
C MOVE *ZEROS $2OPSQ
C MOVE 1000 $2OPSQ
C MOVE ##DAT $2DTE
C MOVE ##DAT $2DTE
*
C MOVELDSCKY2 C6CKY2
C MOVEL$#SERK C6SERK
C MOVEL'0' C6MODR
* Retrieve Time of Day for record time stamp
*
C TIME $WK120 120
C MOVEL$WK120 $TIME 60
C MOVE ##USER C6USER
C Z-ADD$UDATE C6DQE
C Z-ADD$TIME C6TENT
C MOVE ##USER C6MUSE
C Z-ADD$UDATE C6UPMJ
C Z-ADD$TIME C6UPMT
*
C WRITEI00164
*
C END002 ENDSR
**********************************************
*
* SUBROUTINE S004 - Write New Text Records
* -----------------------------------------
C S004 BEGSR
* ---- -----
C CLEARI0016
C MOVEL$$$F00 CYWTXT
C Z-ADD1 CYLIN
C Z-ADD$#SERK CYSERK
C WRITEI0016
C END004 ENDSR


Good luck with it.
 
Sannan,

A9.1 newer release will have some new Z-file processing. You need to
see about going to A9.1 to get the Import/Export processing (this could
help you too). JDE World has some new features for Z-files, of which I
have not yet seen but was talked about at Open World in SF last month.

Jim
 
It's not that difficult. Have a look at how item master print message is handled and once you understand this you will be half way there. You could store these notes under a new key which would only be displayed when you press a specific function key or you could store them under the existing key.

Pat
 
Back
Top