Data Manipulation Language Statements › #PUTSCR—stores or replaces a scratch record › #PUTSCR Syntax

#PUTSCR Syntax

►►─┬─────────┬────────────────────────────────────────────────────────────────►
   └─ label ─┘

 ►─ #PUTSCR RECORD=scratch-data-location,RECLEN=scratch-data-length-register ─►

 ►─┬────────────────────────────────────────┬─────────────────────────────────►
   └─ ,PLIST= ─┬─ SYSPLIST ◄ ─────────────┬─┘
               └─ parameter-list-pointer ─┘

 ►─┬─────────────────────────────────┬────────────────────────────────────────►
   └─ ,SAID=scratch-area-id-pointer ─┘

 ►─┬───────────────────────────────────┬──────────────────────────────────────►
   └─ ,SRID=scratch-record-id-pointer ─┘

 ►─┬────────────────────────┬─────────────────────────────────────────────────►
   └─ ,REPLACE= ─┬─ NO ◄ ─┬─┘
                 └─ YES ──┘

 ►─┬─────────────────────────────────────────────────────┬────────────────────►
   └─ ,RTNSRID= ─┬─ (1) ◄ ─────────────────────────────┬─┘
                 └─ return-scratch-record-id-register ─┘

 ►─┬─────────────────────┬────────────────────────────────────────────────────►
   └─ ,COND= ─┬─ NO ◄ ─┬─┘
              └─ IOER ─┘

 ►─┬────────────────────────────┬─────────────────────────────────────────────►
   └─ ,IOERXIT=i/o-error-label ─┘

 ►─┬─────────────────────┬────────────────────────────────────────────────────►
   └─ ERROR=error-label ─┘

 ►─┬────────────────────────────────────┬─────────────────────────────────────►
   └─ ,REPXIT=successful-replace-label ─┘

 ►─┬──────────────────────────────────┬───────────────────────────────────────►
   └─ ,NEWXIT=successful-store-label ─┘

 ►─┬────────────────────────────────────────┬─────────────────────────────────►◄
   └─ ,EREPXIT=record-already-exists-label ─┘