OSI/FTAM Programming Reference Manual

NonStop FTAM Programming Examples
HP NonStop OSI/FTAM Programming Reference Manual—528611-001
G-68
Example 1 in TAL—Updating a Remote File (in
Nowait Mode)
466 func_units.zrestart := ZAPS^VAL^FALSE;
467
468 !---------------------------------------------------------------------!
469 ! Set up the contents-type-list to request a document of !
470 ! type FTAM-2. The object ID breaks down as follows: !
471 ! 1 = ISO, 0 = Standard, 8571 = FTAM, 5 = document type, !
472 ! 2 = FTAM-2. !
473 !---------------------------------------------------------------------!
474
475 contents_type_list.zcount := 1;
476 contents_type_list.zcntnts^type^ispresent := ZAPS^VAL^PRESENT;
477 contents_type_list.zcntnts^type^list[0].zid:=ZFTM^VAL^CNTNTSLIST^DOCNAME;
478 contents_type_list.zcntnts^type^list[0].zcntntstype.znum^elements := 5;
479 contents_type_list.zcntnts^type^list[0].zcntntstype.zobj^id
480 ':=' [1,0,8571,5,2];
481
482 !---------------------------------------------------------------------!
483 ! Establish the association with the remote FTAM responder. Do this !
484 ! by calling the FTM_INITIALIZE_REQ_ procedure. In this example, !
485 ! default values are used for many parameters. For example, the !
486 ! default values 0, for AE qualifier, and [1,3,9999,1,7], for AP !
487 ! title, are used in the ae_title parameter; and 1 and !
488 ! [1,3,9999,1,7], respectively, are used in the remote_ae_title !
489 ! parameter. The remote system, however, might require other !
490 ! values for certain parameters (e.g., ae_title, remote_ae_title, !
491 ! initiator_id, filestore_password, and so on). !
492 !---------------------------------------------------------------------!
493
494 status := FTM_INITIALIZE_REQ_ ( cepi
495 , aplmgr_name
496 , responding_appl
497 , wait_mode
498 , local_appl
499 , ! ae_title !
500 , ! remote_ae_title !
501 , service_class
502 , func_units
503 , ! attr_groups - defaults to kernel only !
504 , contents_type_list